@0 1: MOV UP DOWN MOV UP ACC MOV ACC LEFT SWP SUB LEFT MOV ACC DOWN C: ADD 1 MOV DOWN LEFT JLZ C JEZ B A: MOV LEFT DOWN SUB 1 JGZ A B: JRO DOWN 0: MOV UP DOWN @1 @2 @3 @4 MOV 4 DOWN MOV LAST DOWN C: MOV UP ACC SWP MOV UP ACC MOV ACC DOWN A: ADD 1 MOV ANY ANY JLZ A NEG JLZ A B: SWP JEZ 0 MOV -999 UP 0: MOV 1 ANY @5 @6 @7 MOV 8 ACC A: SUB 1 MOV LAST LEFT B: JGZ A MOV LEFT ACC JRO UP 1: MOV ACC DOWN MOV UP NIL MOV ACC UP 0: MOV UP LEFT D: MOV UP ACC C: MOV LEFT ANY ADD 1 JLZ C JMP B @8