@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 6, DOWN
JMP S
C4:MOV 3, DOWN
JMP S
NL:MOV 1, 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
S: JRO UP
ADD 3
JMP S
MOV ACC, DOWN
MOV 1, DOWN
JMP Y1
MOV ACC, DOWN
MOV 2, DOWN
Y1:ADD 1
MOV ACC, DOWN
SUB 1

@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
