Advertisement
F B 32
F 3 3 2
F 8 3 2
F B 3 2
5F
F B 3 3
OO
F B 3 4
FA 45
FB
F B 3 7
3F
DA 40 FB
F B 3 3
FB3B
3£
0 0
FB3D C 3 43 FB
F 3 4 0
3S
03
F 3 4 2 C3
4B FB
F B 4 5
OA
F B 4 6
0 2
F 3 4 7
33
0 2
F B 4 9
7 F
F 3 4 A
7F
F 3 4 B
D3
FC
FB4D
3E 1 8
F B 4F
30
F B 50
C
4F
FB
2
F 3 5 3
7 3
F 8 5 4
7F
F 3 5 5
15
F B 5 6
C
32
FB
2
F 3 5 9
F 3 5 9
0 5
27
FB5A C2
FB
F 3 5 0
0 1
F 3 5 E C l
F S 5 F
F I
F 3 6 0
C9
F 3 6 1
F 3 6 1
F 3 6 1
F 3 5 1
D5
F SS2
16
0 0
r 3
4 I E
6
0 0
F 36
C 3
E FB
6
6
F 3 6 9
D 5
F 3 6 A
16
08
c 5oC
I E
0 1
F 3 6 E
0 5
F S 5 F AF
F B 7 0
47
FB71
C£
FC
F 3 7 3
I F
F 3 7 4
DA 71
F5
F S 7 7
E
0
0 0
FB 79
D3 FC
F37 B
I F
FB7C D2 79
FB
F 3 7 F
o c
F 3 8 0
C 3 83
FB
FB33
D3
FC
F E 8 5
I F
F 3 8 6
DA 7 F FB
F 83 9 UD
FB3A CA 93
FG
f 3 3 0
FC
0 3
n
- 26
2 5 3 0
;
THE NUM3ER OF M ACHINE CYCLES CONSUMED BY EACH
2 5 9 0
;
IN S T R U C T I O N
BELOW I S
2 6 0 3
t
2 6 1 0
HCYCO:
MOV
2 6 2 0
OCR
2 6 3 0
JM
2 6 4 0
CMC
2 6 5 0
JC
2 6 6 0
MV I
2 6 7 0
JMP
2 6 9 0
S B I T S :
MV I
2 6 9 0
JMP
2 7 0 0
P T S K P :
LCAX
2 7 1 0
STAX
2 7 2 0
MV I
2 7 3 0
MOV
2 7 4 0
MOV
2 7 5 0
S 3 C U T :
OUT
2 7 6 0
MV I
2 7 7 0
W A I T O :
OCR
2 7 8 0
JNZ
2 7 9 0
MOV
2 8 0 0
MOV
2 8 1 0
DCP
2 8 2 0
JtIZ
2 8 3 0
I
2 8 4 0
OCR
2 8 5 0
JNZ
2 8 6 0
POP
2 8 7 0
POP
2 8 3 0
POP
2 8 9 0
RET
2 9 0 0
•
f
2 9 1 0
;
READ BYTE FROM TAPE
2 9 2 0
f
2 9 3 0
READA:
PUSH
2 9 4 0
MV I
2 9 5 0
M VI
2 9 6 0
JMP
2 9 7 0
PEADB:
PUSH
2 9 3 0
MVI
2 9 9 0
MVI
PUGH
3 0 0 0
RES ET :
3 0 1 0
XFA
3 0 2 0
MOV
3 0 3 0
T R A P L :
I N
3 0 4 0
RAP.
3 0 5 0
JC
3 0 6 0
G 3 I T 0 :
M VI
30 70
LEDGE:
I N
3 0 3 0
PAR
3 0 9 0
JNC
3 1 0 0 T I M P L :
IMR
3 1 1 0
IMP
3 1 2 0
I N
3 1 3 0 .
RAP
3 1 4 0
JC
3 1 5 0
T I M P N :
DCP
3 1 6 0
JZ
3 1 7 0
IM
N O T E D .
E
A
,
5 .
SAVE A T E M P O R A R IL Y
C
4 .
COUNT DOWN TONE PULSES
PTSKP
1 0 .
S K I P
PULSE T R A N S M I S S I O N I F ' DONS
4 .
TOGGLE T R A N S M I S S I O N B I T
S3 I T S
1 0 .
S E T B I T S
A , 0
7 .
RESET B I T S
SBOUT
1 0 .
CO TO OUT PUT B I T S
A , 3
7 .
SET B I T S
SBOUT
1 0 .
GO TO OUTPUT B I T S
3
7 .
WASTE 14
3
7 .
A
7 .
S E T ONE B I T ON AND ONE OFF
, 2
A , A
5 .
WASTE 10 C Y C L E S . . .
b
A , A
5
U C R IP
1 0 .
OUTPUT B I T S
A , 27
1 0 .
GET COUNT FOR LOOP
A
5 .
COUNT DOWN
WAITO
1 0 .
LOO? 2 7 T I M E S
A, E
5 .
RESTORE O R I G I N A L
A , A
5 .
WASTE 5 MOPE CYCLES
D
5 .
COUNT DOWN HALF CYCLES
HCYCO
1 0 .
KEEP LO O P ING T I L L
COUNT DOWN B I T S
3
B IT S O
OUTPUT NEXT B I T ,
•RESTORE SAVED R E G IS T E R S AND
0
R E T U R N . . .
B
P3W
I N T O
A.
D
SAVE R E G IS T E R
SCAN UP TO 2 5 6
0 , 0
E, 0
LOOKING FOR A SYNC FLAG
RESET
START COMMON CODE
D
SAVE R E G IS T E R
D,DBPC
GET
# OF DATA B I T S
NOT L OOKIN G FOP A SYNC FLAG
E r 1
3
SAVE REGISTER.
A
RESET A S t CARRY
A
a .
I N I T I A L I Z E
BYTE HOLDER
U C R IP
W A IT
FOR T R A I L I N G
TRAPL
I N I T I A L I Z E
PULSE LENGTH COUNT
c ,0
U C R IP
•W A IT FOP L E A D IN G EDGE OF S IG N A L
LEDGE
BUMP PULSE LENGTH COUNT
c
(S Y M M E T R IC A L W I T H NEXT LOOP)
s
U C R IP
• S I G N A L S T I L L
T I M P L
•LOOP U N T I L S I G N A L OFF
•COUNT BACK DOWN
c
B I T 3 C
• B I T
STAT E DETERM INED I F
U C P IP
• S I G N A L S T I L L
FOR OUTPUT I F
CARRY
FOR OUTPUT
FOR OUTPUT
C Y C L E S . . .
A
FRAME DONG'
UNLESS
DO"E
B I T S
FOR A 3 Y J C
PEP CHAR
P U L S E . . .
P R E S E N T ? . . .
0
O F F ? . . .
Advertisement
