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

@1
MOV LEFT, DOWN

@3
MOV UP, DOWN

@4
S: MOV UP, ACC
SUB 3
JEZ Z
MOV 3, DOWN
JGZ T
MOV 0, DOWN
ADD 1
JNZ B
MOV 0, DOWN
MOV 3, DOWN
JMP S
Z: MOV 0, DOWN
T: MOV 3, DOWN
B: MOV 3, DOWN
MOV 0, DOWN

@6
JRO UP
MOV UP, RIGHT
MOV ACC, RIGHT
ADD 1
MOV UP, RIGHT
MOV ACC, RIGHT
SUB 4
ADD 3

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