Sharp MZ-700 Series Owner's Manual page 173

** Z80 A S S E M B L E R SB-7201 < 1 Z - 0 1 3 A >
P A G E 0 2 0 4 . 0 7 . S 3
0 1 0 0 4 A
;
0 2 0 0 4 A
S T A R T : ENT
0 3 0 0 4 A 3 1 F 0 1 0 L D S P , SP
! STACK S E T ( 1 0 F 0 H )
0 4 0 0 4 D E D 5 6
I M 1 i I M 1 SET
0 5 0 0 4 F C D 3 E 0 7 C A L L
7 M 0 D E ! 8 2 5 5 , 8 2 5 3 MODE S E T
0 6 0 0 5 2
C D 3 2 0 A C A L L ? B R K
; CTRL 7
0 7 0 0 5 5 3 0 1 9
J R NC j STO
OB 0 0 5 7 F E 2 0
CP 2 0 H : KEY I S C T R L KEY
0 9 0 0 5 9 2 0 1 5 J R N Z , S T O
1 0 0 0 5 B CMYO: ENT
1 1 0 0 5 B
D 3 E 1 OUT < E 1 H ) , A
5 D O O O H - F F F F H I S DRAM
1 2 0 0 5 D 1 1 F O F F
L D D E , F F F O H
! T R A N S . A D R .
1 3 0 0 6 0
2 1 6 B 0 0 L D H L , $ M C P
; MEMORY CHANG PROGRAM
1 4 0 0 6 3 0 1 0 5 0 0
L D B C , 0 5 ; B Y T E S I Z E
1 5 0 0 6 6 EDBO L D I R
1 6 0 0 6 8 C 3 F 0 F F
J P F F F O H ; JUMP $ F F F O
17 0 0 6 B
5
1 8 0 0 6 B
$ M C P : ENT
5 OOOOH—OFFFH I S DRAM
1 9 0 0 6 B D 3 E 0
DEFW E 0 D 3 H ; OUT ( E O H ) , A
2 0 0 0 6 D
C 3 0 0 DEFW
0 0 C 3 H 5 J P OOOOH
2 1 0 0 6 F 0 0
D E F B OOH
2 2
0 0 7 0
;
2 3 0 0 7 0
S T O : ENT
2 4 0 0 7 0
0 6 F F L D B , F F H
\ BUFFER C L E A R
2 5 0 0 7 2 2 1 F 1 1 0 L D
H L , N A M E i 1 0 F 1 H - 1 1 F 0 H C L E A R
2 6 0 0 7 5 C D D 8 0 F
C A L L 7 C L E R
2 7 0 0 7 8 3 E 1 6
L D A , 16H ; L A S T E R C L R .
2 8 0 0 7 A C D 1 2 0 0
C A L L F'RNT
2 9 0 0 7 D
3 E 7 1 L D
A , 7 1 H 5 B A C K : B L U E C H A . : W R I T E
3 0 0 0 7 F
2 1 0 0 D 8 L D
H L , D B O O H ; COLOR ADDRESS
3 1 0 0 8 2 C D D 5 0 9
C A L L # C L R 8
3 2 0 0 8 5 2 1 B D 0 3
L D H L , T I M I N i I N T E R R U P T JUMP R O U T I N E
3 3 0 0 8 8 3 E C 3 L D
A , C 3 H
;
3 4 0 0 8 A
3 2 3 8 1 0 L D ( 1 0 3 8 H ) , A
3 5 0 0 8 D 2 2 3 9 1 0
L D ( 1 0 3 9 H ) , H L
3 6 0 0 9 0 3 E 0 4
L D A , 0 4
S NORMAL TEMPO
3 7 0 0 9 2 3 2 9 E 1 1
L D (TEMPW) , A
3 8 0 0 9 5 C D B E 0 2
C A L L MLDSF' i MELODY STOP
3 9 0 0 9 B
C D 0 9 0 0
C A L L N L
4 0 0 0 9 B 1 1 E 7 0 6
L D D E , M S G 7 3
\ * * MONITOR 1 Z - 0 1 3 A * *
4 1 0 0 9 E DF
RST
3
; C A L L MGX
4 2 0 0 9 F
C D 7 7 0 5
C A L L 7 B E L
4 3 0 0 A 2
S S : ENT
4 4 0 0 A 2 3 E 0 1
L D A , 0 1 H
4 5
0 0 A 4 3 2 9 D 1 1
L D ( S W R K ) , A
5 KEY I N S I L E N T
4 6 0 0 A 7
2 1 0 0 E 8 L D
H L , E 8 0 0 H ! USR ROM 7
4 7
0 0 A A 7 7 L D ( H L ) , A
; ROM CHECK
4 8
OOAB 1 S 5 5
J R F D 2
4 9 0 0 AD
S T l : ENT
5 0
0 0 AD C D 0 9 0 0
C A L L NL
5 1 0 0 BO 3 E 2 A
L D
A , 2 A H ; ' * ' P R I N T
5*?
0 0 B 2 C D 1 2 0 0
C A L L F'RNT
5 3
0 0 B 5 1 1 A 3 1 1
L D D E , B U F E R
i GET L I N E WORK ( 1 1 A 3 H )
5 4 OOB8 C D 0 3 0 0
C A L L G E T L
5 5 OOBB 1A
S T 2 : L D A , ( D E )
5 6
0 0 BC 1 3
I N C DE
5 7 OOBD FEOD
CP ODH
5 8 0 0 B F 2 8 E C
J R Z , S T l
5 9 0 0 C 1
F E 4 A
CP J ' ; JUMP
6 0 0 0 C 3 2 8 2 E
J R Z , G O T O