Sharp MZ-80B - Page 59

54
046F
D8El
IN
A, <E1H>
0471
Et.20
AND
20H
0473
20F6
,JR
NZ,MOT1
0475
CD1705
CALL
DEL 1M
047::::
3E03
MOT2: LD
A,3 0011:WRITE
1100:READ
047A
A.- .
..::.
AND
[I
0478
281E
.JR
Z,PLAY
047[1
D8E1
MOTW: IN
A, <E1H>
047F
Et .10
AND
10H
04:31
2:::14
,JR
Z ,MOTvJG
04::::3
D5
PU : :;H
DE
0484
11::::40t.
LD
DE ,1.£JPHME3
0487
CD8605
CALL
NLMSG
048A
[11 POP DE
0488
37
SCF
048C
04:3C
3EOS
OPEN:
LD
A,OSH
048E
D3E3
OUT <E3H>
,A
0490 CD1705
CALL DEL 1M
0493
3C
INC A
04'74 D3E3
OUT <E3H>
,A
04'=)/:. .
C9
RET
04'77
04''l'7
3EOC
MOTWG:
LD
A,OCH
WRITE MODE
0499 D3E3
OUT <E3H>
,A
04'=)8
7A
PLAY:
LD
A,D
049C
E605
AND 05H
049E C4D204
CALL
NZ,MPLAY
04Ptl CDE104
CALL
FR
04A4 3A5011
LD
· A, <MODE>
04A7
-
C8D7
:3ET
2,A
04A9 1::::2c
.JF:
BU::A
04A8 00
NOP
04AC D3E3
FR1:
OUT <E3H>
,A
0 4AE C31105
,]p
DEL(:.
0481
0481
0481
0481
C: :DCE04 SERSP:
CALL MSTOP
0484 CD1105 CALL DEL6
0487
CDE'704 CALL FFWD
OLJ - BA
CD1105
CALL DEL6
048D
01A601
s::;p
1:
LD
8C,01A6H
04CO
DBE1
IN
A,(ElH)
04C:2
2F
CPL
04C3 07
RLCA
04C4
D:::
RET
c
-04C5
07 F\LCA
04C6 30F5
.JF :
tK ,:::;:;:;p1
04C:::
OB
DEC
BC
04C9
7:::
LD
A,8
04CA
Bl
OR c
04C8 20F3
,JR
NZ ,::; ;::;P1+3
04C: :D
C9
RET
04CE"
04CE
04CE
04CE.
MSTOP:
ENT
04CE
3EOD
LD A,ODH
READ
MODE
04[10
D3E3
OUT <E3H)
,A