@0
MOV UP, ACC
JEZ NL
MOV ACC, DOWN
MOV ACC, RIGHT
SWP
MOV ACC, DOWN
SUB 27
JNZ OK
NL:MOV 0, RIGHT
SUB 30
OK:ADD 30
SWP

@1
S: MOV LEFT, ACC
JEZ NL
SUB 4
JEZ C4
MOV 4, DOWN
JMP S
C4:MOV 1, DOWN
JMP S
NL:MOV 9, DOWN

@3
S: MOV UP, ACC
SUB 3
JEZ C3
MOV UP, DOWN
JLZ C12
SUB 3
C12:ADD 2
MOV ACC, DOWN
JMP S
C3:MOV 1, ACC
ADD UP
MOV ACC, DOWN
MOV -1, DOWN

@4
JRO UP
MOV ACC, DOWN
MOV 1, DOWN
JMP Y1
MOV ACC, DOWN
MOV 2, DOWN
Y1:ADD 1
MOV ACC, DOWN
SUB 4
ADD 3

@6
MOV UP, ACC
MOV ACC, RIGHT
ADD UP
MOV ACC, RIGHT

@7
MOV LEFT, DOWN
MOV UP, DOWN
JRO UP
MOV 3, DOWN
MOV 3, DOWN
MOV -1, DOWN
MOV LEFT, DOWN
MOV UP, DOWN
MOV 3, DOWN
MOV -1, DOWN
