@0 MOV RIGHT ACC MOV ACC DOWN MOV ACC RIGHT @1 MOV UP LEFT MOV UP ACC MOV ACC ANY MOV ACC ANY JNZ N MOV RIGHT NIL N:SWP ADD 10 SUB LEFT L:ADD 2 MOV -1 RIGHT JLZ L MOV 1 RIGHT SWP @2 MOV LEFT ACC MOV ACC ANY MOV ACC ANY MOV ACC ANY JRO LEFT MOV ACC DOWN MOV ACC DOWN @3 @4 ADD 5 SUB UP LOOP: ADD 2 MOV -1 RIGHT JLZ LOOP MOV 1 RIGHT SUB 1 @5 MOV UP ACC JNZ N NOP N:MOV ACC RIGHT JRO LEFT MOV ACC RIGHT @6 MOV ANY DOWN @7 @8 @9 JLZ DELAY MOV -1 RIGHT MOV 0 RIGHT MOV ACC RIGHT SUB 579 DELAY: ADD 20 @10 MOV ANY DOWN @11