Sharp MZ-700 Series Owner's Manual page 177

* * Z 8 0 ASSEMBLER S B — 7 2 0 1 < 1 Z - 0 1 3 A > PAGE 0 6 0 4 . 0 7 . 8 3
01
0 1 A 5 D 5 F'MSG: PUSH DE
02 0 1 A 6 C 5 PUSH BC
0 3 0 1 A 7 F 5 PUSH A F
04 0 1 AS
in P M S Q l : L D A , < DE) i A C C = D A T A
0 5 0 1 A 9 C D 8 F 0 1
C A L L
L P R N T
0 6
0 1 AC 1A L D A , ( D E )
0 7 0 1 AD 1 3 I N C DE
0 8
0 1 A E FEOD CP
ODH
i END ?
0 9 0 1 BO 2 0 F 6 J R
N Z . P M S G l
10 0 1 B 2 F 1 POP A F
1 1 0 1 B 3 C I POP BC
1 2 0 1 B 4 D 1 POP DE
1 3 0 1 B 5 C 9 RET
1 4 0 1 B 6
5
1 5 0 1 B 6
5 RDA CHECK
1 6 0 1 B 6
;
1 7 0 1 B 6 ; BRKEY I N TO MONITOR RETURN
1 8 0 1 B 6 ! I N : C RDA CODE
1 9 0 1 B 6
5
2 0 0 1 B 6 D B F E
R D A : I N A , ( F E )
2 1 0 1 B S E 6 0 D
AND ODH
2 2 0 1 B A B 9 CP C
2 3
0 1 BB C 8 RET Z
2 4
0 1 BC C D 1 E 0 0 C A L L BRKEY
2 5 0 1 B F 2 0 F 5 J R NZ j RDA
2 6 0 1 C 1 3 1 F 0 1 0
L D S P , S P
2 7 0 1 C 4 C 3 A D 0 0
J P S T 1
2 8 0 1 C 7
2 9 0 1 C 7
3 0 0 1 C 7
5 ORG 0 1 C 7 H
3 1 0 1 C 7
3 2 0 1 C 7 5 MELODY
3 3
0 1 C 7
3 4 0 1 C 7
j D E = D A T A LOW A D R .
3 5 0 1 C 7 i E X I T C F = 1 BREAK
3 6 0 1 C 7
; C F = 0 OK
3 7 0 1 C 7
5
3 8 0 1 C 7
? M L D Y : ENT
3 9 0 1 C 7 C 5
PUSH BC
4 0 0 1 C S D 5
PUSH DE
4 1 0 1 C 9
E 5 PUSH H L
4 2 0 1 C A 3 E 0 2
L D A , 0 2 H
4 3 0 1 C C 3 2 A 0 1 1 L D ( Q C T V ) , A
4 4 0 1 C F 0 6 0 1 L D B , 0 1
4 5 0 1 D 1 1A
M L D l : L D A , ( D E )
4 6 0 1 D 2 FEOD
CP ODH ; CR
4 7 0 1 D 4 2 8 3 B
J R Z , M L D 4
4 8 0 1 D 6
F E C 8 CP C 8 H ; END MARK
4 9 0 1 D 8 2 8 3 7
J R Z . M L D 4
5 0 0 1 D A F E C F
CP CFH ! UNDER OCTAVE
5 1 0 1 DC 2 8 2 7
J R Z , M L D 2
5 2 0 1 D E
F E 2 D CP 2 D H
; '
5 3 0 1 E 0 2 8 2 3
J R Z , M L D 2
5 4
01E2 F E 2 B
CP 2 B H
; ' + '
5 5
0 1 E 4 2 8 2 7 J R Z , M L D 3
5 6 0 1 E 6 F E D 7
CP D 7 H ; UPPER OCTAVE
5 7
0 1 E 8 2 8 2 3
J R
Z , M L D 3
5 8 0 1 E A
F E 2 3 CP
2 3 H 5 " # " HANON
5 9 0 1 EC 2 1 6 C 0 2
L D H L , M T B L
6 0 0 1 E F
2 0 0 4 J R N Z , + 6