STATES QUIZ     
FILE INFORMATION
FILENAME(S): STATES QUIZ     
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-12-01 01:48:28
APPEARS ON: 1 disk(s)
FILE HASH
891b48d16e02507ae2fa6f4685c295436fd266adc2fa3523ae824ea8c7014caf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 30 GEO | STATES QUIZ      | PRG | hedning, Mattias H00r, hedning, scooby | 12 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 41 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 |..A....53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 45 B2 33 31 37 34 34 3A |53281,0:E.31744:|
00000020: 99 22 98 22 C7 28 31 34 32 29 3A 8F 20 20 43 36 |.".".(142):. C6|
00000030: 34 20 4D 4F 44 53 20 42 59 20 57 49 4D 20 27 38 |4 MODS BY WIM '8|
00000040: 33 00 60 08 64 00 8F 20 53 54 41 54 45 53 20 41 |3.`.d.. STATES A|
00000050: 4E 44 20 43 41 50 49 54 41 4C 53 20 51 55 49 5A |ND CAPITALS QUIZ|
00000060: 00 7F 08 6E 00 8F 20 44 41 56 45 20 41 4C 56 45 |...n.. DAVE ALVE|
00000070: 52 53 4F 4E 20 4A 55 4C 59 2C 20 31 39 37 37 00 |RSON JULY, 1977.|
00000080: 9E 08 78 00 86 20 41 28 35 30 29 2C 42 28 34 29 |..x.. A(50),B(4)|
00000090: 2C 43 24 28 35 30 29 2C 53 24 28 35 30 29 00 AD |,C$(50),S$(50)..|
000000A0: 08 82 00 81 20 49 B2 31 20 A4 20 35 30 00 BF 08 |.... I.1 . 50...|
000000B0: 8C 00 87 20 53 24 28 49 29 2C 43 24 28 49 29 00 |... S$(I),C$(I).|
000000C0: C7 08 96 00 82 20 49 00 E9 08 A0 00 81 20 49 B2 |..... I...... I.|
000000D0: 31 20 A4 20 35 30 3A 41 28 49 29 B2 30 3A 82 20 |1 . 50:A(I).0:. |
000000E0: 49 3A 47 B2 30 3A 4E B2 30 00 13 09 AA 00 99 22 |I:G.0:N.0......"|
000000F0: 93 11 11 59 4F 55 20 48 41 56 45 20 59 4F 55 52 |...YOU HAVE YOUR|
00000100: 20 43 48 4F 49 43 45 20 4F 46 20 46 49 4C 4C 20 | CHOICE OF FILL |
00000110: 49 4E 22 00 2D 09 B4 00 99 22 4F 52 20 4D 55 4C |IN".-...."OR MUL|
00000120: 54 49 50 4C 45 20 43 48 4F 49 43 45 22 00 55 09 |TIPLE CHOICE".U.|
00000130: BE 00 85 20 22 57 41 4E 54 20 54 4F 20 46 49 4C |... "WANT TO FIL|
00000140: 4C 2D 49 4E 20 54 48 45 20 41 4E 53 57 45 52 53 |L-IN THE ANSWERS|
00000150: 20 22 3B 5A 24 00 6D 09 C8 00 8B 20 C8 28 5A 24 | ";Z$.m.... .(Z$|
00000160: 2C 31 29 B2 22 59 22 20 A7 20 32 35 30 00 9A 09 |,1)."Y" . 250...|
00000170: D2 00 99 22 4D 55 4C 54 49 50 4C 45 20 43 48 4F |..."MULTIPLE CHO|
00000180: 49 43 45 3A 20 41 4E 53 57 45 52 20 45 41 43 48 |ICE: ANSWER EACH|
00000190: 20 51 55 45 53 54 49 4F 4E 22 00 B4 09 DC 00 99 | QUESTION"......|
000001A0: 20 20 22 57 49 54 48 20 31 2C 32 2C 33 2C 20 4F | "WITH 1,2,3, O|
000001B0: 52 20 34 22 00 DE 09 E6 00 58 B2 31 3A 99 22 54 |R 4".....X.1:."T|
000001C0: 4F 20 53 54 4F 50 20 54 59 50 45 20 30 20 46 4F |O STOP TYPE 0 FO|
000001D0: 52 20 59 4F 55 52 20 41 4E 53 57 45 52 22 00 E8 |R YOUR ANSWER"..|
000001E0: 09 F0 00 89 20 32 38 30 00 11 0A FA 00 99 22 11 |.... 280......".|
000001F0: 46 49 4C 4C 20 49 4E 3A 20 59 4F 55 20 4D 55 53 |FILL IN: YOU MUS|
00000200: 54 20 53 50 45 4C 4C 20 45 58 41 43 54 4C 59 20 |T SPELL EXACTLY |
00000210: 22 00 33 0A 04 01 99 22 28 53 41 49 4E 54 20 49 |".3...."(SAINT I|
00000220: 53 20 41 42 42 52 45 56 49 41 54 45 44 20 53 54 |S ABBREVIATED ST|
00000230: 2E 29 22 00 58 0A 0E 01 58 B2 32 3A 99 22 54 4F |.)".X...X.2:."TO|
00000240: 20 53 54 4F 50 20 54 59 50 45 20 53 20 46 4F 52 | STOP TYPE S FOR|
00000250: 20 41 4E 53 57 45 52 22 00 84 0A 18 01 99 22 11 | ANSWER"......".|
00000260: 59 4F 55 20 48 41 56 45 20 59 4F 55 52 20 43 48 |YOU HAVE YOUR CH|
00000270: 4F 49 43 45 20 4F 46 20 57 48 45 54 48 45 52 20 |OICE OF WHETHER |
00000280: 54 48 45 22 00 A9 0A 22 01 99 22 53 54 41 54 45 |THE"...".."STATE|
00000290: 20 4F 52 20 54 48 45 20 43 41 50 49 54 41 4C 20 | OR THE CAPITAL |
000002A0: 49 53 20 41 53 4B 45 44 22 00 D5 0A 2C 01 85 20 |IS ASKED"...,.. |
000002B0: 22 57 41 4E 54 20 54 4F 20 41 4E 53 57 45 52 20 |"WANT TO ANSWER |
000002C0: 57 49 54 48 20 54 48 45 20 43 41 50 49 54 41 4C |WITH THE CAPITAL|
000002D0: 20 22 3B 5A 24 00 DD 0A 36 01 59 B2 32 00 F5 0A | ";Z$...6.Y.2...|
000002E0: 40 01 8B 20 C8 28 5A 24 2C 31 29 B2 22 59 22 20 |@.. .(Z$,1)."Y" |
000002F0: A7 20 59 B2 31 00 0C 0B 4A 01 99 22 11 22 3A 20 |. Y.1...J..".": |
00000300: 8F 20 20 52 41 4E 44 4F 4D 49 5A 45 00 1F 0B 54 |. RANDOMIZE...T|
00000310: 01 8F 20 50 49 43 4B 20 41 20 53 54 41 54 45 00 |.. PICK A STATE.|
00000320: 2F 0B 5E 01 81 20 49 B2 20 31 20 A4 20 31 30 00 |/.^.. I. 1 . 10.|
00000330: 42 0B 68 01 52 B2 B5 28 BB 28 31 29 AC 35 30 29 |B.h.R..(.(1).50)|
00000340: AA 31 00 56 0B 72 01 8B 20 41 28 52 29 B3 B1 32 |.1.V.r.. A(R)..2|
00000350: 20 A7 20 34 32 30 00 5E 0B 7C 01 82 20 49 00 6D | . 420.^.|.. I.m|
00000360: 0B 86 01 81 20 52 B2 31 20 A4 20 35 30 00 81 0B |.... R.1 . 50...|
00000370: 90 01 8B 20 41 28 52 29 B3 B1 32 20 A7 20 34 32 |... A(R)..2 . 42|
00000380: 30 00 91 0B 9A 01 82 20 52 3A 20 4F A4 20 38 35 |0...... R: O. 85|
00000390: 30 00 B7 0B A4 01 8B 20 41 28 52 29 B2 31 20 A7 |0...... A(R).1 .|
000003A0: 20 99 20 22 54 52 59 20 54 48 49 53 20 4F 4E 45 | . "TRY THIS ONE|
000003B0: 20 41 47 41 49 4E 22 00 C7 0B AE 01 8B 20 58 B2 | AGAIN"...... X.|
000003C0: 31 20 A7 20 35 34 30 00 E9 0B B8 01 8F 20 53 45 |1 . 540...... SE|
000003D0: 43 54 49 4F 4E 20 46 4F 52 20 46 49 4C 4C 20 49 |CTION FOR FILL I|
000003E0: 4E 20 41 4E 53 57 45 52 53 00 F9 0B C2 01 8B 20 |N ANSWERS...... |
000003F0: 59 B2 32 20 A7 20 34 39 30 00 06 0C CC 01 41 24 |Y.2 . 490.....A$|
00000400: B2 43 24 28 52 29 00 24 0C D6 01 99 22 43 41 50 |.C$(R).$...."CAP|
00000410: 49 54 41 4C 20 4F 46 20 22 3B 53 24 28 52 29 3B |ITAL OF ";S$(R);|
00000420: 22 20 22 3B 00 2E 0C E0 01 89 20 35 31 30 00 3B |" ";...... 510.;|
00000430: 0C EA 01 41 24 B2 53 24 28 52 29 00 5A 0C F4 01 |...A$.S$(R).Z...|
00000440: 99 20 43 24 28 52 29 3B 22 20 2D 3E 20 43 41 50 |. C$(R);" -> CAP|
00000450: 49 54 41 4C 20 4F 46 20 22 3B 00 63 0C FE 01 85 |ITAL OF ";.c....|
00000460: 20 5A 24 00 77 0C 08 02 8B 20 C3 28 5A 24 29 B2 | Z$.w.... .(Z$).|
00000470: 31 20 A7 20 38 33 30 00 94 0C 12 02 8B 20 5A 24 |1 . 830...... Z$|
00000480: B2 41 24 A7 89 20 37 38 30 20 45 4C 53 45 20 89 |.A$.. 780 ELSE .|
00000490: 20 37 37 30 00 B2 0C 1C 02 8F 20 4D 55 4C 54 49 | 770...... MULTI|
000004A0: 50 4C 45 20 43 48 4F 49 43 45 20 53 45 43 54 49 |PLE CHOICE SECTI|
000004B0: 4F 4E 00 D5 0C 26 02 8F 20 56 41 4C 55 45 20 4F |ON...&.. VALUE O|
000004C0: 46 20 43 20 49 53 20 43 4F 52 52 45 43 54 20 41 |F C IS CORRECT A|
000004D0: 4E 53 57 45 52 00 E7 0C 30 02 43 B2 B5 28 BB 28 |NSWER...0.C..(.(|
000004E0: 31 29 AC 34 29 AA 31 00 0B 0D 3A 02 8F 20 50 49 |1).4).1...:.. PI|
000004F0: 43 4B 20 34 20 53 54 41 54 45 53 20 46 4F 52 20 |CK 4 STATES FOR |
00000500: 54 48 45 20 43 48 4F 49 43 45 53 00 19 0D 44 02 |THE CHOICES...D.|
00000510: 81 20 49 B2 31 20 A4 20 34 00 2F 0D 4E 02 42 28 |. I.1 . 4./.N.B(|
00000520: 49 29 B2 B5 28 BB 28 31 29 AC 35 30 29 AA 31 00 |I)..(.(1).50).1.|
00000530: 37 0D 58 02 82 20 49 00 42 0D 62 02 42 28 43 29 |7.X.. I.B.b.B(C)|
00000540: B2 52 00 70 0D 6C 02 8B 20 42 28 31 29 B2 42 28 |.R.p.l.. B(1).B(|
00000550: 32 29 20 B0 20 42 28 31 29 B2 42 28 33 29 20 B0 |2) . B(1).B(3) .|
00000560: 20 42 28 31 29 B2 42 28 34 29 20 A7 20 35 38 30 | B(1).B(4) . 580|
00000570: 00 9E 0D 76 02 8B 20 42 28 32 29 B2 42 28 33 29 |...v.. B(2).B(3)|
00000580: 20 B0 20 42 28 32 29 B2 42 28 34 29 20 B0 20 42 | . B(2).B(4) . B|
00000590: 28 33 29 B2 42 28 34 29 20 A7 20 35 38 30 00 AE |(3).B(4) . 580..|
000005A0: 0D 80 02 8B 20 59 B2 32 20 A7 20 37 30 30 00 C6 |.... Y.2 . 700..|
000005B0: 0D 8A 02 8F 20 50 52 49 4E 54 20 43 41 50 20 43 |.... PRINT CAP C|
000005C0: 48 4F 49 43 45 53 00 EE 0D 94 02 99 22 31 2E 20 |HOICES......"1. |
000005D0: 22 3B 43 24 28 42 28 31 29 29 3B A3 32 30 29 3B |";C$(B(1));.20);|
000005E0: 22 33 2E 20 22 3B 43 24 28 42 28 33 29 29 00 16 |"3. ";C$(B(3))..|
000005F0: 0E 9E 02 99 22 32 2E 20 22 3B 43 24 28 42 28 32 |...."2. ";C$(B(2|
00000600: 29 29 3B A3 32 30 29 3B 22 34 2E 20 22 3B 43 24 |));.20);"4. ";C$|
00000610: 28 42 28 34 29 29 00 3B 0E A8 02 99 22 54 48 45 |(B(4)).;...."THE|
00000620: 20 43 41 50 49 54 41 4C 20 4F 46 20 22 3B 53 24 | CAPITAL OF ";S$|
00000630: 28 52 29 3B 22 20 49 53 20 22 3B 00 45 0E B2 02 |(R);" IS ";.E...|
00000640: 89 20 37 34 30 00 5F 0E BC 02 8F 20 50 52 49 4E |. 740._.... PRIN|
00000650: 54 20 53 54 41 54 45 20 43 48 4F 49 43 45 53 00 |T STATE CHOICES.|
00000660: 87 0E C6 02 99 22 31 2E 20 22 3B 53 24 28 42 28 |....."1. ";S$(B(|
00000670: 31 29 29 3B A3 32 30 29 3B 22 33 2E 20 22 3B 53 |1));.20);"3. ";S|
00000680: 24 28 42 28 33 29 29 00 AF 0E D0 02 99 22 32 2E |$(B(3))......"2.|
00000690: 20 22 3B 53 24 28 42 28 32 29 29 3B A3 32 30 29 | ";S$(B(2));.20)|
000006A0: 3B 22 34 2E 20 22 3B 53 24 28 42 28 34 29 29 00 |;"4. ";S$(B(4)).|
000006B0: D1 0E DA 02 99 43 24 28 52 29 3B 22 20 49 53 20 |.....C$(R);" IS |
000006C0: 54 48 45 20 43 41 50 49 54 41 4C 20 4F 46 20 22 |THE CAPITAL OF "|
000006D0: 3B 00 E3 0E E4 02 85 20 5A 3A 5A B2 B5 28 B6 28 |;...... Z:Z..(.(|
000006E0: 5A 29 29 00 F9 0E EE 02 8B 20 5A B3 31 20 B0 20 |Z))...... Z.1 . |
000006F0: 5A B1 34 20 A7 20 38 33 30 00 09 0F F8 02 8B 20 |Z.4 . 830...... |
00000700: 5A B2 43 20 A7 20 37 38 30 00 23 0F 02 03 41 28 |Z.C . 780.#...A(|
00000710: 52 29 B2 31 3A 99 22 57 52 4F 4E 47 22 3A 89 20 |R).1:."WRONG":. |
00000720: 38 30 30 00 35 0F 0C 03 41 28 52 29 B2 32 3A 20 |800.5...A(R).2: |
00000730: 4E B2 4E AA 31 00 5B 0F 16 03 99 22 52 49 47 48 |N.N.1.[...."RIGH|
00000740: 54 20 2D 20 59 4F 55 20 48 41 56 45 20 22 3B 4E |T - YOU HAVE ";N|
00000750: 3B 22 20 43 4F 52 52 45 43 54 22 00 67 0F 20 03 |;" CORRECT".g. .|
00000760: 99 3A 47 B2 47 AA 31 00 78 0F 2A 03 8B 20 4E B3 |.:G.G.1.x.*.. N.|
00000770: 35 30 20 89 20 33 34 30 00 82 0F 34 03 89 20 38 |50 . 340...4.. 8|
00000780: 37 30 00 A2 0F 3E 03 85 20 22 44 4F 20 59 4F 55 |70...>.. "DO YOU|
00000790: 20 57 41 4E 54 20 54 4F 20 53 54 4F 50 20 22 3B | WANT TO STOP ";|
000007A0: 5A 24 00 BA 0F 48 03 8B 20 C8 28 5A 24 2C 31 29 |Z$...H.. .(Z$,1)|
000007B0: B2 22 59 22 20 A7 20 38 37 30 00 E1 0F 52 03 99 |."Y" . 870...R..|
000007C0: 22 59 4F 55 52 20 41 4E 53 57 45 52 20 46 4F 52 |"YOUR ANSWER FOR|
000007D0: 20 4C 41 53 54 20 51 55 45 53 54 49 4F 4E 20 22 | LAST QUESTION "|
000007E0: 3B 00 F3 0F 5C 03 91 20 58 20 89 20 37 34 30 2C |;...\.. X . 740,|
000007F0: 35 31 30 00 F9 0F 66 03 99 00 25 10 70 03 99 22 |510...f...%.p.."|
00000800: 59 4F 55 20 47 4F 54 20 22 3B 4E 3B 22 20 52 49 |YOU GOT ";N;" RI|
00000810: 47 48 54 20 49 4E 20 22 3B 47 3B 22 20 47 55 45 |GHT IN ";G;" GUE|
00000820: 53 53 45 53 22 00 42 10 7A 03 85 22 57 41 4E 54 |SSES".B.z.."WANT|
00000830: 20 54 4F 20 54 52 59 20 41 47 41 49 4E 20 22 3B | TO TRY AGAIN ";|
00000840: 5A 24 00 5E 10 84 03 8B 20 C8 28 5A 24 2C 31 29 |Z$.^.... .(Z$,1)|
00000850: B2 22 59 22 20 A7 20 99 3A 89 20 31 36 30 00 64 |."Y" . .:. 160.d|
00000860: 10 8E 03 90 00 8B 10 98 03 83 20 41 4C 41 42 41 |.......... ALABA|
00000870: 4D 41 2C 4D 4F 4E 54 47 4F 4D 45 52 59 2C 41 4C |MA,MONTGOMERY,AL|
00000880: 41 53 4B 41 2C 4A 55 4E 45 41 55 00 B6 10 A2 03 |ASKA,JUNEAU.....|
00000890: 83 20 41 52 49 5A 4F 4E 41 2C 50 48 4F 45 4E 49 |. ARIZONA,PHOENI|
000008A0: 58 2C 41 52 4B 41 4E 53 41 53 2C 4C 49 54 54 4C |X,ARKANSAS,LITTL|
000008B0: 45 20 52 4F 43 4B 00 E2 10 AC 03 83 20 43 41 4C |E ROCK...... CAL|
000008C0: 49 46 4F 52 4E 49 41 2C 53 41 43 52 41 4D 45 4E |IFORNIA,SACRAMEN|
000008D0: 54 4F 2C 43 4F 4C 4F 52 41 44 4F 2C 44 45 4E 56 |TO,COLORADO,DENV|
000008E0: 45 52 00 2F 11 B6 03 83 43 4F 4E 4E 45 43 54 49 |ER./....CONNECTI|
000008F0: 43 55 54 2C 48 41 52 54 46 4F 52 44 2C 44 45 4C |CUT,HARTFORD,DEL|
00000900: 41 57 41 52 45 2C 44 4F 56 45 52 2C 46 4C 4F 52 |AWARE,DOVER,FLOR|
00000910: 49 44 41 2C 54 41 4C 4C 41 48 41 53 53 45 45 2C |IDA,TALLAHASSEE,|
00000920: 47 45 4F 52 47 49 41 2C 41 54 4C 41 4E 54 41 00 |GEORGIA,ATLANTA.|
00000930: 7B 11 C0 03 83 20 48 41 57 41 49 49 2C 48 4F 4E |{.... HAWAII,HON|
00000940: 4F 4C 55 4C 55 2C 49 44 41 48 4F 2C 42 4F 49 53 |OLULU,IDAHO,BOIS|
00000950: 45 2C 49 4C 4C 49 4E 4F 49 53 2C 53 50 52 49 4E |E,ILLINOIS,SPRIN|
00000960: 47 46 49 45 4C 44 2C 49 4E 44 49 41 4E 41 2C 49 |GFIELD,INDIANA,I|
00000970: 4E 44 49 41 4E 41 50 4F 4C 49 53 00 C8 11 CA 03 |NDIANAPOLIS.....|
00000980: 83 20 49 4F 57 41 2C 44 45 53 20 4D 4F 49 4E 45 |. IOWA,DES MOINE|
00000990: 53 2C 4B 41 4E 53 41 53 2C 54 4F 50 45 4B 41 2C |S,KANSAS,TOPEKA,|
000009A0: 4B 45 4E 54 55 43 4B 59 2C 46 52 41 4E 4B 46 4F |KENTUCKY,FRANKFO|
000009B0: 52 54 2C 4C 4F 55 49 53 49 41 4E 41 2C 42 41 54 |RT,LOUISIANA,BAT|
000009C0: 4F 4E 20 52 4F 55 47 45 00 15 12 D4 03 83 20 4D |ON ROUGE...... M|
000009D0: 41 49 4E 45 2C 41 55 47 55 53 54 41 2C 4D 41 52 |AINE,AUGUSTA,MAR|
000009E0: 59 4C 41 4E 44 2C 41 4E 4E 41 50 4F 4C 49 53 2C |YLAND,ANNAPOLIS,|
000009F0: 4D 41 53 53 41 43 48 55 53 45 54 54 53 2C 42 4F |MASSACHUSETTS,BO|
00000A00: 53 54 4F 4E 2C 4D 49 43 48 49 47 41 4E 2C 4C 41 |STON,MICHIGAN,LA|
00000A10: 4E 53 49 4E 47 00 5A 12 DE 03 83 20 4D 49 4E 4E |NSING.Z.... MINN|
00000A20: 45 53 4F 54 41 2C 53 54 2E 20 50 41 55 4C 2C 4D |ESOTA,ST. PAUL,M|
00000A30: 49 53 53 49 53 53 49 50 50 49 2C 4A 41 43 4B 53 |ISSISSIPPI,JACKS|
00000A40: 4F 4E 2C 4D 49 53 53 4F 55 52 49 2C 4A 45 46 46 |ON,MISSOURI,JEFF|
00000A50: 45 52 53 4F 4E 20 43 49 54 59 00 80 12 E8 03 83 |ERSON CITY......|
00000A60: 20 4D 4F 4E 54 41 4E 41 2C 48 45 4C 45 4E 41 2C | MONTANA,HELENA,|
00000A70: 4E 45 42 52 41 53 4B 41 2C 4C 49 4E 43 4F 4C 4E |NEBRASKA,LINCOLN|
00000A80: 00 AF 12 F2 03 83 20 4E 45 56 41 44 41 2C 43 41 |...... NEVADA,CA|
00000A90: 52 53 4F 4E 20 43 49 54 59 2C 4E 45 57 20 48 41 |RSON CITY,NEW HA|
00000AA0: 4D 50 53 48 49 52 45 2C 43 4F 4E 43 4F 52 44 00 |MPSHIRE,CONCORD.|
00000AB0: EC 12 FC 03 83 20 4E 45 57 20 4A 45 52 53 45 59 |..... NEW JERSEY|
00000AC0: 2C 54 52 45 4E 54 4F 4E 2C 4E 45 57 20 4D 45 58 |,TRENTON,NEW MEX|
00000AD0: 49 43 4F 2C 53 41 4E 54 41 20 46 45 2C 4E 45 57 |ICO,SANTA FE,NEW|
00000AE0: 20 59 4F 52 4B 2C 41 4C 42 41 4E 59 00 2D 13 06 | YORK,ALBANY.-..|
00000AF0: 04 83 20 4E 4F 52 54 48 20 43 41 52 4F 4C 49 4E |.. NORTH CAROLIN|
00000B00: 41 2C 52 41 4C 45 49 47 48 2C 4E 4F 52 54 48 20 |A,RALEIGH,NORTH |
00000B10: 44 41 4B 4F 54 41 2C 42 49 53 4D 41 52 43 4B 2C |DAKOTA,BISMARCK,|
00000B20: 4F 48 49 4F 2C 43 4F 4C 55 4D 42 55 53 00 6F 13 |OHIO,COLUMBUS.o.|
00000B30: 10 04 83 20 4F 4B 4C 41 48 4F 4D 41 2C 4F 4B 4C |... OKLAHOMA,OKL|
00000B40: 41 48 4F 4D 41 20 43 49 54 59 2C 4F 52 45 47 4F |AHOMA CITY,OREGO|
00000B50: 4E 2C 53 41 4C 45 4D 2C 50 45 4E 4E 53 59 4C 56 |N,SALEM,PENNSYLV|
00000B60: 41 4E 49 41 2C 48 41 52 52 49 53 42 55 52 47 00 |ANIA,HARRISBURG.|
00000B70: B9 13 1A 04 83 20 52 48 4F 44 45 20 49 53 4C 41 |..... RHODE ISLA|
00000B80: 4E 44 2C 50 52 4F 56 49 44 45 4E 43 45 2C 53 4F |ND,PROVIDENCE,SO|
00000B90: 55 54 48 20 43 41 52 4F 4C 49 4E 41 2C 43 4F 4C |UTH CAROLINA,COL|
00000BA0: 55 4D 42 49 41 2C 53 4F 55 54 48 20 44 41 4B 4F |UMBIA,SOUTH DAKO|
00000BB0: 54 41 2C 50 49 45 52 52 45 00 07 14 24 04 83 20 |TA,PIERRE...$.. |
00000BC0: 54 45 4E 4E 45 53 53 45 45 2C 4E 41 53 48 56 49 |TENNESSEE,NASHVI|
00000BD0: 4C 4C 45 2C 54 45 58 41 53 2C 41 55 53 54 49 4E |LLE,TEXAS,AUSTIN|
00000BE0: 2C 55 54 41 48 2C 53 41 4C 54 20 4C 41 4B 45 20 |,UTAH,SALT LAKE |
00000BF0: 43 49 54 59 2C 56 45 52 4D 4F 4E 54 2C 4D 4F 4E |CITY,VERMONT,MON|
00000C00: 54 50 45 4C 49 45 52 00 4B 14 2E 04 83 20 56 49 |TPELIER.K.... VI|
00000C10: 52 47 49 4E 49 41 2C 52 49 43 48 4D 4F 4E 44 2C |RGINIA,RICHMOND,|
00000C20: 57 41 53 48 49 4E 47 54 4F 4E 2C 4F 4C 59 4D 50 |WASHINGTON,OLYMP|
00000C30: 49 41 2C 57 45 53 54 20 56 49 52 47 49 4E 49 41 |IA,WEST VIRGINIA|
00000C40: 2C 43 48 41 52 4C 45 53 54 4F 4E 00 74 14 38 04 |,CHARLESTON.t.8.|
00000C50: 83 20 57 49 53 43 4F 4E 53 49 4E 2C 4D 41 44 49 |. WISCONSIN,MADI|
00000C60: 53 4F 4E 2C 57 59 4F 4D 49 4E 47 2C 43 48 45 59 |SON,WYOMING,CHEY|
00000C70: 45 4E 4E 45 00 7A 14 42 04 80 00 00 00 |ENNE.z.B..... |
..A....53280,0:.53281,0:E.31744:."."G(14
2):. C64 MODS BY WIM '83.`.D.. STATES A
ND CAPITALS QUIZ..N.. DAVE ALVERSON JUL
Y, 1977...X.. A(50),B(4),C$(50),S$(50)..
.... I.1 . 50...... S$(I),C$(I).G.... I.
.. .. I.1 . 50:A(I).0:. I:G.0:N.0......"
...YOU HAVE YOUR CHOICE OF FILL IN".-...
."OR MULTIPLE CHOICE".U.... "WANT TO FIL
L-IN THE ANSWERS ";Z$.M.H.. H(Z$,1)."Y"
. 250...R.."MULTIPLE CHOICE: ANSWER EACH
QUESTION"...... "WITH 1,2,3, OR 4"....
.X.1:."TO STOP TYPE 0 FOR YOUR ANSWER"..
.... 280......".FILL IN: YOU MUST SPELL
EXACTLY ".3...."(SAINT IS ABBREVIATED ST
.)".X...X.2:."TO STOP TYPE S FOR ANSWER"
......".YOU HAVE YOUR CHOICE OF WHETHER
THE"...".."STATE OR THE CAPITAL IS ASKED
".U.,.. "WANT TO ANSWER WITH THE CAPITAL
";Z$...6.Y.2...@.. H(Z$,1)."Y" . Y.1...
J..".": . RANDOMIZE...T.. PICK A STATE.
/.^.. I. 1 . 10.B.H.R..(.(1).50).1.V.R..
A(R)..2 . 420.^.|.. I.M.... R.1 . 50...
... A(R)..2 . 420...... R: O. 850......
A(R).1 . . "TRY THIS ONE AGAIN".G.... X.
1 . 540...... SECTION FOR FILL IN ANSWER
S...B.. Y.2 . 490...L.A$.C$(R).$.V.."CAP
ITAL OF ";S$(R);" ";...... 510.;...A$.S$
(R).Z.... C$(R);" -> CAPITAL OF ";.C....
Z$.W.... C(Z$).1 . 830...... Z$.A$.. 78
0 ELSE . 770...... MULTIPLE CHOICE SECTI
ON.U.&.. VALUE OF C IS CORRECT ANSWER...
0.C..(.(1).4).1...:.. PICK 4 STATES FOR
THE CHOICES...D.. I.1 . 4./.N.B(I)..(.(1
).50).1.7.X.. I.B.B.B(C).R.P.L.. B(1).B(
2) . B(1).B(3) . B(1).B(4) . 580...V.. B
(2).B(3) . B(2).B(4) . B(3).B(4) . 580..
.... Y.2 . 700.F.... PRINT CAP CHOICES..
...."1. ";C$(B(1));.20);"3. ";C$(B(3))..
...."2. ";C$(B(2));.20);"4. ";C$(B(4)).;
...."THE CAPITAL OF ";S$(R);" IS ";.E...
. 740._.... PRINT STATE CHOICES...F.."1.
";S$(B(1));.20);"3. ";S$(B(3))...P.."2.
";S$(B(2));.20);"4. ";S$(B(4)).Q.Z..C$(
R);" IS THE CAPITAL OF ";...... Z:Z..(.(
Z))...... Z.1 . Z.4 . 830...... Z.C . 78
0.#...A(R).1:."WRONG":. 800.5...A(R).2:
N.N.1.[...."RIGHT - YOU HAVE ";N;" CORRE
CT".G. ..:G.G.1.X.*.. N.50 . 340...4.. 8
70...>.. "DO YOU WANT TO STOP ";Z$...H..
H(Z$,1)."Y" . 870...R.."YOUR ANSWER FOR
LAST QUESTION ";...\.. X . 740,510...F.
..%.P.."YOU GOT ";N;" RIGHT IN ";G;" GUE
SSES".B.Z.."WANT TO TRY AGAIN ";Z$.^....
H(Z$,1)."Y" . .:. 160.D.......... ALABA
MA,MONTGOMERY,ALASKA,JUNEAU...... ARIZON
A,PHOENIX,ARKANSAS,LITTLE ROCK...... CAL
IFORNIA,SACRAMENTO,COLORADO,DENVER./....
CONNECTICUT,HARTFORD,DELAWARE,DOVER,FLOR
IDA,TALLAHASSEE,GEORGIA,ATLANTA.{.... HA
WAII,HONOLULU,IDAHO,BOISE,ILLINOIS,SPRIN
GFIELD,INDIANA,INDIANAPOLIS.H.J.. IOWA,D
ES MOINES,KANSAS,TOPEKA,KENTUCKY,FRANKFO
RT,LOUISIANA,BATON ROUGE...T.. MAINE,AUG
USTA,MARYLAND,ANNAPOLIS,MASSACHUSETTS,BO
STON,MICHIGAN,LANSING.Z.... MINNESOTA,ST
. PAUL,MISSISSIPPI,JACKSON,MISSOURI,JEFF
ERSON CITY...... MONTANA,HELENA,NEBRASKA
,LINCOLN...... NEVADA,CARSON CITY,NEW HA
MPSHIRE,CONCORD...... NEW JERSEY,TRENTON
,NEW MEXICO,SANTA FE,NEW YORK,ALBANY.-..
.. NORTH CAROLINA,RALEIGH,NORTH DAKOTA,B
ISMARCK,OHIO,COLUMBUS.O.... OKLAHOMA,OKL
AHOMA CITY,OREGON,SALEM,PENNSYLVANIA,HAR
RISBURG...... RHODE ISLAND,PROVIDENCE,SO
UTH CAROLINA,COLUMBIA,SOUTH DAKOTA,PIERR
E...$.. TENNESSEE,NASHVILLE,TEXAS,AUSTIN
,UTAH,SALT LAKE CITY,VERMONT,MONTPELIER.
K.... VIRGINIA,RICHMOND,WASHINGTON,OLYMP
IA,WEST VIRGINIA,CHARLESTON.T.8.. WISCON
SIN,MADISON,WYOMING,CHEYENNE.Z.B.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL