$400
#1A JMP 1S
JMP 2S
JMP 3S
JMP 1A
#1S SET i 5
375
CLR
DIS 5
XSK i 5
ADA i
-10
DIS i 5
CLR
DIS 5
XSK i 5
DIS i 5
JMP 0
#2S SET 4
0
LDA i
377
SET i 5
777
#1I COM
DIS i 5
COM
DIS i 5
XSK 5
JMP 1I
JMP 4
#3S SET 4
0
SET i 5
0
SET i 6
777
SET i 7
-200
LDA i
-373
#3I DIS 5
DIS 6
ADA i
4
XSK i 7
JMP 3I
JMP 4