Werbung
••
Z80 ASSEMBLER 2Z-004C
<IZ-013B>
PAGE II
03.06.8S
••
Z80 ASSEMBLER 2Z-004C
<IZ-013B>
PAGE 12
03.06.8S
01 0308
TIME SET
01 03S2
02 0308
02 03S2
03 0308
ACC=0 : AM
03 03S2
BELL DATA
04 0308
=I
:
PM
04 03S2
'
0S 0308
DE=SEC: BINARY
0S 03S2
?BELO:
ENT
06 0308
'
06 03S2 D7
DEFB
D7H
07 0308
?TMST:
ENT
07 03S3 4130
DEFM
'A0'
08 0308 F3
DI
08 03SS 00
OEFB
0DH
09 0309 CS
PUSH
BC
09 03S6
10 030A DS
PUSH
DE
10 03S6
11 030B ES
PUSH
HL
II 03S6
12 030C
·
3 29Bl I
LD
<AMPM> ,A
AMPM DATA
12 03S6
DEFS
+2
13 030F 3EF0
LD
A,F0H
13 03S8
;ORG 03S8H
14 0311 329Cl 1
LD
CTIMFG>,A
TIME FLAG
14 03S8
lS 0314 21C0A8
LD
HL,A8C0H
12H
lS 03S8
TIME READ
16 0317 AF
XOR
A
16 03S8
17 0318 EDS2
SBC
HL,DE
COUNT DATA
12H-IN DA
17 03S8
EXIT
ACC=0 :AM
TA
18 03S8
=I :PM
18 031A ES
PUSH
HL
19 03S8
DE=SEC. BINARY
19 031B 00
NOP
20 03S8
'
20 031C EB
EX
DE,HL
21 03S8
?TMRD:
ENT
21 0310 2107E0
LD
HL,CONTF
E007H
22 03S8 ES
PUSH
HL
22 0320 3674
LD
CHLJ, 74H
23 03S9 2107E0
LD
HL,CONTF
23 0322 36B0
LD
<HU ,B0H
24 03SC 3680
LD
CHLJ ,80H
24 0324 2B
OEC
HL
CONT2
2S 03SE 2B
DEC
HL
CONT2
2S 032S 73
LD
CHU ,E
26 03SF F3
OI
26 0326
72
LD
CHU ,D
27 0360 SE
LD
E, CHLJ
27 0327 28
DEC
HL
CONTI
28 0361 S6
LD
D. <HLJ
-..J
28 0328 360A
LD
CHU ,0AH
29 0362 FB
EI
1\)
29 032A 3600
LD
<HLJ ,0
30 0363 78
LD
A,E
30 032C 23
INC
HL
31 0364 B2
OR
D
31 032D 23
INC
HL
CONTF
32 036S 280E
JR
Z,?TMRI
32 032E 3680
LD
CHLJ ,80H
33 0367 AF
XOR
A
33 0330 2B
DEC
HL
CONT2
34 0368 21C0A8
LD
HL,A8C0H
34 0331 4E
?TMSI:
LD
C, <HL>
3S 036B EDS2
S8C
HL,DE
3S 0332 7E
LO
A, <HL>
36 0360 3810
JR
C,?TMR2
36 0333 BA
CP
D
37 036F EB
EX
DE,HL
37 0334 20FB
JR
NZ,?TMSI
38 0370 3A9811
LO
A,<AMPM>
38 0336 79
LO
A,C
39 0373 EI
POP
HL
39 0337 B8
CP
E
40 0374 C9
RET
40 0338 20F7
JR
NZ,?TMSI
41 037S 11C0A8
?TMRI:
LO
OE,A8C0H
12H
41 033A 28
DEC
HL
42 0378 3A98!1
LO
A,CAMPM)
42 0338 00
NOP
43 0378 EE01
XOR
1
43 033C 00
NOP
44 0370 EI
POP
HL
44 0330 00
NOP
4S 037E C9
RET
4S 033E 36F8
LO
CHL> ,FBH
!SEC
46 037F F3
?TMR2:
OI
46 0340 363C
LD
CHU,3CH
47 0380 2106E0
LO
HL,CONT2
47 0342 23
INC
HL
48 0383 7E
LD
A, CHU
48 0343 Dl
POP
DE
49 0384 2F
CPL
49 0344 4E
?TMS2:
LO
C,(HU
S0 038S SF
LO
E,A
50 034S 7E
LD
A,"CHLJ
SI 0386 7E
LD
A, CHLJ
51 0346 BA
CP
D
S2 0387 2F
CPL
52 0347 20FB
JR
NZ,?TMS2
S3 0388 S7
LD
O,A
53 0349 79
LD
A,C
S4 0389 F8
EI
54 034A B8
CP
E
55 038A 13
INC
DE
55 034B 20F7
JR
NZ,?TMS2
56 038B 18E8
JR
?TMRl+3
56 034D EI
POP
HL
57 0380
57 034E DI
POP
DE
58 0380
TIME INTERRUPT
58 034F Cl
POP
BC
59 038D
59 0350 FB
EI
60 0380
IMIN:
ENT
60 03SI C9
RET
Werbung
