SIG-DIGITS.C3
FILE INFORMATION
FILENAME(S): SIG-DIGITS.C3
FILE TYPE(S): PRG
FILE SIZE: 9.8K
FIRST SEEN: 2025-11-30 01:08:22
APPEARS ON: 2 disk(s)
FILE HASH
7049c30723d170ccb333800d3acb785e0c72c337699930b9b55b386bc0b3623d
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | SIG-DIGITS.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 19 | 0 | DOWNLOAD FILE |
| L EHRNEN | SIG-DIGITS.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....| 00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY | 00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....| 00000030: 22 78 A9 3D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .| 00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....| 00000050: 8D 15 03 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh| 00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`| 00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh| 00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4| 00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU| 000000A0: 54 49 4E 45 20 2A 2A 00 C9 08 0A 00 8F 2D 2D 2D |TINE **......---| 000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO| 000000C0: 55 54 49 4E 45 2D 2D 2D 2D 00 CF 08 0F 00 3A 00 |UTINE----.....:.| 000000D0: D5 08 1E 00 3A 00 F2 08 23 00 8F 2D 2D 2D 2D 2D |....:...#..-----| 000000E0: 49 4E 50 55 54 20 53 45 43 54 49 4F 4E 2D 2D 2D |INPUT SECTION---| 000000F0: 2D 2D 00 07 09 28 00 3A 20 20 55 52 24 B2 22 22 |--...(.: UR$.""| 00000100: 3A 55 49 24 B2 22 22 00 1B 09 2A 00 3A 20 20 8B |:UI$.""...*.: .| 00000110: 20 55 4C B2 30 A7 55 4C B2 38 30 00 2E 09 2D 00 | UL.0.UL.80...-.| 00000120: 99 22 20 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 45 |." ..";:.UC,0.E| 00000130: 09 32 00 3A 20 20 A1 55 49 24 3A 8B 55 49 24 B2 |.2.: .UI$:.UI$.| 00000140: 22 22 A7 35 30 00 72 09 37 00 3A 20 20 8B 55 49 |"".50.r.7.: .UI| 00000150: 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 29 B1 B2 |$..(13)..(UR$)..| 00000160: 31 A7 97 55 43 2C 31 3A 99 22 20 9D 22 3B 3A 89 |1..UC,1:." .";:.| 00000170: 38 35 00 88 09 3C 00 3A 20 20 8B 55 49 24 B2 C7 |85...<.: .UI$..| 00000180: 28 32 30 29 A7 31 30 35 00 A0 09 3E 00 3A 20 20 |(20).105...>.: | 00000190: 8B 20 C3 28 55 52 24 29 B2 B1 55 4C 20 A7 35 30 |. .(UR$)..UL .50| 000001A0: 00 C8 09 41 00 3A 20 20 8D 31 32 30 3A 8F 20 43 |...A.: .120:. C| 000001B0: 48 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 |HECK FOR VALID C| 000001C0: 48 41 52 41 43 54 45 52 00 DB 09 46 00 3A 20 20 |HARACTER...F.: | 000001D0: 55 52 24 B2 55 52 24 AA 55 49 24 00 E8 09 4B 00 |UR$.UR$.UI$...K.| 000001E0: 3A 20 20 99 55 49 24 3B 00 F3 09 50 00 3A 20 20 |: .UI$;...P.: | 000001F0: 89 35 30 00 19 0A 55 00 8F 2D 2D 2D 2D 2D 43 48 |.50...U..-----CH| 00000200: 45 43 4B 20 46 4F 52 20 48 45 4C 50 20 52 45 51 |ECK FOR HELP REQ| 00000210: 55 45 53 54 2D 2D 2D 2D 2D 00 44 0A 5A 00 3A 20 |UEST-----.D.Z.: | 00000220: 20 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 | .UR$.UX$.195:. | 00000230: 45 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 |EXIT TO HELP ROU| 00000240: 54 49 4E 45 00 56 0A 5F 00 3A 20 20 8B 55 46 B2 |TINE.V._.: .UF.| 00000250: 31 A7 8D 32 34 30 00 65 0A 64 00 3A 20 55 46 B2 |1..240.e.d.: UF.| 00000260: 30 3A 99 3A 8E 00 81 0A 66 00 8F 2D 2D 2D 2D 2D |0:.:....f..-----| 00000270: 43 48 45 43 4B 20 44 45 4C 45 54 45 2D 2D 2D 2D |CHECK DELETE----| 00000280: 2D 00 94 0A 69 00 3A 20 8B C3 28 55 52 24 29 B3 |-...i.: ..(UR$).| 00000290: 31 A7 35 30 00 AE 0A 6E 00 3A 20 55 52 24 B2 C8 |1.50...n.: UR$..| 000002A0: 28 55 52 24 2C C3 28 55 52 24 29 AB 31 29 00 C2 |(UR$,.(UR$).1)..| 000002B0: 0A 73 00 3A 20 99 22 9D 20 20 9D 9D 22 3B 3A 89 |.s.: .". ..";:.| 000002C0: 35 30 00 EC 0A 78 00 8F 2D 2D 2D 2D 2D 43 48 45 |50...x..-----CHE| 000002D0: 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 |CK FOR VALID CHA| 000002E0: 52 41 43 54 45 52 53 2D 2D 2D 2D 2D 00 01 0B 7D |RACTERS-----...}| 000002F0: 00 3A 20 20 8B C3 28 55 53 24 29 B2 30 A7 31 35 |.: ..(US$).0.15| 00000300: 30 00 15 0B 82 00 3A 20 20 81 55 53 B2 31 A4 C3 |0.....: .US.1..| 00000310: 28 55 53 24 29 00 31 0B 87 00 3A 20 20 20 20 8B |(US$).1...: .| 00000320: 55 49 24 B2 CA 28 55 53 24 2C 55 53 2C 31 29 A7 |UI$..(US$,US,1).| 00000330: 8E 00 3A 0B 8C 00 3A 20 20 82 00 4A 0B 91 00 3A |..:...: ..J...:| 00000340: 20 20 55 49 24 B2 22 22 3A 8E 00 68 0B 96 00 8F | UI$."":..h....| 00000350: 2D 2D 2D 2D 2D 53 54 41 4E 44 41 52 44 20 49 4E |-----STANDARD IN| 00000360: 50 55 54 2D 2D 2D 2D 2D 00 7D 0B 98 00 3A 20 20 |PUT-----.}...: | 00000370: 8B C6 28 55 49 24 29 B2 34 36 A7 20 8E 00 92 0B |..(UI$).46. ....| 00000380: 9B 00 3A 20 20 8B 55 49 24 B2 C7 28 33 32 29 A7 |..: .UI$..(32).| 00000390: 20 8E 00 B4 0B A0 00 3A 20 20 8B C6 28 55 49 24 | ......: ..(UI$| 000003A0: 29 B3 34 38 20 B0 20 C6 28 55 49 24 29 B1 35 37 |).48 . .(UI$).57| 000003B0: A7 31 37 30 00 BD 0B A5 00 3A 20 20 8E 00 DF 0B |.170.....: ....| 000003C0: AA 00 3A 20 20 8B C6 28 55 49 24 29 B3 36 35 20 |..: ..(UI$).65 | 000003D0: B0 20 C6 28 55 49 24 29 B1 39 30 A7 31 38 30 00 |. .(UI$).90.180.| 000003E0: E8 0B AF 00 3A 20 20 8E 00 11 0C B4 00 3A 20 20 |....: ......: | 000003F0: 8B C6 28 55 49 24 29 B3 31 39 33 20 B0 20 C6 28 |..(UI$).193 . .(| 00000400: 55 49 24 29 B1 32 31 38 A7 55 49 24 B2 22 22 3A |UI$).218.UI$."":| 00000410: 8E 00 3F 0C B9 00 3A 20 20 8B C2 28 55 54 29 B2 |..?...: ..(UT).| 00000420: 31 32 B0 C2 28 55 54 29 B2 32 39 A7 55 49 24 B2 |12..(UT).29.UI$.| 00000430: C7 28 C6 28 55 49 24 29 AB 31 32 38 29 3A 8E 00 |.(.(UI$).128):..| 00000440: 48 0C BB 00 3A 20 20 8E 00 58 0C BE 00 3A 20 20 |H...: ..X...: | 00000450: 55 49 24 B2 22 22 3A 8E 00 81 0C C3 00 3A 20 20 |UI$."":......: | 00000460: 55 46 B2 31 3A 8F 2D 2D 2D 2D 2D 48 45 4C 50 20 |UF.1:.-----HELP | 00000470: 52 4F 55 54 49 4E 45 20 45 58 49 54 2D 2D 2D 2D |ROUTINE EXIT----| 00000480: 2D 00 8D 0C C5 00 3A 20 20 8D 32 35 30 00 99 0C |-.....: .250...| 00000490: C8 00 3A 20 20 8D 32 34 35 00 BB 0C CD 00 3A 20 |..: .245.....: | 000004A0: 20 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 | .UQ.UB.(U2%.256| 000004B0: AA 55 31 25 AA 55 33 25 AB 32 29 00 DA 0C D2 00 |.U1%.U3%.2).....| 000004C0: 3A 20 20 55 51 25 28 55 51 AB 55 42 29 B2 C2 28 |: UQ%(UQ.UB)..(| 000004D0: 55 51 29 3A 82 3A 99 22 93 22 00 E6 0C D7 00 3A |UQ):.:.".".....:| 000004E0: 20 20 55 5A B2 31 00 F2 0C D8 00 3A 20 20 89 33 | UZ.1.....: .3| 000004F0: 30 30 00 17 0D D9 00 55 5A B2 30 3A 55 53 24 B2 |00.....UZ.0:US$.| 00000500: 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 55 |UJ$:UG$.UK$:UP.U| 00000510: 4A 3A 55 4C B2 55 4B 00 4E 0D DA 00 8B C2 28 35 |J:UL.UK.N.....(5| 00000520: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 31 |0003).0..53281,1| 00000530: 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 2C 36 3A |:.".";:.53281,6:| 00000540: 97 35 33 32 38 30 2C 31 34 3A 89 32 32 30 00 58 |.53280,14:.220.X| 00000550: 0D DB 00 99 22 93 22 3B 00 80 0D DC 00 55 54 24 |....".";.....UT$| 00000560: B2 55 4C 24 3A 3A 81 55 51 B2 55 42 A4 28 55 32 |.UL$::.UQ.UB.(U2| 00000570: 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 33 29 |%.256.U1%.U3%.3)| 00000580: 00 98 0D E1 00 3A 20 20 97 55 51 2C 55 51 25 28 |.....: .UQ,UQ%(| 00000590: 55 51 AB 55 42 29 3A 82 00 A7 0D E6 00 3A 20 20 |UQ.UB):......: | 000005A0: 97 55 31 2C 55 31 25 00 B6 0D E8 00 3A 20 20 97 |.U1,U1%.....: .| 000005B0: 55 32 2C 55 32 25 00 C5 0D E9 00 3A 20 20 97 55 |U2,U2%.....: .U| 000005C0: 34 2C 55 34 25 00 D6 0D EA 00 3A 20 20 97 55 33 |4,U4%.....: .U3| 000005D0: 2C 55 33 25 AB 31 00 E1 0D EB 00 3A 20 20 89 33 |,U3%.1.....: .3| 000005E0: 35 00 16 0E F0 00 3A 20 20 55 44 25 B2 28 28 55 |5.....: UD%.((U| 000005F0: 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 29 AB |2%.256.U1%.U3%).| 00000600: 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 |UB).40:..(UD$,UD| 00000610: 25 AA 31 29 3A 8E 00 54 0E F5 00 3A 20 20 99 C8 |%.1):..T...: ..| 00000620: 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 |(UD$,24);" | 00000630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000640: 12 20 48 45 4C 50 20 43 4F 4D 49 4E 47 20 92 20 |. HELP COMING . | 00000650: 20 22 3A 8E 00 83 0E FA 00 3A 20 20 55 31 25 B2 | ":......: U1%.| 00000660: C2 28 55 31 29 3A 55 32 25 B2 C2 28 55 32 29 3A |.(U1):U2%..(U2):| 00000670: 55 33 25 B2 C2 28 55 33 29 3A 55 34 25 B2 C2 28 |U3%..(U3):U4%..(| 00000680: 55 34 29 00 95 0E FB 00 55 4A 24 B2 55 53 24 3A |U4).....UJ$.US$:| 00000690: 55 4A B2 55 4C 00 B8 0E FC 00 3A 20 20 55 4A 24 |UJ.UL.....: UJ$| 000006A0: B2 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4A B2 |.US$:UK$.UG$:UJ.| 000006B0: 55 50 3A 55 4B B2 55 4C 00 C1 0E FF 00 3A 20 20 |UP:UK.UL.....: | 000006C0: 8E 00 D5 0E 2C 01 8F 2D 2D 2D 2D 2D 4D 45 4E 55 |....,..-----MENU| 000006D0: 2D 2D 2D 2D 2D 00 DB 0E 2D 01 3A 00 0D 0F 2E 01 |-----...-.:.....| 000006E0: 3A 20 20 99 22 93 22 3A 97 55 54 2C 55 55 25 3A |: .".":.UT,UU%:| 000006F0: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532| 00000700: 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 00 13 0F |81,9:.53280,8...| 00000710: 2F 01 3A 00 33 0F 31 01 3A 20 20 99 22 93 20 20 |/.:.3.1.: .". | 00000720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 | ME| 00000730: 4E 55 22 00 65 0F 36 01 3A 20 20 99 22 20 2D 2D |NU".e.6.: ." --| 00000740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000760: 2D 2D 2D 2D 22 00 8E 0F 3B 01 3A 20 20 99 22 11 |----"...;.: .".| 00000770: 11 20 20 20 20 20 31 2E 20 20 20 53 49 47 4E 49 |. 1. SIGNI| 00000780: 46 49 43 41 4E 54 20 44 49 47 49 54 53 22 00 B9 |FICANT DIGITS"..| 00000790: 0F 40 01 3A 20 20 99 22 11 11 20 20 20 20 20 32 |.@.: .".. 2| 000007A0: 2E 20 20 20 53 54 55 44 45 4E 54 20 49 4E 53 54 |. STUDENT INST| 000007B0: 52 55 43 54 49 4F 4E 53 22 00 E4 0F 45 01 3A 20 |RUCTIONS"...E.: | 000007C0: 20 99 22 11 11 20 20 20 20 20 33 2E 20 20 20 54 | .".. 3. T| 000007D0: 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 |EACHER INSTRUCTI| 000007E0: 4F 4E 53 22 00 01 10 4F 01 3A 20 20 99 22 11 11 |ONS"...O.: ."..| 000007F0: 20 20 20 20 20 34 2E 20 20 20 51 55 49 54 11 11 | 4. QUIT..| 00000800: 22 00 33 10 54 01 3A 20 20 99 22 20 2D 2D 2D 2D |".3.T.: ." ----| 00000810: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000820: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000830: 2D 2D 22 00 61 10 59 01 3A 20 20 99 22 11 11 20 |--".a.Y.: .".. | 00000840: 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 4D 42 | PRESS A NUMB| 00000850: 45 52 20 4B 45 59 20 28 31 20 2D 20 34 29 20 22 |ER KEY (1 - 4) "| 00000860: 3B 00 91 10 5E 01 3A 20 20 55 4C B2 31 3A 55 53 |;...^.: UL.1:US| 00000870: 24 B2 22 31 32 33 34 22 3A 8D 33 35 3A 8F 2D 2D |$."1234":.35:.--| 00000880: 2D 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 2D 2D |-INPUT ROUTINE--| 00000890: 2D 00 9F 10 60 01 3A 20 20 55 53 24 B2 22 22 00 |-...`.: US$."".| 000008A0: BF 10 63 01 3A 20 20 91 C5 28 55 52 24 29 8D 31 |..c.: ..(UR$).1| 000008B0: 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 39 36 00 |000,400,500,396.| 000008C0: CB 10 68 01 3A 20 20 89 33 30 30 00 F5 10 8B 01 |..h.: .300.....| 000008D0: 8F 2D 2D 2D 2D 2D 52 45 2D 45 4E 41 42 4C 45 20 |.-----RE-ENABLE | 000008E0: 53 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 |STOP KEY AND END| 000008F0: 2D 2D 2D 2D 2D 00 27 11 8C 01 3A 20 20 8B C2 28 |-----.'...: ..(| 00000900: 35 30 30 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 |50003)..1..(5000| 00000910: 33 29 B3 B1 31 36 30 AF C2 28 35 30 30 30 33 29 |3)..160..(50003)| 00000920: B3 B1 30 A7 33 39 39 00 54 11 8D 01 3A 20 20 9E |..0.399.T...: .| 00000930: 55 55 AA 37 31 3A 8B C2 28 35 30 30 30 33 29 B2 |UU.71:..(50003).| 00000940: 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 |0..53281,6:.5328| 00000950: 30 2C 31 34 00 63 11 8E 01 3A 20 20 99 22 9A 93 |0,14.c...: ."..| 00000960: 22 3A 80 00 71 11 8F 01 3A 20 20 8D 38 37 35 3A |":..q...: .875:| 00000970: 8E 00 95 11 90 01 8F 2D 2D 2D 2D 2D 53 54 55 44 |.......-----STUD| 00000980: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS| 00000990: 2D 2D 2D 2D 2D 00 C7 11 95 01 3A 20 20 99 22 93 |-----.....: .".| 000009A0: 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 |":.UT,UL%:..(500| 000009B0: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 30 3A 97 |03).0..53281,0:.| 000009C0: 35 33 32 38 30 2C 30 00 E8 11 9A 01 55 50 B2 30 |53280,0.....UP.0| 000009D0: 3A 55 47 24 B2 22 D3 54 55 44 45 4E 54 20 C9 4E |:UG$.".TUDENT .N| 000009E0: 53 54 22 3A 8D 38 35 30 00 14 12 9F 01 99 22 20 |ST":.850......" | 000009F0: 20 20 11 11 D4 48 49 53 20 50 52 4F 47 52 41 4D | ...HIS PROGRAM| 00000A00: 20 57 49 4C 4C 20 44 52 49 4C 4C 20 59 4F 55 20 | WILL DRILL YOU | 00000A10: 4F 4E 20 11 00 3F 12 A1 01 99 22 20 20 20 59 4F |ON ..?...." YO| 00000A20: 55 52 20 4B 4E 4F 57 4C 45 44 47 45 20 41 42 4F |UR KNOWLEDGE ABO| 00000A30: 55 54 20 53 49 47 4E 49 46 49 43 41 4E 54 11 00 |UT SIGNIFICANT..| 00000A40: 52 12 A3 01 99 22 20 20 20 44 49 47 49 54 53 2E |R...." DIGITS.| 00000A50: 11 11 00 7E 12 A7 01 99 22 20 20 20 C9 46 20 59 |...~...." .F Y| 00000A60: 4F 55 20 48 41 56 45 20 41 4E 59 20 54 52 4F 55 |OU HAVE ANY TROU| 00000A70: 42 4C 45 2C 20 41 53 4B 20 59 4F 55 52 11 00 9A |BLE, ASK YOUR...| 00000A80: 12 A9 01 99 22 20 20 20 54 45 41 43 48 45 52 20 |...." TEACHER | 00000A90: 46 4F 52 20 48 45 4C 50 2E 11 00 AF 12 C7 01 8D |FOR HELP........| 00000AA0: 20 38 33 35 3A 55 50 B2 31 3A 8D 20 38 35 30 00 | 835:UP.1:. 850.| 00000AB0: E1 12 CC 01 99 22 11 11 11 20 20 20 CE 4F 54 45 |....."... .OTE| 00000AC0: 3A 11 11 11 D4 4F 20 41 44 56 41 4E 43 45 20 46 |:....O ADVANCE F| 00000AD0: 52 4F 4D 20 4F 4E 45 20 51 55 45 53 54 49 4F 4E |ROM ONE QUESTION| 00000AE0: 22 00 0D 13 D6 01 99 22 20 20 20 11 54 4F 20 54 |"......" .TO T| 00000AF0: 48 45 20 4E 45 58 54 20 50 52 45 53 53 20 54 48 |HE NEXT PRESS TH| 00000B00: 45 20 D3 D0 C1 C3 C5 20 42 41 52 2E 22 00 3A 13 |E ..... BAR.".:.| 00000B10: DB 01 99 22 11 20 20 20 C9 46 20 41 54 20 41 4E |...". .F AT AN| 00000B20: 59 20 54 49 4D 45 20 59 4F 55 20 57 49 53 48 20 |Y TIME YOU WISH | 00000B30: 54 4F 20 52 45 54 55 52 4E 22 00 63 13 E0 01 99 |TO RETURN".c....| 00000B40: 22 11 20 20 20 54 4F 20 54 48 45 20 CD C5 CE D5 |". TO THE ....| 00000B50: 20 50 52 45 53 53 20 27 48 27 20 D2 C5 D4 D5 D2 | PRESS 'H' .....| 00000B60: CE 2E 22 00 6F 13 E5 01 3A 20 20 8D 38 33 35 00 |..".o...: .835.| 00000B70: 86 13 EA 01 3A 20 20 8B 55 5A B2 31 A7 9E 55 50 |....: .UZ.1..UP| 00000B80: 25 3A 89 32 31 37 00 8F 13 F3 01 3A 20 20 8E 00 |%:.217.....: ..| 00000B90: B3 13 F4 01 8F 2D 2D 2D 2D 2D 54 45 41 43 48 45 |.....-----TEACHE| 00000BA0: 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 2D 2D |R INSTRUCTIONS--| 00000BB0: 2D 2D 2D 00 E6 13 F5 01 3A 20 20 99 22 93 22 3A |---.....: .".":| 00000BC0: 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 |.UT,UL%:..(50003| 00000BD0: 29 B2 30 A7 97 35 33 32 38 31 2C 32 3A 97 35 33 |).0..53281,2:.53| 00000BE0: 32 38 30 2C 31 30 00 0B 14 F9 01 3A 20 20 55 50 |280,10.....: UP| 00000BF0: B2 30 3A 55 47 24 B2 22 D4 45 41 43 48 45 52 20 |.0:UG$.".EACHER | 00000C00: C9 4E 53 54 2E 22 3A 8D 38 35 30 00 3C 14 FA 01 |.NST.":.850.<...| 00000C10: 3A 20 20 99 22 11 11 20 20 20 20 20 20 D4 4F 20 |: .".. .O | 00000C20: 54 48 45 20 42 45 53 54 20 4F 46 20 4F 55 52 20 |THE BEST OF OUR | 00000C30: 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 68 14 FC |KNOWLEDGE,.".h..| 00000C40: 01 3A 20 20 99 22 20 20 20 54 48 49 53 20 50 52 |.: ." THIS PR| 00000C50: 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 48 45 20 |OGRAM IS IN THE | 00000C60: 50 55 42 4C 49 43 11 22 00 97 14 FE 01 3A 20 20 |PUBLIC.".....: | 00000C70: 99 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 |." DOMAIN. .F| 00000C80: 20 54 48 49 53 20 49 53 20 4E 4F 54 20 54 48 45 | THIS IS NOT THE| 00000C90: 20 43 41 53 45 11 22 00 B7 14 00 02 3A 20 20 99 | CASE.".....: .| 00000CA0: 22 20 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 41 |" PLEASE CONTA| 00000CB0: 43 54 3A 11 11 11 22 00 E4 14 02 02 3A 20 20 99 |CT:...".....: .| 00000CC0: 22 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 45 |" .OMMODORE| 00000CD0: 20 C2 55 53 49 4E 45 53 53 20 CD 41 43 48 49 4E | .USINESS .ACHIN| 00000CE0: 45 53 11 22 00 0A 15 04 02 3A 20 20 99 22 20 20 |ES.".....: ." | 00000CF0: 20 20 20 20 20 20 20 20 33 33 37 30 20 D0 48 41 | 3370 .HA| 00000D00: 52 4D 41 43 59 20 C1 56 45 2E 00 31 15 06 02 3A |RMACY .VE..1...:| 00000D10: 20 20 99 22 20 20 20 20 20 20 20 20 20 20 C1 47 | ." .G| 00000D20: 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 4F |INCOURT, .NTARIO| 00000D30: 22 00 56 15 08 02 3A 20 20 99 22 20 20 20 20 20 |".V...: ." | 00000D40: 20 20 20 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 | .ANADA .1| 00000D50: D7 20 32 CB 34 22 00 79 15 0A 02 3A 20 20 99 22 |. 2.4".y...: ."| 00000D60: 20 20 20 20 20 20 20 20 20 20 28 34 31 36 29 20 | (416) | 00000D70: 34 39 39 2D 34 32 39 32 22 00 8F 15 0C 02 55 50 |499-4292".....UP| 00000D80: B2 31 3A 8D 20 38 33 35 3A 8D 20 38 35 30 3A 00 |.1:. 835:. 850:.| 00000D90: BD 15 0E 02 99 22 20 20 20 11 11 11 D0 52 4F 47 |....." ....ROG| 00000DA0: 52 41 4D 20 CE 41 4D 45 20 3A D3 49 47 4E 49 46 |RAM .AME :.IGNIF| 00000DB0: 49 43 41 4E 54 20 C4 49 47 49 54 53 11 00 DE 15 |ICANT .IGITS....| 00000DC0: 10 02 99 22 20 20 20 D7 52 49 54 54 45 4E 20 C2 |..." .RITTEN .| 00000DD0: 59 20 20 20 3A D2 2E D7 2E C4 52 41 59 11 00 02 |Y :.....RAY...| 00000DE0: 16 11 02 99 22 20 20 20 D5 50 47 52 41 44 45 44 |...." .PGRADED| 00000DF0: 20 C2 59 20 20 3A D0 2E D3 2E D3 43 48 4D 49 44 | .Y :.....CHMID| 00000E00: 54 11 00 2B 16 14 02 99 22 20 20 20 11 D4 48 49 |T..+...." ..HI| 00000E10: 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 |S PROGRAM WILL R| 00000E20: 55 4E 20 4F 4E 20 41 4E 59 11 11 00 49 16 18 02 |UN ON ANY...I...| 00000E30: 99 22 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 20 |." ... 64 | 00000E40: C3 CF CD D0 D5 D4 C5 D2 11 00 6C 16 19 02 99 22 |..........l...."| 00000E50: 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 | .........| 00000E60: 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 81 16 1A | 64 ............| 00000E70: 02 55 50 B2 32 3A 8D 20 38 33 35 3A 8D 20 38 35 |.UP.2:. 835:. 85| 00000E80: 30 00 B1 16 1C 02 99 22 11 11 20 20 20 D4 48 49 |0......".. .HI| 00000E90: 53 20 50 52 4F 47 52 41 4D 20 50 52 4F 56 49 44 |S PROGRAM PROVID| 00000EA0: 45 53 20 53 54 55 44 45 4E 54 53 20 57 49 54 48 |ES STUDENTS WITH| 00000EB0: 11 00 DE 16 21 02 99 22 20 20 20 41 20 44 52 49 |....!.." A DRI| 00000EC0: 4C 4C 20 49 4E 20 54 48 45 20 41 52 45 41 20 4F |LL IN THE AREA O| 00000ED0: 46 20 53 49 47 4E 49 46 49 43 41 4E 54 11 00 0C |F SIGNIFICANT...| 00000EE0: 17 26 02 99 22 20 20 20 44 49 47 49 54 53 2E 20 |.&.." DIGITS. | 00000EF0: 20 D4 48 45 20 51 55 45 53 54 49 4F 4E 53 20 41 | .HE QUESTIONS A| 00000F00: 52 45 20 47 49 56 45 4E 20 49 4E 11 00 3A 17 2B |RE GIVEN IN..:.+| 00000F10: 02 99 22 20 20 20 41 20 47 52 4F 55 50 20 57 49 |.." A GROUP WI| 00000F20: 54 48 20 54 48 45 20 43 4F 4D 50 55 54 45 52 20 |TH THE COMPUTER | 00000F30: 50 52 4F 56 49 44 49 4E 47 11 00 62 17 30 02 99 |PROVIDING..b.0..| 00000F40: 22 20 20 20 41 53 53 49 53 54 41 4E 43 45 20 41 |" ASSISTANCE A| 00000F50: 4E 44 20 45 4E 43 4F 55 52 41 47 45 4D 45 4E 54 |ND ENCOURAGEMENT| 00000F60: 2E 11 00 8A 17 35 02 99 22 20 20 20 D4 48 45 52 |.....5.." .HER| 00000F70: 45 20 49 53 20 4E 4F 20 46 49 4E 41 4C 20 53 43 |E IS NO FINAL SC| 00000F80: 4F 52 45 20 47 49 56 45 4E 2E 00 96 17 44 02 3A |ORE GIVEN....D.:| 00000F90: 20 20 8D 38 33 35 00 AD 17 4E 02 3A 20 20 8B 55 | .835...N.: .U| 00000FA0: 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 B6 17 |Z.1..UP%:.217...| 00000FB0: 57 02 3A 20 20 8E 00 DF 17 58 02 8F 2D 2D 2D 2D |W.: ....X..----| 00000FC0: 2D 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 |-PROGRAM MODIFIC| 00000FD0: 41 54 49 4F 4E 20 49 4E 53 54 2D 2D 2D 2D 2D 00 |ATION INST-----.| 00000FE0: F3 17 59 02 3A 20 20 99 22 93 22 3A 97 55 54 2C |..Y.: .".":.UT,| 00000FF0: 55 4C 25 00 16 18 5D 02 3A 20 20 55 50 B2 30 3A |UL%...].: UP.0:| 00001000: 55 47 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 |UG$.".ROGRAM .OD| 00001010: 22 3A 8D 38 35 30 00 22 18 94 02 3A 20 20 8D 38 |":.850."...: .8| 00001020: 33 35 00 39 18 B2 02 3A 20 20 8B 55 5A B2 31 A7 |35.9...: .UZ.1.| 00001030: 9E 55 50 25 3A 89 32 31 37 00 42 18 BB 02 3A 20 |.UP%:.217.B...: | 00001040: 20 8E 00 6A 18 BC 02 8F 2D 2D 2D 2D 2D 54 4F 20 | ..j....-----TO | 00001050: 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 |USE 8032 LOAD CB| 00001060: 4D 34 30 33 32 2D 2D 2D 2D 2D 00 A0 18 C6 02 99 |M4032-----......| 00001070: 22 93 11 11 11 05 42 45 46 4F 52 45 20 52 55 4E |".....BEFORE RUN| 00001080: 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 |NING THIS PROGRA| 00001090: 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 |M ON AN 8032 ..| 000010A0: 00 D6 18 D0 02 99 22 20 20 20 20 20 20 4C 4F 41 |......" LOA| 000010B0: 44 20 54 48 45 20 27 43 42 4D 20 34 30 33 32 27 |D THE 'CBM 4032'| 000010C0: 20 50 52 4F 47 52 41 4D 11 11 11 11 11 11 11 11 | PROGRAM........| 000010D0: 11 11 11 11 11 22 00 E4 18 DA 02 3A 20 20 9E 55 |.....".....: .U| 000010E0: 55 AA 37 31 00 ED 18 E4 02 3A 20 20 80 00 0D 19 |U.71.....: ....| 000010F0: 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 4C 20 45 | .. ** T I T L E| 00001100: 20 20 20 50 20 41 20 47 20 45 20 2A 2A 00 41 19 | P A G E **.A.| 00001110: 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 54 2C 55 |".."....";:.UT,U| 00001120: 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |U%:..(50003).0..| 00001130: 35 33 32 38 30 2C 31 34 3A 97 35 33 32 38 31 2C |53280,14:.53281,| 00001140: 36 00 57 19 24 03 81 49 B2 31 A4 33 38 3A 99 22 |6.W.$..I.1.38:."| 00001150: 12 A6 92 22 3B 3A 82 00 6F 19 26 03 81 49 B2 31 |...";:..o.&..I.1| 00001160: A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B 3A 82 00 |.22:.".....";:..| 00001170: 87 19 28 03 81 49 B2 31 A4 33 37 3A 99 22 9D 9D |..(..I.1.37:."..| 00001180: 12 A6 92 22 3B 3A 82 00 9F 19 2A 03 81 49 B2 31 |...";:....*..I.1| 00001190: A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B 3A 82 00 |.22:.".....";:..| 000011A0: C4 19 2C 03 99 22 13 11 11 11 11 11 11 1D 1D 1D |..,.."..........| 000011B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................| 000011C0: A9 20 20 92 00 E6 19 2E 03 99 22 1D 1D 1D 1D 1D |. .......".....| 000011D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 |.............. .| 000011E0: 20 20 12 20 92 A9 00 07 1A 30 03 99 22 1D 1D 1D | . .....0.."...| 000011F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................| 00001200: 20 92 20 20 12 A3 DF 00 25 1A 32 03 99 22 1D 1D | . ....%.2.."..| 00001210: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00001220: DF 12 20 20 92 00 4D 1A 34 03 99 22 11 11 1D 1D |.. ..M.4.."....| 00001230: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 4D 20 |..........C O M | 00001240: 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 00 70 1A |M O D O R E...p.| 00001250: 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |6.."............| 00001260: 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 4C 11 11 |...EDUCATIONAL..| 00001270: 00 8F 1A 38 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |...8..".........| 00001280: 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 52 45 00 |.......SOFTWARE.| 00001290: AA 1A 3A 03 8F 20 2A 2A 20 43 4F 4D 4D 4F 44 4F |..:.. ** COMMODO| 000012A0: 52 45 20 4C 4F 47 4F 20 2A 2A 00 E2 1A 3B 03 99 |RE LOGO **...;..| 000012B0: C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D |.(UD$,24);".....| 000012C0: 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 |.....PRESS SPACE| 000012D0: 20 42 41 52 20 4F 52 20 57 41 49 54 92 22 3A 49 | BAR OR WAIT.":I| 000012E0: B2 30 00 04 1B 3C 03 A1 41 24 3A 8B 41 24 B3 B1 |.0...<..A$:.A$..| 000012F0: 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 32 35 30 |" ".I.I.1:.I.250| 00001300: A7 38 32 38 00 2B 1B 3E 03 3A 20 20 54 31 24 B2 |.828.+.>.: T1$.| 00001310: 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 |"":T2$."":T3$.""| 00001320: 3A 54 34 24 B2 22 22 3A 49 B2 30 00 37 1B 40 03 |:T4$."":I.0.7.@.| 00001330: 3A 20 20 89 33 30 30 00 56 1B 43 03 8F 2D 2D 2D |: .300.V.C..---| 00001340: 2D 2D 53 50 41 43 45 20 42 41 52 20 50 52 45 53 |--SPACE BAR PRES| 00001350: 53 2D 2D 2D 2D 2D 00 8E 1B 48 03 3A 20 20 99 C8 |S-----...H.: ..| 00001360: 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D |(UD$,24);"......| 00001370: 12 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 |.PRESS SPACE BAR| 00001380: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 A8 | TO CONTINUE."..| 00001390: 1B 4C 03 3A 20 20 A1 55 49 24 3A 8B 55 49 24 B3 |.L.: .UI$:.UI$.| 000013A0: B1 22 20 22 A7 38 34 34 00 B1 1B 4E 03 3A 20 20 |." ".844...N.: | 000013B0: 8E 00 D4 1B 52 03 8F 2D 2D 2D 2D 2D 50 41 47 45 |....R..-----PAGE| 000013C0: 20 44 45 53 49 47 4E 20 52 4F 55 54 49 4E 45 2D | DESIGN ROUTINE-| 000013D0: 2D 2D 2D 2D 00 E3 1B 54 03 3A 20 20 55 50 B2 55 |----...T.: UP.U| 000013E0: 50 AA 31 00 0D 1C 57 03 3A 20 20 99 22 93 22 C8 |P.1...W.: .".".| 000013F0: 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C8 28 55 |(UT$.UP$,21);.(U| 00001400: 47 24 AA 55 50 24 2C 31 34 29 3B 55 50 00 3F 1C |G$.UP$,14);UP.?.| 00001410: 5C 03 3A 20 20 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D |\.: ." --------| 00001420: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001430: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".| 00001440: 76 1C 61 03 3A 20 20 99 C8 28 55 44 24 2C 32 34 |v.a.: ..(UD$,24| 00001450: 29 3B C8 28 55 50 24 2C 36 29 3B 22 48 45 4C 50 |);.(UP$,6);"HELP| 00001460: 20 2D 20 50 52 45 53 53 20 20 20 48 20 3C 52 45 | - PRESS H <RE| 00001470: 54 55 52 4E 3E 22 00 85 1C 66 03 3A 20 20 99 22 |TURN>"...f.: ."| 00001480: 13 11 22 3A 8E 00 A7 1C 6B 03 8F 2D 2D 2D 2D 2D |..":....k..-----| 00001490: 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 4D 41 |PLEASE WAIT REMA| 000014A0: 52 4B 2D 2D 2D 2D 2D 00 E0 1C 70 03 3A 20 20 99 |RK-----...p.: .| 000014B0: C8 28 55 44 24 2C 32 33 29 3B 22 20 20 20 20 20 |.(UD$,23);" | 000014C0: 20 20 20 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 | ONE MOMENT| 000014D0: 20 50 4C 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 | PLEASE... "| 000014E0: 00 E9 1C 75 03 3A 20 20 8E 00 09 1D 84 03 8F 2D |...u.: .......-| 000014F0: 2D 2D 2D 2D 53 45 54 20 55 50 20 56 41 52 49 41 |----SET UP VARIA| 00001500: 42 4C 45 53 2D 2D 2D 2D 2D 00 57 1D 85 03 3A 20 |BLES-----.W...: | 00001510: 20 55 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 | UX$."H":.UQ%(10| 00001520: 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 |00):UB.32768:U1.| 00001530: 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 |196:U2.197:U3.19| 00001540: 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A |8:U4.216:UC.167:| 00001550: 55 55 B2 31 30 32 34 00 7E 1D 86 03 3A 20 20 55 |UU.1024.~...: U| 00001560: 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 |T.59468:UU%.12:U| 00001570: 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 00 C1 |L%.14:UP%.1146..| 00001580: 1D 87 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 |.....(50003).0.U| 00001590: 42 B2 31 30 32 34 3A 55 31 B2 32 30 39 3A 55 32 |B.1024:U1.209:U2| 000015A0: B2 32 31 30 3A 55 33 B2 32 31 31 3A 55 34 B2 32 |.210:U3.211:U4.2| 000015B0: 31 34 3A 55 43 B2 32 30 34 3A 55 55 B2 32 30 34 |14:UC.204:UU.204| 000015C0: 38 00 F1 1D 88 03 8B C2 28 35 30 30 30 33 29 B2 |8.......(50003).| 000015D0: 30 A7 55 54 B2 35 33 32 37 32 3A 55 55 25 B2 32 |0.UT.53272:UU%.2| 000015E0: 31 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 31 33 |1:UL%.23:UP%.213| 000015F0: 39 00 18 1E 89 03 3A 20 20 55 44 24 B2 22 13 11 |9.....: UD$."..| 00001600: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001610: 11 11 11 11 11 11 11 22 00 4D 1E 8A 03 3A 20 20 |.......".M...: | 00001620: 55 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |UP$." | 00001630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001640: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 9B 1E | "...| 00001650: 8B 03 3A 20 20 55 54 24 B2 22 20 D3 49 47 4E 49 |..: UT$." .IGNI| 00001660: 46 49 43 41 4E 54 20 C4 49 47 49 54 53 22 3A 8F |FICANT .IGITS":.| 00001670: 20 50 4C 41 43 45 20 50 52 4F 47 52 41 4D 20 54 | PLACE PROGRAM T| 00001680: 49 54 4C 45 20 48 45 52 45 21 21 21 21 21 21 21 |ITLE HERE!!!!!!!| 00001690: 21 21 21 21 21 21 21 21 2A 2A 2A 00 A4 1E 8C 03 |!!!!!!!!***.....| 000016A0: 3A 20 20 8E 00 C1 1E 8E 03 8F 2D 2D 2D 2D 2D 53 |: .......-----S| 000016B0: 45 54 20 56 41 52 49 41 42 4C 45 53 2D 2D 2D 2D |ET VARIABLES----| 000016C0: 2D 00 CD 1E 93 03 3A 20 20 8D 39 30 30 00 0C 1F |-.....: .900...| 000016D0: 94 03 86 4E 24 28 32 30 29 2C 53 46 24 28 32 30 |...N$(20),SF$(20| 000016E0: 29 2C 46 25 28 32 30 29 2C 43 24 28 32 30 29 2C |),F%(20),C$(20),| 000016F0: 51 24 28 32 30 29 2C 41 24 28 32 30 29 2C 53 4E |Q$(20),A$(20),SN| 00001700: 24 28 31 30 29 2C 50 24 28 31 30 29 00 12 1F 95 |$(10),P$(10)....| 00001710: 03 3A 00 30 1F 98 03 8F 2D 2D 2D 2D 2D 43 48 45 |.:.0....-----CHE| 00001720: 43 4B 20 46 4F 52 20 38 30 33 32 2D 2D 2D 2D 2D |CK FOR 8032-----| 00001730: 00 51 1F 9D 03 3A 20 20 99 22 93 22 3A 99 22 A0 |.Q...: .".":.".| 00001740: 22 3A 8F 20 53 48 49 46 54 45 44 20 53 50 41 43 |":. SHIFTED SPAC| 00001750: 45 00 6B 1F A2 03 3A 20 20 8B C2 28 55 42 AA 34 |E.k...: ..(UB.4| 00001760: 30 29 B3 B1 39 36 A7 8D 37 30 30 00 87 1F A3 03 |0)..96..700.....| 00001770: 8F 2D 2D 2D 2D 2D 4D 45 4D 4F 52 59 20 43 48 45 |.-----MEMORY CHE| 00001780: 43 4B 2D 2D 2D 2D 2D 00 9E 1F A4 03 3A 20 20 8B |CK-----.....: .| 00001790: 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 37 00 D0 | .(0).2000.937..| 000017A0: 1F A5 03 3A 20 20 99 22 93 11 11 05 20 54 48 49 |...: .".... THI| 000017B0: 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 4E |S MACHINE DOES N| 000017C0: 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 48 11 22 |OT HAVE ENOUGH."| 000017D0: 00 F8 1F A6 03 3A 20 20 99 22 20 4D 45 4D 4F 52 |.....: ." MEMOR| 000017E0: 59 20 54 4F 20 52 55 4E 20 54 48 49 53 20 50 52 |Y TO RUN THIS PR| 000017F0: 4F 47 52 41 4D 20 21 22 00 06 20 A7 03 3A 20 20 |OGRAM !".. ..: | 00001800: 9E 55 55 AA 37 31 00 0F 20 A8 03 3A 20 20 80 00 |.UU.71.. ..: ..| 00001810: 2C 20 A9 03 3A 20 20 99 22 93 05 22 3A 8B C2 28 |, ..: ."..":..(| 00001820: 35 30 30 30 33 29 B2 30 A7 39 36 32 00 5E 20 AC |50003).0.962.^ .| 00001830: 03 8F 2D 2D 2D 2D 2D 42 41 53 49 43 20 32 2E 30 |..-----BASIC 2.0| 00001840: 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 43 | OR 4.0 OR C| 00001850: 2D 36 34 20 53 45 54 55 50 2D 2D 2D 2D 2D 00 9C |-64 SETUP-----..| 00001860: 20 AD 03 97 31 30 37 35 2C 31 33 33 3A 97 31 30 | ...1075,133:.10| 00001870: 37 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 34 |76,144:.1077,234| 00001880: 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 30 2C 31 |:.1079,4:.1080,1| 00001890: 33 33 3A 97 31 30 38 31 2C 31 34 35 00 DC 20 AE |33:.1081,145.. .| 000018A0: 03 97 31 30 39 31 2C 31 35 35 3A 97 31 30 39 38 |..1091,155:.1098| 000018B0: 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 34 3A 97 |,133:.1099,144:.| 000018C0: 31 31 30 30 2C 32 33 34 3A 97 31 31 30 33 2C 31 |1100,234:.1103,1| 000018D0: 33 33 3A 97 31 31 30 34 2C 31 34 35 00 F4 20 AF |33:.1104,145.. .| 000018E0: 03 97 31 31 30 35 2C 32 33 34 3A 97 31 30 38 32 |..1105,234:.1082| 000018F0: 2C 32 33 34 00 0E 21 B1 03 3A 20 20 8B C2 28 35 |,234..!..: ..(5| 00001900: 30 30 30 33 29 B3 B1 31 36 30 A7 39 35 35 00 40 |0003)..160.955.@| 00001910: 21 B6 03 3A 20 20 97 31 30 39 33 2C 38 38 3A 97 |!..: .1093,88:.| 00001920: 31 30 39 34 2C 32 32 38 3A 97 31 30 39 37 2C 38 |1094,228:.1097,8| 00001930: 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 39 36 36 |5:.1102,228:.966| 00001940: 00 58 21 BB 03 3A 20 20 8B C2 28 35 30 30 30 33 |.X!..: ..(50003| 00001950: 29 B3 B1 31 A7 39 39 30 00 8A 21 C0 03 3A 20 20 |)..1.990..!..: | 00001960: 97 31 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 |.1093,49:.1094,2| 00001970: 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 |30:.1097,46:.110| 00001980: 32 2C 32 33 30 3A 89 39 36 36 00 C4 21 C2 03 97 |2,230:.966..!...| 00001990: 32 30 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 |2099,141:.2100,2| 000019A0: 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C |0:.2101,3:.2103,| 000019B0: 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 |8:.2104,141:.210| 000019C0: 35 2C 32 31 00 00 22 C3 03 97 32 31 30 36 2C 33 |5,21.."...2106,3| 000019D0: 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 |:.2115,145:.2117| 000019E0: 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 |,52:.2118,234:.2| 000019F0: 31 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 |121,49:.2122,141| 00001A00: 00 3A 22 C4 03 97 32 31 32 33 2C 32 30 3A 97 32 |.:"...2123,20:.2| 00001A10: 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A |124,3:.2126,234:| 00001A20: 97 32 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C |.2127,141:.2128,| 00001A30: 32 31 3A 97 32 31 32 39 2C 33 00 5B 22 C6 03 3A |21:.2129,3.["..:| 00001A40: 20 20 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 | .UU.48:. DISAB| 00001A50: 4C 45 20 53 54 4F 50 20 4B 45 59 00 74 22 CA 03 |LE STOP KEY.t"..| 00001A60: 3A 20 20 8D 38 30 30 3A 8F 20 54 49 54 4C 45 20 |: .800:. TITLE | 00001A70: 4F 53 43 43 00 87 22 D4 03 3A 20 20 89 33 30 30 |OSCC.."..: .300| 00001A80: 3A 8F 20 4D 45 4E 55 00 BB 22 DE 03 3A 20 20 99 |:. MENU.."..: .| 00001A90: 22 93 54 48 45 20 50 47 4D 20 57 49 4C 4C 20 4E |".THE PGM WILL N| 00001AA0: 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 |OT WORK ON THIS | 00001AB0: 4D 41 43 48 49 4E 45 21 22 3A 80 00 F5 22 E8 03 |MACHINE!":..."..| 00001AC0: 3A 20 8B 55 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 |: .UZ.1..UP%:.UP| 00001AD0: 25 3A 55 5A B2 30 3A 8F 2D 2D 2D 2D 2D 50 52 4F |%:UZ.0:.-----PRO| 00001AE0: 47 52 41 4D 20 53 54 41 52 54 53 20 48 45 52 45 |GRAM STARTS HERE| 00001AF0: 2D 2D 2D 2D 2D 00 1F 23 E9 03 99 22 93 05 22 3B |-----..#..."..";| 00001B00: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53| 00001B10: 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 |281,6:.53280,14.| 00001B20: 25 23 38 04 8C 00 41 23 42 04 81 44 B2 31 A4 32 |%#8...A#B..D.1.2| 00001B30: 30 3A 87 4E 24 28 44 29 2C 53 46 24 28 44 29 3A |0:.N$(D),SF$(D):| 00001B40: 82 00 56 23 4C 04 81 44 B2 31 A4 32 30 3A 87 43 |..V#L..D.1.20:.C| 00001B50: 24 28 44 29 3A 82 00 71 23 56 04 81 44 B2 31 A4 |$(D):..q#V..D.1.| 00001B60: 32 30 3A 87 51 24 28 44 29 2C 41 24 28 44 29 3A |20:.Q$(D),A$(D):| 00001B70: 82 00 8D 23 60 04 81 44 B2 31 A4 31 30 3A 87 53 |...#`..D.1.10:.S| 00001B80: 4E 24 28 44 29 2C 50 24 28 44 29 3A 82 00 D4 23 |N$(D),P$(D):...#| 00001B90: 6A 04 83 22 36 2E 35 34 45 2D 30 33 22 2C 22 33 |j.."6.54E-03","3| 00001BA0: 22 2C 22 36 35 2E 30 30 31 22 2C 22 35 22 2C 22 |","65.001","5","| 00001BB0: 39 2E 30 30 45 31 31 22 2C 22 33 22 2C 22 31 31 |9.00E11","3","11| 00001BC0: 30 22 2C 22 32 22 2C 22 30 2E 30 30 30 32 35 22 |0","2","0.00025"| 00001BD0: 2C 22 32 22 00 22 24 74 04 83 22 32 30 2E 30 32 |,"2"."$t.."20.02| 00001BE0: 30 22 2C 22 35 22 2C 22 35 36 33 2E 30 30 32 22 |0","5","563.002"| 00001BF0: 2C 22 36 22 2C 22 35 36 30 30 22 2C 22 32 22 2C |,"6","5600","2",| 00001C00: 22 30 2E 30 30 30 34 35 22 2C 22 32 22 2C 22 35 |"0.00045","2","5| 00001C10: 2E 30 31 22 2C 22 33 22 2C 22 36 2E 30 22 2C 22 |.01","3","6.0","| 00001C20: 32 22 00 68 24 7E 04 83 22 31 2E 30 30 30 31 30 |2".h$~.."1.00010| 00001C30: 22 2C 22 36 22 2C 22 30 2E 30 31 33 32 30 22 2C |","6","0.01320",| 00001C40: 22 34 22 2C 22 36 2E 33 31 30 45 2D 30 39 22 2C |"4","6.310E-09",| 00001C50: 22 34 22 2C 22 35 2E 32 30 22 2C 22 33 22 2C 22 |"4","5.20","3","| 00001C60: 36 39 38 22 2C 22 33 22 00 A0 24 88 04 83 22 33 |698","3"..$..."3| 00001C70: 36 2E 35 38 22 2C 22 34 22 2C 22 39 38 30 30 22 |6.58","4","9800"| 00001C80: 2C 22 32 22 2C 22 30 2E 30 30 30 33 22 2C 22 31 |,"2","0.0003","1| 00001C90: 22 2C 22 33 36 2E 30 30 30 30 31 22 2C 22 37 22 |","36.00001","7"| 00001CA0: 00 D1 24 92 04 83 22 20 20 20 C7 4F 4F 44 20 D3 |..$..." .OOD .| 00001CB0: 48 4F 57 21 22 2C 22 20 20 20 C7 52 45 41 54 21 |HOW!"," .REAT!| 00001CC0: 22 2C 22 20 20 20 C6 41 4E 54 41 53 54 49 43 21 |"," .ANTASTIC!| 00001CD0: 22 00 03 25 97 04 83 22 20 20 20 D7 41 59 20 D4 |"..%..." .AY .| 00001CE0: 4F 20 C7 4F 21 22 2C 22 20 20 20 D4 48 41 54 27 |O .O!"," .HAT'| 00001CF0: 53 20 C7 52 45 41 54 21 22 2C 22 20 20 20 D9 55 |S .REAT!"," .U| 00001D00: 50 21 22 00 3F 25 9C 04 83 22 20 20 20 C7 4F 20 |P!".?%..." .O | 00001D10: CD 41 4E 20 C7 4F 21 22 2C 22 20 20 20 D4 45 52 |.AN .O!"," .ER| 00001D20: 52 49 46 49 43 21 22 2C 22 20 20 20 C1 4E 4F 54 |RIFIC!"," .NOT| 00001D30: 48 45 52 20 D2 49 47 48 54 20 CF 4E 45 2E 22 00 |HER .IGHT .NE.".| 00001D40: 61 25 A1 04 83 22 20 20 20 D9 45 53 20 D3 49 52 |a%..." .ES .IR| 00001D50: 21 22 2C 22 20 20 20 C7 52 45 41 54 20 21 21 21 |!"," .REAT !!!| 00001D60: 22 00 89 25 A6 04 83 22 20 20 20 D4 48 41 54 27 |"..%..." .HAT'| 00001D70: 53 20 C7 4F 4F 44 21 22 2C 22 20 20 20 D4 48 41 |S .OOD!"," .HA| 00001D80: 54 27 53 20 49 54 21 21 22 00 B4 25 AB 04 83 22 |T'S IT!!"..%..."| 00001D90: 20 20 20 C9 20 54 41 55 47 48 54 20 59 4F 55 20 | . TAUGHT YOU | 00001DA0: 57 45 4C 4C 21 22 2C 22 20 20 20 D7 48 4F 4F 50 |WELL!"," .HOOP| 00001DB0: 49 45 21 22 00 E4 25 B0 04 83 22 20 20 20 C1 52 |IE!"..%..." .R| 00001DC0: 45 20 59 4F 55 20 43 48 45 41 54 49 4E 47 3F 22 |E YOU CHEATING?"| 00001DD0: 2C 22 20 20 20 C4 4F 20 49 54 20 41 47 41 49 4E |," .O IT AGAIN| 00001DE0: 21 21 21 22 00 06 26 B5 04 83 22 20 20 20 C3 4F |!!!"..&..." .O| 00001DF0: 52 52 45 43 54 22 2C 22 20 20 20 D6 45 52 59 20 |RRECT"," .ERY | 00001E00: 47 4F 4F 44 21 22 00 27 26 BA 04 83 22 20 20 20 |GOOD!".'&..." | 00001E10: C9 20 54 48 49 4E 4B 20 59 4F 55 27 56 45 20 47 |. THINK YOU'VE G| 00001E20: 4F 54 20 49 54 21 22 00 71 26 C4 04 83 22 35 2E |OT IT!".q&..."5.| 00001E30: 31 32 20 2B 20 30 2E 36 35 34 22 2C 22 35 2E 37 |12 + 0.654","5.7| 00001E40: 37 22 2C 22 32 33 36 2E 31 22 2C 22 31 2E 34 45 |7","236.1","1.4E| 00001E50: 30 32 22 2C 22 31 32 2E 35 36 34 20 2B 20 36 2E |02","12.564 + 6.| 00001E60: 31 20 2B 20 37 30 2E 38 39 22 2C 22 38 39 2E 36 |1 + 70.89","89.6| 00001E70: 22 00 B9 26 CE 04 83 22 31 32 33 2E 35 35 22 2C |"..&..."123.55",| 00001E80: 22 36 38 22 2C 22 35 36 34 2D 35 38 2E 36 22 2C |"68","564-58.6",| 00001E90: 22 35 30 35 22 2C 22 36 35 2E 31 32 2F 32 34 2E |"505","65.12/24.| 00001EA0: 31 22 2C 22 32 2E 37 30 22 2C 22 36 35 2F 31 34 |1","2.70","65/14| 00001EB0: 37 22 2C 22 30 2E 34 34 22 00 00 27 D8 04 83 22 |7","0.44"..'..."| 00001EC0: 36 2E 32 33 20 2B 20 35 36 2E 31 20 2D 20 31 30 |6.23 + 56.1 - 10| 00001ED0: 22 2C 22 35 32 22 2C 22 39 39 39 2F 39 39 39 22 |","52","999/999"| 00001EE0: 2C 22 31 2E 30 30 22 2C 22 32 31 2E 34 35 30 20 |,"1.00","21.450 | 00001EF0: 2B 20 2E 30 30 31 22 2C 22 32 31 2E 34 35 31 22 |+ .001","21.451"| 00001F00: 00 42 27 E2 04 83 22 36 2E 35 2E 32 35 34 22 2C |.B'..."6.5.254",| 00001F10: 22 31 2E 36 22 2C 22 35 38 2E 32 20 2B 20 36 2E |"1.6","58.2 + 6.| 00001F20: 31 30 20 2B 20 33 2E 30 30 31 22 2C 22 36 37 2E |10 + 3.001","67.| 00001F30: 33 22 2C 22 36 35 2F 38 2E 34 35 22 2C 22 37 2E |3","65/8.45","7.| 00001F40: 37 22 00 84 27 EC 04 83 22 35 34 20 2B 20 2E 39 |7"..'..."54 + .9| 00001F50: 39 20 2B 20 31 30 30 22 2C 22 31 35 35 22 2C 22 |9 + 100","155","| 00001F60: 32 35 31 32 22 2C 22 33 2E 30 45 30 32 22 2C 22 |2512","3.0E02","| 00001F70: 35 36 2E 32 33 20 2D 39 36 2E 35 22 2C 22 2D 34 |56.23 -96.5","-4| 00001F80: 30 2E 33 22 00 C4 27 F6 04 83 22 31 34 39 31 22 |0.3"..'..."1491"| 00001F90: 2C 22 35 45 30 32 22 2C 22 2E 30 30 31 20 2B 20 |,"5E02",".001 + | 00001FA0: 36 32 2E 38 20 2D 20 38 34 22 2C 22 2D 32 31 22 |62.8 - 84","-21"| 00001FB0: 2C 22 37 37 38 2E 34 2F 36 35 2E 34 22 2C 22 31 |,"778.4/65.4","1| 00001FC0: 31 2E 39 22 00 E7 27 00 05 83 22 30 2E 32 31 30 |1.9"..'..."0.210| 00001FD0: 20 2D 20 36 36 2E 34 35 20 2B 20 35 37 2E 39 22 | - 66.45 + 57.9"| 00001FE0: 2C 22 2D 38 2E 33 22 00 36 28 0A 05 83 22 30 2E |,"-8.3".6(..."0.| 00001FF0: 30 30 32 34 22 2C 22 2D 33 22 2C 22 36 35 32 30 |0024","-3","6520| 00002000: 22 2C 22 33 22 2C 22 38 39 30 30 31 22 2C 22 34 |","3","89001","4| 00002010: 22 2C 22 30 2E 30 30 35 30 30 31 22 2C 22 2D 33 |","0.005001","-3| 00002020: 22 2C 22 38 39 22 2C 22 31 22 2C 22 39 36 32 30 |","89","1","9620| 00002030: 30 22 2C 22 34 22 00 6D 28 14 05 83 22 30 2E 30 |0","4".m(..."0.0| 00002040: 30 30 30 30 36 22 2C 22 2D 36 22 2C 22 30 2E 30 |00006","-6","0.0| 00002050: 34 22 2C 22 2D 32 22 2C 22 36 35 34 22 2C 22 32 |4","-2","654","2| 00002060: 22 2C 22 33 32 31 34 30 22 2C 22 34 22 00 90 28 |","32140","4"..(| 00002070: 1E 05 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 55 |...".":.UT,UL%:U| 00002080: 50 B2 30 3A 55 47 24 B2 22 D2 45 56 49 45 57 22 |P.0:UG$.".EVIEW"| 00002090: 00 9A 28 23 05 8D 20 38 35 30 00 C2 28 28 05 99 |..(#.. 850..((..| 000020A0: 22 20 20 20 11 11 11 11 C8 45 4C 4C 4F 2C 20 4D |" .....ELLO, M| 000020B0: 59 20 4E 41 4D 45 20 49 53 20 C7 45 4F 52 47 45 |Y NAME IS .EORGE| 000020C0: 2E 11 00 E1 28 32 05 99 22 20 20 20 D7 48 41 54 |....(2.." .HAT| 000020D0: 20 49 53 20 59 4F 55 52 20 4E 41 4D 45 3F 20 22 | IS YOUR NAME? "| 000020E0: 3B 00 F7 28 3C 05 55 4C B2 31 30 3A 8D 20 33 35 |;..(<.UL.10:. 35| 000020F0: 3A 4E 24 B2 55 52 24 00 0F 29 41 05 55 53 24 B2 |:N$.UR$..)A.US$.| 00002100: 22 31 32 33 34 35 36 37 38 39 30 48 2D 2E 22 00 |"1234567890H-.".| 00002110: 18 29 AA 05 99 22 11 22 00 40 29 B4 05 99 22 20 |.)...".".@)..." | 00002120: 20 20 C9 27 4C 4C 20 47 49 56 45 20 59 4F 55 20 | .'LL GIVE YOU | 00002130: 41 20 4E 55 4D 42 45 52 20 22 4E 24 22 2E 11 22 |A NUMBER "N$".."| 00002140: 00 6B 29 BE 05 99 22 20 20 20 D9 4F 55 20 54 45 |.k)..." .OU TE| 00002150: 4C 4C 20 4D 45 20 48 4F 57 20 4D 41 4E 59 20 53 |LL ME HOW MANY S| 00002160: 49 47 4E 49 46 49 43 41 4E 54 11 00 83 29 C3 05 |IGNIFICANT...)..| 00002170: 99 22 20 20 20 44 49 47 49 54 53 20 49 54 20 48 |." DIGITS IT H| 00002180: 41 53 2E 00 99 29 C8 05 3A 99 3A 99 3A 58 24 B2 |AS...)..:.:.:X$.| 00002190: 22 44 22 3A 8D 20 38 33 35 00 A5 29 D2 05 81 4C |"D":. 835..)...L| 000021A0: B2 31 A4 31 30 00 BC 29 D7 05 55 47 24 B2 22 D2 |.1.10..)..UG$.".| 000021B0: 45 56 49 45 57 20 D1 55 45 53 2E 22 00 DD 29 DC |EVIEW .UES."..).| 000021C0: 05 49 B2 B5 28 32 30 AC BB 28 31 29 AA 31 29 3A |.I..(20..(1).1):| 000021D0: 8B 46 25 28 49 29 B2 31 A7 31 35 30 30 00 03 2A |.F%(I).1.1500..*| 000021E0: E6 05 46 25 28 49 29 B2 31 3A 43 31 B2 43 31 AA |..F%(I).1:C1.C1.| 000021F0: 31 3A 54 52 B2 30 3A 8B 43 31 B3 B1 31 35 A7 31 |1:TR.0:.C1..15.1| 00002200: 35 33 30 00 1E 2A F0 05 81 44 B2 31 A4 32 30 3A |530..*...D.1.20:| 00002210: 46 25 28 44 29 B2 30 3A 82 3A 43 31 B2 30 00 2D |F%(D).0:.:C1.0.-| 00002220: 2A FA 05 55 50 B2 4C 3A 8D 20 38 35 30 00 5A 2A |*..UP.L:. 850.Z*| 00002230: 04 06 99 22 20 20 20 11 11 11 C8 4F 57 20 4D 41 |..." ....OW MA| 00002240: 4E 59 20 53 49 47 4E 49 46 49 43 41 4E 54 20 44 |NY SIGNIFICANT D| 00002250: 49 47 49 54 53 20 41 52 45 11 00 85 2A 06 06 99 |IGITS ARE...*...| 00002260: 22 20 20 20 54 48 45 52 45 20 49 4E 20 54 48 45 |" THERE IN THE| 00002270: 20 4E 55 4D 42 45 52 20 22 3B 4E 24 28 49 29 22 | NUMBER ";N$(I)"| 00002280: 20 3F 20 22 3B 00 A5 2A 0E 06 55 4C B2 32 3A 8D | ? ";..*..UL.2:.| 00002290: 20 33 35 3A 41 4E 24 B2 55 52 24 3A 54 52 B2 54 | 35:AN$.UR$:TR.T| 000022A0: 52 AA 31 3A 99 00 C9 2A 18 06 8B 20 41 4E 24 B2 |R.1:...*... AN$.| 000022B0: 53 46 24 28 49 29 A7 99 43 24 28 49 29 3A 8D 20 |SF$(I)..C$(I):. | 000022C0: 38 33 35 3A 89 31 36 31 30 00 FD 2A 22 06 8B 54 |835:.1610..*"..T| 000022D0: 52 B3 32 A7 99 22 20 20 20 D7 52 4F 4E 47 2C 20 |R.2.." .RONG, | 000022E0: 54 52 59 20 41 47 41 49 4E 2E 22 3A 57 B2 57 AA |TRY AGAIN.":W.W.| 000022F0: 31 3A 8D 20 38 33 35 3A 89 31 35 33 30 00 30 2B |1:. 835:.1530.0+| 00002300: 2C 06 99 22 20 20 20 D3 54 49 4C 4C 20 57 52 4F |,.." .TILL WRO| 00002310: 4E 47 2C 20 54 48 45 20 41 4E 53 57 45 52 20 49 |NG, THE ANSWER I| 00002320: 53 20 22 3B 53 46 24 28 49 29 3A 57 B2 57 AA 31 |S ";SF$(I):W.W.1| 00002330: 00 41 2B 36 06 8D 20 38 33 35 3A 58 24 B2 22 41 |.A+6.. 835:X$."A| 00002340: 22 00 50 2B 40 06 8B 57 B1 34 A7 20 31 36 32 30 |".P+@..W.4. 1620| 00002350: 00 5E 2B 4A 06 82 4C 3A 89 20 31 36 35 30 00 68 |.^+J..L:. 1650.h| 00002360: 2B 54 06 8D 20 38 35 30 00 92 2B 59 06 99 22 20 |+T.. 850..+Y.." | 00002370: 20 20 11 11 11 11 D9 4F 55 20 53 45 45 4D 20 54 | .....OU SEEM T| 00002380: 4F 20 42 45 20 48 41 56 49 4E 47 20 53 4F 4D 45 |O BE HAVING SOME| 00002390: 11 22 00 BB 2B 5E 06 99 22 20 20 20 50 52 4F 42 |."..+^.." PROB| 000023A0: 4C 45 4D 53 2E 20 D3 45 45 20 59 4F 55 52 20 54 |LEMS. .EE YOUR T| 000023B0: 45 41 43 48 45 52 20 46 4F 52 11 00 CA 2B 68 06 |EACHER FOR...+h.| 000023C0: 99 22 20 20 20 48 45 4C 50 21 00 DE 2B 72 06 8B |." HELP!..+r..| 000023D0: 20 57 B1 30 20 A7 20 8D 20 38 33 35 3A 8E 00 FD | W.0 . . 835:...| 000023E0: 2B 77 06 55 47 24 B2 22 C1 4C 4C 20 D2 49 47 48 |+w.UG$.".LL .IGH| 000023F0: 54 22 3A 55 50 B2 31 3A 8D 20 38 35 30 00 25 2C |T":UP.1:. 850.%,| 00002400: 7C 06 99 22 11 20 20 20 D9 4F 55 20 44 49 44 20 ||..". .OU DID | 00002410: 49 54 21 20 D9 4F 55 20 47 4F 54 20 54 48 45 4D |IT! .OU GOT THEM| 00002420: 20 41 4C 4C 11 00 47 2C 86 06 99 22 20 20 20 52 | ALL..G,..." R| 00002430: 49 47 48 54 20 57 49 54 48 4F 55 54 20 41 4E 20 |IGHT WITHOUT AN | 00002440: 45 52 52 4F 52 21 22 00 53 2C 90 06 8D 20 38 33 |ERROR!".S,... 83| 00002450: 35 3A 8E 00 00 00 AA AA AA AA AA AA AA AA AA AA |5:..............| 00002460: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002470: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002480: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002490: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000024A0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000024B0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000024C0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000024D0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000024E0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000024F0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002500: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002510: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002520: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002530: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002540: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002550: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002560: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002570: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002580: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002590: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000025A0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000025B0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000025C0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000025D0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000025E0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000025F0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002600: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002610: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002620: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002630: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002640: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002650: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002660: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002670: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002680: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002690: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000026A0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000026B0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000026C0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000026D0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000026E0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 000026F0: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002700: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002710: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002720: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002730: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002740: AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA |................| 00002750: AA AA AA AA AA AA |...... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.I....---GENERAL INPUT ROUTINE---
-.O...:.U...:...#..-----INPUT SECTION---
--...(.: UR$."":UI$.""...*.: . UL.0.UL
.80...-.." ..";:.UC,0.E.2.: .UI$:.UI$.
"".50.R.7.: .UI$.G(13).C(UR$)..1..UC,1:
." .";:.85...<.: .UI$.G(20).105. .>.:
. C(UR$)..UL .50.H.A.: .120:. CHECK FOR
VALID CHARACTER...F.: UR$.UR$.UI$...K.
: .UI$;...P.: .50...U..-----CHECK FOR
HELP REQUEST-----.D.Z.: .UR$.UX$.195:.
EXIT TO HELP ROUTINE.V._.: .UF.1..240.E
.D.: UF.0:.:....F..-----CHECK DELETE----
-...I.: .C(UR$).1.50...N.: UR$.H(UR$,C(U
R$).1).B.S.: .". ..";:.50...X..-----CHE
CK FOR VALID CHARACTERS-----...}.: .C(U
S$).0.150.....: .US.1.C(US$).1...: .
UI$.J(US$,US,1)...:...: ..J...: UI$.""
:..H....-----STANDARD INPUT-----.}...:
.F(UI$).46. ......: .UI$.G(32). .... .:
.F(UI$).48 . F(UI$).57.170.....: ....
..: .F(UI$).65 . F(UI$).90.180.....: .
.....: .F(UI$).193 . F(UI$).218.UI$."":
..?...: .B(UT).12.B(UT).29.UI$.G(F(UI$)
.128):..H...: ..X...: UI$."":....C.:
UF.1:.-----HELP ROUTINE EXIT-----...E.:
.250...H.: .245...M.: .UQ.UB.(U2%.256
.U1%.U3%.2).Z.R.: UQ%(UQ.UB).B(UQ):.:."
."...W.: UZ.1...X.: .300...Y.UZ.0:US$.
UJ$:UG$.UK$:UP.UJ:UL.UK.N.Z..B(50003).0.
.53281,1:.".";:.53281,6:.53280,14:.220.X
....".";.....UT$.UL$::.UQ.UB.(U2%.256.U1
%.U3%.3).....: .UQ,UQ%(UQ.UB):......:
.U1,U1%.....: .U2,U2%.E...: .U4,U4%.V.
..: .U3,U3%.1.....: .35.....: UD%.((U
2%.256.U1%.U3%).UB).40:.H(UD$,UD%.1):..T
...: .H(UD$,24);"
. HELP COMING . ":......: U1%.B(U1):U2
%.B(U2):U3%.B(U3):U4%.B(U4).....UJ$.US$:
UJ.UL.....: UJ$.US$:UK$.UG$:UJ.UP:UK.UL
.A...: ..U.,..-----MENU-----...-.:.....
: .".":.UT,UU%:.B(50003).0..53281,9:.53
280,8.../.:.3.1.: .". ME
NU".E.6.: ." --------------------------
------------"...;.: .".. 1. SIGNI
FICANT DIGITS"...@.: .".. 2. STUD
ENT INSTRUCTIONS"...E.: .".. 3. T
EACHER INSTRUCTIONS"...O.: .".. 4.
QUIT..".3.T.: ." --------------------
------------------".A.Y.: .".. PRES
S A NUMBER KEY (1 - 4) ";...^.: UL.1:US
$."1234":.35:.---INPUT ROUTINE---...`.:
US$.""...C.: .E(UR$).1000,400,500,396.
K.H.: .300......-----RE-ENABLE STOP KEY
AND END-----.'...: .B(50003)..1.B(5000
3)..160.B(50003)..0.399.T...: .UU.71:.B
(50003).0..53281,6:.53280,14.C...: ."..
":..Q...: .875:.......-----STUDENT INST
RUCTIONS-----.G...: .".":.UT,UL%:.B(500
03).0..53281,0:.53280,0.....UP.0:UG$."ST
UDENT INST":.850......" ..THIS PROGRAM
WILL DRILL YOU ON ..?...." YOUR KNOWL
EDGE ABOUT SIGNIFICANT..R...." DIGITS.
...~...." IF YOU HAVE ANY TROUBLE, ASK
YOUR......." TEACHER FOR HELP.....G..
835:UP.1:. 850...L.."... NOTE:...TO A
DVANCE FROM ONE QUESTION"...V.." .TO T
HE NEXT PRESS THE SPACE BAR.".:....".
IF AT ANY TIME YOU WISH TO RETURN".C....
". TO THE MENU PRESS 'H' RETURN.".O...
: .835.....: .UZ.1..UP%:.217.....: ..
.....-----TEACHER INSTRUCTIONS-----.....
: .".":.UT,UL%:.B(50003).0..53281,2:.53
280,10.....: UP.0:UG$."TEACHER INST.":.
850.<...: .".. TO THE BEST OF OUR
KNOWLEDGE,.".H...: ." THIS PROGRAM IS
IN THE PUBLIC.".....: ." DOMAIN. IF
THIS IS NOT THE CASE.".....: ." PLEA
SE CONTACT:...".....: ." COMMODORE
BUSINESS MACHINES.".....: ."
3370 PHARMACY AVE..1...: ." AG
INCOURT, ONTARIO".V...: ." CAN
ADA M1W 2K4".Y...: ." (416)
499-4292".....UP.1:. 835:. 850:......"
...PROGRAM NAME :SIGNIFICANT DIGITS....
..." WRITTEN BY :R.W.DRAY......."
UPGRADED BY :P.S.SCHMIDT..+...." .THI
S PROGRAM WILL RUN ON ANY...I...."
PET 64 COMPUTER..L...." COMMODORE
64 COMPUTER.....UP.2:. 835:. 850......"
.. THIS PROGRAM PROVIDES STUDENTS WITH
....!.." A DRILL IN THE AREA OF SIGNIF
ICANT....&.." DIGITS. THE QUESTIONS A
RE GIVEN IN..:.+.." A GROUP WITH THE C
OMPUTER PROVIDING..B.0.." ASSISTANCE A
ND ENCOURAGEMENT.....5.." THERE IS NO
FINAL SCORE GIVEN....D.: .835...N.: .U
Z.1..UP%:.217...W.: ....X..-----PROGRAM
MODIFICATION INST-----...Y.: .".":.UT,
UL%...].: UP.0:UG$."PROGRAM MOD":.850."
...: .835.9...: .UZ.1..UP%:.217.B...:
..J....-----TO USE 8032 LOAD CBM4032---
--. .F..".....BEFORE RUNNING THIS PROGRA
M ON AN 8032 ...V.P.." LOAD THE 'C
BM 4032' PROGRAM............."...Z.: .U
U.71.....: .... .. ** T I T L E P A G
E **.A.".."....";:.UT,UU%:.B(50003).0..
53280,14:.53281,6.W.$..I.1.38:."...";:..
O.&..I.1.22:.".....";:....(..I.1.37:."..
...";:....*..I.1.22:.".....";:..D.,.."..
......................... .......".....
.............. . . .....0.."...........
........ . ....%.2.."..................
.. ..M.4.."..............C O M M O D O
R E...P.6.."...............EDUCATIONAL..
...8.."................SOFTWARE...:.. **
COMMODORE LOGO **...;..H(UD$,24);".....
.....PRESS SPACE BAR OR WAIT.":I.0...<..
A$:.A$.." ".I.I.1:.I.250.828.+.>.: T1$.
"":T2$."":T3$."":T4$."":I.0.7.@.: .300.
V.C..-----SPACE BAR PRESS-----...H.: .H
(UD$,24);".......PRESS SPACE BAR TO CONT
INUE."...L.: .UI$:.UI$.." ".844...N.:
..T.R..-----PAGE DESIGN ROUTINE-----...T
.: UP.UP.1...W.: ."."H(UT$.UP$,21);H(U
G$.UP$,14);UP.?.\.: ." ----------------
----------------------".V.A.: .H(UD$,24
);H(UP$,6);"HELP - PRESS H <RETURN>"..
.F.: ."..":....K..-----PLEASE WAIT REMA
RK-----...P.: .H(UD$,23);" ON
E MOMENT PLEASE... "...U.: .......-
----SET UP VARIABLES-----.W...: UX$."H"
:.UQ%(1000):UB.32768:U1.196:U2.197:U3.19
8:U4.216:UC.167:UU.1024.~...: UT.59468:
UU%.12:UL%.14:UP%.1146.A....B(50003).0.U
B.1024:U1.209:U2.210:U3.211:U4.214:UC.20
4:UU.2048......B(50003).0.UT.53272:UU%.2
1:UL%.23:UP%.2139.....: UD$."..........
...............".M...: UP$."
".....: UT$
." SIGNIFICANT DIGITS":. PLACE PROGRAM T
ITLE HERE!!!!!!!!!!!!!!!***.....: ..A..
..-----SET VARIABLES-----.M...: .900...
...N$(20),SF$(20),F%(20),C$(20),Q$(20),A
$(20),SN$(10),P$(10).....:.0....-----CHE
CK FOR 8032-----.Q...: .".":." ":. SHIF
TED SPACE.K...: .B(UB.40)..96..700.....
.-----MEMORY CHECK-----.....: . .(0).20
00.937.P...: .".... THIS MACHINE DOES N
OT HAVE ENOUGH.".....: ." MEMORY TO RUN
THIS PROGRAM !".. ..: .UU.71.. ..: ..
, ..: ."..":.B(50003).0.962.^ ...-----B
ASIC 2.0 OR 4.0 OR C-64 SETUP-----..
...1075,133:.1076,144:.1077,234:.1079,4
:.1080,133:.1081,145.. ...1091,155:.1098
,133:.1099,144:.1100,234:.1103,133:.1104
,145.. ...1105,234:.1082,234..!..: .B(5
0003)..160.955.@!..: .1093,88:.1094,228
:.1097,85:.1102,228:.966.X!..: .B(50003
)..1.990..!..: .1093,49:.1094,230:.1097
,46:.1102,230:.966.D!B..2099,141:.2100,2
0:.2101,3:.2103,8:.2104,141:.2105,21.."C
..2106,3:.2115,145:.2117,52:.2118,234:.2
121,49:.2122,141.:"D..2123,20:.2124,3:.2
126,234:.2127,141:.2128,21:.2129,3.["F.:
.UU.48:. DISABLE STOP KEY.T"J.: .800:
. TITLE OSCC.."T.: .300:. MENU.."..: .
".THE PGM WILL NOT WORK ON THIS MACHINE!
":..."..: .UZ.1..UP%:.UP%:UZ.0:.-----PRO
GRAM STARTS HERE-----..#..."..";:.B(5000
3).0..53281,6:.53280,14.%#8...A#B..D.1.2
0:.N$(D),SF$(D):..V#L..D.1.20:.C$(D):..Q
#V..D.1.20:.Q$(D),A$(D):...#`..D.1.10:.S
N$(D),P$(D):..T#J.."6.54E-03","3","65.00
1","5","9.00E11","3","110","2","0.00025"
,"2"."$T.."20.020","5","563.002","6","56
00","2","0.00045","2","5.01","3","6.0","
2".H$~.."1.00010","6","0.01320","4","6.3
10E-09","4","5.20","3","698","3". $..."3
6.58","4","9800","2","0.0003","1","36.00
001","7".Q$..." GOOD SHOW!"," GREAT!
"," FANTASTIC!"..%..." WAY TO GO!","
THAT'S GREAT!"," YUP!".?%..." GO
MAN GO!"," TERRIFIC!"," ANOTHER RIGH
T ONE.".A%..." YES SIR!"," GREAT !!!
"..%..." THAT'S GOOD!"," THAT'S IT!!
"..%..." I TAUGHT YOU WELL!"," WHOOP
IE!"..%..." ARE YOU CHEATING?"," DO
IT AGAIN!!!"..&..." CORRECT"," VERY
GOOD!".'&..." I THINK YOU'VE GOT IT!".
Q&D.."5.12 + 0.654","5.77","236.1","1.4E
02","12.564 + 6.1 + 70.89","89.6"..&N.."
123.55","68","564-58.6","505","65.12/24.
1","2.70","65/147","0.44"..'X.."6.23 + 5
6.1 - 10","52","999/999","1.00","21.450
+ .001","21.451".B'..."6.5.254","1.6","5
8.2 + 6.10 + 3.001","67.3","65/8.45","7.
7"..'..."54 + .99 + 100","155","2512","3
.0E02","56.23 -96.5","-40.3".D'..."1491"
,"5E02",".001 + 62.8 - 84","-21","778.4/
65.4","11.9"..'..."0.210 - 66.45 + 57.9"
,"-8.3".6(..."0.0024","-3","6520","3","8
9001","4","0.005001","-3","89","1","9620
0","4".M(..."0.000006","-6","0.04","-2",
"654","2","32140","4"..(...".":.UT,UL%:U
P.0:UG$."REVIEW"..(#.. 850.B((.." ....
HELLO, MY NAME IS GEORGE....(2.." WHAT
IS YOUR NAME? ";..(<.UL.10:. 35:N$.UR$.
.)A.US$."1234567890H-."..)...".".@)..."
I'LL GIVE YOU A NUMBER "N$"..".K)..."
YOU TELL ME HOW MANY SIGNIFICANT...)C.
." DIGITS IT HAS...)H.:.:.:X$."D":. 83
5..)R..L.1.10..)W.UG$."REVIEW QUES."..).
.I..(20..(1).1):.F%(I).1.1500..*..F%(I).
1:C1.C1.1:TR.0:.C1..15.1530..*...D.1.20:
F%(D).0:.:C1.0.-*..UP.L:. 850.Z*..." .
..HOW MANY SIGNIFICANT DIGITS ARE...*...
" THERE IN THE NUMBER ";N$(I)" ? ";..*
..UL.2:. 35:AN$.UR$:TR.TR.1:..I*... AN$.
SF$(I)..C$(I):. 835:.1610..*"..TR.2.."
WRONG, TRY AGAIN.":W.W.1:. 835:.1530.0+
,.." STILL WRONG, THE ANSWER IS ";SF$(
I):W.W.1.A+6.. 835:X$."A".P+@..W.4. 1620
.^+J..L:. 1650.H+T.. 850..+Y.." ....YO
U SEEM TO BE HAVING SOME."..+^.." PROB
LEMS. SEE YOUR TEACHER FOR..J+H.." HEL
P!..+R.. W.0 . . 835:...+W.UG$."ALL RIGH
T":UP.1:. 850.%,|..". YOU DID IT! YOU
GOT THEM ALL..G,..." RIGHT WITHOUT AN
ERROR!".S,... 835:......................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
........................................
..............................
> CLICK IMAGE PREVIEW FOR FULL MODAL