@0 @1 MOV UP DOWN S:MOV UP ACC JGZ G Z:MOV 999 ACC G:MOV ACC DOWN JMP S @2 MOV UP ACC G:MOV ACC DOWN S:MOV UP ACC JGZ G MOV 999 DOWN JMP S @3 MOV ANY ACC MOV ACC RIGHT MOV ACC RIGHT @4 S: MOV LEFT ACC SUB RIGHT JLZ L F: JGZ G MOV LEFT NIL MOV RIGHT NIL MOV 0 DOWN MOV LEFT ACC SUB RIGHT JGZ F L: MOV LEFT DOWN G: MOV ANY LAST @5 MOV ANY ACC MOV ACC LEFT MOV ACC DOWN MOV DOWN ANY @6 @7 @8 MOV 37 ACC G:SUB 1 MOV ANY DOWN JGZ G MOV ANY DOWN MOV 0 DOWN