@0 @1 MOV UP ACC MOV ACC RIGHT G:MOV ACC RIGHT S:MOV UP ACC MOV ACC RIGHT JGZ G MOV 20 ACC R:SUB 1 JGZ R JRO RIGHT @2 @3 @4 @5 MOV -9 UP MOV -1 LAST MOV -999 DOWN MOV ANY DOWN G:MOV UP ACC MOV ACC DOWN MOV ACC DOWN JGZ G R:MOV ACC RIGHT MOV UP ACC JGZ R MOV RIGHT ACC O:MOV ACC DOWN MOV RIGHT ACC JGZ O @6 @7 L: SWP SAV ADD UP JGZ O JEZ O E: MOV -1 LAST S: MOV UP ACC JLZ L NEG SAV ADD UP JLZ S SUB UP JRO -3 O: MOV ACC ANY @8