@1
MOV UP, RIGHT

@2
S: MOV UP, ACC
SAV
MOV LEFT, ACC
SWP
JEZ T
P: SWP
L: MOV ACC, DOWN
SWP
SUB 1
JNZ P
T: MOV -999, DOWN

@5
MOV UP, DOWN

@7
L: ADD ANY
JLZ O
JMP L
O: ADD 999
MOV ACC, DOWN
SUB ACC
JMP L
