Sharp MZ-700 Series Owner's Manual page 178

00
* * Z 8 0 ASSEMBLER S B — 7 2 0 1 < 1 Z — 0 1 3 A > F'ASE 0 7
0 1 0 1 F 1 2 1 B 4 0 2
L D H L , M # T B L
0 2 0 1 F 4 13 I N C DE
0 3 0 1 F 5 C D 1 C 0 2
C A L L ONPU
0 4 0 1 F 8
3 B D 7 J R C , M L D 1
0 5 0 1 FA C D C B 0 2
C A L L RYTHM
0 6 0 1 F D 3 8 1 5
J R C , M L D 5
0 7 0 1 F F C D A B 0 2 C A L L MLDST
OB 0 2 0 2 4 1 L D B , C
0 9 0 2 0 3
1BCC J R MLD1
1 0 0 2 0 5 3 E 0 3
MLD2 : L D A , + 3
1 1 0 2 0 7 3 2 A O 1 1 L D ( O C T V ) , A
1 2 0 2 0 A 1 3
I N C
DE
1 3 0 2 0 B
1 8 C 4 J R MLD1
1 4 0 2 0 D 3 E 0 1
MLD3 : L D A , 1
1 5 0 2 0 F 1 B F 6
J R M L D 2 + 2
1 6 0 2 1 1 C D C 8 0 2 MLD4 : C A L L RYTHM
1 7 0 2 1 4 F 5 MLD5 : PUSH A F
I B
0 2 1 5 C D B E 0 2 C A L L MLDSP
1 9 0 2 I B F 1 POP A F
2 0 0 2 1 9 C 3 9 B 0 6 J P RETS
2 1 0 2 1 C
;
2 2 0 2 1 C ; ONF'U TO R A T I O CONV
2 3 0 2 1 C
;
2 4 0 2 1 C
;
E X I T ( R A T I O ) = R A T I 0 V A L U E
2 5 0 2 1 C C = 0 N T Y 0 * T E M F ' 0
2 6 0 2 1 C
;
2 7 0 2 1 C
ONF'U : ENT
2 8 0 2 1 C C5 PUSH BC
2 9 0 2 I D 0 6 0 8
L D
B , B
3 0
0 2 I F 1A 0 N P 1 : L D A , ( D E )
3 1 0 2 2 0
BE CP ( H L )
3 2 0 2 2 1 2 8 0 9
J R Z . 0 N P 2
3 3 0 2 2 3
2 3 I N C HL
3 4
0 2 2 4 2 3 I N C HL
3 5 0 2 2 5
2 3 I N C HL
3 6 0 2 2 6 1 0 F S
D J N Z - 6
3 7 0 2 2 8 3 7 SCF
3 B 0 2 2 9
1 3 I N C DE
3 9 0 2 2 A C I
POP BC
4 0 0 2 2 B C9
RET
4 1 0 2 2 C 2 3
0 N P 2 : I N C HL
4 2
0 2 2 D D5
PUSH DE
4 3 0 2 2 E
5 E L D E , ( H L )
4 4 0 2 2 F
2 3 I N C HL
4 5 0 2 3 0 5 6
LD D , ( H L )
4 6
0 2 3 1 EB
EX D E , HL
4 7 0 2 3 2
7C LD
A , H
4 8 0 2 3 3 B 7
OR A
4 9
0 2 3 4 2 8 0 9
J R Z , + l l
5 0 0 2 3 6 3 A A O 1 1
L D A , ( O C T V )
5 1 0 2 3 9 3D
DEC A
5 2 0 2 3 A
2 8 0 3
J R Z , + 5
5 3 0 2 3 C 2 9
ADD H L , HL
5 4 0 2 3 D 1 8 F A
JR - 4
5 5
0 2 3 F 2 2 A 1 1 1
LD ( R A T I O ) , H L
5 6 0 2 4 2 2 1 A O 1 1
LD H L , O C T V
5 7 0 2 4 5 3 6 0 2
LD ( H L ) , 2
5 8
0 2 4 7 2 B
DEC HL
5 9 0 2 4 8 D1
POP
DE
6 0 0 2 4 9 1 3
I N C DE
i 0 N T Y 0 S E T
MELODY START
1 1 A 0 H OCTAVE WORK
1 1 A 1 H ONF'U R A T I O