Sharp MZ-700 - Page 183

-.....1
-.....1
** Z80 ASSEMBLER SB-7201 < 1Z-013A > PAGE 25
04.07.83
01 06B4 10F7
02 06B6 AF
03 06 B7
04 06B7 18E2
05 06B9
06 06B9 3E06
07 06BB 2103EO
( )8 06BE 77
09 06BF 3C
10 06CO 77
11 06C1 IOEI
12 06C3 CD09 00
13 06C6 7A
14 06C7 FED?
15 06C9 2805
16 06CB 11FB03
17 06CE 1807
18 06DO
19 06DO 110204
20 06D3 DF
21 06D4 11FD03
22 06D7
23 06D7 DF
24 06D8
25 0608 3A02EO
26 06DB E610
27 06DD 20CC
28 06DF CD320A
29 06E2 20F4
30 06E4 37
31 06E5 18DO
32 06E7
33 06E7
34 06E7
35 06E7
36 06E7 2A2A2020
37 06EB 4D4F4E49
38 06EF 544F5220
39 06F3 315A2D30
40 06F7 31334120
41 06FB 202A2A
42 06FE OD
43 06FF
44 06FF
45 06FF
46 O?OO
47 0700
48 0700
49 0700
50 0700
51 0700
52 0700
53 0700
54 0700 F5
55 0701 C5
56 0702 D5
57 0703 060A
58 0705
59 0705 3A02EO
60 0708 E610
MOT ?:
MOT4:
MOT8:
MOT9:
MOT5:
DJNZ
XOR
ENT
JR
ENT
LD
LD
LD
INC
LD
DJNZ
CALL
LD
CP
JR
LD
,lR
ENT
LD
RST
LD
ENT
RST
ENT
LD
AND
JR
CALL
JR
SCF
,lR
-7
A
RET3
A,06H
HL,CSTPT
<HLl ,A
A
<HLl ,A
MOT!
NL
A,D
D7H
Z,MOT8
DE,MSG#I
MOT9
DE,MSG#3
3
DE,MSG#2
3 ·
A,<CSTR>
!OH
NZ,MOT2
?BRK
NZ,MOT5
MOT?
INITIAL MESSAGE
MSG?3: ENT
' W'
PLAY MARK
"RECORD."
CALL MSGX
"PLAY"
CALL MSGX
DEFM
' ** MONITOR 1 Z-013A ** ,.
DEFB ODH
DEFS +1
;
;ORG 0700H;MSTOP
MOTOR STOP
MSTOP:
ENT
PUSH AF
PUSH BC
PUSH DE
LD B, 10
MSTI: ENT
LD A, <CSTR)
AND !OH
** Z80 ASSEMBLER SB-7201 < 1Z-013A ) PAGE 26
01 070A 280B
02 070C
03 070C 3E06
04 070 E 3203EO
05 0711 3C
(
>6 07 12 3203EO
07 0715 IOEE
08 0717
09 0717 C3E60E
10 071A
11 071A
12 071A
13 071A
14 071A
15 071A
16 071A
17 071A
18 071A
19 071A
20 071A
21 071A
22 071A C5
23 071B D5
24 071C E5
25 071D 110000
26 0720
27 0720 78
28 0721 Bl
29 0722 200B
30 0724 EB
31 . 0725 229711
32 0728 229911
33 072B El
34 072C Dl
35 072D Cl
36 072E C9
37 072F
38 072F 7E
39 0730 C5
40 0?31 0608
41 0733
42 0733 07
43 0734 3001
44 0736 13
45 0737 lOFA
46 073 9 Cl
47 073A 23
48 073B OB
49 073C 18E2
50 073E
51 073E
52 073E
53 073E
54 073 E 2103EO
55 07 41 368A
56 0743 3607
57 0745 3605
58 0747
59 0747
60 0747 C9
MST2:
MST3:
JR
ENT
LD
LD
INC
LD
DJNZ
ENT
JP
CHECK SUM
Z,MST3
A,06H
< CSTPT>, A
A
( CSTPT>, A
MSTI
?RSTRI
IN BC=SIZE
HL=DATA ADR.
EXIT SUMDT=STORE
CSMDT=STDRE
CKSUM: ENT
PUSH
PUSH
PUSH
LD
CKSI: ENT
LD
OR
JR
EX
LD
LD
POP
POP
POP
RET
CKS2: ENT
LD
PUSH
LD
CKS3: ENT
RLCA
JR
INC
DJNZ
POP
INC
DEC
JR
BC
DE
HL
DE,O
A,B
c
NZ,CKS2
DE,HL
(
SUMDT>, HL
< CSMDT>, HL
HL
DE
BC
A, <HLl
BC
B,+B
NC,+3
DE
CKS3
BC
HL
BC
CKSl
MODE SET OF KEYPORT
?MODE: ENT
LD
LD
LD
LD
VGOFF: ENT
RET
HL,KEYPF
(
HLl, 8AH
<HLl ,O?H
( HLl, 05H
04 . 07 . 83
10001010
PC3=1
PC2=1