STATES & REG.C3
FILE INFORMATION
FILENAME(S): STATES & REG.C3
FILE TYPE(S): PRG
FILE SIZE: 9.5K
FIRST SEEN: 2025-11-02 16:39:39
APPEARS ON: 4 disk(s)
FILE HASH
608cfbe365cad85c1f931a8855de9c85d076e08dc5602b1e21cae85fff350e2e
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 012A | STATES & REG.C3 | PRG | Treasure Chest - Plattfuss | 2 | 14 | DOWNLOAD FILE |
| DISKETTE NR 036 | STATES & REG.C3 | PRG | Treasure Chest - Plattfuss | 4 | 0 | DOWNLOAD FILE |
| L EHRNEN | STATES & REG.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 4 | 0 | DOWNLOAD FILE |
| FREESOFT DISK NR | STATES & REG.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 4 | 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 85 90 EA A9 04 85 91 EA 58 60 20 EA |"x.=........X` .| 00000040: FF A9 FF 85 9B 4C 58 E4 78 A9 55 85 90 EA A9 E4 |.....LX.x.U.....| 00000050: 85 91 EA 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 C8 08 0A 00 8F 20 2A 2A |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 20 2A 2A 00 CE 08 0F 00 3A 00 F2 |UTINE **.....:..| 000000D0: 08 14 00 8F 20 2A 2A 20 54 4F 20 4F 55 52 20 42 |.... ** TO OUR B| 000000E0: 45 53 54 20 4B 4E 4F 57 4C 45 44 47 45 20 54 48 |EST KNOWLEDGE TH| 000000F0: 49 53 00 0F 09 15 00 8F 20 20 20 20 50 52 4F 47 |IS...... PROG| 00000100: 52 41 4D 20 49 53 20 46 52 45 45 20 46 4F 52 00 |RAM IS FREE FOR.| 00000110: 2F 09 16 00 8F 20 20 20 20 44 55 50 4C 49 43 41 |/.... DUPLICA| 00000120: 54 49 4F 4E 20 49 4E 20 43 41 4E 41 44 41 2E 00 |TION IN CANADA..| 00000130: 4D 09 17 00 8F 20 20 20 20 49 46 20 59 4F 55 20 |M.... IF YOU | 00000140: 48 41 56 45 20 43 4F 4E 54 52 41 52 59 00 6A 09 |HAVE CONTRARY.j.| 00000150: 18 00 8F 20 20 20 20 49 4E 46 4F 52 4D 41 54 49 |... INFORMATI| 00000160: 4F 4E 2C 20 50 4C 45 41 53 45 00 90 09 19 00 8F |ON, PLEASE......| 00000170: 20 20 20 20 43 4F 4E 54 41 43 54 20 43 4F 4D 4D | CONTACT COMM| 00000180: 4F 44 4F 52 45 20 43 41 4E 41 44 41 20 41 4E 44 |ODORE CANADA AND| 00000190: 00 B6 09 1A 00 8F 20 20 20 20 45 56 45 52 59 20 |...... EVERY | 000001A0: 45 46 46 4F 52 54 20 57 49 4C 4C 20 42 45 20 4D |EFFORT WILL BE M| 000001B0: 41 44 45 20 54 4F 00 D7 09 1B 00 8F 20 20 20 20 |ADE TO...... | 000001C0: 57 49 54 48 44 52 41 57 20 43 4F 50 49 45 53 20 |WITHDRAW COPIES | 000001D0: 4F 46 20 54 48 49 53 00 E9 09 1C 00 8F 20 20 20 |OF THIS...... | 000001E0: 20 50 52 4F 47 52 41 4D 2E 00 EF 09 1E 00 3A 00 | PROGRAM......:.| 000001F0: 14 0A 20 00 8F 20 20 20 20 50 52 4F 47 52 41 4D |.. .. PROGRAM| 00000200: 20 20 2D 20 53 54 41 54 45 53 20 26 20 52 45 47 | - STATES & REG| 00000210: 49 4F 4E 53 00 5E 0A 21 00 8F 20 20 20 20 55 50 |IONS.^.!.. UP| 00000220: 44 41 54 45 44 20 2D 20 4A 2E 46 2E 20 4D 55 4E |DATED - J.F. MUN| 00000230: 52 4F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |RO | 00000240: 20 20 20 20 20 20 44 55 52 48 41 4D 20 42 20 4F | DURHAM B O| 00000250: 46 20 45 2C 20 4A 55 4C 59 2C 31 39 38 32 00 80 |F E, JULY,1982..| 00000260: 0A 22 00 8F 20 20 20 20 43 2D 36 34 20 55 50 47 |.".. C-64 UPG| 00000270: 52 41 44 45 20 2D 20 44 45 52 45 4B 20 4C 45 45 |RADE - DEREK LEE| 00000280: 00 9C 0A 23 00 8F 20 2B 2B 2B 20 49 4E 50 55 54 |...#.. +++ INPUT| 00000290: 20 53 45 43 54 49 4F 4E 20 2B 2B 2B 00 AE 0A 28 | SECTION +++...(| 000002A0: 00 55 52 24 B2 22 22 3A 55 49 24 B2 22 22 00 BE |.UR$."":UI$.""..| 000002B0: 0A 2A 00 8B 55 4C B2 30 A7 55 4C B2 38 30 00 D1 |.*..UL.0.UL.80..| 000002C0: 0A 2D 00 99 22 20 20 9D 9D 22 3B 3A 97 55 43 2C |.-.." ..";:.UC,| 000002D0: 30 00 E5 0A 32 00 A1 55 49 24 3A 8B 55 49 24 B2 |0...2..UI$:.UI$.| 000002E0: 22 22 A7 35 30 00 0F 0B 37 00 8B 55 49 24 B2 C7 |"".50...7..UI$..| 000002F0: 28 31 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 97 |(13)..(UR$)..1..| 00000300: 55 43 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 00 |UC,1:." .";:.85.| 00000310: 22 0B 3C 00 8B 55 49 24 B2 C7 28 32 30 29 A7 31 |".<..UI$..(20).1| 00000320: 30 35 00 36 0B 3E 00 8B 20 C3 28 55 52 24 29 B2 |05.6.>.. .(UR$).| 00000330: B1 55 4C A7 35 30 00 5B 0B 41 00 8D 31 32 30 3A |.UL.50.[.A..120:| 00000340: 8F 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C 49 |. CHECK FOR VALI| 00000350: 44 20 43 48 41 52 41 43 54 45 52 00 6B 0B 46 00 |D CHARACTER.k.F.| 00000360: 55 52 24 B2 55 52 24 AA 55 49 24 00 75 0B 4B 00 |UR$.UR$.UI$.u.K.| 00000370: 99 55 49 24 3B 00 7D 0B 50 00 89 35 30 00 A2 0B |.UI$;.}.P..50...| 00000380: 55 00 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 4F |U.. +++ CHECK FO| 00000390: 52 20 48 45 4C 50 20 52 45 51 55 45 53 54 20 2B |R HELP REQUEST +| 000003A0: 2B 2B 00 CA 0B 5A 00 8B 55 52 24 B2 55 58 24 A7 |++...Z..UR$.UX$.| 000003B0: 31 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 45 |195:. EXIT TO HE| 000003C0: 4C 50 20 52 4F 55 54 49 4E 45 00 D9 0B 5F 00 8B |LP ROUTINE..._..| 000003D0: 55 46 B2 31 A7 8D 32 34 30 00 E6 0B 64 00 55 46 |UF.1..240...d.UF| 000003E0: B2 30 3A 99 3A 8E 00 FF 0B 66 00 8F 20 2B 2B 20 |.0:.:....f.. ++ | 000003F0: 43 48 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B 00 |CHECK DELETE ++.| 00000400: 10 0C 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 30 |..i...(UR$).1.50| 00000410: 00 28 0C 6E 00 55 52 24 B2 C8 28 55 52 24 2C C3 |.(.n.UR$..(UR$,.| 00000420: 28 55 52 24 29 AB 31 29 00 3A 0C 73 00 99 22 9D |(UR$).1).:.s..".| 00000430: 20 20 9D 9D 22 3B 3A 89 35 30 00 61 0C 78 00 8F | ..";:.50.a.x..| 00000440: 20 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 41 | ++ CHECK FOR VA| 00000450: 4C 49 44 20 43 48 41 52 41 43 54 45 52 53 20 2B |LID CHARACTERS +| 00000460: 2B 00 73 0C 7D 00 8B C3 28 55 53 24 29 B2 30 A7 |+.s.}...(US$).0.| 00000470: 31 35 30 00 84 0C 82 00 81 55 53 B2 31 A4 C3 28 |150......US.1..(| 00000480: 55 53 24 29 00 9B 0C 87 00 8B 55 49 24 B2 CA 28 |US$)......UI$..(| 00000490: 55 53 24 2C 55 53 2C 31 29 A7 8E 00 A1 0C 8C 00 |US$,US,1).......| 000004A0: 82 00 AE 0C 91 00 55 49 24 B2 22 22 3A 8E 00 C9 |......UI$."":...| 000004B0: 0C 96 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 44 |.... ** STANDARD| 000004C0: 20 49 4E 50 55 54 20 2A 2A 00 DA 0C 98 00 8B C6 | INPUT **.......| 000004D0: 28 55 49 24 29 B2 34 36 A7 8E 00 EB 0C 9B 00 8B |(UI$).46........| 000004E0: 55 49 24 B2 C7 28 33 32 29 A7 8E 00 08 0D A0 00 |UI$..(32).......| 000004F0: 8B C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 24 |..(UI$).48..(UI$| 00000500: 29 B1 35 37 A7 31 37 30 00 0E 0D A5 00 8E 00 2B |).57.170.......+| 00000510: 0D AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 28 |.....(UI$).65..(| 00000520: 55 49 24 29 B1 39 30 A7 31 38 30 00 31 0D AF 00 |UI$).90.180.1...| 00000530: 8E 00 55 0D B4 00 8B C6 28 55 49 24 29 B3 31 39 |..U.....(UI$).19| 00000540: 33 B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 24 |3..(UI$).218.UI$| 00000550: B2 22 22 3A 8E 00 78 0D B9 00 8B C2 28 55 54 29 |."":..x.....(UT)| 00000560: B2 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 24 |.UU%.UI$..(.(UI$| 00000570: 29 AB 31 32 38 29 3A 8E 00 7E 0D BB 00 8E 00 8B |).128):..~......| 00000580: 0D BE 00 55 49 24 B2 22 22 3A 8E 00 B0 0D C3 00 |...UI$."":......| 00000590: 55 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 20 |UF.1:. +++ HELP | 000005A0: 52 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B 2B |ROUTINE EXIT +++| 000005B0: 00 B9 0D C5 00 8D 32 35 30 00 C2 0D C8 00 8D 32 |......250......2| 000005C0: 34 35 00 E1 0D CD 00 81 55 51 B2 55 42 A4 28 55 |45......UQ.UB.(U| 000005D0: 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 32 |2%.256.U1%.U3%.2| 000005E0: 29 00 FD 0D D2 00 55 51 25 28 55 51 AB 55 42 29 |).....UQ%(UQ.UB)| 000005F0: B2 C2 28 55 51 29 3A 82 3A 99 22 93 22 00 10 0E |..(UQ):.:."."...| 00000600: D7 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 29 |..UZ.1:UV%..(UT)| 00000610: 00 19 0E D8 00 89 33 30 30 00 3E 0E D9 00 55 5A |......300.>...UZ| 00000620: B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 55 |.0:US$.UJ$:UG$.U| 00000630: 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 00 75 |K$:UP.UJ:UL.UK.u| 00000640: 0E DA 00 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |.....(50003).0..| 00000650: 35 33 32 38 31 2C 31 3A 99 22 93 22 3B 3A 97 35 |53281,1:.".";:.5| 00000660: 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 |3281,6:.53280,14| 00000670: 3A 89 32 32 30 00 7F 0E DB 00 99 22 93 22 3B 00 |:.220......".";.| 00000680: AE 0E DC 00 55 54 24 B2 55 4C 24 3A 97 55 54 2C |....UT$.UL$:.UT,| 00000690: 55 56 25 3A 81 55 51 B2 55 42 A4 28 55 32 25 AC |UV%:.UQ.UB.(U2%.| 000006A0: 32 35 36 AA 55 31 25 AA 55 33 25 AB 33 29 00 C3 |256.U1%.U3%.3)..| 000006B0: 0E E1 00 97 55 51 2C 55 51 25 28 55 51 AB 55 42 |....UQ,UQ%(UQ.UB| 000006C0: 29 3A 82 00 CF 0E E6 00 97 55 31 2C 55 31 25 00 |):.......U1,U1%.| 000006D0: DB 0E E8 00 97 55 32 2C 55 32 25 00 E7 0E E9 00 |.....U2,U2%.....| 000006E0: 97 55 34 2C 55 34 25 00 F5 0E EA 00 97 55 33 2C |.U4,U4%......U3,| 000006F0: 55 33 25 AB 31 00 FD 0E EB 00 89 33 35 00 2F 0F |U3%.1......35./.| 00000700: F0 00 55 44 25 B2 28 28 55 32 25 AC 32 35 36 AA |..UD%.((U2%.256.| 00000710: 55 31 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 3A |U1%.U3%).UB).40:| 00000720: 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E 00 |..(UD$,UD%.1):..| 00000730: 6A 0F F5 00 99 C8 28 55 44 24 2C 32 34 29 3B 22 |j.....(UD$,24);"| 00000740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000750: 20 20 20 20 20 20 12 20 48 45 4C 50 20 43 4F 4D | . HELP COM| 00000760: 49 4E 47 20 92 20 20 22 3A 8E 00 96 0F FA 00 55 |ING . ":......U| 00000770: 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 55 |1%..(U1):U2%..(U| 00000780: 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 25 |2):U3%..(U3):U4%| 00000790: B2 C2 28 55 34 29 00 BE 0F FB 00 55 4A 24 B2 55 |..(U4).....UJ$.U| 000007A0: 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 55 |S$:UK$.UG$:UL$.U| 000007B0: 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 00 C4 |T$:UJ.UP:UK.UL..| 000007C0: 0F FF 00 8E 00 D5 0F 2C 01 8F 20 2A 2A 20 4D 45 |.......,.. ** ME| 000007D0: 4E 55 20 2A 2A 00 DB 0F 2D 01 3A 00 0A 10 2E 01 |NU **...-.:.....| 000007E0: 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 28 |.".":.UT,UU%:..(| 000007F0: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,| 00000800: 39 3A 97 35 33 32 38 30 2C 38 00 10 10 2F 01 3A |9:.53280,8.../.:| 00000810: 00 2D 10 31 01 99 22 13 20 20 20 20 20 20 20 20 |.-.1..". | 00000820: 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 5C 10 | MENU".\.| 00000830: 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |6.." -----------| 00000840: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000850: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 87 10 3B |-----------"...;| 00000860: 01 99 22 11 11 20 20 20 20 20 20 20 31 2E 20 20 |..".. 1. | 00000870: 20 42 45 47 49 4E 20 53 54 41 54 45 53 20 26 20 | BEGIN STATES & | 00000880: 52 45 47 49 4F 4E 53 00 B1 10 40 01 99 22 11 11 |REGIONS...@.."..| 00000890: 20 20 20 20 20 20 20 32 2E 20 20 20 53 54 55 44 | 2. STUD| 000008A0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS| 000008B0: 22 00 DB 10 45 01 99 22 11 11 20 20 20 20 20 20 |"...E..".. | 000008C0: 20 33 2E 20 20 20 54 45 41 43 48 45 52 20 49 4E | 3. TEACHER IN| 000008D0: 53 54 52 55 43 54 49 4F 4E 53 22 00 F7 10 4F 01 |STRUCTIONS"...O.| 000008E0: 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 20 20 |.".. 4. | 000008F0: 51 55 49 54 11 11 22 00 26 11 54 01 99 22 20 2D |QUIT..".&.T.." -| 00000900: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000910: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000920: 2D 2D 2D 2D 2D 22 00 51 11 59 01 99 22 11 11 20 |-----".Q.Y..".. | 00000930: 20 20 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 | PRESS A NU| 00000940: 4D 42 45 52 20 4B 45 59 20 28 31 2D 34 29 20 22 |MBER KEY (1-4) "| 00000950: 3B 00 79 11 5E 01 55 4C B2 31 3A 55 53 24 B2 22 |;.y.^.UL.1:US$."| 00000960: 31 32 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 |1234":.35:. INPU| 00000970: 54 20 52 4F 55 54 49 4E 45 00 84 11 60 01 55 53 |T ROUTINE...`.US| 00000980: 24 B2 22 22 00 A1 11 63 01 91 C5 28 55 52 24 29 |$.""...c...(UR$)| 00000990: 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 39 |.1000,400,500,39| 000009A0: 36 00 AA 11 68 01 89 33 30 30 00 D1 11 8B 01 8F |6...h..300......| 000009B0: 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 54 | ** RE-ENABLE ST| 000009C0: 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 2A |OP KEY AND END *| 000009D0: 2A 00 00 12 8C 01 8B C2 28 35 30 30 30 33 29 B3 |*.......(50003).| 000009E0: B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 30 |.1..(50003)..160| 000009F0: AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 39 |..(50003)..0.399| 00000A00: 00 2A 12 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 35 |.*....UU.71:..(5| 00000A10: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 |0003).0..53281,6| 00000A20: 3A 97 35 33 32 38 30 2C 31 34 00 36 12 8E 01 99 |:.53280,14.6....| 00000A30: 22 9A 93 22 3A 80 00 41 12 8F 01 8D 38 37 35 3A |"..":..A....875:| 00000A40: 8E 00 62 12 90 01 8F 20 2A 2A 20 53 54 55 44 45 |..b.... ** STUDE| 00000A50: 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |NT INSTRUCTIONS | 00000A60: 2A 2A 00 91 12 95 01 99 22 93 22 3A 97 55 54 2C |**......".":.UT,| 00000A70: 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UL%:..(50003).0.| 00000A80: 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C |.53281,0:.53280,| 00000A90: 30 00 B7 12 9A 01 55 50 B2 30 3A 55 47 24 B2 22 |0.....UP.0:UG$."| 00000AA0: D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 3A 55 48 |.TUDENT .NST":UH| 00000AB0: B2 31 3A 8D 38 35 30 00 E9 12 9C 01 99 22 11 11 |.1:.850......"..| 00000AC0: 20 CE 4F 54 45 3A 11 11 11 9D 9D 9D D4 4F 20 41 | .OTE:.......O A| 00000AD0: 44 56 41 4E 43 45 20 46 52 4F 4D 20 4F 4E 45 20 |DVANCE FROM ONE | 00000AE0: 51 55 45 53 54 49 4F 4E 22 00 13 13 9E 01 99 22 |QUESTION"......"| 00000AF0: 11 20 54 4F 20 54 48 45 20 4E 45 58 54 20 50 52 |. TO THE NEXT PR| 00000B00: 45 53 53 20 54 48 45 20 D3 D0 C1 C3 C5 20 42 41 |ESS THE ..... BA| 00000B10: 52 2E 22 00 3F 13 A0 01 99 22 11 11 1D 1D 1D C9 |R.".?...."......| 00000B20: 46 20 41 54 20 41 4E 59 20 54 49 4D 45 20 59 4F |F AT ANY TIME YO| 00000B30: 55 20 57 49 53 48 20 54 4F 20 56 49 45 57 22 00 |U WISH TO VIEW".| 00000B40: 65 13 A2 01 99 22 11 20 54 48 45 20 4D 45 4E 55 |e....". THE MENU| 00000B50: 20 50 52 45 53 53 20 3C 48 3E 20 3C 52 45 54 55 | PRESS <H> <RETU| 00000B60: 52 4E 3E 2E 22 00 92 13 A4 01 99 22 11 11 20 20 |RN>."......".. | 00000B70: 20 D0 52 45 53 53 20 3C 52 45 54 55 52 4E 3E 20 | .RESS <RETURN> | 00000B80: 41 46 54 45 52 20 45 41 43 48 20 45 4E 54 52 59 |AFTER EACH ENTRY| 00000B90: 2E 22 00 A0 13 A6 01 8D 38 33 35 3A 8D 38 35 30 |."......835:.850| 00000BA0: 00 CD 13 A8 01 99 22 11 11 11 20 20 20 C9 20 57 |......"... . W| 00000BB0: 49 4C 4C 20 54 45 53 54 20 59 4F 55 20 4F 4E 20 |ILL TEST YOU ON | 00000BC0: 59 4F 55 52 20 41 42 49 4C 49 54 59 22 00 FA 13 |YOUR ABILITY"...| 00000BD0: AA 01 99 22 11 20 54 4F 20 4C 4F 43 41 54 45 20 |...". TO LOCATE | 00000BE0: 54 48 45 20 53 54 41 54 45 53 20 4F 46 20 54 48 |THE STATES OF TH| 00000BF0: 45 20 D5 2E D3 2E 20 49 4E 22 00 18 14 AC 01 99 |E .... IN"......| 00000C00: 22 11 20 54 48 45 49 52 20 50 52 4F 50 45 52 20 |". THEIR PROPER | 00000C10: 52 45 47 49 4F 4E 2E 22 00 46 14 AE 01 99 22 11 |REGION.".F....".| 00000C20: 20 20 20 D4 48 45 20 52 45 47 49 4F 4E 53 20 55 | .HE REGIONS U| 00000C30: 53 45 44 20 41 52 45 20 47 49 56 45 4E 20 49 4E |SED ARE GIVEN IN| 00000C40: 20 45 41 43 48 22 00 71 14 B0 01 99 22 11 20 51 | EACH".q....". Q| 00000C50: 55 45 53 54 49 4F 4E 20 41 4C 4F 4E 47 20 57 49 |UESTION ALONG WI| 00000C60: 54 48 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 2E |TH INSTRUCTIONS.| 00000C70: 22 00 9E 14 B2 01 99 22 11 20 20 20 C9 20 57 49 |"......". . WI| 00000C80: 4C 4C 20 52 41 4E 44 4F 4D 4C 59 20 53 45 4C 45 |LL RANDOMLY SELE| 00000C90: 43 54 20 53 54 41 54 45 53 20 41 4E 44 22 00 CA |CT STATES AND"..| 00000CA0: 14 B4 01 99 22 11 20 41 53 4B 20 59 4F 55 20 57 |....". ASK YOU W| 00000CB0: 48 49 43 48 20 52 45 47 49 4F 4E 20 4F 46 20 54 |HICH REGION OF T| 00000CC0: 48 45 20 D5 4E 49 54 45 44 22 00 EB 14 B6 01 99 |HE .NITED"......| 00000CD0: 22 11 20 D3 54 41 54 45 53 20 54 48 45 20 53 54 |". .TATES THE ST| 00000CE0: 41 54 45 20 49 53 20 49 4E 2E 22 00 F4 14 E5 01 |ATE IS IN.".....| 00000CF0: 8D 38 33 35 00 08 15 EA 01 8B 55 5A B2 31 A7 9E |.835......UZ.1..| 00000D00: 55 50 25 3A 89 32 31 37 00 0E 15 F3 01 8E 00 2F |UP%:.217......./| 00000D10: 15 F4 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 |.... ** TEACHER | 00000D20: 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 |INSTRUCTIONS **.| 00000D30: 5F 15 F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 |_....".":.UT,UL%| 00000D40: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53| 00000D50: 32 38 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 |281,2:.53280,10.| 00000D60: 80 15 F6 01 55 50 B2 30 3A 55 47 24 B2 22 D4 45 |....UP.0:UG$.".E| 00000D70: 41 43 48 45 52 20 C9 4E 53 54 22 3A 8D 38 35 30 |ACHER .NST":.850| 00000D80: 00 AE 15 F7 01 99 22 11 11 20 20 20 20 20 20 D4 |......".. .| 00000D90: 4F 20 54 48 45 20 42 45 53 54 20 4F 46 20 4F 55 |O THE BEST OF OU| 00000DA0: 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 D7 |R KNOWLEDGE,."..| 00000DB0: 15 F8 01 99 22 20 20 20 54 48 49 53 20 50 52 4F |...." THIS PRO| 00000DC0: 47 52 41 4D 20 49 53 20 49 4E 20 54 48 45 20 50 |GRAM IS IN THE P| 00000DD0: 55 42 4C 49 43 11 22 00 03 16 F9 01 99 22 20 20 |UBLIC."......" | 00000DE0: 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 20 54 48 49 | DOMAIN. .F THI| 00000DF0: 53 20 49 53 20 4E 4F 54 20 54 48 45 20 43 41 53 |S IS NOT THE CAS| 00000E00: 45 11 22 00 20 16 FA 01 99 22 20 20 20 50 4C 45 |E.". ...." PLE| 00000E10: 41 53 45 20 43 4F 4E 54 41 43 54 3A 11 11 11 22 |ASE CONTACT:..."| 00000E20: 00 4A 16 FB 01 99 22 20 20 20 20 20 20 C3 4F 4D |.J...." .OM| 00000E30: 4D 4F 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 |MODORE .USINESS | 00000E40: CD 41 43 48 49 4E 45 53 11 22 00 6D 16 FC 01 99 |.ACHINES.".m....| 00000E50: 22 20 20 20 20 20 20 20 20 20 20 33 33 37 30 20 |" 3370 | 00000E60: D0 48 41 52 4D 41 43 59 20 C1 56 45 2E 00 91 16 |.HARMACY .VE....| 00000E70: FD 01 99 22 20 20 20 20 20 20 20 20 20 20 C1 47 |..." .G| 00000E80: 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 4F |INCOURT, .NTARIO| 00000E90: 22 00 B3 16 FE 01 99 22 20 20 20 20 20 20 20 20 |"......" | 00000EA0: 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 D7 20 32 | .ANADA .1. 2| 00000EB0: CB 34 22 00 D3 16 FF 01 99 22 20 20 20 20 20 20 |.4"......" | 00000EC0: 20 20 20 20 28 34 31 36 29 20 34 39 39 2D 34 32 | (416) 499-42| 00000ED0: 39 32 22 00 E9 16 00 02 55 50 B2 31 3A 8D 20 38 |92".....UP.1:. 8| 00000EE0: 33 35 3A 8D 20 38 35 30 3A 00 16 17 01 02 99 22 |35:. 850:......"| 00000EF0: 20 20 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 CE | ...ROGRAM .| 00000F00: 41 4D 45 3A 20 D3 54 41 54 45 53 20 26 20 D2 45 |AME: .TATES & .E| 00000F10: 47 49 4F 4E 53 11 00 38 17 02 02 99 22 20 20 20 |GIONS..8...." | 00000F20: 20 20 D7 52 49 54 54 45 4E 20 C2 59 20 20 3A 20 | .RITTEN .Y : | 00000F30: D5 4E 4B 4E 4F 57 4E 11 00 5E 17 03 02 99 22 20 |.NKNOWN..^...." | 00000F40: 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 59 20 | .PGRADED .Y | 00000F50: 3A 20 CA 41 4D 45 53 20 CD 55 4E 52 4F 11 00 89 |: .AMES .UNRO...| 00000F60: 17 04 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 |...." ..HIS | 00000F70: 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E |PROGRAM WILL RUN| 00000F80: 20 4F 4E 20 41 4E 59 11 11 00 A9 17 07 02 99 22 | ON ANY........"| 00000F90: 20 20 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 20 | ... 64 | 00000FA0: C3 CF CD D0 D5 D4 C5 D2 11 00 CE 17 08 02 99 22 |..............."| 00000FB0: 20 20 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF | .......| 00000FC0: D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 DC |.. 64 ..........| 00000FD0: 17 09 02 8D 38 33 35 3A 8D 38 35 30 00 0D 18 0C |....835:.850....| 00000FE0: 02 99 22 11 11 11 11 20 20 20 20 D4 48 49 53 20 |..".... .HIS | 00000FF0: 49 53 20 41 20 47 45 4F 47 52 41 50 48 59 20 44 |IS A GEOGRAPHY D| 00001000: 52 49 4C 4C 20 44 45 41 4C 49 4E 47 22 00 3A 18 |RILL DEALING".:.| 00001010: 0E 02 99 22 11 20 20 20 57 49 54 48 20 53 54 41 |...". WITH STA| 00001020: 54 45 53 20 41 4E 44 20 54 48 45 20 D5 2E 20 D3 |TES AND THE .. .| 00001030: 2E 20 52 45 47 49 4F 4E 53 22 00 5E 18 10 02 99 |. REGIONS".^....| 00001040: 22 11 20 20 20 49 4E 20 57 48 49 43 48 20 54 48 |". IN WHICH TH| 00001050: 45 59 20 41 52 45 20 46 4F 55 4E 44 2E 22 00 8C |EY ARE FOUND."..| 00001060: 18 12 02 99 22 11 20 20 20 20 D4 48 49 53 20 44 |....". .HIS D| 00001070: 52 49 4C 4C 20 49 53 20 53 55 49 54 41 42 4C 45 |RILL IS SUITABLE| 00001080: 20 46 4F 52 20 47 52 41 44 45 53 22 00 B5 18 14 | FOR GRADES"....| 00001090: 02 99 22 11 20 20 20 37 20 41 4E 44 20 38 2C 20 |..". 7 AND 8, | 000010A0: 4F 52 20 57 48 45 4E 20 53 54 55 44 59 49 4E 47 |OR WHEN STUDYING| 000010B0: 20 54 48 45 22 00 D1 18 16 02 99 22 11 20 20 20 | THE"......". | 000010C0: 54 4F 50 49 43 20 45 4C 53 45 57 48 45 52 45 2E |TOPIC ELSEWHERE.| 000010D0: 22 00 DA 18 44 02 8D 38 33 35 00 EE 18 4E 02 8B |"...D..835...N..| 000010E0: 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 F4 |UZ.1..UP%:.217..| 000010F0: 18 57 02 8E 00 1A 19 58 02 8F 20 2A 2A 20 50 52 |.W.....X.. ** PR| 00001100: 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 41 54 49 |OGRAM MODIFICATI| 00001110: 4F 4E 20 49 4E 53 54 20 2A 2A 00 2B 19 59 02 99 |ON INST **.+.Y..| 00001120: 22 93 22 3A 97 55 54 2C 55 4C 25 00 4B 19 5D 02 |".":.UT,UL%.K.].| 00001130: 55 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 52 41 |UP.0:UG$.".ROGRA| 00001140: 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 54 19 94 02 |M .OD":.850.T...| 00001150: 8D 38 33 35 00 68 19 B2 02 8B 55 5A B2 31 A7 9E |.835.h....UZ.1..| 00001160: 55 50 25 3A 89 32 31 37 00 6E 19 BB 02 8E 00 93 |UP%:.217.n......| 00001170: 19 BC 02 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 |.... ** TO USE 8| 00001180: 30 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 |032 LOAD CBM4032| 00001190: 20 2A 2A 00 C9 19 C6 02 99 22 93 11 11 11 05 42 | **......".....B| 000011A0: 45 46 4F 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 |EFORE RUNNING TH| 000011B0: 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E |IS PROGRAM ON AN| 000011C0: 20 38 30 33 32 20 20 11 11 00 FF 19 D0 02 99 22 | 8032 ........"| 000011D0: 20 20 20 20 20 20 4C 4F 41 44 20 54 48 45 20 27 | LOAD THE '| 000011E0: 43 42 4D 20 34 30 33 32 27 20 50 52 4F 47 52 41 |CBM 4032' PROGRA| 000011F0: 4D 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |M.............".| 00001200: 0A 1A DA 02 9E 55 55 AA 37 31 00 10 1A E4 02 80 |.....UU.71......| 00001210: 00 30 1A 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 |.0. .. ** T I T | 00001220: 4C 20 45 20 20 20 50 20 41 20 47 20 45 20 2A 2A |L E P A G E **| 00001230: 00 64 1A 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 |.d.".."....";:.U| 00001240: 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UU%:..(50003).| 00001250: 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 32 |0..53280,14:.532| 00001260: 38 31 2C 36 00 7A 1A 24 03 81 49 B2 31 A4 33 38 |81,6.z.$..I.1.38| 00001270: 3A 99 22 12 A6 92 22 3B 3A 82 00 92 1A 26 03 81 |:."...";:....&..| 00001280: 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B |I.1.22:.".....";| 00001290: 3A 82 00 AA 1A 28 03 81 49 B2 31 A4 33 37 3A 99 |:....(..I.1.37:.| 000012A0: 22 9D 9D 12 A6 92 22 3B 3A 82 00 C2 1A 2A 03 81 |".....";:....*..| 000012B0: 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B |I.1.22:.".....";| 000012C0: 3A 82 00 E7 1A 2C 03 99 22 13 11 11 11 11 11 11 |:....,..".......| 000012D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 000012E0: 1D 1D 12 A9 20 20 92 00 09 1B 2E 03 99 22 1D 1D |.... ......."..| 000012F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00001300: 12 20 92 20 20 12 20 92 A9 00 2A 1B 30 03 99 22 |. . . ...*.0.."| 00001310: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00001320: 1D 1D 12 20 92 20 20 12 A3 DF 00 48 1B 32 03 99 |... . ....H.2..| 00001330: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............| 00001340: 1D 1D 1D DF 12 20 20 92 00 70 1B 34 03 99 22 11 |..... ..p.4..".| 00001350: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F |.............C O| 00001360: 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 | M M O D O R E..| 00001370: 00 93 1B 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |...6..".........| 00001380: 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 |......EDUCATIONA| 00001390: 4C 11 11 00 B2 1B 38 03 99 22 1D 1D 1D 1D 1D 1D |L.....8.."......| 000013A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 |..........SOFTWA| 000013B0: 52 45 00 CD 1B 3A 03 8F 20 2A 2A 20 43 4F 4D 4D |RE...:.. ** COMM| 000013C0: 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 05 1C |ODORE LOGO **...| 000013D0: 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D |;...(UD$,24);"..| 000013E0: 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 |........PRESS SP| 000013F0: 41 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 92 |ACE BAR OR WAIT.| 00001400: 22 3A 49 B2 30 00 27 1C 3C 03 A1 41 24 3A 8B 41 |":I.0.'.<..A$:.A| 00001410: 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 |$.." ".I.I.1:.I.| 00001420: 32 35 30 A7 38 32 38 00 4B 1C 3E 03 54 31 24 B2 |250.828.K.>.T1$.| 00001430: 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 |"":T2$."":T3$.""| 00001440: 3A 54 34 24 B2 22 22 3A 49 B2 30 00 54 1C 40 03 |:T4$."":I.0.T.@.| 00001450: 89 33 30 30 00 70 1C 43 03 8F 20 2A 2A 20 53 50 |.300.p.C.. ** SP| 00001460: 41 43 45 20 42 41 52 20 50 52 45 53 53 20 2A 2A |ACE BAR PRESS **| 00001470: 00 A5 1C 48 03 99 C8 28 55 44 24 2C 32 34 29 3B |...H...(UD$,24);| 00001480: 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 |".......PRESS SP| 00001490: 41 43 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 49 |ACE BAR TO CONTI| 000014A0: 4E 55 45 92 22 00 BC 1C 4C 03 A1 55 49 24 3A 8B |NUE."...L..UI$:.| 000014B0: 55 49 24 B3 B1 22 20 22 A7 38 34 34 00 C2 1C 4E |UI$.." ".844...N| 000014C0: 03 8E 00 E2 1C 52 03 8F 20 2A 2A 20 50 41 47 45 |.....R.. ** PAGE| 000014D0: 20 44 45 53 49 47 4E 20 52 4F 55 54 49 4E 45 20 | DESIGN ROUTINE | 000014E0: 2A 2A 00 EE 1C 54 03 55 50 B2 55 50 AA 31 00 18 |**...T.UP.UP.1..| 000014F0: 1D 57 03 99 22 93 22 C8 28 55 54 24 AA 55 50 24 |.W..".".(UT$.UP$| 00001500: 2C 32 31 29 3B C9 28 55 50 24 AA 55 47 24 AA C4 |,21);.(UP$.UG$..| 00001510: 28 55 50 29 2C 31 38 29 00 47 1D 5C 03 99 22 20 |(UP),18).G.\.." | 00001520: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001530: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001540: 2D 2D 2D 2D 2D 2D 22 00 56 1D 60 03 8B 55 48 B3 |------".V.`..UH.| 00001550: B1 30 A7 38 37 30 00 8A 1D 61 03 99 C8 28 55 44 |.0.870...a...(UD| 00001560: 24 2C 32 34 29 3B C8 28 55 50 24 2C 37 29 3B 22 |$,24);.(UP$,7);"| 00001570: 48 45 4C 50 20 2D 20 50 52 45 53 53 20 20 20 48 |HELP - PRESS H| 00001580: 20 3C 52 45 54 55 52 4E 3E 22 00 96 1D 66 03 99 | <RETURN>"...f..| 00001590: 22 13 11 22 3A 8E 00 B5 1D 6B 03 8F 20 2A 2A 20 |"..":....k.. ** | 000015A0: 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 4D 41 |PLEASE WAIT REMA| 000015B0: 52 4B 20 2A 2A 00 EB 1D 70 03 99 C8 28 55 44 24 |RK **...p...(UD$| 000015C0: 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 |,24);" | 000015D0: 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 | ONE MOMENT PLEA| 000015E0: 53 45 2E 2E 2E 20 20 20 20 20 22 00 F1 1D 75 03 |SE... "...u.| 000015F0: 8E 00 0E 1E 84 03 8F 20 2A 2A 20 53 45 54 20 55 |....... ** SET U| 00001600: 50 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 59 |P VARIABLES **.Y| 00001610: 1E 85 03 55 58 24 B2 22 48 22 3A 86 55 51 25 28 |...UX$."H":.UQ%(| 00001620: 31 30 30 30 29 3A 55 42 B2 33 32 37 36 38 3A 55 |1000):UB.32768:U| 00001630: 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 B2 |1.196:U2.197:U3.| 00001640: 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 36 |198:U4.216:UC.16| 00001650: 37 3A 55 55 B2 31 30 32 34 00 90 1E 86 03 55 54 |7:UU.1024.....UT| 00001660: B2 35 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C |.59468:UU%.12:UL| 00001670: 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 4D |%.14:UP%.1146:UM| 00001680: B2 33 32 37 36 38 3A 97 20 35 30 30 30 33 2C 30 |.32768:. 50003,0| 00001690: 00 D3 1E 87 03 8B C2 28 35 30 30 30 33 29 B2 30 |.......(50003).0| 000016A0: A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 30 39 3A |.UB.1024:U1.209:| 000016B0: 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 3A 55 34 |U2.210:U3.211:U4| 000016C0: B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 55 B2 32 |.214:UC.204:UU.2| 000016D0: 30 34 38 00 0B 1F 88 03 8B C2 28 35 30 30 30 33 |048.......(50003| 000016E0: 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 55 25 |).0.UT.53272:UU%| 000016F0: B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 |.21:UL%.23:UP%.2| 00001700: 31 33 39 3A 55 4D B2 31 30 32 34 00 2F 1F 89 03 |139:UM.1024./...| 00001710: 55 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |UD$."...........| 00001720: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".| 00001730: 61 1F 8A 03 55 50 24 B2 22 20 20 20 20 20 20 20 |a...UP$." | 00001740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001760: 22 00 AF 1F 8B 03 55 54 24 B2 22 20 D3 D4 C1 D4 |".....UT$." ....| 00001770: C5 D3 A0 26 20 D2 C5 C7 C9 CF CE D3 A0 A0 22 3A |...& .........":| 00001780: 8F 20 50 4C 41 43 45 20 50 52 4F 47 52 41 4D 20 |. PLACE PROGRAM | 00001790: 54 49 54 4C 45 20 48 45 52 45 20 21 21 21 21 21 |TITLE HERE !!!!!| 000017A0: 21 21 21 21 21 21 21 21 21 21 21 21 2A 2A 2A 00 |!!!!!!!!!!!!***.| 000017B0: B5 1F 8C 03 8E 00 CF 1F 8E 03 8F 20 2A 2A 20 53 |........... ** S| 000017C0: 45 54 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 |ET VARIABLES **.| 000017D0: FB 1F 8F 03 86 41 28 31 30 30 29 3A 47 B2 30 3A |.....A(100):G.0:| 000017E0: 48 B2 30 3A 42 B2 30 3A 43 B2 30 3A 45 B2 30 3A |H.0:B.0:C.0:E.0:| 000017F0: 5A B2 30 3A 46 B2 30 3A 58 B2 30 00 04 20 93 03 |Z.0:F.0:X.0.. ..| 00001800: 8D 39 30 30 00 1F 20 98 03 8F 20 2A 2A 20 43 48 |.900.. ... ** CH| 00001810: 45 43 4B 20 46 4F 52 20 38 30 33 32 20 2A 2A 00 |ECK FOR 8032 **.| 00001820: 3D 20 9D 03 99 22 93 22 3A 99 22 A0 22 3A 8F 20 |= ...".":.".":. | 00001830: 53 48 49 46 54 45 44 20 53 50 41 43 45 00 54 20 |SHIFTED SPACE.T | 00001840: A2 03 8B C2 28 55 42 AA 34 30 29 B3 B1 39 36 A7 |....(UB.40)..96.| 00001850: 8D 37 30 30 00 6D 20 A3 03 8F 20 2A 2A 20 4D 45 |.700.m ... ** ME| 00001860: 4D 4F 52 59 20 43 48 45 43 4B 20 2A 2A 00 81 20 |MORY CHECK **.. | 00001870: A4 03 8B 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 |... .(0).2000.93| 00001880: 37 00 AF 20 A5 03 99 22 93 11 11 05 54 48 49 53 |7.. ..."....THIS| 00001890: 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 4E 4F | MACHINE DOES NO| 000018A0: 54 20 48 41 56 45 20 45 4E 4F 55 47 48 11 22 00 |T HAVE ENOUGH.".| 000018B0: D3 20 A6 03 99 22 4D 45 4D 4F 52 59 20 54 4F 20 |. ..."MEMORY TO | 000018C0: 52 55 4E 20 54 48 49 53 20 50 52 4F 47 52 41 4D |RUN THIS PROGRAM| 000018D0: 20 21 22 00 DE 20 A7 03 9E 55 55 AA 37 31 00 E4 | !".. ...UU.71..| 000018E0: 20 A8 03 80 00 FE 20 A9 03 99 22 93 05 22 3A 8B | ..... ..."..":.| 000018F0: C2 28 35 30 30 30 33 29 B2 30 A7 39 36 32 00 2D |.(50003).0.962.-| 00001900: 21 AC 03 8F 20 2A 2A 20 42 41 53 49 43 20 32 2E |!... ** BASIC 2.| 00001910: 30 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 |0 OR 4.0 OR | 00001920: 43 2D 36 34 20 53 45 54 55 50 20 2A 2A 00 6B 21 |C-64 SETUP **.k!| 00001930: AD 03 97 31 30 37 35 2C 31 33 33 3A 97 31 30 37 |...1075,133:.107| 00001940: 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 34 3A |6,144:.1077,234:| 00001950: 97 31 30 37 39 2C 34 3A 97 31 30 38 30 2C 31 33 |.1079,4:.1080,13| 00001960: 33 3A 97 31 30 38 31 2C 31 34 35 00 A1 21 AE 03 |3:.1081,145..!..| 00001970: 97 31 30 39 31 2C 31 35 35 3A 97 31 30 39 38 2C |.1091,155:.1098,| 00001980: 31 33 33 3A 97 31 30 39 39 2C 31 34 34 3A 97 31 |133:.1099,144:.1| 00001990: 31 30 30 2C 32 33 34 3A 97 31 31 30 33 2C 31 33 |100,234:.1103,13| 000019A0: 33 00 C3 21 AF 03 97 31 31 30 34 2C 31 34 35 3A |3..!...1104,145:| 000019B0: 97 31 31 30 35 2C 32 33 34 3A 97 31 30 38 32 2C |.1105,234:.1082,| 000019C0: 32 33 34 00 DA 21 B1 03 8B C2 28 35 30 30 30 33 |234..!....(50003| 000019D0: 29 B3 B1 31 36 30 A7 39 35 35 00 09 22 B6 03 97 |)..160.955.."...| 000019E0: 31 30 39 33 2C 38 38 3A 97 31 30 39 34 2C 32 32 |1093,88:.1094,22| 000019F0: 38 3A 97 31 30 39 37 2C 38 35 3A 97 31 31 30 32 |8:.1097,85:.1102| 00001A00: 2C 32 32 38 3A 89 39 36 35 00 1E 22 BB 03 8B C2 |,228:.965.."....| 00001A10: 28 35 30 30 30 33 29 B3 B1 31 A7 39 39 30 00 4D |(50003)..1.990.M| 00001A20: 22 C0 03 97 31 30 39 33 2C 34 39 3A 97 31 30 39 |"...1093,49:.109| 00001A30: 34 2C 32 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 |4,230:.1097,46:.| 00001A40: 31 31 30 32 2C 32 33 30 3A 89 39 36 35 00 87 22 |1102,230:.965.."| 00001A50: C2 03 97 32 30 39 39 2C 31 34 31 3A 97 32 31 30 |...2099,141:.210| 00001A60: 30 2C 32 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 |0,20:.2101,3:.21| 00001A70: 30 33 2C 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 |03,8:.2104,141:.| 00001A80: 32 31 30 35 2C 32 31 00 C3 22 C3 03 97 32 31 30 |2105,21.."...210| 00001A90: 36 2C 33 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 |6,3:.2115,145:.2| 00001AA0: 31 31 37 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 |117,52:.2118,234| 00001AB0: 3A 97 32 31 32 31 2C 34 39 3A 97 32 31 32 32 2C |:.2121,49:.2122,| 00001AC0: 31 34 31 00 FD 22 C4 03 97 32 31 32 33 2C 32 30 |141.."...2123,20| 00001AD0: 3A 97 32 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 |:.2124,3:.2126,2| 00001AE0: 33 34 3A 97 32 31 32 37 2C 31 34 31 3A 97 32 31 |34:.2127,141:.21| 00001AF0: 32 38 2C 32 31 3A 97 32 31 32 39 2C 33 00 1B 23 |28,21:.2129,3..#| 00001B00: C5 03 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 |...UU.48:. DISAB| 00001B10: 4C 45 20 53 54 4F 50 20 4B 45 59 00 2C 23 CA 03 |LE STOP KEY.,#..| 00001B20: 8D 38 30 30 3A 8F 20 54 49 54 4C 45 00 3C 23 D4 |.800:. TITLE.<#.| 00001B30: 03 89 33 30 30 3A 8F 20 4D 45 4E 55 00 6D 23 DE |..300:. MENU.m#.| 00001B40: 03 99 22 93 54 48 45 20 50 47 4D 20 57 49 4C 4C |..".THE PGM WILL| 00001B50: 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 48 49 | NOT WORK ON THI| 00001B60: 53 20 4D 41 43 48 49 4E 45 21 22 3A 80 00 A2 23 |S MACHINE!":...#| 00001B70: E8 03 8B 55 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 |...UZ.1..UP%:.UP| 00001B80: 25 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 52 4F 47 |%:UZ.0:. ** PROG| 00001B90: 52 41 4D 20 53 54 41 52 54 53 20 48 45 52 45 20 |RAM STARTS HERE | 00001BA0: 2A 2A 00 CE 23 E9 03 99 22 93 05 22 3B 3A 8C 3A |**..#..."..";:.:| 00001BB0: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532| 00001BC0: 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 EB |81,6:.53280,14..| 00001BD0: 23 10 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |#...************| 00001BE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 08 24 1A 04 |***********..$..| 00001BF0: 8F 2A 2A 4D 45 4E 55 20 41 44 44 45 44 20 41 4E |.**MENU ADDED AN| 00001C00: 44 20 50 47 4D 20 2A 2A 00 25 24 24 04 8F 2A 2A |D PGM **.%$$..**| 00001C10: 20 20 20 20 4D 4F 44 49 46 49 45 44 20 42 59 20 | MODIFIED BY | 00001C20: 20 20 20 2A 2A 00 42 24 29 04 8F 2A 2A 20 20 20 | **.B$)..** | 00001C30: 20 4A 41 4D 45 53 20 4D 55 4E 52 4F 20 20 20 20 | JAMES MUNRO | 00001C40: 2A 2A 00 5F 24 2E 04 8F 2A 2A 20 20 20 20 31 39 |**._$...** 19| 00001C50: 38 32 20 30 36 20 33 30 20 20 20 20 20 2A 2A 00 |82 06 30 **.| 00001C60: 7C 24 33 04 8F 2A 2A 20 20 4F 53 48 41 57 41 20 ||$3..** OSHAWA | 00001C70: 4F 4E 54 41 52 49 4F 20 20 20 2A 2A 00 9A 24 38 |ONTARIO **..$8| 00001C80: 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************| 00001C90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B8 24 3D 04 8F |**********..$=..| 00001CA0: 2A 20 52 45 56 49 53 45 44 20 41 4E 44 20 55 50 |* REVISED AND UP| 00001CB0: 47 52 41 44 45 44 20 2A 00 D6 24 42 04 8F 2A 20 |GRADED *..$B..* | 00001CC0: 46 4F 52 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 |FOR COMMODORE 64| 00001CD0: 20 42 59 20 20 2A 00 F4 24 47 04 8F 2A 20 20 20 | BY *..$G..* | 00001CE0: 20 20 20 44 45 52 45 4B 20 4C 45 45 20 20 20 20 | DEREK LEE | 00001CF0: 20 20 20 2A 00 12 25 4C 04 8F 2A 20 20 20 20 20 | *..%L..* | 00001D00: 20 4A 55 4C 59 20 32 36 2F 38 32 20 20 20 20 20 | JULY 26/82 | 00001D10: 20 2A 00 30 25 56 04 8F 2A 2A 2A 2A 2A 2A 2A 2A | *.0%V..********| 00001D20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001D30: 00 44 25 8A 04 47 B2 30 3A 48 B2 30 3A 97 55 54 |.D%..G.0:H.0:.UT| 00001D40: 2C 55 4C 25 00 67 25 BA 04 83 20 22 C1 4C 41 42 |,UL%.g%... ".LAB| 00001D50: 41 4D 41 22 2C 22 C1 4C 41 53 4B 41 22 2C 22 C1 |AMA",".LASKA",".| 00001D60: 52 49 5A 4F 4E 41 22 00 90 25 C4 04 83 20 22 C1 |RIZONA"..%... ".| 00001D70: 52 4B 41 4E 53 41 53 22 2C 22 C3 41 4C 49 46 4F |RKANSAS",".ALIFO| 00001D80: 52 4E 49 41 22 2C 22 C3 4F 4C 4F 52 41 44 4F 22 |RNIA",".OLORADO"| 00001D90: 00 B9 25 CE 04 83 20 22 C3 4F 4E 4E 45 43 54 49 |..%... ".ONNECTI| 00001DA0: 43 55 54 22 2C 22 C4 45 4C 41 57 41 52 45 22 2C |CUT",".ELAWARE",| 00001DB0: 22 C6 4C 4F 52 49 44 41 22 00 E5 25 D8 04 83 20 |".LORIDA"..%... | 00001DC0: 22 C7 45 4F 52 47 49 41 22 2C 22 C8 41 57 41 49 |".EORGIA",".AWAI| 00001DD0: 49 22 2C 22 C9 44 41 48 4F 22 2C 22 C9 4C 4C 49 |I",".DAHO",".LLI| 00001DE0: 4E 4F 49 53 22 00 10 26 E2 04 83 20 22 C9 4E 44 |NOIS"..&... ".ND| 00001DF0: 49 41 4E 41 22 2C 22 C9 4F 57 41 22 2C 22 CB 41 |IANA",".OWA",".A| 00001E00: 4E 53 41 53 22 2C 22 CB 45 4E 54 55 43 4B 59 22 |NSAS",".ENTUCKY"| 00001E10: 00 35 26 EC 04 83 20 22 CC 4F 55 49 53 49 41 4E |.5&... ".OUISIAN| 00001E20: 41 22 2C 22 CD 41 49 4E 45 22 2C 22 CD 41 52 59 |A",".AINE",".ARY| 00001E30: 4C 41 4E 44 22 00 4B 26 F6 04 83 20 22 CD 41 53 |LAND".K&... ".AS| 00001E40: 53 41 43 48 55 53 45 54 54 53 22 00 76 26 00 05 |SACHUSETTS".v&..| 00001E50: 83 20 22 CD 49 43 48 49 47 41 4E 22 2C 22 CD 49 |. ".ICHIGAN",".I| 00001E60: 4E 4E 45 53 4F 54 41 22 2C 22 CD 49 53 53 49 53 |NNESOTA",".ISSIS| 00001E70: 53 49 50 50 49 22 00 A5 26 0A 05 83 20 22 CD 49 |SIPPI"..&... ".I| 00001E80: 53 53 4F 55 52 49 22 2C 22 CD 4F 4E 54 41 4E 41 |SSOURI",".ONTANA| 00001E90: 22 2C 22 CE 45 42 52 41 53 4B 41 22 2C 22 CE 45 |",".EBRASKA",".E| 00001EA0: 56 41 44 41 22 00 D5 26 14 05 83 20 22 CE 45 57 |VADA"..&... ".EW| 00001EB0: 20 C8 41 4D 50 53 48 49 52 45 22 2C 22 CE 45 57 | .AMPSHIRE",".EW| 00001EC0: 20 CA 45 52 53 45 59 22 2C 22 CE 45 57 20 CD 45 | .ERSEY",".EW .E| 00001ED0: 58 49 43 4F 22 00 06 27 1E 05 83 20 22 CE 45 57 |XICO"..'... ".EW| 00001EE0: 20 D9 4F 52 4B 22 2C 22 CE 4F 52 54 48 20 C3 41 | .ORK",".ORTH .A| 00001EF0: 52 4F 4C 49 4E 41 22 2C 22 CE 4F 52 54 48 20 C4 |ROLINA",".ORTH .| 00001F00: 41 4B 4F 54 41 22 00 36 27 28 05 83 20 22 CF 48 |AKOTA".6'(.. ".H| 00001F10: 49 4F 22 2C 22 CF 4B 4C 41 48 4F 4D 41 22 2C 22 |IO",".KLAHOMA","| 00001F20: CF 52 45 47 4F 4E 22 2C 22 D0 45 4E 4E 53 59 4C |.REGON",".ENNSYL| 00001F30: 56 41 4E 49 41 22 00 5C 27 32 05 83 20 22 D2 48 |VANIA".\'2.. ".H| 00001F40: 4F 44 45 20 C9 53 4C 41 4E 44 22 2C 22 D3 4F 55 |ODE .SLAND",".OU| 00001F50: 54 48 20 C3 41 52 4F 4C 49 4E 41 22 00 85 27 3C |TH .AROLINA"..'<| 00001F60: 05 83 20 22 D3 4F 55 54 48 20 C4 41 4B 4F 54 41 |.. ".OUTH .AKOTA| 00001F70: 22 2C 22 D4 45 4E 4E 45 53 53 45 45 22 2C 22 D4 |",".ENNESSEE",".| 00001F80: 45 58 41 53 22 00 A7 27 46 05 83 20 22 D5 54 41 |EXAS"..'F.. ".TA| 00001F90: 48 22 2C 22 D6 45 52 4D 4F 4E 54 22 2C 22 D6 49 |H",".ERMONT",".I| 00001FA0: 52 47 49 4E 49 41 22 00 CA 27 50 05 83 20 22 D7 |RGINIA"..'P.. ".| 00001FB0: 41 53 48 49 4E 47 54 4F 4E 22 2C 22 D7 45 53 54 |ASHINGTON",".EST| 00001FC0: 20 D6 49 52 47 49 4E 49 41 22 00 E6 27 5A 05 83 | .IRGINIA"..'Z..| 00001FD0: 20 22 D7 49 53 43 4F 4E 53 49 4E 22 2C 22 D7 59 | ".ISCONSIN",".Y| 00001FE0: 4F 4D 49 4E 47 22 00 FA 27 64 05 83 20 34 2C 31 |OMING"..'d.. 4,1| 00001FF0: 2C 32 2C 34 2C 31 2C 32 2C 36 00 20 28 6E 05 83 |,2,4,1,2,6. (n..| 00002000: 20 35 2C 34 2C 34 2C 31 2C 32 2C 33 2C 33 2C 33 | 5,4,4,1,2,3,3,3| 00002010: 2C 33 2C 34 2C 34 2C 36 2C 35 2C 36 2C 33 2C 33 |,3,4,4,6,5,6,3,3| 00002020: 00 46 28 78 05 83 20 34 2C 33 2C 32 2C 33 2C 32 |.F(x.. 4,3,2,3,2| 00002030: 2C 36 2C 35 2C 32 2C 35 2C 34 2C 33 2C 33 2C 32 |,6,5,2,5,4,3,3,2| 00002040: 2C 31 2C 35 2C 36 00 62 28 82 05 83 20 34 2C 33 |,1,5,6.b(... 4,3| 00002050: 2C 34 2C 32 2C 32 2C 36 2C 34 2C 31 2C 35 2C 33 |,4,2,2,6,4,1,5,3| 00002060: 2C 32 00 6B 28 83 05 55 50 B2 30 00 79 28 8C 05 |,2.k(..UP.0.y(..| 00002070: 81 42 B2 35 31 A4 31 30 30 00 A1 28 8D 05 55 48 |.B.51.100..(..UH| 00002080: B2 30 3A 55 47 24 B2 22 20 20 20 51 55 45 53 54 |.0:UG$." QUEST| 00002090: 49 4F 4E 20 23 22 3A 99 22 93 22 3A 3A 8D 38 37 |ION #":."."::.87| 000020A0: 35 00 AC 28 96 05 43 B2 BB 28 31 29 00 BB 28 A0 |5..(..C..(1)..(.| 000020B0: 05 43 B2 B5 28 43 AC 31 30 30 29 00 D0 28 AA 05 |.C..(C.100)..(..| 000020C0: 8B 43 B1 B2 30 AF 43 B3 B2 35 30 89 31 34 38 30 |.C..0.C..50.1480| 000020D0: 00 DA 28 B4 05 89 31 34 33 30 00 F0 28 BE 05 8B |..(...1430..(...| 000020E0: 41 28 43 AA 35 30 29 B2 30 20 A7 89 31 34 33 30 |A(C.50).0 ..1430| 000020F0: 00 F6 28 C8 05 8C 00 03 29 D2 05 81 20 45 B2 31 |..(.....)... E.1| 00002100: A4 35 30 00 0C 29 DC 05 87 20 42 24 00 14 29 E6 |.50..)... B$..).| 00002110: 05 82 20 45 00 23 29 F0 05 81 20 5A B2 31 20 A4 |.. E.#)... Z.1 .| 00002120: 20 35 30 00 2D 29 FA 05 87 41 28 5A 29 00 3F 29 | 50.-)...A(Z).?)| 00002130: 04 06 82 20 5A 3A 41 28 30 29 B2 41 28 31 29 00 |... Z:A(0).A(1).| 00002140: 45 29 0E 06 8C 00 51 29 18 06 81 20 5A B2 31 A4 |E)....Q)... Z.1.| 00002150: 43 00 5A 29 22 06 87 20 41 24 00 62 29 2C 06 82 |C.Z)".. A$.b),..| 00002160: 20 5A 00 70 29 36 06 41 28 5A AA 34 39 29 B2 30 | Z.p)6.A(Z.49).0| 00002170: 00 79 29 40 06 8D 38 35 30 00 A8 29 4A 06 99 22 |.y)@..850..)J.."| 00002180: 13 11 11 20 C9 4E 20 57 48 41 54 20 52 45 47 49 |... .N WHAT REGI| 00002190: 4F 4E 20 4F 46 20 54 48 45 20 D5 4E 49 54 45 44 |ON OF THE .NITED| 000021A0: 20 D3 54 41 54 45 53 22 00 C3 29 54 06 99 22 20 | .TATES"..)T.." | 000021B0: 49 53 20 22 3B 41 24 3B 22 20 46 4F 55 4E 44 20 |IS ";A$;" FOUND | 000021C0: 3F 11 22 00 E1 29 68 06 99 22 20 20 31 2E 20 20 |?."..)h.." 1. | 000021D0: D0 41 43 49 46 49 43 20 C3 4F 41 53 54 41 4C 11 |.ACIFIC .OASTAL.| 000021E0: 22 00 F7 29 72 06 99 22 20 20 32 2E 20 20 D7 45 |"..)r.." 2. .E| 000021F0: 53 54 45 52 4E 11 22 00 10 2A 86 06 99 22 20 20 |STERN."..*..." | 00002200: 33 2E 20 20 CD 49 44 57 45 53 54 45 52 4E 11 22 |3. .IDWESTERN."| 00002210: 00 27 2A 9A 06 99 22 20 20 34 2E 20 20 D3 4F 55 |.'*..." 4. .OU| 00002220: 54 48 45 52 4E 11 22 00 3D 2A AE 06 99 22 20 20 |THERN.".=*..." | 00002230: 35 2E 20 20 C5 41 53 54 45 52 4E 11 22 00 57 2A |5. .ASTERN.".W*| 00002240: C2 06 99 22 20 20 36 2E 20 20 CE 45 57 20 C5 4E |..." 6. .EW .N| 00002250: 47 4C 41 4E 44 11 22 00 78 2A D6 06 99 22 20 20 |GLAND.".x*..." | 00002260: 37 2E 20 20 D6 49 45 57 20 D3 43 4F 52 45 20 4F |7. .IEW .CORE O| 00002270: 52 20 D1 55 49 54 11 22 00 9D 2A EA 06 99 22 20 |R .UIT."..*..." | 00002280: D7 48 41 54 20 49 53 20 59 4F 55 52 20 43 48 4F |.HAT IS YOUR CHO| 00002290: 49 43 45 20 28 31 2D 37 29 3F 20 22 3B 00 C4 2A |ICE (1-7)? ";..*| 000022A0: EC 06 55 4C B2 31 3A 55 53 24 B2 22 48 31 32 33 |..UL.1:US$."H123| 000022B0: 34 35 36 37 22 3A 8D 33 35 3A 46 B2 C5 28 55 52 |4567":.35:F..(UR| 000022C0: 24 29 3A 99 00 D7 2A EF 06 8B 20 46 B3 31 B0 46 |$):...*... F.1.F| 000022D0: B1 37 89 31 37 37 32 00 E7 2A 08 07 8B 20 46 B2 |.7.1772..*... F.| 000022E0: 37 20 A7 31 39 35 30 00 FA 2A 12 07 8B 20 46 B2 |7 .1950..*... F.| 000022F0: 41 28 43 29 20 A7 31 38 33 30 00 32 2B 1C 07 99 |A(C) .1830.2+...| 00002300: 22 20 D7 52 4F 4E 47 2C 20 54 52 59 20 41 47 41 |" .RONG, TRY AGA| 00002310: 49 4E 21 22 3A 47 B2 47 AA 31 3A 8D 38 33 35 3A |IN!":G.G.1:.835:| 00002320: 55 50 B2 55 50 AB 31 3A 8D 38 35 30 3A 89 31 36 |UP.UP.1:.850:.16| 00002330: 31 30 00 3D 2B 26 07 58 B2 BB 28 31 29 00 5A 2B |10.=+&.X..(1).Z+| 00002340: 30 07 58 B2 B5 28 58 AC 31 30 29 3A 8B 20 58 B1 |0.X..(X.10):. X.| 00002350: 36 B0 58 B3 31 89 31 38 33 30 00 68 2B 3A 07 99 |6.X.1.1830.h+:..| 00002360: 22 1D 1D 1D 1D 1D 22 3B 00 90 2B 44 07 91 20 58 |".....";..+D.. X| 00002370: 20 89 20 31 38 37 30 2C 31 38 38 30 2C 31 38 39 | . 1870,1880,189| 00002380: 30 2C 31 39 30 30 2C 31 39 31 30 2C 31 39 32 30 |0,1900,1910,1920| 00002390: 00 B3 2B 4E 07 99 22 20 3C 3C 3C 20 20 C5 58 43 |..+N.." <<< .XC| 000023A0: 45 4C 4C 45 4E 54 21 20 20 3E 3E 3E 22 3A 89 31 |ELLENT! >>>":.1| 000023B0: 39 33 30 00 D5 2B 58 07 99 22 20 2A 2A 2A 20 20 |930..+X.." *** | 000023C0: D4 48 41 54 27 53 20 C9 54 20 20 2A 2A 2A 22 3A |.HAT'S .T ***":| 000023D0: 89 31 39 33 30 00 F8 2B 62 07 99 22 20 23 23 23 |.1930..+b.." ###| 000023E0: 20 20 D7 41 59 20 D4 4F 20 C7 4F 20 20 23 23 23 | .AY .O .O ###| 000023F0: 22 3A 89 20 31 39 33 30 00 1A 2C 6C 07 99 22 20 |":. 1930..,l.." | 00002400: 24 24 24 20 20 D2 49 47 48 54 20 CF 4E 20 20 24 |$$$ .IGHT .N $| 00002410: 24 24 22 3A 89 20 31 39 33 30 00 3B 2C 76 07 99 |$$":. 1930.;,v..| 00002420: 22 20 3D 3D 3D 20 20 C3 4F 52 52 45 43 54 20 20 |" === .ORRECT | 00002430: 3D 3D 3D 22 3A 89 20 31 39 33 30 00 57 2C 80 07 |===":. 1930.W,..| 00002440: 99 22 20 A6 A6 A6 20 20 CE 49 43 45 20 D7 4F 52 |." ... .ICE .OR| 00002450: 4B 20 20 A6 A6 A6 22 00 6A 2C 8A 07 48 B2 48 AA |K ...".j,..H.H.| 00002460: 31 3A 8D 38 33 35 3A 82 20 42 00 7E 2C 94 07 81 |1:.835:. B.~,...| 00002470: 20 4D 31 B2 31 A4 37 35 30 3A 82 20 4D 31 00 9A | M1.1.750:. M1..| 00002480: 2C 9E 07 54 B2 55 50 AB 31 3A 55 50 B2 30 3A 55 |,..T.UP.1:UP.0:U| 00002490: 47 24 B2 22 22 3A 8D 38 35 30 00 B2 2C A0 07 99 |G$."":.850..,...| 000024A0: 22 11 20 D9 4F 55 52 20 53 43 4F 52 45 2D 2D 11 |". .OUR SCORE--.| 000024B0: 11 22 00 C9 2C A8 07 99 48 3B 22 20 2D 2D 2D 20 |."..,...H;" --- | 000024C0: C3 4F 52 52 45 43 54 11 22 00 E1 2C B2 07 99 47 |.ORRECT."..,...G| 000024D0: 3B 22 20 2D 2D 2D 20 C9 4E 43 4F 52 52 45 43 54 |;" --- .NCORRECT| 000024E0: 22 00 EC 2C BC 07 99 22 2D 2D 2D 22 00 08 2D C6 |"..,..."---"..-.| 000024F0: 07 99 47 AA 48 3B 22 20 2D 2D 2D 20 D4 4F 54 41 |..G.H;" --- .OTA| 00002500: 4C 20 D4 52 49 45 53 22 00 2D 2D D0 07 99 22 11 |L .RIES".--...".| 00002510: 11 11 20 CD 4F 52 45 20 51 55 45 53 54 49 4F 4E |.. .ORE QUESTION| 00002520: 53 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 31 22 00 50 2D |S..........1".P-| 00002530: D1 07 99 22 11 20 D1 55 49 54 20 26 20 D2 45 54 |...". .UIT & .ET| 00002540: 55 52 4E 20 54 4F 20 4D 45 4E 55 2E 2E 2E 32 22 |URN TO MENU...2"| 00002550: 00 67 2D D2 07 99 22 11 20 20 20 20 28 31 20 4F |.g-...". (1 O| 00002560: 52 20 32 29 20 22 3B 00 88 2D DA 07 55 4C B2 31 |R 2) ";..-..UL.1| 00002570: 3A 55 53 24 B2 22 31 32 22 3A 8D 33 35 3A 49 B2 |:US$."12":.35:I.| 00002580: C5 28 55 52 24 29 3A 99 00 9B 2D DF 07 8B 20 49 |.(UR$):...-... I| 00002590: B3 31 B0 49 B1 32 89 32 30 31 30 00 C4 2D E4 07 |.1.I.2.2010..-..| 000025A0: 8B 49 B2 31 A7 55 50 B2 54 3A 55 47 24 B2 22 20 |.I.1.UP.T:UG$." | 000025B0: 20 20 20 D1 55 45 53 54 49 4F 4E 20 23 22 3A 89 | .UESTION #":.| 000025C0: 31 34 32 30 00 CA 2D 02 08 8E 00 00 00 |1420..-...... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:...... ** TO OUR BEST KNOWLEDGE TH
IS...... PROGRAM IS FREE FOR./....
DUPLICATION IN CANADA..M.... IF YOU
HAVE CONTRARY.J.... INFORMATION, PLEA
SE...... CONTACT COMMODORE CANADA AND
...... EVERY EFFORT WILL BE MADE TO.W
.... WITHDRAW COPIES OF THIS......
PROGRAM......:... .. PROGRAM - STAT
ES & REGIONS.^.!.. UPDATED - J.F. MUN
RO DURHAM B OF E, JUL
Y,1982...".. C-64 UPGRADE - DEREK LEE
...#.. +++ INPUT SECTION +++...(.UR$."":
UI$.""...*..UL.0.UL.80.Q.-.." ..";:.UC,
0...2..UI$:.UI$."".50...7..UI$.G(13).C(U
R$)..1..UC,1:." .";:.85.".<..UI$.G(20).1
05.6.>.. C(UR$)..UL.50.[.A..120:. CHECK
FOR VALID CHARACTER.K.F.UR$.UR$.UI$.U.K.
.UI$;.}.P..50...U.. +++ CHECK FOR HELP R
EQUEST +++.J.Z..UR$.UX$.195:. EXIT TO HE
LP ROUTINE.Y._..UF.1..240...D.UF.0:.:...
.F.. ++ CHECK DELETE ++...I..C(UR$).1.50
.(.N.UR$.H(UR$,C(UR$).1).:.S..". ..";:.
50.A.X.. ++ CHECK FOR VALID CHARACTERS +
+.S.}..C(US$).0.150......US.1.C(US$)....
..UI$.J(US$,US,1).............UI$."":..I
.... ** STANDARD INPUT **.Z....F(UI$).46
........UI$.G(32)..... ..F(UI$).48.F(UI$
).57.170.......+....F(UI$).65.F(UI$).90.
180.1.....U....F(UI$).193.F(UI$).218.UI$
."":..X....B(UT).UU%.UI$.G(F(UI$).128):.
.~.........UI$."":....C.UF.1:. +++ HELP
ROUTINE EXIT +++...E..250.B.H..245...M..
UQ.UB.(U2%.256.U1%.U3%.2)...R.UQ%(UQ.UB)
.B(UQ):.:."."...W.UZ.1:UV%.B(UT)...X..30
0.>.Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:UL.UK.U
.Z..B(50003).0..53281,1:.".";:.53281,6:.
53280,14:.220.....".";.....UT$.UL$:.UT,
UV%:.UQ.UB.(U2%.256.U1%.U3%.3).C....UQ,U
Q%(UQ.UB):..O....U1,U1%......U2,U2%.....
.U4,U4%......U3,U3%.1......35./...UD%.((
U2%.256.U1%.U3%).UB).40:.H(UD$,UD%.1):..
J....H(UD$,24);" .
HELP COMING . ":......U1%.B(U1):U2%.B(U
2):U3%.B(U3):U4%.B(U4).....UJ$.US$:UK$.U
G$:UL$.UT$:UJ.UP:UK.UL.D.....U.,.. ** ME
NU **...-.:......".":.UT,UU%:.B(50003).0
..53281,9:.53280,8.../.:.-.1..".
MENU".\.6.." -------------------
-------------------"...;..".. 1.
BEGIN STATES & REGIONS...@..".. 2
. STUDENT INSTRUCTIONS"...E.."..
3. TEACHER INSTRUCTIONS"...O.."..
4. QUIT..".&.T.." -----------------
---------------------".Q.Y..".. PR
ESS A NUMBER KEY (1-4) ";.Y.^.UL.1:US$."
1234":.35:. INPUT ROUTINE...`.US$.""...C
..E(UR$).1000,400,500,396...H..300.Q....
** RE-ENABLE STOP KEY AND END **......B
(50003)..1.B(50003)..160.B(50003)..0.399
.*....UU.71:.B(50003).0..53281,6:.53280,
14.6...."..":..A....875:..B.... ** STUDE
NT INSTRUCTIONS **......".":.UT,UL%:.B(5
0003).0..53281,0:.53280,0.....UP.0:UG$."
STUDENT INST":UH.1:.850......".. NOTE:..
....TO ADVANCE FROM ONE QUESTION"......"
. TO THE NEXT PRESS THE SPACE BAR.".?. .
.".....IF AT ANY TIME YOU WISH TO VIEW".
E....". THE MENU PRESS <H> <RETURN>."...
...".. PRESS <RETURN> AFTER EACH ENTRY
.". ....835:.850.M...."... I WILL TEST
YOU ON YOUR ABILITY"......". TO LOCATE
THE STATES OF THE U.S. IN"......". THEIR
PROPER REGION.".F....". THE REGIONS U
SED ARE GIVEN IN EACH".Q....". QUESTION
ALONG WITH INSTRUCTIONS."......". I WI
LL RANDOMLY SELECT STATES AND".J....". A
SK YOU WHICH REGION OF THE UNITED"......
". STATES THE STATE IS IN."......835....
..UZ.1..UP%:.217......./.... ** TEACHER
INSTRUCTIONS **._....".":.UT,UL%:.B(5000
3).0..53281,2:.53280,10.....UP.0:UG$."TE
ACHER INST":.850......".. TO THE BE
ST OF OUR KNOWLEDGE,.".W...." THIS PRO
GRAM IS IN THE PUBLIC."......" DOMAIN.
IF THIS IS NOT THE CASE.". ...." PLE
ASE CONTACT:...".J...." COMMODORE B
USINESS MACHINES.".M...." 3370
PHARMACY AVE......." AGINCOURT,
ONTARIO"......" CANADA M1W 2
K4".S...." (416) 499-4292".....
UP.1:. 835:. 850:......" ..PROGRAM N
AME: STATES & REGIONS..8...." WRITTE
N BY : UNKNOWN..^...." UPGRADED BY
: JAMES MUNRO......." .THIS PROGRAM
WILL RUN ON ANY........" PET 64
COMPUTER..N...." COMMODORE 64 CO
MPUTER......835:.850......".... THIS
IS A GEOGRAPHY DRILL DEALING".:....".
WITH STATES AND THE U. S. REGIONS".^....
". IN WHICH THEY ARE FOUND."......".
THIS DRILL IS SUITABLE FOR GRADES"....
..". 7 AND 8, OR WHEN STUDYING THE".Q.
...". TOPIC ELSEWHERE.".Z.D..835...N..
UZ.1..UP%:.217...W.....X.. ** PROGRAM MO
DIFICATION INST **.+.Y..".":.UT,UL%.K.].
UP.0:UG$."PROGRAM MOD":.850.T....835.H..
..UZ.1..UP%:.217.N.......... ** TO USE 8
032 LOAD CBM4032 **.I.F..".....BEFORE RU
NNING THIS PROGRAM ON AN 8032 .....P.."
LOAD THE 'CBM 4032' PROGRAM.......
......"...Z..UU.71.......0. .. ** T I T
L E P A G E **.D.".."....";:.UT,UU%:.B
(50003).0..53280,14:.53281,6.Z.$..I.1.38
:."...";:....&..I.1.22:.".....";:....(..
I.1.37:.".....";:..B.*..I.1.22:.".....";
:....,.."........................... ..
....."................... . . ...*.0.."
................... . ....H.2..".......
............. ..P.4.."..............C O
M M O D O R E.....6.."...............ED
UCATIONAL.....8.."................SOFTWA
RE.M.:.. ** COMMODORE LOGO **...;..H(UD$
,24);"..........PRESS SPACE BAR OR WAIT.
":I.0.'.<..A$:.A$.." ".I.I.1:.I.250.828.
K.>.T1$."":T2$."":T3$."":T4$."":I.0.T.@.
.300.P.C.. ** SPACE BAR PRESS **...H..H(
UD$,24);".......PRESS SPACE BAR TO CONTI
NUE."...L..UI$:.UI$.." ".844.B.N.....R..
** PAGE DESIGN ROUTINE **...T.UP.UP.1..
.W.."."H(UT$.UP$,21);I(UP$.UG$.D(UP),18)
.G.\.." --------------------------------
------".V.`..UH..0.870...A..H(UD$,24);H(
UP$,7);"HELP - PRESS H <RETURN>"...F..
"..":....K.. ** PLEASE WAIT REMARK **...
P..H(UD$,24);" ONE MOMENT PLEA
SE... "...U........ ** SET UP VARIAB
LES **.Y...UX$."H":.UQ%(1000):UB.32768:U
1.196:U2.197:U3.198:U4.216:UC.167:UU.102
4.....UT.59468:UU%.12:UL%.14:UP%.1146:UM
.32768:. 50003,0.S....B(50003).0.UB.1024
:U1.209:U2.210:U3.211:U4.214:UC.204:UU.2
048......B(50003).0.UT.53272:UU%.21:UL%.
23:UP%.2139:UM.1024./...UD$."...........
..............".A...UP$."
".....UT$." STAT
ES & REGIONS ":. PLACE PROGRAM TITLE HE
RE !!!!!!!!!!!!!!!!!***.......O.... ** S
ET VARIABLES **......A(100):G.0:H.0:B.0:
C.0:E.0:Z.0:F.0:X.0.. ...900.. ... ** CH
ECK FOR 8032 **.= ...".":." ":. SHIFTED
SPACE.T ...B(UB.40)..96..700.M ... ** ME
MORY CHECK **.. ... .(0).2000.937.. ..."
....THIS MACHINE DOES NOT HAVE ENOUGH.".
S ..."MEMORY TO RUN THIS PROGRAM !".. ..
.UU.71.. ..... ..."..":.B(50003).0.962.-
!... ** BASIC 2.0 OR 4.0 OR C-64 SET
UP **.K!...1075,133:.1076,144:.1077,234:
.1079,4:.1080,133:.1081,145..!...1091,15
5:.1098,133:.1099,144:.1100,234:.1103,13
3.C!...1104,145:.1105,234:.1082,234.Z!..
.B(50003)..160.955.."...1093,88:.1094,22
8:.1097,85:.1102,228:.965.."...B(50003).
.1.990.M"...1093,49:.1094,230:.1097,46:.
1102,230:.965.."B..2099,141:.2100,20:.21
01,3:.2103,8:.2104,141:.2105,21.C"C..210
6,3:.2115,145:.2117,52:.2118,234:.2121,4
9:.2122,141.."D..2123,20:.2124,3:.2126,2
34:.2127,141:.2128,21:.2129,3..#E..UU.48
:. DISABLE STOP KEY.,#J..800:. TITLE.<#T
..300:. MENU.M#...".THE PGM WILL NOT WOR
K ON THIS MACHINE!":...#...UZ.1..UP%:.UP
%:UZ.0:. ** PROGRAM STARTS HERE **.N#...
"..";:.:.B(50003).0..53281,6:.53280,14..
#...***********************..$...**MENU
ADDED AND PGM **.%$$..** MODIFIED BY
**.B$)..** JAMES MUNRO **._$...
** 1982 06 30 **.|$3..** OSHAWA
ONTARIO **..$8..**********************
**..$=..* REVISED AND UPGRADED *.V$B..*
FOR COMMODORE 64 BY *..$G..* DEREK
LEE *..%L..* JULY 26/82
*.0%V..************************.D%..G.0
:H.0:.UT,UL%.G%... "ALABAMA","ALASKA","A
RIZONA"..%D.. "ARKANSAS","CALIFORNIA","C
OLORADO"..%N.. "CONNECTICUT","DELAWARE",
"FLORIDA"..%X.. "GEORGIA","HAWAII","IDAH
O","ILLINOIS"..&... "INDIANA","IOWA","KA
NSAS","KENTUCKY".5&... "LOUISIANA","MAIN
E","MARYLAND".K&... "MASSACHUSETTS".V&..
. "MICHIGAN","MINNESOTA","MISSISSIPPI"..
&... "MISSOURI","MONTANA","NEBRASKA","NE
VADA".U&... "NEW HAMPSHIRE","NEW JERSEY"
,"NEW MEXICO"..'... "NEW YORK","NORTH CA
ROLINA","NORTH DAKOTA".6'(.. "OHIO","OKL
AHOMA","OREGON","PENNSYLVANIA".\'2.. "RH
ODE ISLAND","SOUTH CAROLINA"..'<.. "SOUT
H DAKOTA","TENNESSEE","TEXAS"..'F.. "UTA
H","VERMONT","VIRGINIA".J'P.. "WASHINGTO
N","WEST VIRGINIA"..'Z.. "WISCONSIN","WY
OMING"..'D.. 4,1,2,4,1,2,6. (N.. 5,4,4,1
,2,3,3,3,3,4,4,6,5,6,3,3.F(X.. 4,3,2,3,2
,6,5,2,5,4,3,3,2,1,5,6.B(... 4,3,4,2,2,6
,4,1,5,3,2.K(..UP.0.Y(...B.51.100..(..UH
.0:UG$." QUESTION #":."."::.875..(..C.
.(1)..( .C..(C.100).P(...C..0.C..50.1480
.Z(...1430..(...A(C.50).0 ..1430..(H....
)R.. E.1.50..)... B$..)... E.#)... Z.1 .
50.-)...A(Z).?)... Z:A(0).A(1).E)....Q)
... Z.1.C.Z)".. A$.B),.. Z.P)6.A(Z.49).0
.Y)@..850..)J.."... IN WHAT REGION OF TH
E UNITED STATES".C)T.." IS ";A$;" FOUND
?."..)H.." 1. PACIFIC COASTAL."..)R.."
2. WESTERN."..*..." 3. MIDWESTERN."
.'*..." 4. SOUTHERN.".=*..." 5. EAST
ERN.".W*B.." 6. NEW ENGLAND.".X*V.."
7. VIEW SCORE OR QUIT."..*..." WHAT IS
YOUR CHOICE (1-7)? ";.D*..UL.1:US$."H123
4567":.35:F.E(UR$):..W*... F.1.F.7.1772.
.*... F.7 .1950..*... F.A(C) .1830.2+...
" WRONG, TRY AGAIN!":G.G.1:.835:UP.UP.1:
.850:.1610.=+&.X..(1).Z+0.X..(X.10):. X.
6.X.1.1830.H+:..".....";..+D.. X . 1870,
1880,1890,1900,1910,1920..+N.." <<< EXC
ELLENT! >>>":.1930.U+X.." *** THAT'S I
T ***":.1930..+B.." ### WAY TO GO ###
":. 1930..,L.." $$$ RIGHT ON $$$":. 19
30.;,V.." === CORRECT ===":. 1930.W,..
." ... NICE WORK ...".J,..H.H.1:.835:.
B.~,... M1.1.750:. M1..,..T.UP.1:UP.0:U
G$."":.850.., ..". YOUR SCORE--..".I,...
H;" --- CORRECT."..,...G;" --- INCORRECT
"..,..."---"..-F..G.H;" --- TOTAL TRIES"
.--P.."... MORE QUESTIONS..........1".P-
Q..". QUIT & RETURN TO MENU...2".G-R..".
(1 OR 2) ";..-Z.UL.1:US$."12":.35:I.
E(UR$):...-... I.1.I.2.2010.D-...I.1.UP.
T:UG$." QUESTION #":.1420.J-......
> CLICK IMAGE PREVIEW FOR FULL MODAL