PDP-8/E Demo - Fast K.I.T.T. Scanner
A simple test program for the PDP-8/E that I wrote. I'm sure it exists elsewhere, but as one person suggested to me, it'd be a good exercise in learning the PDP-8 instruction set. It can certainly be further optimized and also slowed down a bit. Here's my (hand-compiled) listing: *0 0 /delay variable *20 7320 CLA CLL CML /set L to 1 and clear AC 7010 RAR 2000 ISZ 0 /delay 5022 JMP /keep looping until delay variable is zero again 7430 SZL /did you rotate the bit into L? 5027 JMP /jump to rotating left if so 5021 JMP /else, jump to rotating right 7004 RAL 2000 ISZ 0 /delay 5030 JMP /keep looping until delay variable is zero again 7430 SZL /did you rotate the bit into L? 5021 JMP /jump to rotating right if so 5027 JMP /else, jump to rotating left
A simple test program for the PDP-8/E that I wrote. I'm sure it exists elsewhere, but as one person suggested to me, it'd be a good exercise in learning the PDP-8 instruction set. It can certainly be further optimized and also slowed down a bit. Here's my (hand-compiled) listing: *0 0 /delay variable *20 7320 CLA CLL CML /set L to 1 and clear AC 7010 RAR 2000 ISZ 0 /delay 5022 JMP /keep looping until delay variable is zero again 7430 SZL /did you rotate the bit into L? 5027 JMP /jump to rotating left if so 5021 JMP /else, jump to rotating right 7004 RAL 2000 ISZ 0 /delay 5030 JMP /keep looping until delay variable is zero again 7430 SZL /did you rotate the bit into L? 5021 JMP /jump to rotating right if so 5027 JMP /else, jump to rotating left