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 cctech mailing list