@0
S: MOV UP, ACC
JEZ NL
MOV ACC, RIGHT
SWP
MOV 1, DOWN
MOV ACC, DOWN
MOV ACC, RIGHT
ADD 3
SAV
SUB 30
JNZ S
NL: MOV 6, DOWN
SAV

@1
MOV LEFT, DOWN

@3
JRO UP
MOV UP, DOWN
MOV ACC, DOWN
ADD 1
MOV ACC, DOWN
SUB 4
ADD 3

@4
S: MOV UP, ACC
SUB 3
JEZ Z
MOV 3, DOWN
JGZ T
MOV 0, DOWN
ADD 2
E: ADD UP
MOV ACC, DOWN
JMP S
Z: MOV 0, DOWN
T: MOV 3, DOWN
MOV 0, ACC
JMP E

@6
MOV UP, RIGHT

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