Directory of image this file is from
This file as a plain text file
*20
PDP
PMODE /TITLE: DAN 4
JMP I P200 /THIS PROGRAM
P200, 0200 /COMPLETES ASN
PMODE /NO. 4. IT
*200
CLA CLL /ROTATES A BIT
IAC /THROUGH THE
DCA H /ACCUMULATOR
DO, CLL /AT SPEEDS AND
LAS /DIRECTIONS SEL
RAL /ECTED BY THE
JMS RL /RIGHT CONSOLE
CLL /SWITCHES. BIT0
RAR /CONTROLS DIRECT
IAC /ION AND THE
CIA /OTHER SWITCHES
DCA SW /CONTROL SPEED
AG, CLA /OF ROTATION.
TAD D1
DCA D3
O, CLA
TAD D1
DCA D2
TAD H
ISZ D2
JMP .-1
ISZ D3
JMP O
ISZ SW
JMP AG
R1, 0000
SZL
R2, 0000
DCA H
JMP DO
RL, 0000
DCA SW
SZL
JMP LR
TAD R
DCA R1
TAD R
DCA R2
TAD SW
JMP I RL
LR, TAD L
DCA R1
TAD L
DCA R2
TAD SW
JMP I RL
R, 7010
SW, 0000
D1, 7725
D2, 0000
H, 0000
D3, 0000
L, 7004