GEOGRAPHY QUIZ
FILE INFORMATION
FILENAME(S): GEOGRAPHY QUIZ
FILE TYPE(S): PRG
FILE SIZE: 11.3K
FIRST SEEN: 2025-12-02 00:17:48
APPEARS ON: 1 disk(s)
FILE HASH
0540fbefe65bed057120ffc6217042558dbf0bee00623d4068fcdb4888850a54
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUB DOMAIN | GEOGRAPHY QUIZ | PRG | Maestro | 6 | 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 EE 08 0B 00 8F 20 2D |UTINE **...... -|
000000D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 14 |--------------..|
000000F0: 09 0C 00 8F 20 2D 2D 2D 20 20 4D 41 44 45 20 42 |.... --- MADE B|
00000100: 59 20 53 45 41 4E 20 53 59 4C 56 45 53 54 45 52 |Y SEAN SYLVESTER|
00000110: 20 2D 2D 2D 00 3A 09 0D 00 8F 20 2D 2D 2D 52 45 | ---.:.... ---RE|
00000120: 56 49 53 45 44 20 42 59 20 52 49 43 48 41 52 44 |VISED BY RICHARD|
00000130: 20 44 45 42 4F 45 52 2D 2D 2D 00 60 09 0E 00 8F | DEBOER---.`....|
00000140: 20 2D 2D 2D 20 20 20 4D 41 44 45 20 41 4E 44 20 | --- MADE AND |
00000150: 52 45 56 49 53 45 44 20 4F 4E 20 20 20 2D 2D 2D |REVISED ON ---|
00000160: 00 66 09 0F 00 3A 00 8C 09 10 00 8F 20 2D 2D 2D |.f...:...... ---|
00000170: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000180: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 92 09 11 |------------....|
00000190: 00 3A 00 B6 09 14 00 8F 20 2A 2A 20 54 4F 20 4F |.:...... ** TO O|
000001A0: 55 52 20 42 45 53 54 20 4B 4E 4F 57 4C 45 44 47 |UR BEST KNOWLEDG|
000001B0: 45 20 54 48 49 53 00 D3 09 15 00 8F 20 20 20 20 |E THIS...... |
000001C0: 50 52 4F 47 52 41 4D 20 49 53 20 46 52 45 45 20 |PROGRAM IS FREE |
000001D0: 46 4F 52 00 F3 09 16 00 8F 20 20 20 20 44 55 50 |FOR...... DUP|
000001E0: 4C 49 43 41 54 49 4F 4E 20 49 4E 20 43 41 4E 41 |LICATION IN CANA|
000001F0: 44 41 2E 00 10 0A 17 00 8F 20 20 20 20 49 46 20 |DA....... IF |
00000200: 59 4F 55 20 48 41 56 45 20 43 4F 4E 54 41 52 59 |YOU HAVE CONTARY|
00000210: 00 2D 0A 18 00 8F 20 20 20 20 49 4E 46 4F 52 4D |.-.... INFORM|
00000220: 41 54 49 4F 4E 2C 20 50 4C 45 41 53 45 00 53 0A |ATION, PLEASE.S.|
00000230: 19 00 8F 20 20 20 20 43 4F 4E 54 41 43 54 20 43 |... CONTACT C|
00000240: 4F 4D 4D 4F 44 4F 52 45 20 43 41 4E 41 44 41 20 |OMMODORE CANADA |
00000250: 41 4E 44 00 79 0A 1A 00 8F 20 20 20 20 45 56 45 |AND.y.... EVE|
00000260: 52 59 20 45 46 46 4F 52 54 20 57 49 4C 4C 20 42 |RY EFFORT WILL B|
00000270: 45 20 4D 41 44 45 20 54 4F 00 9A 0A 1B 00 8F 20 |E MADE TO...... |
00000280: 20 20 20 57 49 54 48 44 52 41 57 20 43 4F 50 49 | WITHDRAW COPI|
00000290: 45 53 20 4F 46 20 54 48 49 53 00 AC 0A 1C 00 8F |ES OF THIS......|
000002A0: 20 20 20 20 50 52 4F 47 52 41 4D 2E 00 B2 0A 1E | PROGRAM.....|
000002B0: 00 3A 00 CE 0A 23 00 8F 20 2B 2B 2B 20 49 4E 50 |.:...#.. +++ INP|
000002C0: 55 54 20 53 45 43 54 49 4F 4E 20 2B 2B 2B 00 E6 |UT SECTION +++..|
000002D0: 0A 28 00 97 55 4F 2C 30 3A 55 52 24 B2 22 22 3A |.(..UO,0:UR$."":|
000002E0: 55 49 24 B2 22 22 00 F6 0A 2A 00 8B 55 4C B2 30 |UI$.""...*..UL.0|
000002F0: A7 55 4C B2 38 30 00 00 0B 2D 00 97 55 43 2C 30 |.UL.80...-..UC,0|
00000300: 00 14 0B 32 00 A1 55 49 24 3A 8B 55 49 24 B2 22 |...2..UI$:.UI$."|
00000310: 22 A7 35 30 00 3E 0B 37 00 8B 55 49 24 B2 C7 28 |".50.>.7..UI$..(|
00000320: 31 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 97 55 |13)..(UR$)..1..U|
00000330: 43 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 00 51 |C,1:." .";:.85.Q|
00000340: 0B 3C 00 8B 55 49 24 B2 C7 28 32 30 29 A7 31 30 |.<..UI$..(20).10|
00000350: 35 00 65 0B 3E 00 8B 20 C3 28 55 52 24 29 B2 B1 |5.e.>.. .(UR$)..|
00000360: 55 4C A7 35 30 00 8A 0B 41 00 8D 31 32 30 3A 8F |UL.50...A..120:.|
00000370: 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 | CHECK FOR VALID|
00000380: 20 43 48 41 52 41 43 54 45 52 00 9A 0B 46 00 55 | CHARACTER...F.U|
00000390: 52 24 B2 55 52 24 AA 55 49 24 00 A4 0B 4B 00 99 |R$.UR$.UI$...K..|
000003A0: 55 49 24 3B 00 AC 0B 50 00 89 35 30 00 D1 0B 55 |UI$;...P..50...U|
000003B0: 00 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 4F 52 |.. +++ CHECK FOR|
000003C0: 20 48 45 4C 50 20 52 45 51 55 45 53 54 20 2B 2B | HELP REQUEST ++|
000003D0: 2B 00 F9 0B 5A 00 8B 55 52 24 B2 55 58 24 A7 31 |+...Z..UR$.UX$.1|
000003E0: 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 45 4C |95:. EXIT TO HEL|
000003F0: 50 20 52 4F 55 54 49 4E 45 00 08 0C 5F 00 8B 55 |P ROUTINE..._..U|
00000400: 46 B2 31 A7 8D 32 34 30 00 15 0C 64 00 55 46 B2 |F.1..240...d.UF.|
00000410: 30 3A 99 3A 8E 00 2E 0C 66 00 8F 20 2B 2B 20 43 |0:.:....f.. ++ C|
00000420: 48 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B 00 3F |HECK DELETE ++.?|
00000430: 0C 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 30 00 |.i...(UR$).1.50.|
00000440: 57 0C 6E 00 55 52 24 B2 C8 28 55 52 24 2C C3 28 |W.n.UR$..(UR$,.(|
00000450: 55 52 24 29 AB 31 29 00 69 0C 73 00 99 22 9D 20 |UR$).1).i.s..". |
00000460: 20 9D 9D 22 3B 3A 89 35 30 00 90 0C 78 00 8F 20 | ..";:.50...x.. |
00000470: 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C |++ CHECK FOR VAL|
00000480: 49 44 20 43 48 41 52 41 43 54 45 52 53 20 2B 2B |ID CHARACTERS ++|
00000490: 00 A2 0C 7D 00 8B C3 28 55 53 24 29 B2 30 A7 31 |...}...(US$).0.1|
000004A0: 35 30 00 B2 0C 7F 00 55 53 24 B2 55 53 24 AA 55 |50.....US$.US$.U|
000004B0: 58 24 00 C3 0C 82 00 81 55 53 B2 31 A4 C3 28 55 |X$......US.1..(U|
000004C0: 53 24 29 00 DA 0C 87 00 8B 55 49 24 B2 CA 28 55 |S$)......UI$..(U|
000004D0: 53 24 2C 55 53 2C 31 29 A7 8E 00 E0 0C 8C 00 82 |S$,US,1)........|
000004E0: 00 ED 0C 91 00 55 49 24 B2 22 22 3A 8E 00 08 0D |.....UI$."":....|
000004F0: 96 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 44 20 |... ** STANDARD |
00000500: 49 4E 50 55 54 20 2A 2A 00 19 0D 98 00 8B C6 28 |INPUT **.......(|
00000510: 55 49 24 29 B2 34 36 A7 8E 00 2A 0D 9B 00 8B 55 |UI$).46...*....U|
00000520: 49 24 B2 C7 28 33 32 29 A7 8E 00 47 0D A0 00 8B |I$..(32)...G....|
00000530: C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 24 29 |.(UI$).48..(UI$)|
00000540: B1 35 37 A7 31 37 30 00 4D 0D A5 00 8E 00 6A 0D |.57.170.M.....j.|
00000550: AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 28 55 |....(UI$).65..(U|
00000560: 49 24 29 B1 39 30 A7 31 38 30 00 70 0D AF 00 8E |I$).90.180.p....|
00000570: 00 94 0D B4 00 8B C6 28 55 49 24 29 B3 31 39 33 |.......(UI$).193|
00000580: B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 24 B2 |..(UI$).218.UI$.|
00000590: 22 22 3A 8E 00 B7 0D B9 00 8B C2 28 55 54 29 B2 |"":........(UT).|
000005A0: 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 24 29 |UU%.UI$..(.(UI$)|
000005B0: AB 31 32 38 29 3A 8E 00 BD 0D BB 00 8E 00 CA 0D |.128):..........|
000005C0: BE 00 55 49 24 B2 22 22 3A 8E 00 EF 0D C3 00 55 |..UI$."":......U|
000005D0: 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 20 52 |F.1:. +++ HELP R|
000005E0: 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B 2B 00 |OUTINE EXIT +++.|
000005F0: F8 0D C5 00 8D 32 35 30 00 01 0E C8 00 8D 32 34 |.....250......24|
00000600: 35 00 20 0E CD 00 81 55 51 B2 55 42 A4 28 55 32 |5. ....UQ.UB.(U2|
00000610: 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 32 29 |%.256.U1%.U3%.2)|
00000620: 00 3C 0E D2 00 55 51 25 28 55 51 AB 55 42 29 B2 |.<...UQ%(UQ.UB).|
00000630: C2 28 55 51 29 3A 82 3A 99 22 93 22 00 4F 0E D7 |.(UQ):.:.".".O..|
00000640: 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 29 00 |.UZ.1:UV%..(UT).|
00000650: 58 0E D8 00 89 33 30 30 00 9C 0E D9 00 55 5A B2 |X....300.....UZ.|
00000660: 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 55 4B |0:US$.UJ$:UG$.UK|
00000670: 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 3A 8B C2 |$:UP.UJ:UL.UK:..|
00000680: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 |(50003).0..53281|
00000690: 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 AA 0E DA |,6:.53280,14....|
000006A0: 00 97 35 39 34 36 38 2C 55 4F 00 DF 0E DC 00 55 |..59468,UO.....U|
000006B0: 54 24 B2 55 4C 24 3A 99 22 93 22 3B 3A 97 55 54 |T$.UL$:.".";:.UT|
000006C0: 2C 55 56 25 3A 81 55 51 B2 55 42 A4 28 55 32 25 |,UV%:.UQ.UB.(U2%|
000006D0: AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 33 29 00 |.256.U1%.U3%.3).|
000006E0: F4 0E E1 00 97 55 51 2C 55 51 25 28 55 51 AB 55 |.....UQ,UQ%(UQ.U|
000006F0: 42 29 3A 82 00 00 0F E6 00 97 55 31 2C 55 31 25 |B):.......U1,U1%|
00000700: 00 0C 0F E8 00 97 55 32 2C 55 32 25 00 18 0F E9 |......U2,U2%....|
00000710: 00 97 55 34 2C 55 34 25 00 26 0F EA 00 97 55 33 |..U4,U4%.&....U3|
00000720: 2C 55 33 25 AB 31 00 2E 0F EB 00 89 33 35 00 60 |,U3%.1......35.`|
00000730: 0F F0 00 55 44 25 B2 28 28 55 32 25 AC 32 35 36 |...UD%.((U2%.256|
00000740: AA 55 31 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 |.U1%.U3%).UB).40|
00000750: 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E |:..(UD$,UD%.1):.|
00000760: 00 9B 0F F5 00 99 C8 28 55 44 24 2C 32 34 29 3B |.......(UD$,24);|
00000770: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000780: 20 20 20 20 20 20 20 12 20 48 45 4C 50 20 43 4F | . HELP CO|
00000790: 4D 49 4E 47 20 92 20 20 22 3A 8E 00 C7 0F FA 00 |MING . ":......|
000007A0: 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 |U1%..(U1):U2%..(|
000007B0: 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 |U2):U3%..(U3):U4|
000007C0: 25 B2 C2 28 55 34 29 00 EF 0F FB 00 55 4A 24 B2 |%..(U4).....UJ$.|
000007D0: 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 |US$:UK$.UG$:UL$.|
000007E0: 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 00 |UT$:UJ.UP:UK.UL.|
000007F0: F5 0F FF 00 8E 00 06 10 2C 01 8F 20 2A 2A 20 4D |........,.. ** M|
00000800: 45 4E 55 20 2A 2A 00 0C 10 2D 01 3A 00 3B 10 2E |ENU **...-.:.;..|
00000810: 01 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 |..".":.UT,UU%:..|
00000820: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 |(50003).0..53281|
00000830: 2C 39 3A 97 35 33 32 38 30 2C 38 00 41 10 2F 01 |,9:.53280,8.A./.|
00000840: 3A 00 5E 10 31 01 99 22 13 20 20 20 20 20 20 20 |:.^.1..". |
00000850: 20 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 8D | MENU"..|
00000860: 10 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.6.." ----------|
00000870: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000880: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 B6 10 |------------"...|
00000890: 3B 01 99 22 11 11 20 20 20 20 20 20 20 31 2E 20 |;..".. 1. |
000008A0: 20 20 42 45 47 49 4E 20 47 45 4F 47 52 41 50 59 | BEGIN GEOGRAPY|
000008B0: 20 51 55 49 5A 22 00 E0 10 40 01 99 22 11 11 20 | QUIZ"...@..".. |
000008C0: 20 20 20 20 20 20 32 2E 20 20 20 53 54 55 44 45 | 2. STUDE|
000008D0: 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 |NT INSTRUCTIONS"|
000008E0: 00 0A 11 45 01 99 22 11 11 20 20 20 20 20 20 20 |...E..".. |
000008F0: 33 2E 20 20 20 54 45 41 43 48 45 52 20 49 4E 53 |3. TEACHER INS|
00000900: 54 52 55 43 54 49 4F 4E 53 22 00 26 11 4F 01 99 |TRUCTIONS".&.O..|
00000910: 22 11 11 20 20 20 20 20 20 20 34 2E 20 20 20 51 |".. 4. Q|
00000920: 55 49 54 11 11 22 00 55 11 54 01 99 22 20 2D 2D |UIT..".U.T.." --|
00000930: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000940: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000950: 2D 2D 2D 2D 22 00 80 11 59 01 99 22 11 11 20 20 |----"...Y..".. |
00000960: 20 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 4D | PRESS A NUM|
00000970: 42 45 52 20 4B 45 59 20 28 31 2D 34 29 20 22 3B |BER KEY (1-4) ";|
00000980: 00 A8 11 5E 01 55 4C B2 31 3A 55 53 24 B2 22 31 |...^.UL.1:US$."1|
00000990: 32 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 54 |234":.35:. INPUT|
000009A0: 20 52 4F 55 54 49 4E 45 00 BA 11 5F 01 8B C3 28 | ROUTINE..._...(|
000009B0: 55 52 24 29 B1 31 A7 33 30 30 00 C5 11 60 01 55 |UR$).1.300...`.U|
000009C0: 53 24 B2 22 22 00 E2 11 63 01 91 C5 28 55 52 24 |S$.""...c...(UR$|
000009D0: 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 |).1000,400,500,3|
000009E0: 39 36 00 EB 11 68 01 89 33 30 30 00 12 12 8B 01 |96...h..300.....|
000009F0: 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 |. ** RE-ENABLE S|
00000A00: 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 |TOP KEY AND END |
00000A10: 2A 2A 00 41 12 8C 01 8B C2 28 35 30 30 30 33 29 |**.A.....(50003)|
00000A20: B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 |..1..(50003)..16|
00000A30: 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 |0..(50003)..0.39|
00000A40: 39 00 6B 12 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 |9.k....UU.71:..(|
00000A50: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00000A60: 36 3A 97 35 33 32 38 30 2C 31 34 00 77 12 8E 01 |6:.53280,14.w...|
00000A70: 99 22 9A 93 22 3A 80 00 82 12 8F 01 8D 38 37 35 |."..":.......875|
00000A80: 3A 8E 00 A3 12 90 01 8F 20 2A 2A 20 53 54 55 44 |:....... ** STUD|
00000A90: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
00000AA0: 20 2A 2A 00 BD 12 92 01 55 54 24 B2 22 20 C7 45 | **.....UT$." .E|
00000AB0: 4F 47 52 41 50 48 59 20 D1 55 49 5A 22 00 EC 12 |OGRAPHY .UIZ"...|
00000AC0: 95 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B |...".":.UT,UL%:.|
00000AD0: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000AE0: 31 2C 30 3A 97 35 33 32 38 30 2C 30 00 0D 13 9A |1,0:.53280,0....|
00000AF0: 01 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 45 |.UP.0:UG$.".TUDE|
00000B00: 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 1C 13 |NT .NST":.850...|
00000B10: C7 01 8D 31 32 33 30 3A 8D 38 35 30 00 4B 13 CC |...1230:.850.K..|
00000B20: 01 99 22 20 11 11 CE 4F 54 45 3A 11 11 11 D4 4F |.." ...OTE:....O|
00000B30: 20 41 44 56 41 4E 43 45 20 46 52 4F 4D 20 4F 4E | ADVANCE FROM ON|
00000B40: 45 20 51 55 45 53 54 49 4F 4E 22 00 74 13 D6 01 |E QUESTION".t...|
00000B50: 99 22 20 11 54 4F 20 54 48 45 20 4E 45 58 54 20 |." .TO THE NEXT |
00000B60: 50 52 45 53 53 20 54 48 45 20 D3 D0 C1 C3 C5 20 |PRESS THE ..... |
00000B70: 42 41 52 22 00 A5 13 DB 01 99 22 20 11 11 1D 1D |BAR"......" ....|
00000B80: 1D 1D 1D C9 46 20 41 54 20 41 4E 59 20 54 49 4D |....F AT ANY TIM|
00000B90: 45 20 59 4F 55 20 57 49 53 48 20 54 4F 20 52 45 |E YOU WISH TO RE|
00000BA0: 54 55 52 4E 22 00 C9 13 E0 01 99 22 20 11 54 4F |TURN"......" .TO|
00000BB0: 20 54 48 45 20 CD C5 CE D5 20 50 52 45 53 53 20 | THE .... PRESS |
00000BC0: 48 20 D2 C5 D4 D5 D2 CE 22 00 D2 13 E5 01 8D 38 |H ......"......8|
00000BD0: 33 35 00 E6 13 EA 01 8B 55 5A B2 31 A7 9E 55 50 |35......UZ.1..UP|
00000BE0: 25 3A 89 32 31 37 00 EC 13 F3 01 8E 00 0D 14 F4 |%:.217..........|
00000BF0: 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 49 4E |.. ** TEACHER IN|
00000C00: 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 3D 14 |STRUCTIONS **.=.|
00000C10: F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B |...".":.UT,UL%:.|
00000C20: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000C30: 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 74 14 |1,2:.53280,10.t.|
00000C40: F6 01 55 54 24 B2 22 20 C7 45 4F 47 52 41 50 48 |..UT$." .EOGRAPH|
00000C50: 59 20 D1 55 49 5A 22 3A 55 50 B2 30 3A 55 47 24 |Y .UIZ":UP.0:UG$|
00000C60: B2 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 22 3A |.".EACHER .NST":|
00000C70: 8D 38 35 30 00 A2 14 F7 01 99 22 11 11 20 20 20 |.850......".. |
00000C80: 20 20 20 D4 4F 20 54 48 45 20 42 45 53 54 20 4F | .O THE BEST O|
00000C90: 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C |F OUR KNOWLEDGE,|
00000CA0: 11 22 00 CB 14 F8 01 99 22 20 20 20 54 48 49 53 |."......" THIS|
00000CB0: 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 | PROGRAM IS IN T|
00000CC0: 48 45 20 50 55 42 4C 49 43 11 22 00 F7 14 F9 01 |HE PUBLIC.".....|
00000CD0: 99 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 |." DOMAIN. .F|
00000CE0: 20 54 48 49 53 20 49 53 20 4E 4F 54 20 54 48 45 | THIS IS NOT THE|
00000CF0: 20 43 41 53 45 11 22 00 14 15 FA 01 99 22 20 20 | CASE."......" |
00000D00: 20 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 54 3A | PLEASE CONTACT:|
00000D10: 11 11 11 22 00 3E 15 FB 01 99 22 20 20 20 20 20 |...".>...." |
00000D20: 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 4E | .OMMODORE .USIN|
00000D30: 45 53 53 20 CD 41 43 48 49 4E 45 53 11 22 00 61 |ESS .ACHINES.".a|
00000D40: 15 FC 01 99 22 20 20 20 20 20 20 20 20 20 20 33 |...." 3|
00000D50: 33 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 |370 .HARMACY .VE|
00000D60: 2E 00 85 15 FD 01 99 22 20 20 20 20 20 20 20 20 |......." |
00000D70: 20 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 | .GINCOURT, .NT|
00000D80: 41 52 49 4F 22 00 A7 15 FE 01 99 22 20 20 20 20 |ARIO"......" |
00000D90: 20 20 20 20 20 20 C3 41 4E 41 44 41 20 20 20 CD | .ANADA .|
00000DA0: 31 D7 20 32 CB 34 22 00 C7 15 FF 01 99 22 20 20 |1. 2.4"......" |
00000DB0: 20 20 20 20 20 20 20 20 28 34 31 36 29 20 34 39 | (416) 49|
00000DC0: 39 2D 34 32 39 32 22 00 DD 15 00 02 55 50 B2 31 |9-4292".....UP.1|
00000DD0: 3A 8D 20 38 33 35 3A 8D 20 38 35 30 3A 00 08 16 |:. 835:. 850:...|
00000DE0: 01 02 99 22 20 20 20 20 20 11 11 D0 52 4F 47 52 |..." ...ROGR|
00000DF0: 41 4D 20 CE 41 4D 45 3A 20 C7 45 4F 47 52 41 50 |AM .AME: .EOGRAP|
00000E00: 59 20 D1 55 49 5A 20 11 00 32 16 02 02 99 22 20 |Y .UIZ ..2...." |
00000E10: 20 20 20 20 D7 52 49 54 54 45 4E 20 C2 59 20 20 | .RITTEN .Y |
00000E20: 3A 20 D3 45 41 4E 20 D3 59 4C 56 45 53 54 45 52 |: .EAN .YLVESTER|
00000E30: 20 11 00 56 16 03 02 99 22 20 20 20 20 20 D5 50 | ..V...." .P|
00000E40: 47 52 41 44 45 44 20 C2 59 20 3A 20 20 20 20 20 |GRADED .Y : |
00000E50: 20 20 20 20 20 11 00 81 16 04 02 99 22 20 20 20 | ......." |
00000E60: 20 20 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 | ..HIS PROGRAM |
00000E70: 57 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 |WILL RUN ON ANY.|
00000E80: 11 00 A8 16 05 02 99 22 20 20 20 20 20 20 20 20 |......." |
00000E90: 20 C2 C1 D3 C9 C3 A0 32 2E 30 20 D0 C5 D4 20 C3 | ......2.0 ... .|
00000EA0: CF CD D0 D5 D4 C5 D2 11 00 CF 16 06 02 99 22 20 |.............." |
00000EB0: 20 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 20 34 2E | ..... 4.|
00000EC0: 30 20 D0 C5 D4 A0 C3 CF CD D0 D5 D4 C5 D2 11 00 |0 ..............|
00000ED0: F1 16 07 02 99 22 20 20 20 20 20 20 20 20 20 38 |....." 8|
00000EE0: 30 33 32 20 C3 C2 CD 20 C3 CF CD D0 D5 D4 C5 D2 |032 ... ........|
00000EF0: 11 00 16 17 08 02 99 22 20 20 20 20 20 20 20 20 |......." |
00000F00: 20 C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 C3 CF | ......... 64 ..|
00000F10: CD D0 D5 D4 C5 D2 00 1F 17 44 02 8D 38 33 35 00 |.........D..835.|
00000F20: 33 17 4E 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 |3.N..UZ.1..UP%:.|
00000F30: 32 31 37 00 39 17 57 02 8E 00 5F 17 58 02 8F 20 |217.9.W..._.X.. |
00000F40: 2A 2A 20 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 |** PROGRAM MODIF|
00000F50: 49 43 41 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 |ICATION INST **.|
00000F60: 70 17 59 02 99 22 93 22 3A 97 55 54 2C 55 4C 25 |p.Y..".":.UT,UL%|
00000F70: 00 90 17 5D 02 55 50 B2 30 3A 55 47 24 B2 22 D0 |...].UP.0:UG$.".|
00000F80: 52 4F 47 52 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 |ROGRAM .OD":.850|
00000F90: 00 99 17 94 02 8D 38 33 35 00 AD 17 B2 02 8B 55 |......835......U|
00000FA0: 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 B3 17 |Z.1..UP%:.217...|
00000FB0: BB 02 8E 00 D8 17 BC 02 8F 20 2A 2A 20 54 4F 20 |......... ** TO |
00000FC0: 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 |USE 8032 LOAD CB|
00000FD0: 4D 34 30 33 32 20 2A 2A 00 0E 18 C6 02 99 22 93 |M4032 **......".|
00000FE0: 11 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 |....BEFORE RUNNI|
00000FF0: 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |NG THIS PROGRAM |
00001000: 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 44 |ON AN 8032 ...D|
00001010: 18 D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 |...." LOAD |
00001020: 54 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 |THE 'CBM 4032' P|
00001030: 52 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 |ROGRAM..........|
00001040: 11 11 11 22 00 4F 18 DA 02 9E 55 55 AA 37 31 00 |...".O....UU.71.|
00001050: 55 18 E4 02 80 00 7A 18 1D 03 8F 20 2A 2A 20 54 |U.....z.... ** T|
00001060: 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 |O USE 8032 LOAD |
00001070: 43 42 4D 34 30 33 32 20 2A 2A 00 C5 18 1E 03 99 |CBM4032 **......|
00001080: 22 93 11 11 11 42 45 46 4F 52 45 20 52 55 4E 4E |"....BEFORE RUNN|
00001090: 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D |ING THIS PROGRAM|
000010A0: 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 4C | ON AN 8032 ..L|
000010B0: 4F 41 44 20 43 42 4D 20 34 30 33 32 20 50 52 4F |OAD CBM 4032 PRO|
000010C0: 47 52 41 4D 22 00 D1 18 1F 03 9E 31 30 39 33 3A |GRAM"......1093:|
000010D0: 80 00 F1 18 20 03 8F 20 2A 2A 20 54 20 49 20 54 |.... .. ** T I T|
000010E0: 20 4C 20 45 20 20 20 50 20 41 20 47 20 45 20 2A | L E P A G E *|
000010F0: 2A 00 25 19 22 03 99 22 93 11 1D 05 22 3B 3A 97 |*.%.".."....";:.|
00001100: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00001110: B2 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 |.0..53280,14:.53|
00001120: 32 38 31 2C 36 00 3B 19 24 03 81 49 B2 31 A4 33 |281,6.;.$..I.1.3|
00001130: 38 3A 99 22 12 A6 92 22 3B 3A 82 00 53 19 26 03 |8:."...";:..S.&.|
00001140: 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 |.I.1.22:."....."|
00001150: 3B 3A 82 00 6B 19 28 03 81 49 B2 31 A4 33 37 3A |;:..k.(..I.1.37:|
00001160: 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 83 19 2A 03 |.".....";:....*.|
00001170: 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 |.I.1.22:."....."|
00001180: 3B 3A 82 00 A8 19 2C 03 99 22 13 11 11 11 11 11 |;:....,.."......|
00001190: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000011A0: 1D 1D 1D 12 A9 20 20 92 00 CA 19 2E 03 99 22 1D |..... .......".|
000011B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000011C0: 1D 12 20 92 20 20 12 20 92 A9 00 EB 19 30 03 99 |.. . . .....0..|
000011D0: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
000011E0: 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 09 1A 32 03 |.... . ......2.|
000011F0: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00001200: 1D 1D 1D 1D DF 12 20 20 92 00 31 1A 34 03 99 22 |...... ..1.4.."|
00001210: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 |..............C |
00001220: 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 |O M M O D O R E.|
00001230: 11 00 54 1A 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |..T.6.."........|
00001240: 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E |.......EDUCATION|
00001250: 41 4C 11 11 00 73 1A 38 03 99 22 1D 1D 1D 1D 1D |AL...s.8..".....|
00001260: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 |...........SOFTW|
00001270: 41 52 45 00 8E 1A 3A 03 8F 20 2A 2A 20 43 4F 4D |ARE...:.. ** COM|
00001280: 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 C6 |MODORE LOGO **..|
00001290: 1A 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D |.;...(UD$,24);".|
000012A0: 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 |.........PRESS S|
000012B0: 50 41 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 |PACE BAR OR WAIT|
000012C0: 92 22 3A 49 B2 30 00 E8 1A 3C 03 A1 41 24 3A 8B |.":I.0...<..A$:.|
000012D0: 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 |A$.." ".I.I.1:.I|
000012E0: B3 32 35 30 A7 38 32 38 00 0C 1B 3E 03 54 31 24 |.250.828...>.T1$|
000012F0: B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 |."":T2$."":T3$."|
00001300: 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 15 1B 40 |":T4$."":I.0...@|
00001310: 03 89 33 30 30 00 31 1B 43 03 8F 20 2A 2A 20 53 |..300.1.C.. ** S|
00001320: 50 41 43 45 20 42 41 52 20 50 52 45 53 53 20 2A |PACE BAR PRESS *|
00001330: 2A 00 6C 1B 48 03 97 55 4F 2C 30 3A 99 C8 28 55 |*.l.H..UO,0:..(U|
00001340: 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 |D$,24);".......P|
00001350: 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 |RESS SPACE BAR T|
00001360: 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 83 1B 4C |O CONTINUE."...L|
00001370: 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 |..UI$:.UI$.." ".|
00001380: 38 34 34 00 89 1B 4E 03 8E 00 A9 1B 52 03 8F 20 |844...N.....R.. |
00001390: 2A 2A 20 50 41 47 45 20 44 45 53 49 47 4E 20 52 |** PAGE DESIGN R|
000013A0: 4F 55 54 49 4E 45 20 2A 2A 00 B5 1B 54 03 55 50 |OUTINE **...T.UP|
000013B0: B2 55 50 AA 31 00 DF 1B 57 03 99 22 93 22 C8 28 |.UP.1...W..".".(|
000013C0: 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 50 |UT$.UP$,21);.(UP|
000013D0: 24 AA 55 47 24 AA C4 28 55 50 29 2C 31 38 29 00 |$.UG$..(UP),18).|
000013E0: 0E 1C 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |..\.." ---------|
000013F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001400: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 1D |-------------"..|
00001410: 1C 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 51 1C |.`..UH..0.870.Q.|
00001420: 61 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 |a...(UD$,24);.(U|
00001430: 50 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 |P$,7);"HELP - PR|
00001440: 45 53 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E |ESS H <RETURN>|
00001450: 22 00 62 1C 66 03 55 48 B2 30 3A 99 22 13 11 22 |".b.f.UH.0:.".."|
00001460: 3A 8E 00 81 1C 6B 03 8F 20 2A 2A 20 50 4C 45 41 |:....k.. ** PLEA|
00001470: 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B 20 2A |SE WAIT REMARK *|
00001480: 2A 00 B7 1C 70 03 99 C8 28 55 44 24 2C 32 34 29 |*...p...(UD$,24)|
00001490: 3B 22 20 20 20 20 20 20 20 20 20 20 20 4F 4E 45 |;" ONE|
000014A0: 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E | MOMENT PLEASE..|
000014B0: 2E 20 20 20 20 20 22 00 BD 1C 75 03 8E 00 DA 1C |. "...u.....|
000014C0: 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 56 41 |... ** SET UP VA|
000014D0: 52 49 41 42 4C 45 53 20 2A 2A 00 25 1D 85 03 55 |RIABLES **.%...U|
000014E0: 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 30 30 |X$."H":.UQ%(1000|
000014F0: 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 |):UB.32768:U1.19|
00001500: 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A |6:U2.197:U3.198:|
00001510: 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 |U4.216:UC.167:UU|
00001520: B2 31 30 32 34 00 63 1D 86 03 55 54 B2 35 39 34 |.1024.c...UT.594|
00001530: 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 |68:UU%.12:UL%.14|
00001540: 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 |:UP%.1146:UM.327|
00001550: 36 38 3A 55 4F B2 31 35 38 3A 97 20 35 30 30 30 |68:UO.158:. 5000|
00001560: 33 2C 30 00 A6 1D 87 03 8B C2 28 35 30 30 30 33 |3,0.......(50003|
00001570: 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 |).0.UB.1024:U1.2|
00001580: 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 |09:U2.210:U3.211|
00001590: 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 |:U4.214:UC.204:U|
000015A0: 55 B2 32 30 34 38 00 E5 1D 88 03 8B C2 28 35 30 |U.2048.......(50|
000015B0: 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A |003).0.UT.53272:|
000015C0: 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 |UU%.21:UL%.23:UP|
000015D0: 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 |%.2139:UM.1024:U|
000015E0: 4F B2 31 39 38 00 09 1E 89 03 55 44 24 B2 22 13 |O.198.....UD$.".|
000015F0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001600: 11 11 11 11 11 11 11 11 22 00 3B 1E 8A 03 55 50 |........".;...UP|
00001610: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00001620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001630: 20 20 20 20 20 20 20 20 20 20 22 00 86 1E 8B 03 | ".....|
00001640: 55 54 24 B2 22 20 C7 45 4F 47 52 41 50 48 59 20 |UT$." .EOGRAPHY |
00001650: D1 55 49 5A A0 A0 A0 A0 A0 A0 22 3A 8F 20 50 4C |.UIZ......":. PL|
00001660: 41 43 45 20 50 52 4F 47 52 41 4D 20 54 49 54 4C |ACE PROGRAM TITL|
00001670: 45 20 21 21 21 21 21 21 21 21 21 21 21 21 21 21 |E !!!!!!!!!!!!!!|
00001680: 21 21 21 2A 2A 2A 00 A2 1E 8C 03 86 41 24 28 34 |!!!***......A$(4|
00001690: 35 29 2C 51 24 28 34 35 29 2C 4F 50 28 34 35 29 |5),Q$(45),OP(45)|
000016A0: 3A 8E 00 BC 1E 8E 03 8F 20 2A 2A 20 53 45 54 20 |:....... ** SET |
000016B0: 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 C5 1E 93 |VARIABLES **....|
000016C0: 03 8D 39 30 30 00 CB 1E 94 03 3A 00 D1 1E 95 03 |..900.....:.....|
000016D0: 3A 00 EC 1E 98 03 8F 20 2A 2A 20 43 48 45 43 4B |:...... ** CHECK|
000016E0: 20 46 4F 52 20 38 30 33 32 20 2A 2A 00 0A 1F 9D | FOR 8032 **....|
000016F0: 03 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 |..".":.".":. SHI|
00001700: 46 54 45 44 20 53 50 41 43 45 00 21 1F A2 03 8B |FTED SPACE.!....|
00001710: C2 28 55 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 |.(UB.40)..96..70|
00001720: 30 00 3A 1F A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 |0.:.... ** MEMOR|
00001730: 59 20 43 48 45 43 4B 20 2A 2A 00 4E 1F A4 03 8B |Y CHECK **.N....|
00001740: 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 37 00 7C | .(0).2000.937.||
00001750: 1F A5 03 99 22 93 11 11 05 54 48 49 53 20 4D 41 |...."....THIS MA|
00001760: 43 48 49 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 |CHINE DOES NOT H|
00001770: 41 56 45 20 45 4E 4F 55 47 48 11 22 00 A0 1F A6 |AVE ENOUGH."....|
00001780: 03 99 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E |.."MEMORY TO RUN|
00001790: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 21 22 | THIS PROGRAM !"|
000017A0: 00 AB 1F A7 03 9E 55 55 AA 37 31 00 B1 1F A8 03 |......UU.71.....|
000017B0: 80 00 CB 1F A9 03 99 22 93 05 22 3A 8B C2 28 35 |......."..":..(5|
000017C0: 30 30 30 33 29 B2 30 A7 39 36 32 00 FA 1F AC 03 |0003).0.962.....|
000017D0: 8F 20 2A 2A 20 42 41 53 49 43 20 32 2E 30 20 20 |. ** BASIC 2.0 |
000017E0: 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 |OR 4.0 OR C-6|
000017F0: 34 20 53 45 54 55 50 20 2A 2A 00 38 20 AD 03 97 |4 SETUP **.8 ...|
00001800: 31 30 37 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 |1075,133:.1076,1|
00001810: 34 34 3A 97 31 30 37 37 2C 32 33 34 3A 97 31 30 |44:.1077,234:.10|
00001820: 37 39 2C 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 |79,4:.1080,133:.|
00001830: 31 30 38 31 2C 31 34 35 00 6E 20 AE 03 97 31 30 |1081,145.n ...10|
00001840: 39 31 2C 31 35 35 3A 97 31 30 39 38 2C 31 33 33 |91,155:.1098,133|
00001850: 3A 97 31 30 39 39 2C 31 34 34 3A 97 31 31 30 30 |:.1099,144:.1100|
00001860: 2C 32 33 34 3A 97 31 31 30 33 2C 31 33 33 00 90 |,234:.1103,133..|
00001870: 20 AF 03 97 31 31 30 34 2C 31 34 35 3A 97 31 31 | ...1104,145:.11|
00001880: 30 35 2C 32 33 34 3A 97 31 30 38 32 2C 32 33 34 |05,234:.1082,234|
00001890: 00 A7 20 B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 |.. ....(50003)..|
000018A0: 31 36 30 A7 39 35 35 00 D6 20 B6 03 97 31 30 39 |160.955.. ...109|
000018B0: 33 2C 38 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 |3,88:.1094,228:.|
000018C0: 31 30 39 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 |1097,85:.1102,22|
000018D0: 38 3A 89 39 36 35 00 EB 20 BB 03 8B C2 28 35 30 |8:.965.. ....(50|
000018E0: 30 30 33 29 B3 B1 31 A7 39 39 30 00 1A 21 C0 03 |003)..1.990..!..|
000018F0: 97 31 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 |.1093,49:.1094,2|
00001900: 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 |30:.1097,46:.110|
00001910: 32 2C 32 33 30 3A 89 39 36 35 00 54 21 C2 03 97 |2,230:.965.T!...|
00001920: 32 30 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 |2099,141:.2100,2|
00001930: 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C |0:.2101,3:.2103,|
00001940: 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 |8:.2104,141:.210|
00001950: 35 2C 32 31 00 90 21 C3 03 97 32 31 30 36 2C 33 |5,21..!...2106,3|
00001960: 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 |:.2115,145:.2117|
00001970: 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 |,52:.2118,234:.2|
00001980: 31 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 |121,49:.2122,141|
00001990: 00 CA 21 C4 03 97 32 31 32 33 2C 32 30 3A 97 32 |..!...2123,20:.2|
000019A0: 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A |124,3:.2126,234:|
000019B0: 97 32 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C |.2127,141:.2128,|
000019C0: 32 31 3A 97 32 31 32 39 2C 33 00 E8 21 C5 03 9E |21:.2129,3..!...|
000019D0: 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 |UU.48:. DISABLE |
000019E0: 53 54 4F 50 20 4B 45 59 00 F9 21 CA 03 8D 38 30 |STOP KEY..!...80|
000019F0: 30 3A 8F 20 54 49 54 4C 45 00 09 22 D4 03 89 33 |0:. TITLE.."...3|
00001A00: 30 30 3A 8F 20 4D 45 4E 55 00 3A 22 DE 03 99 22 |00:. MENU.:"..."|
00001A10: 93 54 48 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F |.THE PGM WILL NO|
00001A20: 54 20 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D |T WORK ON THIS M|
00001A30: 41 43 48 49 4E 45 21 22 3A 80 00 6F 22 E8 03 8B |ACHINE!":..o"...|
00001A40: 55 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 |UZ.1..UP%:.UP%:U|
00001A50: 5A B2 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D |Z.0:. ** PROGRAM|
00001A60: 20 53 54 41 52 54 53 20 48 45 52 45 20 2A 2A 00 | STARTS HERE **.|
00001A70: 9B 22 E9 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 |."..."..";:.:..(|
00001A80: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00001A90: 36 3A 97 35 33 32 38 30 2C 31 34 00 BC 22 EB 03 |6:.53280,14.."..|
00001AA0: 9C 3A 8D 39 30 30 3A 55 54 24 B2 22 20 47 45 4F |.:.900:UT$." GEO|
00001AB0: 47 52 41 50 48 59 20 51 55 49 5A 22 00 DD 22 4C |GRAPHY QUIZ".."L|
00001AC0: 04 99 22 93 22 3A 53 43 B2 30 3A 81 49 B2 31 A4 |..".":SC.0:.I.1.|
00001AD0: 34 35 3A 4F 50 28 49 29 B2 30 3A 82 49 00 03 23 |45:OP(I).0:.I..#|
00001AE0: 56 04 81 49 B2 31 A4 35 3A 99 22 13 22 3A 81 52 |V..I.1.5:.".":.R|
00001AF0: B2 55 4D A4 55 4D AA 33 39 3A 97 52 2C 31 32 30 |.UM.UM.39:.R,120|
00001B00: 3A 82 52 00 1D 23 60 04 81 52 B2 55 4D A4 55 4D |:.R..#`..R.UM.UM|
00001B10: AA 33 39 3A 97 52 2C 30 33 32 3A 82 52 00 3F 23 |.39:.R,032:.R.?#|
00001B20: 6A 04 81 52 B2 55 4D AA 33 39 A4 55 4D AA 31 30 |j..R.UM.39.UM.10|
00001B30: 30 30 A9 34 30 3A 97 52 2C 31 31 37 3A 82 52 00 |00.40:.R,117:.R.|
00001B40: 61 23 74 04 81 52 B2 55 4D AA 33 39 A4 55 4D AA |a#t..R.UM.39.UM.|
00001B50: 31 30 30 30 A9 34 30 3A 97 52 2C 30 33 32 3A 82 |1000.40:.R,032:.|
00001B60: 52 00 84 23 7E 04 81 52 B2 55 4D AA 31 30 30 30 |R..#~..R.UM.1000|
00001B70: A4 55 4D AA 39 36 30 A9 AB 31 3A 97 52 2C 31 32 |.UM.960..1:.R,12|
00001B80: 30 3A 82 52 00 A7 23 88 04 81 52 B2 55 4D AA 31 |0:.R..#...R.UM.1|
00001B90: 30 30 30 A4 55 4D AA 39 36 30 A9 AB 31 3A 97 52 |000.UM.960..1:.R|
00001BA0: 2C 30 33 32 3A 82 52 00 C6 23 92 04 81 52 B2 55 |,032:.R..#...R.U|
00001BB0: 4D AA 39 36 30 A4 55 4D A9 AB 34 30 3A 97 52 2C |M.960.UM..40:.R,|
00001BC0: 31 31 38 3A 82 52 00 E5 23 9C 04 81 52 B2 55 4D |118:.R..#...R.UM|
00001BD0: AA 39 36 30 A4 55 4D A9 AB 34 30 3A 97 52 2C 30 |.960.UM..40:.R,0|
00001BE0: 33 32 3A 82 52 00 1B 24 A6 04 99 22 11 11 11 11 |32:.R..$..."....|
00001BF0: 11 11 11 11 1D 1D 1D 1D 1D 12 47 45 4F 47 52 41 |..........GEOGRA|
00001C00: 50 48 59 20 51 55 49 5A 20 42 59 20 53 45 41 4E |PHY QUIZ BY SEAN|
00001C10: 20 53 59 4C 56 45 53 54 45 52 22 00 28 24 BA 04 | SYLVESTER".($..|
00001C20: 82 49 3A 89 31 33 31 30 00 6D 24 CE 04 99 22 20 |.I:.1310.m$..." |
00001C30: 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 54 45 |..HIS PROGRAM TE|
00001C40: 53 54 53 20 59 4F 55 52 20 4B 4E 4F 57 4C 45 44 |STS YOUR KNOWLED|
00001C50: 47 45 20 41 42 4F 55 54 20 11 47 45 4E 45 52 41 |GE ABOUT .GENERA|
00001C60: 4C 20 47 45 4F 47 52 41 50 48 59 2E 22 00 B7 24 |L GEOGRAPHY."..$|
00001C70: D8 04 99 22 20 11 11 11 D4 48 45 20 43 4F 4D 50 |..." ....HE COMP|
00001C80: 55 54 45 52 20 57 49 4C 4C 20 47 49 56 45 20 59 |UTER WILL GIVE Y|
00001C90: 4F 55 20 33 20 43 48 41 4E 43 45 53 20 54 4F 20 |OU 3 CHANCES TO |
00001CA0: 11 41 4E 53 57 45 52 20 45 41 43 48 20 51 55 45 |.ANSWER EACH QUE|
00001CB0: 53 54 49 4F 4E 2E 22 00 03 25 E2 04 99 22 20 11 |STION."..%..." .|
00001CC0: 11 11 C9 54 20 57 49 4C 4C 20 41 53 4B 20 59 4F |...T WILL ASK YO|
00001CD0: 55 20 31 30 20 51 55 45 53 54 49 4F 4E 53 20 41 |U 10 QUESTIONS A|
00001CE0: 4E 44 20 57 49 4C 4C 20 20 20 11 47 49 56 45 20 |ND WILL .GIVE |
00001CF0: 41 20 53 43 4F 52 45 20 41 54 20 54 48 45 20 45 |A SCORE AT THE E|
00001D00: 4E 44 2E 00 0E 25 F6 04 8D 38 33 35 3A 8E 00 53 |ND...%...835:..S|
00001D10: 25 1E 05 51 24 28 31 29 B2 22 41 20 53 48 4F 43 |%..Q$(1)."A SHOC|
00001D20: 4B 20 57 41 56 45 20 43 41 55 53 45 44 20 42 59 |K WAVE CAUSED BY|
00001D30: 20 41 4E 20 55 4E 44 45 52 20 20 20 20 20 20 20 | AN UNDER |
00001D40: 20 20 57 41 54 45 52 20 45 41 52 54 48 51 55 41 | WATER EARTHQUA|
00001D50: 4B 45 22 00 68 25 28 05 41 24 28 31 29 B2 22 54 |KE".h%(.A$(1)."T|
00001D60: 53 55 4E 41 4D 49 53 22 00 B2 25 32 05 51 24 28 |SUNAMIS"..%2.Q$(|
00001D70: 32 29 B2 22 41 20 54 49 44 45 20 54 48 41 54 20 |2)."A TIDE THAT |
00001D80: 49 53 20 48 49 47 48 45 52 20 54 48 41 4E 20 4E |IS HIGHER THAN N|
00001D90: 4F 52 4D 41 4C 20 20 20 20 20 20 20 41 4E 44 20 |ORMAL AND |
00001DA0: 4C 4F 57 45 52 20 54 48 41 4E 20 4E 4F 52 4D 41 |LOWER THAN NORMA|
00001DB0: 4C 22 00 CA 25 3C 05 41 24 28 32 29 B2 22 53 50 |L"..%<.A$(2)."SP|
00001DC0: 52 49 4E 47 20 54 49 44 45 22 00 16 26 46 05 51 |RING TIDE"..&F.Q|
00001DD0: 24 28 33 29 B2 22 41 52 45 41 53 20 43 4F 56 45 |$(3)."AREAS COVE|
00001DE0: 52 45 44 20 41 54 20 48 49 47 48 20 54 49 44 45 |RED AT HIGH TIDE|
00001DF0: 20 41 4E 44 20 20 20 20 20 20 20 20 20 20 45 58 | AND EX|
00001E00: 50 4F 53 45 44 20 41 54 20 4C 4F 57 20 54 49 44 |POSED AT LOW TID|
00001E10: 45 20 41 52 45 22 00 2E 26 50 05 41 24 28 33 29 |E ARE"..&P.A$(3)|
00001E20: B2 22 54 49 44 41 4C 20 46 4C 41 54 53 22 00 76 |."TIDAL FLATS".v|
00001E30: 26 5A 05 51 24 28 34 29 B2 22 54 48 45 20 42 52 |&Z.Q$(4)."THE BR|
00001E40: 45 41 4B 20 44 4F 57 4E 20 4F 46 20 52 4F 43 4B |EAK DOWN OF ROCK|
00001E50: 20 49 4E 54 4F 20 53 41 4E 44 20 20 20 20 20 20 | INTO SAND |
00001E60: 20 20 50 41 52 54 49 43 4C 45 53 20 49 53 20 43 | PARTICLES IS C|
00001E70: 41 4C 4C 45 44 22 00 8C 26 64 05 41 24 28 34 29 |ALLED"..&d.A$(4)|
00001E80: B2 22 41 54 54 52 49 54 49 4F 4E 22 00 D6 26 6E |."ATTRITION"..&n|
00001E90: 05 51 24 28 35 29 B2 22 57 48 41 54 20 42 4F 44 |.Q$(5)."WHAT BOD|
00001EA0: 59 20 4F 46 20 57 41 54 45 52 20 48 41 53 20 54 |Y OF WATER HAS T|
00001EB0: 48 45 20 48 49 47 48 45 53 54 20 20 20 20 20 20 |HE HIGHEST |
00001EC0: 43 4F 4E 43 45 4E 54 52 41 54 49 4F 4E 20 4F 46 |CONCENTRATION OF|
00001ED0: 20 53 41 4C 54 22 00 EB 26 78 05 41 24 28 35 29 | SALT"..&x.A$(5)|
00001EE0: B2 22 44 45 41 44 20 53 45 41 22 00 25 27 82 05 |."DEAD SEA".%'..|
00001EF0: 51 24 28 36 29 B2 22 4F 4E 20 57 48 41 54 20 43 |Q$(6)."ON WHAT C|
00001F00: 4F 4E 54 49 4E 45 4E 54 20 49 53 20 54 48 45 20 |ONTINENT IS THE |
00001F10: 41 4D 41 5A 4F 4E 20 20 20 20 20 20 20 20 20 52 |AMAZON R|
00001F20: 49 56 45 52 22 00 3F 27 8C 05 41 24 28 36 29 B2 |IVER".?'..A$(6).|
00001F30: 22 53 4F 55 54 48 20 41 4D 45 52 49 43 41 22 00 |"SOUTH AMERICA".|
00001F40: 79 27 96 05 51 24 28 37 29 B2 22 57 48 41 54 20 |y'..Q$(7)."WHAT |
00001F50: 49 53 20 54 48 45 20 4C 4F 4E 47 45 53 54 20 52 |IS THE LONGEST R|
00001F60: 49 56 45 52 20 49 4E 20 54 48 45 20 20 20 20 20 |IVER IN THE |
00001F70: 20 20 20 57 4F 52 4C 44 22 00 8A 27 A0 05 41 24 | WORLD"..'..A$|
00001F80: 28 37 29 B2 22 4E 49 4C 45 22 00 B7 27 AA 05 51 |(7)."NILE"..'..Q|
00001F90: 24 28 38 29 B2 22 54 48 45 20 54 57 49 53 54 53 |$(8)."THE TWISTS|
00001FA0: 20 49 4E 20 41 20 52 49 56 45 52 20 41 52 45 20 | IN A RIVER ARE |
00001FB0: 43 41 4C 4C 45 44 22 00 CC 27 B4 05 41 24 28 38 |CALLED"..'..A$(8|
00001FC0: 29 B2 22 4D 45 41 4E 44 45 52 53 22 00 F4 27 BE |)."MEANDERS"..'.|
00001FD0: 05 51 24 28 39 29 B2 22 4F 4E 20 57 48 41 54 20 |.Q$(9)."ON WHAT |
00001FE0: 43 4F 4E 54 49 4E 45 4E 54 20 49 53 20 55 47 41 |CONTINENT IS UGA|
00001FF0: 4E 44 41 22 00 07 28 C8 05 41 24 28 39 29 B2 22 |NDA"..(..A$(9)."|
00002000: 41 46 52 49 43 41 22 00 31 28 D2 05 51 24 28 31 |AFRICA".1(..Q$(1|
00002010: 30 29 B2 22 57 48 41 54 20 49 53 20 54 48 45 20 |0)."WHAT IS THE |
00002020: 43 41 50 49 54 41 4C 20 4F 46 20 53 50 41 49 4E |CAPITAL OF SPAIN|
00002030: 22 00 45 28 DC 05 41 24 28 31 30 29 B2 22 4D 41 |".E(..A$(10)."MA|
00002040: 44 52 49 44 22 00 89 28 E6 05 51 24 28 31 31 29 |DRID"..(..Q$(11)|
00002050: B2 22 57 48 41 54 20 49 53 20 54 48 45 20 4D 4F |."WHAT IS THE MO|
00002060: 55 4E 54 41 49 4E 20 52 41 4E 47 45 20 4E 45 41 |UNTAIN RANGE NEA|
00002070: 52 20 20 20 20 20 20 20 20 20 4E 4F 52 54 48 45 |R NORTHE|
00002080: 52 4E 20 49 4E 44 49 41 22 00 A0 28 F0 05 41 24 |RN INDIA"..(..A$|
00002090: 28 31 31 29 B2 22 48 59 4D 41 4C 41 59 41 53 22 |(11)."HYMALAYAS"|
000020A0: 00 D1 28 FA 05 51 24 28 31 32 29 B2 22 48 4F 57 |..(..Q$(12)."HOW|
000020B0: 20 4D 41 4E 59 20 4A 41 50 41 4E 45 53 45 20 49 | MANY JAPANESE I|
000020C0: 53 4C 41 4E 44 53 20 41 52 45 20 54 48 45 52 45 |SLANDS ARE THERE|
000020D0: 22 00 E0 28 04 06 41 24 28 31 32 29 B2 22 35 22 |"..(..A$(12)."5"|
000020E0: 00 11 29 0E 06 51 24 28 31 33 29 B2 22 57 48 41 |..)..Q$(13)."WHA|
000020F0: 54 20 49 53 20 54 48 45 20 4C 41 52 47 45 53 54 |T IS THE LARGEST|
00002100: 20 4A 41 50 41 4E 45 53 45 20 49 53 4C 41 4E 44 | JAPANESE ISLAND|
00002110: 22 00 25 29 18 06 41 24 28 31 33 29 B2 22 48 4F |".%)..A$(13)."HO|
00002120: 4E 53 48 55 22 00 61 29 22 06 51 24 28 31 34 29 |NSHU".a)".Q$(14)|
00002130: B2 22 57 48 41 54 20 53 45 41 20 53 45 50 41 52 |."WHAT SEA SEPAR|
00002140: 41 54 45 53 20 53 41 55 44 49 20 41 52 41 42 49 |ATES SAUDI ARABI|
00002150: 41 20 41 4E 44 20 20 20 20 20 41 46 52 49 43 41 |A AND AFRICA|
00002160: 22 00 76 29 2C 06 41 24 28 31 34 29 B2 22 52 45 |".v),.A$(14)."RE|
00002170: 44 20 53 45 41 22 00 B6 29 36 06 51 24 28 31 35 |D SEA"..)6.Q$(15|
00002180: 29 B2 22 57 48 41 54 20 42 4F 44 59 20 4F 46 20 |)."WHAT BODY OF |
00002190: 57 41 54 45 52 20 53 45 50 41 52 54 45 53 20 45 |WATER SEPARTES E|
000021A0: 55 52 4F 50 45 20 20 20 20 20 20 41 4E 44 20 41 |UROPE AND A|
000021B0: 46 52 49 43 41 22 00 D5 29 40 06 41 24 28 31 35 |FRICA"..)@.A$(15|
000021C0: 29 B2 22 4D 45 44 49 54 45 52 52 41 4E 45 41 4E |)."MEDITERRANEAN|
000021D0: 20 53 45 41 22 00 05 2A 4A 06 51 24 28 31 36 29 | SEA"..*J.Q$(16)|
000021E0: B2 22 57 48 41 54 20 53 45 41 20 53 45 50 41 52 |."WHAT SEA SEPAR|
000021F0: 41 54 45 53 20 4B 4F 52 45 41 20 41 4E 44 20 4A |ATES KOREA AND J|
00002200: 41 50 41 4E 22 00 1F 2A 54 06 41 24 28 31 36 29 |APAN"..*T.A$(16)|
00002210: B2 22 53 45 41 20 4F 46 20 4A 41 50 41 4E 22 00 |."SEA OF JAPAN".|
00002220: 48 2A 5E 06 51 24 28 31 37 29 B2 22 57 48 41 54 |H*^.Q$(17)."WHAT|
00002230: 20 49 53 20 54 48 45 20 43 41 50 49 54 41 4C 20 | IS THE CAPITAL |
00002240: 4F 46 20 49 52 41 4E 22 00 5C 2A 68 06 41 24 28 |OF IRAN".\*h.A$(|
00002250: 31 37 29 B2 22 54 45 48 52 41 4E 22 00 99 2A 72 |17)."TEHRAN"..*r|
00002260: 06 51 24 28 31 38 29 B2 22 49 4E 20 57 48 41 54 |.Q$(18)."IN WHAT|
00002270: 20 4F 43 45 41 4E 20 41 52 45 20 54 48 45 20 48 | OCEAN ARE THE H|
00002280: 41 57 49 49 41 4E 20 20 20 20 20 20 20 20 20 20 |AWIIAN |
00002290: 20 49 53 4C 41 4E 44 53 22 00 B4 2A 7C 06 41 24 | ISLANDS"..*|.A$|
000022A0: 28 31 38 29 B2 22 50 41 43 49 46 49 43 20 4F 43 |(18)."PACIFIC OC|
000022B0: 45 41 4E 22 00 EF 2A 86 06 51 24 28 31 39 29 B2 |EAN"..*..Q$(19).|
000022C0: 22 57 48 41 54 20 49 53 20 54 48 45 20 4D 4F 53 |"WHAT IS THE MOS|
000022D0: 54 20 4E 4F 52 54 48 4C 59 20 41 4D 45 52 49 43 |T NORTHLY AMERIC|
000022E0: 41 4E 20 20 20 20 20 20 20 53 54 41 54 45 22 00 |AN STATE".|
000022F0: 03 2B 90 06 41 24 28 31 39 29 B2 22 41 4C 41 53 |.+..A$(19)."ALAS|
00002300: 4B 41 22 00 42 2B 9A 06 51 24 28 32 30 29 B2 22 |KA".B+..Q$(20)."|
00002310: 57 48 41 54 20 49 53 20 54 48 45 20 47 52 4F 55 |WHAT IS THE GROU|
00002320: 50 20 4F 46 20 49 53 4C 41 4E 44 53 20 4E 4F 52 |P OF ISLANDS NOR|
00002330: 54 48 20 20 20 20 20 20 4F 46 20 43 41 4E 41 44 |TH OF CANAD|
00002340: 41 22 00 67 2B A4 06 41 24 28 32 30 29 B2 22 51 |A".g+..A$(20)."Q|
00002350: 55 45 45 4E 20 45 4C 49 5A 41 42 45 54 48 20 49 |UEEN ELIZABETH I|
00002360: 53 4C 41 4E 44 53 22 00 A2 2B AE 06 51 24 28 32 |SLANDS"..+..Q$(2|
00002370: 31 29 B2 22 57 48 41 54 20 49 53 20 54 48 45 20 |1)."WHAT IS THE |
00002380: 53 4D 41 4C 4C 45 53 54 20 4F 46 20 54 48 45 20 |SMALLEST OF THE |
00002390: 47 52 45 41 54 20 20 20 20 20 20 20 4C 41 4B 45 |GREAT LAKE|
000023A0: 53 22 00 BC 2B B8 06 41 24 28 32 31 29 B2 22 4C |S"..+..A$(21)."L|
000023B0: 41 4B 45 20 4F 4E 54 41 52 49 4F 22 00 FA 2B C2 |AKE ONTARIO"..+.|
000023C0: 06 51 24 28 32 32 29 B2 22 57 48 41 54 20 49 53 |.Q$(22)."WHAT IS|
000023D0: 20 54 48 45 20 4C 41 52 47 45 53 54 20 49 53 4C | THE LARGEST ISL|
000023E0: 41 4E 44 20 49 4E 20 4C 41 4B 45 20 20 20 20 20 |AND IN LAKE |
000023F0: 20 53 55 50 45 52 49 4F 52 22 00 13 2C CC 06 41 | SUPERIOR"..,..A|
00002400: 24 28 32 32 29 B2 22 49 53 4C 45 20 52 4F 59 41 |$(22)."ISLE ROYA|
00002410: 4C 45 22 00 4C 2C D6 06 51 24 28 32 33 29 B2 22 |LE".L,..Q$(23)."|
00002420: 41 20 53 54 45 45 50 20 56 4F 4C 43 41 4E 49 43 |A STEEP VOLCANIC|
00002430: 20 43 4F 4E 45 20 43 4F 4D 50 4F 53 45 44 20 4F | CONE COMPOSED O|
00002440: 46 20 20 20 20 20 20 20 41 53 48 22 00 65 2C E0 |F ASH".e,.|
00002450: 06 41 24 28 32 33 29 B2 22 43 49 4E 44 45 52 20 |.A$(23)."CINDER |
00002460: 43 4F 4E 45 22 00 A9 2C EA 06 51 24 28 32 34 29 |CONE"..,..Q$(24)|
00002470: B2 22 53 54 52 45 53 53 45 53 20 49 4E 20 54 48 |."STRESSES IN TH|
00002480: 45 20 45 41 52 54 48 27 53 20 43 52 55 53 54 20 |E EARTH'S CRUST |
00002490: 54 48 41 54 20 20 20 20 20 20 43 41 55 53 45 20 |THAT CAUSE |
000024A0: 4D 4F 56 45 4D 45 4E 54 22 00 C6 2C F4 06 41 24 |MOVEMENT"..,..A$|
000024B0: 28 32 34 29 B2 22 54 45 43 54 4F 4E 49 43 20 46 |(24)."TECTONIC F|
000024C0: 4F 52 43 45 53 22 00 14 2D FE 06 51 24 28 32 35 |ORCES"..-..Q$(25|
000024D0: 29 B2 22 55 50 4C 49 46 54 20 4F 52 20 44 45 50 |)."UPLIFT OR DEP|
000024E0: 52 45 53 53 49 4F 4E 20 49 4E 20 54 48 45 20 45 |RESSION IN THE E|
000024F0: 41 52 54 48 27 53 20 20 20 20 20 43 52 55 53 54 |ARTH'S CRUST|
00002500: 20 43 41 55 53 49 4E 47 20 46 52 41 43 54 55 52 | CAUSING FRACTUR|
00002510: 49 4E 47 22 00 2E 2D 08 07 41 24 28 32 35 29 B2 |ING"..-..A$(25).|
00002520: 22 44 49 41 53 54 52 4F 50 48 49 53 4D 22 00 6B |"DIASTROPHISM".k|
00002530: 2D 12 07 51 24 28 32 36 29 B2 22 56 4F 4C 43 41 |-..Q$(26)."VOLCA|
00002540: 4E 49 43 20 41 43 54 49 4F 4E 20 42 45 4C 4F 57 |NIC ACTION BELOW|
00002550: 20 54 48 45 20 45 41 52 54 48 27 53 20 20 20 20 | THE EARTH'S |
00002560: 20 20 20 53 55 52 46 41 43 45 22 00 8C 2D 1C 07 | SURFACE"..-..|
00002570: 41 24 28 32 36 29 B2 22 49 4E 54 52 55 53 49 56 |A$(26)."INTRUSIV|
00002580: 45 20 56 4F 4C 43 41 4E 49 53 4D 22 00 C9 2D 26 |E VOLCANISM"..-&|
00002590: 07 51 24 28 32 37 29 B2 22 56 4F 4C 43 41 4E 49 |.Q$(27)."VOLCANI|
000025A0: 43 20 41 43 54 49 4F 4E 20 41 42 4F 56 45 20 54 |C ACTION ABOVE T|
000025B0: 48 45 20 45 41 52 54 48 27 53 20 20 20 20 20 20 |HE EARTH'S |
000025C0: 20 53 55 52 46 41 43 45 22 00 EA 2D 30 07 41 24 | SURFACE"..-0.A$|
000025D0: 28 32 37 29 B2 22 45 58 54 52 55 53 49 56 45 20 |(27)."EXTRUSIVE |
000025E0: 56 4F 4C 43 41 4E 49 53 4D 22 00 2D 2E 3A 07 51 |VOLCANISM".-.:.Q|
000025F0: 24 28 32 38 29 B2 22 41 20 44 45 50 52 45 53 53 |$(28)."A DEPRESS|
00002600: 49 4F 4E 20 41 54 20 54 48 45 20 54 4F 50 20 4F |ION AT THE TOP O|
00002610: 46 20 41 20 20 20 20 20 20 20 20 20 20 20 20 56 |F A V|
00002620: 4F 4C 43 41 4E 49 43 20 43 4F 4E 45 22 00 41 2E |OLCANIC CONE".A.|
00002630: 44 07 41 24 28 32 38 29 B2 22 43 52 41 54 45 52 |D.A$(28)."CRATER|
00002640: 22 00 8F 2E 4E 07 51 24 28 32 39 29 B2 22 54 48 |"...N.Q$(29)."TH|
00002650: 45 20 52 49 4E 47 20 4F 46 20 56 4F 4C 43 41 4E |E RING OF VOLCAN|
00002660: 49 43 20 41 43 54 49 56 49 54 59 20 20 20 20 20 |IC ACTIVITY |
00002670: 20 20 20 20 20 20 41 52 4F 55 4E 44 20 54 48 45 | AROUND THE|
00002680: 20 50 41 43 49 46 49 43 20 4F 43 45 41 4E 22 00 | PACIFIC OCEAN".|
00002690: A9 2E 58 07 41 24 28 32 39 29 B2 22 52 49 4E 47 |..X.A$(29)."RING|
000026A0: 20 4F 46 20 46 49 52 45 22 00 E7 2E 62 07 51 24 | OF FIRE"...b.Q$|
000026B0: 28 33 30 29 B2 22 53 4D 41 4C 4C 20 48 49 4C 4C |(30)."SMALL HILL|
000026C0: 53 20 46 4F 52 4D 45 44 20 42 59 20 52 45 54 52 |S FORMED BY RETR|
000026D0: 45 41 54 49 4E 47 20 20 20 20 20 20 20 20 47 4C |EATING GL|
000026E0: 41 43 49 45 52 53 22 00 FC 2E 6C 07 41 24 28 33 |ACIERS"...l.A$(3|
000026F0: 30 29 B2 22 44 52 55 4D 4C 49 4E 22 00 3A 2F 76 |0)."DRUMLIN".:/v|
00002700: 07 51 24 28 33 31 29 B2 22 50 59 52 41 4D 49 44 |.Q$(31)."PYRAMID|
00002710: 41 4C 20 50 45 41 4B 20 41 54 20 54 48 45 20 54 |AL PEAK AT THE T|
00002720: 4F 50 20 4F 46 20 41 20 20 20 20 20 20 20 20 20 |OP OF A |
00002730: 20 4D 4F 55 4E 54 41 49 4E 22 00 4C 2F 80 07 41 | MOUNTAIN".L/..A|
00002740: 24 28 33 31 29 B2 22 48 4F 52 4E 22 00 93 2F 8A |$(31)."HORN"../.|
00002750: 07 51 24 28 33 32 29 B2 22 41 20 53 4D 41 4C 4C |.Q$(32)."A SMALL|
00002760: 20 56 41 4C 4C 45 59 20 54 48 41 54 20 45 4E 54 | VALLEY THAT ENT|
00002770: 45 52 53 20 41 20 4C 41 52 47 45 20 20 20 20 20 |ERS A LARGE |
00002780: 20 56 41 4C 4C 45 59 20 41 54 20 54 48 45 20 54 | VALLEY AT THE T|
00002790: 4F 50 22 00 AF 2F 94 07 41 24 28 33 32 29 B2 22 |OP"../..A$(32)."|
000027A0: 48 41 4E 47 49 4E 47 20 56 41 4C 4C 45 59 22 00 |HANGING VALLEY".|
000027B0: F1 2F 9E 07 51 24 28 33 33 29 B2 22 53 4D 41 4C |./..Q$(33)."SMAL|
000027C0: 4C 20 53 48 41 52 50 20 49 43 45 20 50 45 4C 4C |L SHARP ICE PELL|
000027D0: 45 54 53 20 54 48 41 54 20 4D 41 4B 45 20 20 20 |ETS THAT MAKE |
000027E0: 20 20 20 20 55 50 20 41 20 47 4C 41 43 49 45 52 | UP A GLACIER|
000027F0: 22 00 03 30 A8 07 41 24 28 33 33 29 B2 22 4E 45 |"..0..A$(33)."NE|
00002800: 56 45 22 00 43 30 B2 07 51 24 28 33 34 29 B2 22 |VE".C0..Q$(34)."|
00002810: 41 20 43 4F 4E 43 41 56 45 20 44 45 50 52 45 53 |A CONCAVE DEPRES|
00002820: 53 49 4F 4E 20 49 4E 20 54 48 45 20 53 49 44 45 |SION IN THE SIDE|
00002830: 20 4F 46 20 20 20 20 20 41 20 4D 4F 55 4E 54 41 | OF A MOUNTA|
00002840: 49 4E 22 00 57 30 BC 07 41 24 28 33 34 29 B2 22 |IN".W0..A$(34)."|
00002850: 43 49 52 51 55 45 22 00 83 30 C6 07 51 24 28 33 |CIRQUE"..0..Q$(3|
00002860: 35 29 B2 22 48 4F 57 20 4D 41 4E 59 20 47 52 45 |5)."HOW MANY GRE|
00002870: 41 54 20 4C 41 4B 45 53 20 41 52 45 20 54 48 45 |AT LAKES ARE THE|
00002880: 52 45 22 00 92 30 D0 07 41 24 28 33 35 29 B2 22 |RE"..0..A$(35)."|
00002890: 35 22 00 BF 30 DA 07 51 24 28 33 36 29 B2 22 57 |5"..0..Q$(36)."W|
000028A0: 48 41 54 20 49 53 20 54 48 45 20 43 41 50 49 54 |HAT IS THE CAPIT|
000028B0: 41 4C 20 4F 46 20 4D 41 4E 49 54 4F 42 41 22 00 |AL OF MANITOBA".|
000028C0: D5 30 E4 07 41 24 28 33 36 29 B2 22 57 49 4E 4E |.0..A$(36)."WINN|
000028D0: 49 50 45 47 22 00 01 31 EE 07 51 24 28 33 37 29 |IPEG"..1..Q$(37)|
000028E0: B2 22 57 48 41 54 20 49 53 20 54 48 45 20 43 41 |."WHAT IS THE CA|
000028F0: 50 49 54 41 4C 20 4F 46 20 41 4C 42 45 52 54 41 |PITAL OF ALBERTA|
00002900: 22 00 17 31 F8 07 41 24 28 33 37 29 B2 22 45 44 |"..1..A$(37)."ED|
00002910: 4D 4F 4E 54 4F 4E 22 00 43 31 02 08 51 24 28 33 |MONTON".C1..Q$(3|
00002920: 38 29 B2 22 57 48 41 54 20 49 53 20 54 48 45 20 |8)."WHAT IS THE |
00002930: 43 41 50 49 54 41 4C 20 4F 46 20 4F 4E 54 41 52 |CAPITAL OF ONTAR|
00002940: 49 4F 22 00 58 31 0C 08 41 24 28 33 38 29 B2 22 |IO".X1..A$(38)."|
00002950: 54 4F 52 4F 4E 54 4F 22 00 83 31 16 08 51 24 28 |TORONTO"..1..Q$(|
00002960: 33 39 29 B2 22 57 48 41 54 20 49 53 20 54 48 45 |39)."WHAT IS THE|
00002970: 20 43 41 50 49 54 41 4C 20 4F 46 20 51 55 45 42 | CAPITAL OF QUEB|
00002980: 45 43 22 00 9C 31 20 08 41 24 28 33 39 29 B2 22 |EC"..1 .A$(39)."|
00002990: 51 55 45 42 45 43 20 43 49 54 59 22 00 CD 31 2A |QUEBEC CITY"..1*|
000029A0: 08 51 24 28 34 30 29 B2 22 57 48 41 54 20 49 53 |.Q$(40)."WHAT IS|
000029B0: 20 54 48 45 20 43 41 50 49 54 41 4C 20 4F 46 20 | THE CAPITAL OF |
000029C0: 57 45 53 54 20 47 45 52 4D 41 4E 59 22 00 DF 31 |WEST GERMANY"..1|
000029D0: 34 08 41 24 28 34 30 29 B2 22 42 4F 4E 4E 22 00 |4.A$(40)."BONN".|
000029E0: E8 31 48 08 42 42 B2 31 00 F1 31 5C 08 8D 38 35 |.1H.BB.1..1\..85|
000029F0: 30 00 FA 31 7A 08 57 41 B2 30 00 0D 32 84 08 59 |0..1z.WA.0..2..Y|
00002A00: B2 B5 28 BB 28 31 29 AC 34 30 29 AA 31 00 20 32 |..(.(1).40).1. 2|
00002A10: 8E 08 8B 4F 50 28 59 29 B3 B1 30 89 32 31 38 30 |...OP(Y)..0.2180|
00002A20: 00 2D 32 8F 08 4F 50 28 59 29 B2 39 39 00 46 32 |.-2..OP(Y).99.F2|
00002A30: 98 08 4E 51 B2 4E 51 AA 31 3A 8B 4E 51 B2 31 31 |..NQ.NQ.1:.NQ.11|
00002A40: A7 89 32 35 36 30 00 68 32 9D 08 42 46 24 B2 C4 |..2560.h2..BF$..|
00002A50: 28 42 42 29 3A 42 42 24 B2 C9 28 42 46 24 2C C3 |(BB):BB$..(BF$,.|
00002A60: 28 42 46 24 29 AB 31 29 00 86 32 A2 08 99 22 13 |(BF$).1)..2...".|
00002A70: 11 11 11 11 11 11 11 11 20 28 22 42 42 24 22 29 |........ ("BB$")|
00002A80: 22 51 24 28 59 29 00 B6 32 AC 08 99 22 20 11 11 |"Q$(Y)..2..." ..|
00002A90: 41 4E 53 57 45 52 2E 2E 2E 2E 20 22 3B 3A 55 53 |ANSWER.... ";:US|
00002AA0: 24 B2 22 22 3A 55 4C B2 32 35 3A 8D 33 35 3A 55 |$."":UL.25:.35:U|
00002AB0: 41 24 B2 55 52 24 00 CA 32 B6 08 8B 55 41 24 B2 |A$.UR$..2...UA$.|
00002AC0: 41 24 28 59 29 89 32 33 39 30 00 F6 32 C0 08 8B |A$(Y).2390..2...|
00002AD0: 57 41 B2 32 A7 99 22 11 20 4E 4F 2C 20 54 48 45 |WA.2..". NO, THE|
00002AE0: 20 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 20 | CORRECT ANSWER |
00002AF0: 49 53 2E 2E 2E 22 00 05 33 D4 08 8B 57 41 B2 30 |IS..."..3...WA.0|
00002B00: A7 32 32 39 30 00 14 33 DE 08 8B 57 41 B2 31 A7 |.2290..3...WA.1.|
00002B10: 32 32 39 30 00 1E 33 E8 08 89 32 33 31 30 00 69 |2290..3...2310.i|
00002B20: 33 F2 08 99 22 11 20 49 27 4D 20 53 4F 52 52 59 |3...". I'M SORRY|
00002B30: 20 59 4F 55 52 20 41 4E 53 57 45 52 20 49 53 20 | YOUR ANSWER IS |
00002B40: 49 4E 43 4F 52 52 45 43 54 20 20 20 20 20 20 50 |INCORRECT P|
00002B50: 4C 45 41 53 45 20 54 52 59 20 41 47 41 49 4E 20 |LEASE TRY AGAIN |
00002B60: 20 20 20 20 20 20 20 20 22 00 73 33 04 09 8D 38 | ".s3...8|
00002B70: 30 30 30 00 7F 33 06 09 57 41 B2 57 41 AA 31 00 |000..3..WA.WA.1.|
00002B80: 8F 33 10 09 8B 57 41 B2 33 20 89 32 33 34 30 00 |.3...WA.3 .2340.|
00002B90: 99 33 1A 09 89 32 32 32 30 00 A7 33 24 09 99 22 |.3...2220..3$.."|
00002BA0: 20 22 41 24 28 59 29 00 B3 33 2E 09 42 42 B2 42 | "A$(Y)..3..BB.B|
00002BB0: 42 AA 31 00 C2 33 42 09 8D 38 33 35 3A 89 32 31 |B.1..3B..835:.21|
00002BC0: 34 30 00 D3 33 56 09 55 50 B2 55 50 AB 31 3A 8D |40..3V.UP.UP.1:.|
00002BD0: 38 35 30 00 DF 33 6A 09 53 43 B2 53 43 AA 31 00 |850..3j.SC.SC.1.|
00002BE0: F2 33 74 09 8B 20 53 43 B2 31 30 A7 20 89 32 35 |.3t.. SC.10. .25|
00002BF0: 36 30 00 1C 34 A6 09 99 22 11 11 11 11 11 11 11 |60..4...".......|
00002C00: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 43 4F 4E 47 |............CONG|
00002C10: 52 41 54 55 4C 41 54 49 4F 4E 53 22 00 43 34 B0 |RATULATIONS".C4.|
00002C20: 09 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 59 4F 55 52 |..".........YOUR|
00002C30: 20 41 4E 53 57 45 52 20 49 53 20 43 4F 52 52 45 | ANSWER IS CORRE|
00002C40: 43 54 22 00 4C 34 C4 09 8D 38 33 35 00 58 34 CE |CT".L4...835.X4.|
00002C50: 09 42 42 B2 42 42 AA 31 00 62 34 D8 09 89 32 31 |.BB.BB.1.b4...21|
00002C60: 34 30 00 92 34 00 0A 99 22 11 11 11 20 43 4F 4E |40..4..."... CON|
00002C70: 47 52 41 54 55 4C 41 54 49 4F 4E 53 21 21 2E 20 |GRATULATIONS!!. |
00002C80: 20 59 4F 55 27 56 45 20 46 49 4E 49 53 48 45 44 | YOU'VE FINISHED|
00002C90: 2E 22 00 C2 34 03 0A 99 22 11 11 11 11 11 11 1D |."..4...".......|
00002CA0: 1D 1D 1D 1D 20 59 4F 55 52 20 53 43 4F 52 45 20 |.... YOUR SCORE |
00002CB0: 49 53 20 22 53 43 22 20 4F 55 54 20 4F 46 20 31 |IS "SC" OUT OF 1|
00002CC0: 30 22 00 D0 34 0A 0A 8D 38 33 35 3A 89 33 30 30 |0"..4...835:.300|
00002CD0: 00 0A 35 40 1F 81 41 42 B2 31 A4 31 30 30 30 3A |..5@..AB.1.1000:|
00002CE0: 82 3A 81 41 41 B2 55 4D AA 34 30 AC C2 28 55 34 |.:.AA.UM.40..(U4|
00002CF0: 29 AB 31 36 30 A4 55 4D AA 34 30 AC C2 28 55 34 |).160.UM.40..(U4|
00002D00: 29 3A 97 41 41 2C 33 32 3A 82 00 1B 35 4A 1F 99 |):.AA,32:...5J..|
00002D10: 22 91 91 91 91 91 91 91 22 3A 8E 00 00 00 |".......":.... |
.......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 **
...... -------------------------------..
.... --- MADE BY SEAN SYLVESTER ---.:..
.. ---REVISED BY RICHARD DEBOER---.`....
--- MADE AND REVISED ON ---.F...:..
.... -------------------------------....
.:...... ** TO OUR BEST KNOWLEDGE THIS.S
.... PROGRAM IS FREE FOR...... DUP
LICATION IN CANADA....... IF YOU HAVE
CONTARY.-.... INFORMATION, PLEASE.S.
... CONTACT COMMODORE CANADA AND.Y...
. EVERY EFFORT WILL BE MADE TO......
WITHDRAW COPIES OF THIS...... PROG
RAM......:.N.#.. +++ INPUT SECTION +++..
.(..UO,0:UR$."":UI$.""...*..UL.0.UL.80..
.-..UC,0...2..UI$:.UI$."".50.>.7..UI$.G(
13).C(UR$)..1..UC,1:." .";:.85.Q.<..UI$.
G(20).105.E.>.. C(UR$)..UL.50...A..120:.
CHECK FOR VALID CHARACTER...F.UR$.UR$.U
I$...K..UI$;...P..50.Q.U.. +++ CHECK FOR
HELP REQUEST +++...Z..UR$.UX$.195:. EXI
T TO HELP ROUTINE..._..UF.1..240...D.UF.
0:.:....F.. ++ CHECK DELETE ++.?.I..C(UR
$).1.50.W.N.UR$.H(UR$,C(UR$).1).I.S..".
..";:.50...X.. ++ CHECK FOR VALID CHARA
CTERS ++...}..C(US$).0.150....US$.US$.U
X$.C....US.1.C(US$).Z....UI$.J(US$,US,1)
.............UI$."":....... ** STANDARD
INPUT **......F(UI$).46...*....UI$.G(32)
...G. ..F(UI$).48.F(UI$).57.170.M.....J.
...F(UI$).65.F(UI$).90.180.P..........F(
UI$).193.F(UI$).218.UI$."":.......B(UT).
UU%.UI$.G(F(UI$).128):........J...UI$.""
:....C.UF.1:. +++ HELP ROUTINE EXIT +++.
..E..250...H..245. .M..UQ.UB.(U2%.256.U1
%.U3%.2).<.R.UQ%(UQ.UB).B(UQ):.:.".".O.W
.UZ.1:UV%.B(UT).X.X..300...Y.UZ.0:US$.UJ
$:UG$.UK$:UP.UJ:UL.UK:.B(50003).0..53281
,6:.53280,14...Z..59468,UO.....UT$.UL$:.
".";:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3%.3).
.....UQ,UQ%(UQ.UB):.......U1,U1%......U2
,U2%......U4,U4%.&....U3,U3%.1......35.`
...UD%.((U2%.256.U1%.U3%).UB).40:.H(UD$,
UD%.1):.......H(UD$,24);"
. HELP COMING . ":..G...U1%.B(U1
):U2%.B(U2):U3%.B(U3):U4%.B(U4).....UJ$.
US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL.........
,.. ** MENU **...-.:.;....".":.UT,UU%:.B
(50003).0..53281,9:.53280,8.A./.:.^.1.."
. MENU"...6.." ----------
----------------------------"...;.."..
1. BEGIN GEOGRAPY QUIZ"...@.."..
2. STUDENT INSTRUCTIONS"...E..".
. 3. TEACHER INSTRUCTIONS".&.O..
".. 4. QUIT..".U.T.." ----------
----------------------------"...Y.."..
PRESS A NUMBER KEY (1-4) ";...^.UL.
1:US$."1234":.35:. INPUT ROUTINE..._..C(
UR$).1.300.E.`.US$.""...C..E(UR$).1000,4
00,500,396...H..300...... ** RE-ENABLE S
TOP KEY AND END **.A....B(50003)..1.B(50
003)..160.B(50003)..0.399.K....UU.71:.B(
50003).0..53281,6:.53280,14.W...."..":..
.....875:....... ** STUDENT INSTRUCTIONS
**.....UT$." GEOGRAPHY QUIZ"......".":.
UT,UL%:.B(50003).0..53281,0:.53280,0....
.UP.0:UG$."STUDENT INST":.850...G..1230:
.850.K.L.." ..NOTE:...TO ADVANCE FROM ON
E QUESTION".T.V.." .TO THE NEXT PRESS TH
E SPACE BAR"......" .......IF AT ANY TIM
E YOU WISH TO RETURN".I...." .TO THE MEN
U PRESS H RETURN".R....835......UZ.1..UP
%:.217............ ** TEACHER INSTRUCTIO
NS **.=....".":.UT,UL%:.B(50003).0..5328
1,2:.53280,10.T...UT$." GEOGRAPHY QUIZ":
UP.0:UG$."TEACHER INST":.850......"..
TO THE BEST OF OUR KNOWLEDGE,.".K....
" THIS PROGRAM IS IN THE PUBLIC.".....
." DOMAIN. IF THIS IS NOT THE CASE.".
....." PLEASE CONTACT:...".>...."
COMMODORE BUSINESS MACHINES.".A...."
3370 PHARMACY AVE......."
AGINCOURT, ONTARIO"......" CA
NADA M1W 2K4".G...." (416) 49
9-4292".....UP.1:. 835:. 850:......"
..PROGRAM NAME: GEOGRAPY QUIZ ..2...."
WRITTEN BY : SEAN SYLVESTER ..V....
" UPGRADED BY : ......."
.THIS PROGRAM WILL RUN ON ANY........"
BASIC 2.0 PET COMPUTER..O...."
BASIC 4.0 PET COMPUTER......."
8032 CBM COMPUTER......."
COMMODORE 64 COMPUTER...D..835.3.N..UZ.
1..UP%:.217.9.W..._.X.. ** PROGRAM MODIF
ICATION INST **.P.Y..".":.UT,UL%...].UP.
0:UG$."PROGRAM MOD":.850......835......U
Z.1..UP%:.217.......X.... ** TO USE 8032
LOAD CBM4032 **...F..".....BEFORE RUNNI
NG THIS PROGRAM ON AN 8032 ...D.P.."
LOAD THE 'CBM 4032' PROGRAM..........
...".O.Z..UU.71.U.....Z.... ** TO USE 80
32 LOAD CBM4032 **.E...."....BEFORE RUNN
ING THIS PROGRAM ON AN 8032 ..LOAD CBM
4032 PROGRAM".Q....1093:.... .. ** T I T
L E P A G E **.%.".."....";:.UT,UU%:.
B(50003).0..53280,14:.53281,6.;.$..I.1.3
8:."...";:..S.&..I.1.22:.".....";:..K.(.
.I.1.37:.".....";:....*..I.1.22:."....."
;:....,.."........................... .
.J...."................... . . .....0..
"................... . ......2.."......
.............. ..1.4.."..............C
O M M O D O R E...T.6.."...............E
DUCATIONAL...S.8.."................SOFTW
ARE...:.. ** COMMODORE LOGO **.F.;..H(UD
$,24);"..........PRESS SPACE BAR OR WAIT
.":I.0...<..A$:.A$.." ".I.I.1:.I.250.828
...>.T1$."":T2$."":T3$."":T4$."":I.0...@
..300.1.C.. ** SPACE BAR PRESS **.L.H..U
O,0:.H(UD$,24);".......PRESS SPACE BAR T
O CONTINUE."...L..UI$:.UI$.." ".844...N.
....R.. ** PAGE DESIGN ROUTINE **...T.UP
.UP.1...W.."."H(UT$.UP$,21);I(UP$.UG$.D(
UP),18)...\.." -------------------------
-------------"...`..UH..0.870.Q.A..H(UD$
,24);H(UP$,7);"HELP - PRESS H <RETURN>
".B.F.UH.0:."..":....K.. ** PLEASE WAIT
REMARK **...P..H(UD$,24);" ONE
MOMENT PLEASE... "...U...Z.... ** S
ET UP VARIABLES **.%...UX$."H":.UQ%(1000
):UB.32768:U1.196:U2.197:U3.198:U4.216:U
C.167:UU.1024.C...UT.59468:UU%.12:UL%.14
:UP%.1146:UM.32768:UO.158:. 50003,0.....
.B(50003).0.UB.1024:U1.209:U2.210:U3.211
:U4.214:UC.204:UU.2048......B(50003).0.U
T.53272:UU%.21:UL%.23:UP%.2139:UM.1024:U
O.198.....UD$.".........................
".;...UP$."
".....UT$." GEOGRAPHY QUIZ
":. PLACE PROGRAM TITLE !!!!!!!!!!!!!!
!!!***......A$(45),Q$(45),OP(45):.......
** SET VARIABLES **.E....900.K...:.Q...
:...... ** CHECK FOR 8032 **......".":."
":. SHIFTED SPACE.!....B(UB.40)..96..70
0.:.... ** MEMORY CHECK **.N.... .(0).20
00.937.|...."....THIS MACHINE DOES NOT H
AVE ENOUGH.". ...."MEMORY TO RUN THIS PR
OGRAM !"......UU.71.......K...."..":.B(5
0003).0.962...... ** BASIC 2.0 OR 4.0
OR C-64 SETUP **.8 ...1075,133:.1076,1
44:.1077,234:.1079,4:.1080,133:.1081,145
.N ...1091,155:.1098,133:.1099,144:.1100
,234:.1103,133.. ...1104,145:.1105,234:.
1082,234.. ...B(50003)..160.955.V ...109
3,88:.1094,228:.1097,85:.1102,228:.965..
...B(50003)..1.990..!...1093,49:.1094,2
30:.1097,46:.1102,230:.965.T!B..2099,141
:.2100,20:.2101,3:.2103,8:.2104,141:.210
5,21..!C..2106,3:.2115,145:.2117,52:.211
8,234:.2121,49:.2122,141.J!D..2123,20:.2
124,3:.2126,234:.2127,141:.2128,21:.2129
,3..!E..UU.48:. DISABLE STOP KEY..!J..80
0:. TITLE.."T..300:. MENU.:"...".THE PGM
WILL NOT WORK ON THIS MACHINE!":..O"...
UZ.1..UP%:.UP%:UZ.0:. ** PROGRAM STARTS
HERE **.."..."..";:.:.B(50003).0..53281,
6:.53280,14.."...:.900:UT$." GEOGRAPHY Q
UIZ".."L..".":SC.0:.I.1.45:OP(I).0:.I..#
V..I.1.5:.".":.R.UM.UM.39:.R,120:.R..#`.
.R.UM.UM.39:.R,032:.R.?#J..R.UM.39.UM.10
00.40:.R,117:.R.A#T..R.UM.39.UM.1000.40:
.R,032:.R..#~..R.UM.1000.UM.960..1:.R,12
0:.R..#...R.UM.1000.UM.960..1:.R,032:.R.
F#...R.UM.960.UM..40:.R,118:.R..#...R.UM
.960.UM..40:.R,032:.R..$..."............
..GEOGRAPHY QUIZ BY SEAN SYLVESTER".($..
.I:.1310.M$N.." .THIS PROGRAM TESTS YOUR
KNOWLEDGE ABOUT .GENERAL GEOGRAPHY."..$
X.." ...THE COMPUTER WILL GIVE YOU 3 CHA
NCES TO .ANSWER EACH QUESTION."..%..." .
..IT WILL ASK YOU 10 QUESTIONS AND WILL
.GIVE A SCORE AT THE END...%...835:..S
%..Q$(1)."A SHOCK WAVE CAUSED BY AN UNDE
R WATER EARTHQUAKE".H%(.A$(1)."T
SUNAMIS"..%2.Q$(2)."A TIDE THAT IS HIGHE
R THAN NORMAL AND LOWER THAN NORMA
L".J%<.A$(2)."SPRING TIDE"..&F.Q$(3)."AR
EAS COVERED AT HIGH TIDE AND EX
POSED AT LOW TIDE ARE"..&P.A$(3)."TIDAL
FLATS".V&Z.Q$(4)."THE BREAK DOWN OF ROCK
INTO SAND PARTICLES IS CALLED"..
&D.A$(4)."ATTRITION".V&N.Q$(5)."WHAT BOD
Y OF WATER HAS THE HIGHEST CONCENTR
ATION OF SALT"..&X.A$(5)."DEAD SEA".%'..
Q$(6)."ON WHAT CONTINENT IS THE AMAZON
RIVER".?'..A$(6)."SOUTH AMERICA".
Y'..Q$(7)."WHAT IS THE LONGEST RIVER IN
THE WORLD"..' .A$(7)."NILE"..'..Q
$(8)."THE TWISTS IN A RIVER ARE CALLED".
L'..A$(8)."MEANDERS"..'..Q$(9)."ON WHAT
CONTINENT IS UGANDA"..(H.A$(9)."AFRICA".
1(R.Q$(10)."WHAT IS THE CAPITAL OF SPAIN
".E(..A$(10)."MADRID"..(..Q$(11)."WHAT I
S THE MOUNTAIN RANGE NEAR NORTHE
RN INDIA". (..A$(11)."HYMALAYAS".Q(..Q$(
12)."HOW MANY JAPANESE ISLANDS ARE THERE
"..(..A$(12)."5"..)..Q$(13)."WHAT IS THE
LARGEST JAPANESE ISLAND".%)..A$(13)."HO
NSHU".A)".Q$(14)."WHAT SEA SEPARATES SAU
DI ARABIA AND AFRICA".V),.A$(14)."RE
D SEA"..)6.Q$(15)."WHAT BODY OF WATER SE
PARTES EUROPE AND AFRICA".U)@.A$(15
)."MEDITERRANEAN SEA"..*J.Q$(16)."WHAT S
EA SEPARATES KOREA AND JAPAN"..*T.A$(16)
."SEA OF JAPAN".H*^.Q$(17)."WHAT IS THE
CAPITAL OF IRAN".\*H.A$(17)."TEHRAN"..*R
.Q$(18)."IN WHAT OCEAN ARE THE HAWIIAN
ISLANDS"..*|.A$(18)."PACIFIC OC
EAN"..*..Q$(19)."WHAT IS THE MOST NORTHL
Y AMERICAN STATE"..+..A$(19)."ALAS
KA".B+..Q$(20)."WHAT IS THE GROUP OF ISL
ANDS NORTH OF CANADA".G+..A$(20)."Q
UEEN ELIZABETH ISLANDS"..+..Q$(21)."WHAT
IS THE SMALLEST OF THE GREAT LAKE
S"..+..A$(21)."LAKE ONTARIO"..+B.Q$(22).
"WHAT IS THE LARGEST ISLAND IN LAKE
SUPERIOR"..,L.A$(22)."ISLE ROYALE".L,V.
Q$(23)."A STEEP VOLCANIC CONE COMPOSED O
F ASH".E,..A$(23)."CINDER CONE"..,
..Q$(24)."STRESSES IN THE EARTH'S CRUST
THAT CAUSE MOVEMENT".F,..A$(24)."TE
CTONIC FORCES"..-..Q$(25)."UPLIFT OR DEP
RESSION IN THE EARTH'S CRUST CAUSING
FRACTURING"..-..A$(25)."DIASTROPHISM".K
-..Q$(26)."VOLCANIC ACTION BELOW THE EAR
TH'S SURFACE"..-..A$(26)."INTRUSIV
E VOLCANISM".I-&.Q$(27)."VOLCANIC ACTION
ABOVE THE EARTH'S SURFACE"..-0.A$
(27)."EXTRUSIVE VOLCANISM".-.:.Q$(28)."A
DEPRESSION AT THE TOP OF A V
OLCANIC CONE".A.D.A$(28)."CRATER"...N.Q$
(29)."THE RING OF VOLCANIC ACTIVITY
AROUND THE PACIFIC OCEAN"...X.A$(2
9)."RING OF FIRE"...B.Q$(30)."SMALL HILL
S FORMED BY RETREATING GLACIERS".
..L.A$(30)."DRUMLIN".:/V.Q$(31)."PYRAMID
AL PEAK AT THE TOP OF A MOUNTAI
N".L/..A$(31)."HORN"../..Q$(32)."A SMALL
VALLEY THAT ENTERS A LARGE VALLEY
AT THE TOP"../..A$(32)."HANGING VALLEY".
./..Q$(33)."SMALL SHARP ICE PELLETS THAT
MAKE UP A GLACIER"..0..A$(33)."NE
VE".C0..Q$(34)."A CONCAVE DEPRESSION IN
THE SIDE OF A MOUNTAIN".W0..A$(34)."
CIRQUE"..0F.Q$(35)."HOW MANY GREAT LAKES
ARE THERE"..0P.A$(35)."5"..0Z.Q$(36)."W
HAT IS THE CAPITAL OF MANITOBA".U0..A$(3
6)."WINNIPEG"..1..Q$(37)."WHAT IS THE CA
PITAL OF ALBERTA"..1..A$(37)."EDMONTON".
C1..Q$(38)."WHAT IS THE CAPITAL OF ONTAR
IO".X1..A$(38)."TORONTO"..1..Q$(39)."WHA
T IS THE CAPITAL OF QUEBEC"..1 .A$(39)."
QUEBEC CITY".M1*.Q$(40)."WHAT IS THE CAP
ITAL OF WEST GERMANY"..14.A$(40)."BONN".
.1H.BB.1..1\..850..1Z.WA.0..2..Y..(.(1).
40).1. 2...OP(Y)..0.2180.-2..OP(Y).99.F2
..NQ.NQ.1:.NQ.11..2560.H2..BF$.D(BB):BB$
.I(BF$,C(BF$).1)..2..."......... ("BB$")
"Q$(Y)..2..." ..ANSWER.... ";:US$."":UL.
25:.35:UA$.UR$.J2...UA$.A$(Y).2390..2...
WA.2..". NO, THE CORRECT ANSWER IS..."..
3T..WA.0.2290..3...WA.1.2290..3...2310.I
3...". I'M SORRY YOUR ANSWER IS INCORREC
T PLEASE TRY AGAIN ".S3...8
000.3..WA.WA.1..3...WA.3 .2340..3...222
0..3$.." "A$(Y)..3..BB.BB.1.B3B..835:.21
40.S3V.UP.UP.1:.850..3J.SC.SC.1..3T.. SC
.10. .2560..4..."...................CONG
RATULATIONS".C4...".........YOUR ANSWER
IS CORRECT".L4D..835.X4N.BB.BB.1.B4X..21
40..4..."... CONGRATULATIONS!!. YOU'VE
FINISHED.".B4..."........... YOUR SCORE
IS "SC" OUT OF 10".P4...835:.300..5@..AB
.1.1000:.:.AA.UM.40.B(U4).160.UM.40.B(U4
):.AA,32:...5J..".......":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL