Код:
001000 .WORD 000020 ;000020
001002 BITB #000002,R0 ;132700 000002
001006 BEQ 001110 ;001440
001010 MOV #177716,R0 ;012700 177716
001014 CLR (R0) ;005010
001016 MOV #000400,@#177760 ;012737 000400 177760
001024 CLR R1 ;005001
001026 MOV #000400,R2 ;012702 000400
001032 MOV R1,(R1)+ ;010121
001034 MOV R1,(R0) ;010110
001036 SOB R2,001032 ;077203
001040 CLR R1 ;005001
001042 MOV #000400,R2 ;012702 000400
001046 CMP R1,(R1) ;020111
001050 BNE 001104 ;001015
001052 MOV R1,(R0) ;010110
001054 COM (R1)+ ;005121
001056 SOB R2,001046 ;077205
001060 CLR R1 ;005001
001062 MOV #000400,R2 ;012702 000400
001066 MOV R1,R3 ;010103
001070 COM R3 ;005103
001072 CMP R3,(R1)+ ;020321
001074 BNE 001104 ;001003
001076 MOV R1,(R0) ;010110
001100 SOB R2,001066 ;077206
001102 BR 001000 ;000736
001104 JMP 002054 ;000167 000744
001110 MOV #000400,@#177760 ;012737 000400 177760
001116 MOV #001000,SP ;012706 001000
001122 MOV #001010,@#000004 ;012737 001010 000004
001130 MOV #000740,@#000006 ;012737 000740 000006
001136 MOV PC,R0 ;010700
001140 ADD #000040,R0 ;062700 000040
001144 MOV #000200,R1 ;012701 000200
001150 MOV #000300,R2 ;012702 000300
001154 MOV (R0)+,(R1)+ ;012021
001156 SOB R2,001154 ;077202
001160 JMP @#000200 ;000137 000200
001164 HALT ;000000
002000 BGE 002022 ;002010
002002 BR 001704 ;000740
002004 BGE 002136 ;002054
002006 BR 001710 ;000740
002010 .WORD 000020 ;000020
002012 BITB #000001,R0 ;132700 000001
002016 BNE 002024 ;001002
002020 JMP @#001000 ;000137 001000
002024 MOV #177716,R0 ;012700 177716
002030 MOV #000400,R1 ;012701 000400
002034 MOV R1,(R0) ;010110
002036 SOB R1,002034 ;077102
002040 MOV #000400,R2 ;012702 000400
002044 MOV R1,(R0) ;010110
002046 INC R1 ;005201
002050 SOB R2,002044 ;077203
002052 BR 002030 ;000766
002054 MOV #177716,R0 ;012700 177716
002060 MOV #000377,R1 ;012701 000377
002064 MOV #000000,R2 ;012702 000000
002070 MOV R1,(R0) ;010110
002072 NOP ;000240
002074 MOV R2,(R0) ;010210
002076 BR 002070 ;000774
При пуске установленные биты РНП переводят в режимы :