Sharp MZ-700 Series Owner's Manual page 198

** Z80 A S S E M B L E R SB-7201
< 1 Z - 0 1 3 A > PA G E 2 7
0 4 . 0 7 . S 3
01 0 7 4 B
0 2 0 7 4 8
0 3 0 7 4 8
04 0 7 5 9
0 5 0 7 5 9
06 0 7 5 9
0 7 0 7 5 9
0 8 0 7 5 9
0 9 0 7 5 9
10 0 7 5 9 3 E 1 5
1 1 0 7 5 B 3D
12 0 7 5 C C 2 5 B 0 7
13 0 7 5 F C9
14 0 7 6 0
15 0 7 6 0
16 0 7 6 0
17 0 7 6 0
18 0 7 6 0 3 E 1 3
19 0 7 6 2 3D
2 0 0 7 6 3 C 2 6 2 0 7
21 0 7 6 6 C9
2 2 0 7 6 7
23 0 7 6 7
24 0 7 6 7
2 5 0 7 6 7
26 0 7 6 7
2 7 0 7 6 7
2 8 0 7 6 7
2 9 0 7 6 7
3 0 0 7 6 7 C5
3 1 0 7 6 8 0 6 0 8
3 2 076A CD1A0A
3 3 0 7 6 D
34 0 7 6 D 0 7
35 0 7 6 E DC 1AOA
36 0 7 7 1 D 4 0 1 0 A
3 7 0 7 7 4
0 5
38 0 7 7 5 C 2 6 D 0 7
3 9 0 7 7 8 C I
40 0 7 7 9 C9
4 1 077A
4 2 077A
4 3 077A
4 4 077A
4 5 077A
4 6 077A
4 7 077A
48
077A
4 9 077A
C5
50 077B D5
5 1 0 7 7 C 7B
5 2 0 7 7 D 0 1 F 0 5 5
5 3 0 7 8 0 1 1 2 8 2 B
5 4
0 7 8 3 FECC
55 0 7 8 5 CABE07
56
0 7 8 8 0 1 F B 2 A
5 7 078B 1 1 1 4 1 4
58 0 7 8 E
5 9 0 7 8 E CD010A
6 0 0 7 9 1 OB
DEFS + 1 7
5 ORB 0 7 5 9 H ; D L Y 1
! 1 0 7 MICRO SEC DELY
DLYL: ENT
LD A , 1 5 H ; 1 8 * 2 1 + 2 0
DEC A
JP N Z , - 1
RET
;ORB 0 7 6 0 H ; D L Y 2
DLY2: ENT
LD A , 1 3 H ; 1 8 * 1 9 + 2 0
DEC A
JP N Z , - 1
RET
1 BYTE WRITE
ENT
PUSH
BC
LD B , + B
CALL LONS
ENT
RLCA
CALL C,LONG
CALL NC,SHORT
DEC B
JP
NZ,WBY1
POP BC
RET
GAP + TAPEMARK
E = 3 L 3 LONG GAP
=3SS>
SHORT GAP
ENT
PUSH BC
PUSH DE
LD
A , E
LD B C , 5 5 F 0 H
LD D E , 2 8 2 8 H
CP CCH
JP
Z.GAPL
LD B C , 2 A F 8 H
LD D E , 1 4 1 4 H
ENT
CALL SHORT
DEC
BC