@0
MOV UP, DOWN

@3
MOV 0, UP
MOV RIGHT, ACC
JEZ RST
L1: MOV DOWN, UP
SUB 1
JGZ L1
MOV DOWN, ACC
ADD 7
L2: MOV ACC, DOWN
MOV UP, ACC
JNZ L2
RST:

@4
O: JRO DOWN
ADD 1
JMP O
IN: MOV UP, ACC
ADD 1
MOV ACC, LEFT
JGZ IN
MOV -1, ACC
MOV ACC, DOWN

@7
MOV 7, LEFT
MOV 11, ACC
I: MOV 1, LEFT
SUB 1
JNZ I
MOV 3, UP
MOV UP, NIL
N: MOV LEFT, ACC
L: MOV ACC, UP
SUB 7
JLZ N
MOV UP, DOWN
JMP L
