@0 MOV -999 RIGHT SUB 37 JNZ N MOV 1 RIGHT! N:ADD 38 @1 L:ADD UP ADD RIGHT JGZ GZ LZ: ADD 288 MOV ACC RIGHT MOV LEFT ACC M: MOV 100 RIGHT JLZ L MOV RIGHT NIL GZ: SUB 512 MOV ACC ANY MOV LEFT ACC MOV 500 LAST JGZ M @2 MOV -999 ACC ADD UP MOV ACC LEFT JMP R GZ: SUB 512 MOV ACC RIGHT MOV LEFT ACC ADD 256 S:MOV ANY LEFT MOV ACC RIGHT R:MOV LEFT ACC JGZ GZ LZ: MOV ACC RIGHT MOV LEFT ACC JMP S @3 MOV 256 ACC ADD LEFT JGZ GZ LZ: MOV ACC DOWN MOV LEFT ACC JMP E GZ: SUB 256 MOV ACC DOWN MOV LEFT ACC ADD 128 E: MOV ACC DOWN @4 MOV 32 ACC ADD RIGHT JGZ GZ LZ: MOV ACC DOWN MOV RIGHT ACC JMP E GZ: SUB 32 MOV ACC DOWN MOV RIGHT ACC ADD 16 E: MOV ACC DOWN @5 MOV -64 ACC ADD RIGHT JGZ GZ LZ: MOV ACC LEFT MOV RIGHT ACC JMP E GZ: SUB 64 MOV ACC LEFT MOV RIGHT ACC ADD 32 E: MOV ACC LEFT @6 MOV 128 ACC ADD UP JGZ GZ LZ: ADD 128 MOV ACC ANY MOV UP ACC JMP E GZ: MOV ACC ANY MOV UP ACC ADD 64 E: MOV ACC LAST @7 @8 MOV 16 ACC ADD UP JGZ GZ LZ: ADD 16 MOV ACC RIGHT MOV UP ACC JMP E GZ: MOV ACC RIGHT MOV 8 ACC ADD UP E: MOV ACC RIGHT @9 S:MOV -8 ACC ADD LEFT JGZ GZ LZ: ADD 8 MOV ACC RIGHT MOV LEFT ACC JMP E GZ: MOV ACC RIGHT MOV 4 ACC ADD LEFT E: ADD RIGHT MOV ACC DOWN @10 JMP S C: MOV 2 LEFT JMP S B: MOV 1 LEFT JMP S A: MOV 0 LEFT S: JRO LEFT 1: JMP A 2: JMP A 3: JMP B 4: JMP B 5: JMP C 6: JMP C MOV 3 LEFT