Přejít na obsah
ARCHIVEKArchiv e-mailových konferencí o 8bitových počítačích Archiv Pandory 1999 až 2013

Původní podoba příspěvku

VELESOFT (SPRINTER) Zpět na příspěvek

Surová data tak, jak byla v roce 2013 stažena z Pandory (HTML zdroj bez úprav, osobní e-mailové adresy jsou maskované).

<!-------------------------------------------------------------->
<table width="100%"><tr><td align="left" valign="middle"></td><td align=right valign="middle"></td></tr></table><BR><pre>=====================================
Bezna verze ovladace K-MOUSE:

;XECUTE MOUSE
;TAKE COORDINATES FROM CURPOS==COORD
MOUSE  LD HL,(COORD)
       LD BC,#FBDF
       LD DE,(OLDCO)
       IN A,(C)
       LD (OLDCO),A
       SUB E
       JR Z,NM_X
       JP P,MX_PL
       ADD A,L
       JR C,ZER_X
       XOR A
ZER_X  LD L,A
       JR NM_X
MX_PL  ADD A,L
       JR C,BEX_Z
       CP #FD ;MAXIMUM X
       JR C,BEX_B
BEX_Z  LD A,#FD ;MAXIMUM X
BEX_B  LD L,A
NM_X   LD B,#FF
       IN A,(C)
       LD (OLDCO+1),A
       SUB D
       JR Z,NM_Y
       NEG
       JP P,MY_PL
       ADD A,H
       JR C,ZER_Y
       XOR A
ZER_Y  LD H,A
       JR NM_Y
MY_PL  ADD A,H
       JR C,BEY_Z
       CP #BE ;MAXIMUM Y
       JR C,BEY_B
BEY_Z  LD A,#BE ;MAXIMUM Y
BEY_B  LD H,A
NM_Y   LD A,H
       CP #FF
       JR C,BIGY
       LD H,#FF
BIGY   CP #02 ;MINIMUM Y
       JR NC,SMALY
       LD H,#02 ;MINIMUM Y
SMALY  LD A,L
       CP #FF
       JR C,DIRY
       LD L,#FF
DIRY   CP #02 ;MINIMUM X
       JR NC,DIMENS
       LD L,#02 ;MINIMUM X
DIMENS LD (COORD),HL
       LD BC,#FADF
       LD HL,CONTRB
       IN A,(C)
       CPL
       AND 7
       RLCA
       RLCA
       RLCA
       RLCA
       OR (HL)
       LD (HL),A
       RET
;sem se ukladaji souradnice pro osu XaY
COORD  DEFB 0,0
OLDCO  DEFB 0,0;WORKING

Dalsi verze ovladacu jsou na
http://velesoft.speccy.cz/kmouse/km-doc/kempston_mouse_turbo_interface/km-t_
2006/kempston_mouse_turbo-2006.pdf od strany 14. Nekde mam dokonce i
ovladac, ktery umi soucasne emulovat joystick.

VELESOFT

----- Original Message -----
From: &quot;+GAMA&quot; &lt;sharpemu@[doména skryta]@centrum.cz&gt;
To: &quot;Konference Počítač SHARP MZ-800 a emulátory&quot; &lt;sharpemu@pandora.cz&gt;
Sent: Sunday, November 18, 2007 5:11 PM
Subject: Re: Kapsacon, PS/2 mys a IDE16 - trochu delsi text


<span class="replyquote1">&gt;
</span><span class="replyquote2">&gt; &gt;vykreslit a o nic jineho se uzivatel nestara). U ovladace se ha nastavit
&gt; &gt;jeste i minimalni a maximalni hranice os X a Y (okno ve kterem se bude
&gt; &gt;kurzor pohybovat). Ovladac si hlida aby sipka tyto hranice neprekrocila.
&gt; &gt;Velikost ovladace byva tusim od 90 do 200 bajtu, ale da se napsat i
</span><span class="replyquote1">&gt; kratsi
</span><span class="replyquote2">&gt; &gt;nebo delsi. Vsechny zdrojaky mam na webu v PDF dokumentaci.
</span><span class="replyquote1">&gt;
&gt; Když jsem potřeboval narvat obsluhu myši místo kempstonu do utilit pro
</span>Desktop, využil jsem toho, že má ZX obrazovka na šířku těch 256 bodů,
<img src="BODY_IMAGES_WRAP_GIF"> takže
osa X zůstala nezměněna a rovnou se použila pro kurzor. Na výšku má
obrazovka 192 bodů, což jsou 3/4 z 256, takže jsem hodnotu z myší osy Y
prostě vynásobil 3/4 a vznikla Y souřadnice pro kurzor. To bylo cca 18
bajtů. Myš má pak sice v Y ose trochu jinou rychlost, není to ale poznat.
<span class="replyquote1">&gt; Takže není potřeba držet staré souřednice, porovnávat s novými,
<img src="BODY_IMAGES_WRAP_GIF">hlídat
</span>přetečení - to jen na vysvětlenou, jak se dosáhlo těch 20 bajtů délky.
<span class="replyquote1">&gt; Velesoft vymyslel totéž, zcela nezávisle.
&gt; Na SHARPu by to znamenalo vzhledem k rozlišení &gt;256 jezdit s myší
<img src="BODY_IMAGES_WRAP_GIF">nejspíše
</span>ob bod, což nevadí, pokud není opravdu potřeba bodová přesnost
<img src="BODY_IMAGES_WRAP_GIF">(například v
případě grafických editorů potřeba je, ale tam se předpokládá, že se
<img src="BODY_IMAGES_WRAP_GIF">delší
ovladač vejde), naopak je pak myš trochu rychlejší.
<span class="replyquote1">&gt; Vzhledem k tomu, že chci časem rozjet CF kartu na MZ-700 a povrtat se
</span>kvůli tomu v CP/M, určitě by mne zdrojáky NIPOSu zajímaly (přeci jen
<img src="BODY_IMAGES_WRAP_GIF">obsluha
periferií je mi bližší než jejich stavba), i kdyby z toho nakonec třeba
<img src="BODY_IMAGES_WRAP_GIF">nic
nevzešlo, pokud na tom bude někdo dělat, přidám se k němu.
<span class="replyquote1">&gt;          J.D.
&gt;
&gt;
&gt; ---
&gt; Nejlepsi financni produkty roku najdete na
&gt; http://ZlataKoruna.idnes.cz/
</span>
</pre>