Front panel switches - what did they do?
Lionel Johnson
lionelj at labyrinth.net.au
Sun May 29 06:35:26 CDT 2016
On 28/05/2016 11:27 AM, Paul Anderson wrote:
> Thanks Lionel,
>
> You just helped me start a new list!
>
>
Hi Paul, and others
You have stimulated me to drag out a couple more useful programs -
basic stuff, I used
them to demo to students, and get them started. Also the practical side
to check console printers and screens.
I have retired, and left these systems behind, but they were marvellous
gear.
CONSOLE OUTPUT PROGRAM
----------------------
012737 000104 177566 A: MOV #104, OUTPUT
012700 100000 MOV #100000, R0
005300 B: DEC R0
001376 BNE B
000770 BR A
THIS PROGRAM OUTPUTS A CHAR TO THE CONSOLE. THE REGISTER
CAN BE CHANGED TO TEST ANOTHER DEVICE.
KEYBOARD ECHO TEST
------------------
105737 177560 LOOP: TSTB @#177560
100375 BPL LOOP
013700 177562 MOV INPUT,R0
010037 177566 MOV R0,OUTPUT
000770 BR LOOP
THIS PROGRAM WAITS FOR A KEY DOWN, THEN OUTPUTS IT BACK TO
THE TERMINAL PRINT BUFFER.
FULL DISPLAY EXERCISER
----------------------
013700 177562 START: MOV @#177562,R0
012701 000124 MOV #80,R1
105737 177564 A: TSTB @#177564
100375 BPL A
010037 177566 MOV R0,@#177566
005301 DEC R1
001371 BNE A
105737 177564 B: TSTB @#177564
100375 BPL B
012737 000015 177566 MOV #15,@#177566
105737 177564 C: TSTB @#177564
100375 BPL C
012737 000012 177566 MOV #12,@#177566
000750 BR START
THIS PROGRAM MONITORS KBD IN AND REPEATS THE CHARACTER TO
THE SCREEN UNTIL THE NEXT KEY IS PRESSED.
TO TEST LA36 ETC LINE 2 READS 012701 000204 MOV #132, R1
TO DISABLE CACHE - SLOWS PROGRAM DOWN
-------------------------------------
012737 000014 177746 MOV #14, CCR
000137 XXXXXX JMP @ A ( XXXXXX IS A: ADDRESS)
Lionel.
More information about the cctalk
mailing list