@0 # /C RULE # GOING ABOVE # -999 FOR A1 = /C # GOING BELOW # 320 FOR B1 = /C # GOING ABOVE # 480 FOR C1 = /C @1 MOV UP RIGHT MOV RIGHT ACC JGZ D ADD 316 # D1 JMP E D:MOV 158 RIGHT#D2 C: MOV 64 RIGHT SUB 128 E:JGZ C MOV 999 RIGHT ADD 64 ADD ACC JGZ B ADD 127 B:MOV ACC RIGHT @2 MOV -999 ACC #A1 ADD UP ADD LEFT JGZ B ADD 368 # B1 MOV ACC LEFT MOV -906 ACC # B2 JMP A B: SUB 444 # C1 MOV ACC LEFT MOV -500 ACC # C2 A: ADD LEFT JLZ A MOV ACC DOWN MOV LEFT DOWN @3 # LIMITS # A1 MIN = -999 # A1 MAX = -815 # B1 MIN = 204 # B1 MAX = 400 # C1 MIN = 200 # C1 MAX = 484 # D1 MIN = 316 @4 @5 MOV UP ACC MOV UP DOWN MOV -8 DOWN MOV -4 DOWN MOV 1 DOWN MOV ACC DOWN @6 # RELATIONSHIPS # A1 = 1 - A # B1 = B # B2 = # -64 - (A+B+D)/2 # C1 = C # Y2 = # -64 - (A-C+D)/2 # D1 = D # D2 = D/2 @7 @8 @9 MOV -64 ACC ADD UP ADD ACC JGZ B A: ADD 127 B: SUB 64 ADD ACC JGZ D C: ADD 127 D: SUB 64 JRO UP JGZ F E: ADD 64 F: ADD UP MOV ACC DOWN @10