All Program List P0 "ANG" HLT 1 +/- Min1F GSBP5 LBL1 MR05 "X3" HLT Min05 MR06 "Y3" HLT Min06 MR05 - MR01 ) R>P ( MR06 - MR02 = Min00 X<>Y - MR17 = LBL2 X>=0 GOTO3 + 360 = GOTO2 LBL3 MinF SDMS HLT MR00 FIX3 "L #" HLT GOTO1 P1 "TRA" HLT 1 +/- Min1F GSBP5 MR01 Min11 MR02 Min12 LBL1 MR16 "OA" HLT Min16 ABS Min05 GSBP9 Min00 MR04 "L" HLT Min04 X>=0 GOTO2 ABS Min06 0 Min05 GSBP8 LBL2 MR00 + GSBP6 MR16 X>=0 GOTO1 MR18 Min11 MR19 Min12 MR10 - 180 = MinF GOTO1 P2 "INT" HLT 1 +/- Min1F GSBP5 LBL2 MR01 Min11 MR02 Min12 MR17 MinF AC "L" HLT Min04 GSBP6 MR18 Min11 MR19 Min12 MRF + 90 = MinF LBL1 AC "-:+" HLT Min04 X=0 GOTO2 GSBP6 GOTO1 P3 "HIGH" HLT MR07 "EL" HLT Min07 MR08 "IH" HLT Min08 Min1F X>=0 GOTO1 GSBP5 MR01 Min11 MR02 Min12 LBL1 MR09 "FH" HLT Min09 MR06 "L" HLT ABS Min06 MR15 GSBP8 MR15 X>=0 GOTO2 MR13 Min14 LBL2 MR14 + MR08 ABS - MR09 ABS + MR07 = Min03 FIX3 "GH #" HLT MR1F X>=0 GOTO3 MR16 "OA" HLT Min16 ABS Min05 GSBP9 + GSBP6 MR09 X>=0 GOTO1 MR18 Min11 MR19 Min12 MR10 - 180 = MinF LBL3 MR09 X>=0 GOTO1 MR03 Min07 "IH" HLT Min08 GOTO1 P4 "s[RTA]L" HLT MR00 "L0" HLT Min00 LBL1 MR06 "L" HLT ABS Min06 MR15 GSBP8 MR00 X=0 GOTO1 - MR04 = FIX3 "d #" HLT GOTO1 P5 MR01 "X1" HLT Min01 MR02 "Y1" HLT Min02 LBL1 AC "X2" HLT Min03 Min05 AC "Y2" HLT Min04 X=0 GOTO2 MR03 - MR01 ) R>P ( MR04 - MR02 = Min16 Min00 X<>Y X>=0 GOTO3 + 360 = LBL3 Min17 MinF SDMS HLT MR16 FIX3 "L #" HLT MR1F X>=0 GOTO1 GOTO4 LBL2 GSBP9 Min17 MinF LBL4 P6 MRF - 360 Min10 = LBL1 X>=0 GOTO2 + MR10 = GOTO1 LBL2 Min10 SDMS HLT MR04 P>R MR10 = Min13 X<>Y Min14 + MR12 = Min19 MR13 + MR11 = Min18 GSBP7 P7 MR18 FIX3 "X #" HLT MR19 FIX3 "Y #" HLT P8 "V" HLT Min15 ABS Min05 GSBP9 Min03 MR06 P>R MR03 = Min13 Min04 X<>Y Min14 MR15 X>=0 GOTO1 MR14 Min04 LBL1 MR04 FIX3 "L #" HLT P9 MR05 INT + ( MR05 FRAC * 2 10^X ) Min14 INT / 60 + MR14 FRAC / 36 = END Memory List M00= 0. M01= 0. M02= 0. M03= 0. M04= 0. M05= 0. M06= 0. M07= 0. M08= 0. M09= 0. M0F= 0. M10= 0. M11= 0. M12= 0. M13= 0. M14= 0. M15= 0. M16= 0. M17= 0. M18= 0. M19= 0. M1F= 0. M20= 0. M21= 0. M22= 0. M23= 0. M24= 0. M25= 0. M26= 0. M27= 0. M28= 0. M29= 0. M2F= 0. M30= 0. M31= 0. M32= 0. M33= 0. M34= 0. M35= 0. M36= 0. M37= 0. M38= 0. M39= 0. M3F= 0. M40= 0. M41= 0. M42= 0. M43= 0. M44= 0. M45= 0. M46= 0. M47= 0. M48= 0. M49= 0. M4F= 0. M50= 0. M51= 0. M52= 0. M53= 0. M54= 0. M55= 0. M56= 0. M57= 0. M58= 0. M59= 0. M5F= 0. M60= 0. M61= 0. M62= 0. M63= 0. M64= 0. M65= 0. M66= 0. M67= 0. M68= 0. M69= 0. M6F= 0. M70= 0. M71= 0. M72= 0. M73= 0. M74= 0. M75= 0. M76= 0. M77= 0. M78= 0. M79= 0. M7F= 0. M80= 0. M81= 0. M82= 0. M83= 0. M84= 0. M85= 0. M86= 0. M87= 0. M88= 0. M89= 0. M8F= 0. M90= 0. M91= 0. M92= 0. M93= 0. M94= 0. M95= 0. M96= 0. M97= 0. M98= 0. M99= 0. M9F= 0.