Sharp MZ-700 - Page 171

O'l
01
** ZBO ASSEMBLER SB--7201 < 1 Z-013A > F'AGE 01
01 0000
02 0000
03 0000
04 0000
05 0000
06 0000
07 0000
08 0000
09 0000
10 0000
11 0000 C34AOO
12 0003
13 0003 C3E607
14 0006
15 0006 C30E09
16 0009
17 0009 C31809
18 oooc
19 OOOC C32009
20 OOOF
21 OOOF C32409
22 0012
23 0012 C33509
24 0015
25 0015 C39308
26 0018
27 0018 C3A108
28 001B
29 001B C3BDOB
30 001E
3l OOlE C3320A
32 0021
33 0021 C33604
34 0024
35 0024 C37504
36 0027
37 0027 C3D804
38 002A
39 ci02A C3F804
40 0020
41 0020 C38805
42 0030
43 0030 C3C701
44 0033
45 0033 C30803
46 Oci36 00
47 0037 00
48 0038 C33810
49 0038
50 003E C3580 3
51 003E
52 003E C 377 05
53 0041
54 00 41 C3E 502
55 0044
56 0044 C3 AB02
57 0047
58 004 7 C3BE0 2
59 004A
6 0 004A
MONITOR PROGRAM 1Z-013A
MONIT: ENT
,TP
GETL: ENT
,TP
LETNL: ENT
,Jp
NL: ENT
JP
PRNTS: ENT
,lf'
F'RNTT: ENT
JF·
PRNT:
ENT
,Jp
MSG: ENT
<MZ-70(1) FOR PAL
REV. 83.4.7
START
?GETL
?LTNL
?NL
?PRTS
?F'RTT
?f'RNT
,TP ?MSG
MSGX: ENT
,Jp
GETf ( Y: ENT
,Jp
BRKEY: ENT
,Jp
l.JRINF: ENT
,Jp
WRDAT: ENT
,Jp
RDINF: ENT
,TP
RDDAT: ENT
?MSGX
?GET
?BRK
?WRI
?WRD
?RDI
, Jp ? F:DD
VERFY: ENT
,Jp
MELDY: \ONT
,Jp
THlST: ENT
,Jp
NOP
NOP
,Jp
TIMRD: ENT
,lf'
BELL: ENT
,Jf'
XTEMP: ENT
,Jp
~lSTA: ENT
,Jp
~lSTP: ENT
?VRFY
?
MLDY
"TMST
1038H
?TMRD
?BEL
?TEMP
t1LDST
JF' t1LDSP
04.07.83
t10NITOR ON
GET LINE <END ' CR ' J
NEW LINE
PRINT SPACE
PRINT
TAB
CHARACTER PRINT
LINE PRINT <END ' ODH '
RST
·"
GET · f•:EY
GET BREAb::
WRITE INFORMATION
WRITE
DATA
READ INFORMATION
READ DATA
VERIFING Ct1T
RST 6
TIME
SET
INTERRUPT
ROUTINE
Tir1E READ
BELL or'
TEt1PO SET ( 1-77)
MELODY START
t1ELOD Y STOF'
** ZBO ASSEMBLER SB - 7201 ( 1Z-013A > PAGE 02
01 004A
02 004A
03 004A 31F010
04 0040 ED56
05 004F CD3E07
06 0052 CD320A
07 0055 3019
08 0057 FE20
09 0059 2015
10 0058
11 005B D3E1
12 005D 11FOFF
13 0060 216BOO
14 0063 010500
15 0066 EDBO
16 0068 C3FOFF
17 006B
18 006B
19 006B D3EO
20 0060 C300
21 006F 00
22 0070
23 0070
24 0070 06FF
25 0072 21F110
26 0075 CDDBOF
27 0078 3E16
28 007A CD1200
29 007D 3E71
30 007F 210008
31 0082 CDD509
32 0085 218003
33 0088 3EC3
34 OOBA 323810
35 0080 223910
36 0090 3E04
37 0092 329Ell
38 0095 CDBE02
39 0098 CD0900
40 009B 11E706
41 009E DF
42 009F CD7705
43 OOA2
44 OOA2 3E01
45 OO ,A4 329011
46 OOA7 2100EB
47 OOAA 77
48 OOAB 1855
49 OOAD
50 OOAD CD090 0
51 OOBO 3E2A
52 OOB2 CD1200
53 0085 11A311
54 008 8 CD0300
55 OOBB lA
56 OOBC 13
57 OOBD FEOD
58 OOBF 28EC
59 OOCl FE4A
60 OOC3 282E
START: ENT
LD
IM
CALL
CALL
,JR
CF'
JR
CMYO: ENT
OUT
LD
LD
LD
LDIR
,Jp
$MCP: ENT
DEFW
DEFW
DEFB
STO: ENT
LD
LD
CALL
LD
CALL
LD
LD
CALL
LD
LD
LD
LD
LD
LD
CALL
CALL
LD
RST
CALL
SS: ENT
LD
LD
LD
LD
,JR
STl: ENT
CALL
LD
CALL
LD
CALL
ST2: LD
INC
CP
,JR
CP
,JR
SP,SP
1
"MODE
'>BRK
NC,STO
20H
NZ,STO
<E1H>,A
DE,FFFOH
HL,$MCP
BC,05
FFFOH
EOD3H
OOC3H
OOH
B,FFH
HL,NAME
?CLER
A, 16H
PRNT
A,71H
HL,DBOOH
#CLRB
HL, Tir1IN
A,C3H
< 103BHJ, A
(
1039HJ, HL
A,04
<TEMPWJ,A
MLDSP
NL
DE, t1SG?3
3
?BEL
A,01H
<SWRKJ,A
HL,EBOOH
<HLJ,A
FD2
NL
A,2AH
F'RNT
DE,BUFER
GETL
A, <DEl
DE
ODH
Z,ST1
·",J ·"
Z,GOTO
04.07.83
STACK SET <10FOHJ
IM 1 SET
8255~8253 MODE SET
CTRL ?
KEY IS CTRL KEY
DOOOH-FFFFH IS DRAt1
TRANS. ADR.
MEMORY CHANG PROGRAM
BYTE SIZE
JUMP $FFFO
OOOOH-OFFFH IS DRAM
OUT <EOHJ,A
JP OOOOH
BUFFER CLEAR
10F1H-11FOH CLEAR
LASTER CLR.
BACK:BLUE
CHA.:WRITE
COLOR ADDRESS
INTERRUPT
JUMP ROUTINE
NORMAL TEMPO
MELODY STOP
** MONITOR 1Z-013A **
CALL MGX
KEY IN SILENT
USR ROM ?
ROM CHECK
·" * ·" PRINT
GET LINE WORK ( 11A3HJ
,JUMP