@0
L:MOV UP,ACC
MOV ACC,DOWN
JEZ L
SUB 3
JEZ C
MOV 3,DOWN
JGZ D
MOV 0,DOWN
JMP L
C:MOV 0,DOWN
D:MOV 3,DOWN

@3
L:MOV UP,ACC
JEZ N
MOV ACC,RIGHT
SWP
MOV ACC,RIGHT
MOV 3,DOWN
MOV UP,RIGHT
MOV UP,RIGHT
ADD 3
SAV
SUB 30
JNZ L
N:SAV
MOV 1,DOWN

@4
MOV LEFT,RIGHT
MOV LEFT,ACC
MOV ACC,DOWN
MOV LEFT,DOWN
MOV LEFT,DOWN
ADD RIGHT
MOV ACC,DOWN

@5
MOV 0,ACC
JRO LEFT
JMP E
ADD 1
E:MOV ACC,LEFT

@6
L:JRO UP
ADD 3
JMP L
MOV ACC,RIGHT
ADD 1
MOV ACC,RIGHT
SUB 1

@7
MOV UP,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
