Specifications

-
**
zeo
ASSEMBLER
gp-7101
PAGE 02
01
0030 D3FE
OUT
(POTFE),A
;DATA
STB LOW
02
0(1 ::z
C9
RET
03 0033
04
0(133
BUSY CHECK
05 0033
06 0033
D~J
BI.lSY;
EX X
07
0034
57
LD
D,A
,Ace-COMPARE
DATA
08 0035 010000
LD
BC,OOOOH
'TIMER SET
O~I
00:::8
OBFE BUSY 1 :
IN
A, (POTH)
10 003A E600
AND
ODH
11 003C
BA (:P
D
12
0030
2002
JR
NZ,4
P
"
OO:-:F
D9
EXX
14 0040 C9
RET
''15 0041
16 0041
lEl0
LD
E, 10H
17
0043
10
DEe: E
18
0044 20FD ,JR
NZ,-1
1 ~J
0046 OB
DEe
BC
20 0047 78
LD
A,S
21 0048 Bl
OR
C
22 0049 20ED
JR
NZ,BUSYl
23 0048
D9
EXX
24 004C
C00900
CALL
NL
25 004F 117DOO
LD DE, MSGl
26 0052 CD1500
'~ALL MSG
27
C,055 (::30(100
E
,JP
ABNML
'ABNORMAL
JUMP
28 0058
2~1
0058
STATUS INPUT
30 0058
31 0058 c:rt! DOO
STIN:
CALL ':PRNT
32 005B 3EOO
LO
A,OH
33 005D CD3300
CALL BUSY
34 0060 DBFE
IN
A, (POTFE)
35 0062 OF
RRCA
36 0063 OF
RRCA
37 0064 C9
RET
38 0065
39
0065
STATUS
CHECI(
40 0065
41
0065
:<E07 :::TCK:
LD
A,(l7H
;PAPER
CHECK
42
0067 C05800 CALL
STIN
p
OObA
08
RET. C
'NORMAL
RETLIRN
44 0068
45 006B 119FOO STCK 1 ;
LO DE, MSC'2
46 006E CD0900
CALL NL
47
0071 C01500 CALL MSG
48
0074 1 19500 LD DE,MSG11
49
0077
C[H500
CALL MSG
50 007A C30000 E JP ABNML
;A8NORMAL
JUMP
33