[BINTOMAN
$20
SETi1
1377  [BINARY
SETi2
3777  [MANUSCRIPT
LDAi
2065
STAi2
LDAi
5712
STAi2
SETi2
6001  [MANUSCRIPT
#1B LDAi1
STC p+2
#1A LDAi
0000
ROL 3
STA
p-3
BCLi
7770
STHi2
SROi
3567
JMP 1A
LDAi
0012
STHi2
XSK 1
JMP 1B
LDAi
0077
STHi2
HLT
[END BINTOMAN