@0
MOV 7,ACC
A: MOV -2,DOWN
SUB 1
JNZ A
MOV 0,DOWN
MOV 0,DOWN
MOV 12,DOWN
MOV 6,ACC
B: MOV -2,DOWN
SUB 1
JNZ B
MOV 7,DOWN
MOV -7,DOWN
MOV 1,DOWN
MOV 14,DOWN

@1
MOV 0,DOWN
MOV 8,ACC
A: MOV -1,DOWN
SUB 1
JNZ A
MOV -8,DOWN
MOV 0,DOWN
MOV -7,DOWN
MOV 7,ACC
B: MOV -1,DOWN
SUB 1
JNZ B
MOV 6,DOWN
MOV -1,DOWN
MOV 6,DOWN

@2
MOV 16,ACC
MOV ACC,RIGHT
MOV ACC,RIGHT
SUB 1
S: MOV ACC,RIGHT
MOV ACC,RIGHT
ADD UP
JMP S

@3
E: MOV LEFT,ACC
MOV ACC,RIGHT
SWP
MOV ACC,RIGHT
MOV RIGHT,ACC
SAV
MOV LEFT,ACC
MOV ACC,RIGHT
P: MOV RIGHT,DOWN
SWP
MOV ACC,DOWN
SWP
SUB 1
JNZ P

@4
MOV LEFT,ACC
SWP
MOV ACC,RIGHT
MOV LEFT,ACC
MOV ACC,RIGHT
MOV RIGHT,ACC
MOV ACC,LEFT
MOV RIGHT,ACC
SAV
MOV LEFT,ACC
S: SWP
MOV ACC,LEFT
SWP
SUB 1
JNZ S

@5
L: MOV LEFT,ACC
SAV
MOV LEFT,ACC
ADD 1
ADD UP
SWP
NEG
MOV ACC,LEFT
SUB 1
JEZ Z
SWP
MOV ACC,LEFT
JMP L
Z: MOV 0,LEFT

@7
MOV 23,ACC
L: MOV ACC,DOWN
SWP
MOV ACC,DOWN
MOV RIGHT,DOWN
MOV -1,DOWN
ADD UP
SWP
ADD UP
JMP L

@8
MOV 81,ACC
W: MOV 3,LEFT
SUB 1
JNZ W
MOV 51,ACC
R: MOV 4,LEFT
SUB 1
JNZ R
F: MOV RIGHT,LEFT
JMP F

@9
MOV 0,LEFT
MOV 0,LEFT
MOV 4,LEFT
MOV 0,LEFT
MOV 3,LEFT
MOV 0,LEFT
MOV 4,LEFT
MOV 0,LEFT
MOV 0,LEFT
MOV 0,LEFT
MOV 31,ACC
L: MOV 4,LEFT
SUB 1
JNZ L
MOV DOWN,ACC
