Sharp MZ-80B - Page 61

56
0528
3EOE
LD
A,OEH
052[1
D3E3
OUT
<E3H)
,A
052F
3E:25
LD
A,25H 25H<H>
: 1 t;. t;. u ::::
0531
32~5C:C>~i
LD
<DLY+1.)
,A
3AH<U
:221
. 5U:::
0534
CD5805
CALL DLY
0537
Fl
POP
AF
(>53:=:
C9
F:ET
()53'1
053'7'
F5
LONI::J:
PU:::H
AF
053A
3EOF
LD
A,OFH
053C
D3E3
OUT
<E3H)
,A
053E
3E":iA
LD
A,5AH 5AH<H>
: 3331_1:= :
0540
325C : <)5 LD
<DL Y+ 1)
,A
81H<U
: 4t:8. 5U:::
0543
CD5B05
CALL DLY
054t.
3EOE
LD
A,OEH
054:::
D3E3
OUT <E3H>
,A
054A 3E55
LD
A,55H 55H<H>
: 334U:::
0~·4C
325C:C>5
LD
( DL Y+ 1 >
,A
7CH(L)
: 4~i2. 5U:::
054F
CD5805
CALL DLY
05~i2
F1
POP
AF
(>553
C9
RET
0554
O":i54
7C
DLYR: LD
A,H
(>555
7[1
LD
A,L
055t. 3E41
LD
A,41H
66H<K>
()55:=:
32!5[:()5
LD
(DLY+1 >
,A
0558
055B 3EFF
DLY:
LD
A,FFH
055D
3D
DEC A
055E
[:25[105
,Jp
NZ
,-1
0561
C'i
RET
0562
0562
0562
BR•=::EY:
ENT
05t.2 CD7105 CALL K8SET
0565
DBEA
IN
A,
<EAH>
0567 D8EA IN
A,
<EAH>
0'569 E680 AND
::::OH
0568
C'7'
RET
056C
056C
056C
056C
DBEA
8RV:
IN
A,
<EAH>
05t:.E 2F
CF'L
056F
07
RLC?"%
0570 C9 RET
0571
0571
0571
0571
DBE::: KB::::ET:
IN
A,
<E:::H)
0573
Et.EO
AND EOH
O":i75
F613
OR 13H
0577
D3E:::
OUT
(E8H>
,A
057'7'
C9
F~ET
057A
057A
057A
O":i7A
3E53
fSET:
LD
A,53H
.-.
-=·
057C
cD:::co5
CALL KIN
057F 222800
L.D <:::HL>
,HL.