_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

STATES

FILE INFORMATION

FILENAME(S): STATES

FILE TYPE(S): PRG

FILE SIZE: 4.1K

FIRST SEEN: 2025-11-30 21:23:56

APPEARS ON: 1 disk(s)

FILE HASH

4be2572f37e08dd98699b67773d6c5bdc3191bd6150f5010e7bc3577c597435a

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 31 1 STATES PRG DuncanTwain 17 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 22 08 73 00 4D 58  B2 35 31 3A 8F 20 54 4F  |..".s.MX.51:. TO|
00000010: 54 41 4C 20 53 54 41 54  45 53 2F 43 41 50 49 54  |TAL STATES/CAPIT|
00000020: 41 4C 00 41 08 78 00 86  20 41 28 4D 58 29 2C 42  |AL.A.x.. A(MX),B|
00000030: 28 34 29 2C 43 24 28 4D  58 29 2C 53 24 28 4D 58  |(4),C$(MX),S$(MX|
00000040: 29 00 62 08 82 00 8F 20  53 45 54 20 55 50 20 53  |).b.... SET UP S|
00000050: 54 41 54 45 2F 43 41 50  49 54 41 4C 20 41 52 52  |TATE/CAPITAL ARR|
00000060: 41 59 00 80 08 8C 00 81  20 49 B2 31 A4 4D 58 3A  |AY...... I.1.MX:|
00000070: 87 20 53 24 28 49 29 2C  43 24 28 49 29 3A 82 49  |. S$(I),C$(I):.I|
00000080: 00 9F 08 A0 00 81 20 49  B2 31 A4 4D 58 3A 41 28  |...... I.1.MX:A(|
00000090: 49 29 B2 30 3A 82 49 3A  47 B2 30 3A 4E B2 30 00  |I).0:.I:G.0:N.0.|
000000A0: B5 08 A3 00 97 35 33 32  38 31 2C 32 3A 97 35 33  |.....53281,2:.53|
000000B0: 32 38 30 2C 36 00 E0 08  A5 00 99 22 93 11 1D 1D  |280,6......"....|
000000C0: 1D 1D 1D 1D 1D 05 2A 2A  2A 53 54 41 54 45 53 20  |......***STATES |
000000D0: 41 4E 44 20 43 41 50 49  54 41 4C 53 2A 2A 2A 22  |AND CAPITALS***"|
000000E0: 00 10 09 AA 00 99 22 11  11 11 20 20 20 54 48 49  |......"...   THI|
000000F0: 53 20 49 53 20 41 20 47  41 4D 45 20 57 48 45 52  |S IS A GAME WHER|
00000100: 45 20 59 4F 55 20 41 52  45 20 41 53 4B 45 44 22  |E YOU ARE ASKED"|
00000110: 00 38 09 AC 00 99 22 11  20 20 20 20 20 20 20 20  |.8....".        |
00000120: 20 54 4F 20 4D 41 54 43  48 20 55 50 20 54 48 45  | TO MATCH UP THE|
00000130: 20 50 52 4F 50 45 52 22  00 5F 09 AD 00 99 22 11  | PROPER"._....".|
00000140: 20 20 20 20 20 20 20 20  20 20 53 54 41 54 45 53  |          STATES|
00000150: 20 41 4E 44 20 43 41 50  49 54 41 4C 53 2E 22 00  | AND CAPITALS.".|
00000160: 84 09 B0 00 99 22 11 11  11 11 53 45 4C 45 43 54  |....."....SELECT|
00000170: 20 59 4F 55 52 20 54 59  50 45 20 4F 46 20 47 41  | YOUR TYPE OF GA|
00000180: 4D 45 2E 22 00 AB 09 B1  00 99 22 11 31 20 2D 20  |ME."......".1 - |
00000190: 4D 55 4C 54 49 50 4C 45  20 43 48 4F 49 43 45 20  |MULTIPLE CHOICE |
000001A0: 51 55 45 53 54 49 4F 4E  53 2E 22 00 CB 09 B2 00  |QUESTIONS.".....|
000001B0: 99 22 11 32 20 2D 20 46  49 4C 4C 2D 49 4E 20 54  |.".2 - FILL-IN T|
000001C0: 48 45 20 42 4C 41 4E 4B  53 2E 22 00 E1 09 B4 00  |HE BLANKS.".....|
000001D0: A1 5A 24 3A 8B 20 5A 24  B2 22 22 20 A7 20 31 38  |.Z$:. Z$."" . 18|
000001E0: 30 00 F4 09 BE 00 8B 20  5A 24 B2 22 32 22 20 A7  |0...... Z$."2" .|
000001F0: 20 32 33 30 00 08 0A C3  00 8B 20 5A 24 B3 B1 22  | 230...... Z$.."|
00000200: 31 22 20 A7 20 31 38 30  00 30 0A C8 00 99 22 93  |1" . 180.0....".|
00000210: 1D 1D 1D 1D 1D 1D 1D 1D  2A 2A 2A 20 4D 55 4C 54  |........*** MULT|
00000220: 49 50 4C 45 20 43 48 4F  49 43 45 20 2A 2A 2A 22  |IPLE CHOICE ***"|
00000230: 00 5D 0A C9 00 99 22 11  11 41 4E 53 57 45 52 20  |.]...."..ANSWER |
00000240: 54 48 45 20 51 55 45 53  54 49 4F 4E 53 20 41 53  |THE QUESTIONS AS|
00000250: 20 31 2C 32 2C 33 20 4F  52 20 34 2E 22 00 90 0A  | 1,2,3 OR 4."...|
00000260: D2 00 58 B2 31 3A 99 22  11 54 4F 20 53 54 4F 50  |..X.1:.".TO STOP|
00000270: 20 54 48 45 20 47 41 4D  45 2C 20 41 4E 53 57 45  | THE GAME, ANSWE|
00000280: 52 20 57 49 54 48 20 30  2E 22 3A 89 20 32 35 30  |R WITH 0.":. 250|
00000290: 00 B4 0A E6 00 99 22 93  1D 1D 1D 1D 1D 1D 1D 1D  |......".........|
000002A0: 1D 1D 1D 1D 2A 2A 2A 20  46 49 4C 4C 2D 49 4E 20  |....*** FILL-IN |
000002B0: 2A 2A 2A 22 00 DE 0A E7  00 99 22 11 11 59 4F 55  |***"......"..YOU|
000002C0: 20 4D 55 53 54 20 53 50  45 4C 4C 20 54 48 45 20  | MUST SPELL THE |
000002D0: 57 4F 52 44 20 45 58 41  43 54 4C 59 2E 22 00 10  |WORD EXACTLY."..|
000002E0: 0B E8 00 99 22 11 49 46  20 54 48 45 20 57 4F 52  |....".IF THE WOR|
000002F0: 44 20 42 45 47 49 4E 53  20 57 49 54 48 20 12 53  |D BEGINS WITH .S|
00000300: 41 49 4E 54 92 20 55 53  45 20 12 53 54 92 2E 22  |AINT. USE .ST.."|
00000310: 00 42 0B F0 00 58 B2 32  3A 99 22 11 54 4F 20 53  |.B...X.2:.".TO S|
00000320: 54 4F 50 20 54 48 45 20  47 41 4D 45 2C 20 41 4E  |TOP THE GAME, AN|
00000330: 53 57 45 52 20 57 49 54  48 20 41 4E 20 27 30 27  |SWER WITH AN '0'|
00000340: 2E 22 00 64 0B FA 00 99  22 11 11 11 57 4F 55 4C  |.".d...."...WOUL|
00000350: 44 20 59 4F 55 20 4C 49  4B 45 20 54 4F 20 47 55  |D YOU LIKE TO GU|
00000360: 45 53 53 22 00 77 0B FF  00 99 22 11 31 20 2D 20  |ESS".w....".1 - |
00000370: 53 54 41 54 45 53 22 00  8C 0B 04 01 99 22 11 32  |STATES"......".2|
00000380: 20 2D 20 43 41 50 49 54  41 4C 53 22 00 A2 0B 09  | - CAPITALS"....|
00000390: 01 A1 5A 24 3A 8B 20 5A  24 B2 22 22 20 A7 20 32  |..Z$:. Z$."" . 2|
000003A0: 36 35 00 BF 0B 18 01 59  B2 32 3A 8B 20 5A 24 B2  |65.....Y.2:. Z$.|
000003B0: 22 32 22 20 A7 20 59 B2  31 3A 89 20 33 31 30 00  |"2" . Y.1:. 310.|
000003C0: D3 0B 1D 01 8B 20 5A 24  B3 B1 22 31 22 20 A7 20  |..... Z$.."1" . |
000003D0: 32 36 35 00 E6 0B 36 01  8F 20 50 49 43 4B 20 41  |265...6.. PICK A|
000003E0: 20 53 54 41 54 45 00 12  0C 40 01 81 20 49 B2 31  | STATE...@.. I.1|
000003F0: A4 31 30 3A 52 B2 B5 28  BB 28 31 29 AC 4D 58 29  |.10:R..(.(1).MX)|
00000400: AA 31 3A 8B 20 41 28 52  29 B3 B1 32 20 A7 20 34  |.1:. A(R)..2 . 4|
00000410: 30 30 00 19 0C 5E 01 82  49 00 3C 0C 68 01 8F 20  |00...^..I.<.h.. |
00000420: 44 4F 4E 27 54 20 57 41  53 54 45 20 54 49 4D 45  |DON'T WASTE TIME|
00000430: 20 50 49 43 4B 49 4E 47  20 4F 4E 45 00 59 0C 72  | PICKING ONE.Y.r|
00000440: 01 81 20 52 B2 31 A4 4D  58 3A 8B 20 41 28 52 29  |.. R.1.MX:. A(R)|
00000450: B3 B1 32 20 A7 20 34 30  30 00 65 0C 86 01 82 52  |..2 . 400.e....R|
00000460: 3A 89 38 35 30 00 96 0C  90 01 52 50 B2 30 3A 8B  |:.850.....RP.0:.|
00000470: 20 41 28 52 29 B2 31 20  A7 20 99 22 93 54 52 59  | A(R).1 . .".TRY|
00000480: 20 54 48 49 53 20 4F 4E  45 20 41 47 41 49 4E 2E  | THIS ONE AGAIN.|
00000490: 22 3A 52 50 B2 31 00 A6  0C 9A 01 8B 20 58 B2 31  |":RP.1...... X.1|
000004A0: 20 A7 20 35 32 30 00 C4  0C A4 01 8F 20 41 53 4B  | . 520...... ASK|
000004B0: 20 46 4F 52 20 46 49 4C  4C 2D 49 4E 20 41 4E 53  | FOR FILL-IN ANS|
000004C0: 57 45 52 53 00 DA 0C AE  01 8D 20 39 33 35 3A 8B  |WERS...... 935:.|
000004D0: 20 59 B2 32 20 A7 20 34  37 30 00 E7 0C B8 01 41  | Y.2 . 470.....A|
000004E0: 24 B2 43 24 28 52 29 00  19 0D C2 01 99 22 57 48  |$.C$(R)......"WH|
000004F0: 41 54 20 49 53 20 54 48  45 20 43 41 50 49 54 41  |AT IS THE CAPITA|
00000500: 4C 20 4F 46 20 12 22 3B  53 24 28 52 29 3B 22 92  |L OF .";S$(R);".|
00000510: 3F 11 22 3A 89 20 34 39  30 00 54 0D D6 01 41 24  |?.":. 490.T...A$|
00000520: B2 53 24 28 52 29 3A 99  22 12 22 3B 43 24 28 52  |.S$(R):.".";C$(R|
00000530: 29 3B 22 92 20 49 53 20  54 48 45 20 43 41 50 49  |);". IS THE CAPI|
00000540: 54 41 4C 20 4F 46 20 57  48 41 54 20 53 54 41 54  |TAL OF WHAT STAT|
00000550: 45 3F 11 22 00 65 0D EA  01 85 22 A0 A0 A0 9D 9D  |E?.".e....".....|
00000560: 9D 22 3B 5A 24 00 80 0D  EF 01 8B 20 5A 24 B2 22  |.";Z$...... Z$."|
00000570: 54 22 20 A7 20 8D 20 39  37 35 3A 89 20 38 33 30  |T" . . 975:. 830|
00000580: 00 93 0D F4 01 8B 20 5A  24 B2 22 30 22 20 A7 20  |...... Z$."0" . |
00000590: 38 31 30 00 A6 0D F9 01  8B 20 5A 24 B2 22 A0 22  |810...... Z$."."|
000005A0: 20 A7 20 34 39 30 00 BA  0D FE 01 8B 20 5A 24 B2  | . 490...... Z$.|
000005B0: 41 24 20 A7 20 89 20 37  37 30 00 C4 0D 03 02 89  |A$ . . 770......|
000005C0: 20 37 36 30 00 E2 0D 08  02 8F 20 41 53 4B 20 46  | 760...... ASK F|
000005D0: 4F 52 20 4D 55 4C 54 49  50 4C 45 20 43 48 4F 49  |OR MULTIPLE CHOI|
000005E0: 43 45 00 05 0E 12 02 8F  20 54 48 45 20 56 41 4C  |CE...... THE VAL|
000005F0: 55 45 20 4F 46 20 43 20  49 53 20 54 48 45 20 41  |UE OF C IS THE A|
00000600: 4E 53 57 45 52 00 17 0E  1C 02 43 B2 B5 28 BB 28  |NSWER.....C..(.(|
00000610: 31 29 AC 34 29 AA 31 00  3B 0E 26 02 8F 20 50 49  |1).4).1.;.&.. PI|
00000620: 43 4B 20 34 20 53 54 41  54 45 53 20 46 4F 52 20  |CK 4 STATES FOR |
00000630: 54 48 45 20 43 48 4F 49  43 45 53 00 5B 0E 30 02  |THE CHOICES.[.0.|
00000640: 81 49 B2 31 A4 34 3A 42  28 49 29 B2 B5 28 BB 28  |.I.1.4:B(I)..(.(|
00000650: 31 29 AC 4D 58 29 AA 31  3A 82 49 00 66 0E 4E 02  |1).MX).1:.I.f.N.|
00000660: 42 28 43 29 B2 52 00 88  0E 58 02 8F 20 4D 41 4B  |B(C).R...X.. MAK|
00000670: 45 20 53 55 52 45 20 4E  4F 4E 45 20 41 52 45 20  |E SURE NONE ARE |
00000680: 54 48 45 20 53 41 4D 45  00 B6 0E 62 02 8B 20 42  |THE SAME...b.. B|
00000690: 28 31 29 B2 42 28 32 29  20 B0 20 42 28 31 29 B2  |(1).B(2) . B(1).|
000006A0: 42 28 33 29 20 B0 20 42  28 31 29 B2 42 28 34 29  |B(3) . B(1).B(4)|
000006B0: 20 A7 20 35 36 30 00 E4  0E 6C 02 8B 20 42 28 32  | . 560...l.. B(2|
000006C0: 29 B2 42 28 33 29 20 B0  20 42 28 32 29 B2 42 28  |).B(3) . B(2).B(|
000006D0: 34 29 20 B0 20 42 28 33  29 B2 42 28 34 29 20 A7  |4) . B(3).B(4) .|
000006E0: 20 35 36 30 00 FA 0E 76  02 8D 20 39 33 35 3A 8B  | 560...v.. 935:.|
000006F0: 20 59 B2 32 20 A7 20 36  39 30 00 16 0F 80 02 8F  | Y.2 . 690......|
00000700: 20 50 52 49 4E 54 20 43  41 50 49 54 41 4C 20 43  | PRINT CAPITAL C|
00000710: 48 4F 49 43 45 53 00 49  0F 8A 02 99 22 57 48 41  |HOICES.I...."WHA|
00000720: 54 20 49 53 20 54 48 45  20 43 41 50 49 54 41 4C  |T IS THE CAPITAL|
00000730: 20 4F 46 20 12 22 3B 53  24 28 52 29 3B 22 3F 22  | OF .";S$(R);"?"|
00000740: 3A 41 24 B2 43 24 28 52  29 00 71 0F 94 02 99 22  |:A$.C$(R).q...."|
00000750: 11 11 31 2E 22 3B 43 24  28 42 28 31 29 29 3B A3  |..1.";C$(B(1));.|
00000760: 32 30 29 3B 22 33 2E 22  3B 43 24 28 42 28 33 29  |20);"3.";C$(B(3)|
00000770: 29 00 9E 0F 9E 02 99 22  11 32 2E 22 3B 43 24 28  |)......".2.";C$(|
00000780: 42 28 32 29 29 3B A3 32  30 29 3B 22 34 2E 22 3B  |B(2));.20);"4.";|
00000790: 43 24 28 42 28 34 29 29  3A 89 20 37 33 30 00 B8  |C$(B(4)):. 730..|
000007A0: 0F B2 02 8F 20 50 52 49  4E 54 20 53 54 41 54 45  |.... PRINT STATE|
000007B0: 20 43 48 4F 49 43 45 53  00 F3 0F BC 02 99 20 22  | CHOICES...... "|
000007C0: 12 22 3B 43 24 28 52 29  3B 22 92 20 49 53 20 54  |.";C$(R);". IS T|
000007D0: 48 45 20 43 41 50 49 54  41 4C 20 4F 46 20 57 48  |HE CAPITAL OF WH|
000007E0: 41 54 20 53 54 41 54 45  3F 22 3A 41 24 B2 53 24  |AT STATE?":A$.S$|
000007F0: 28 52 29 00 1B 10 C6 02  99 22 11 11 31 2E 22 3B  |(R)......"..1.";|
00000800: 53 24 28 42 28 31 29 29  3B A3 32 30 29 3B 22 33  |S$(B(1));.20);"3|
00000810: 2E 22 3B 53 24 28 42 28  33 29 29 00 42 10 D0 02  |.";S$(B(3)).B...|
00000820: 99 22 11 32 2E 22 3B 53  24 28 42 28 32 29 29 3B  |.".2.";S$(B(2));|
00000830: A3 32 30 29 3B 22 34 2E  22 3B 53 24 28 42 28 34  |.20);"4.";S$(B(4|
00000840: 29 29 00 59 10 DA 02 A1  20 5A 24 3A 8B 20 5A 24  |)).Y.... Z$:. Z$|
00000850: B2 22 22 20 89 20 37 33  30 00 6C 10 DE 02 8B 20  |."" . 730.l.... |
00000860: 5A 24 B2 22 30 22 20 A7  20 38 31 30 00 78 10 DF  |Z$."0" . 810.x..|
00000870: 02 5A B2 C5 28 5A 24 29  00 8E 10 E4 02 8B 20 5A  |.Z..(Z$)...... Z|
00000880: B3 31 20 B0 20 5A B1 34  20 A7 20 37 33 30 00 9E  |.1 . Z.4 . 730..|
00000890: 10 EE 02 8B 20 5A B2 43  20 A7 20 37 37 30 00 CD  |.... Z.C . 770..|
000008A0: 10 F8 02 41 28 52 29 B2  31 3A 99 22 11 12 57 52  |...A(R).1:."..WR|
000008B0: 4F 4E 47 92 2C 20 49 54  20 57 41 53 20 12 22 3B  |ONG., IT WAS .";|
000008C0: 41 24 3B 22 92 2E 22 3A  89 20 37 39 30 00 DE 10  |A$;"..":. 790...|
000008D0: 02 03 41 28 52 29 B2 32  3A 4E B2 4E AA 31 00 1B  |..A(R).2:N.N.1..|
000008E0: 11 0C 03 99 22 11 12 52  49 47 48 54 92 21 2C 20  |...."..RIGHT.!, |
000008F0: 49 54 20 57 41 53 20 12  22 3B 41 24 3B 22 92 2E  |IT WAS .";A$;"..|
00000900: 22 3A 99 22 11 59 4F 55  20 48 41 56 45 22 3B 4E  |":.".YOU HAVE";N|
00000910: 3B 22 43 4F 52 52 45 43  54 2E 22 00 33 11 16 03  |;"CORRECT.".3...|
00000920: 81 20 4C B2 31 A4 31 32  30 30 3A 82 4C 3A 47 B2  |. L.1.1200:.L:G.|
00000930: 47 AA 31 00 44 11 20 03  8B 20 4E B3 4D 58 20 A7  |G.1.D. .. N.MX .|
00000940: 20 33 31 30 00 52 11 25  03 8D 39 35 30 3A 89 38  | 310.R.%..950:.8|
00000950: 37 30 00 75 11 2A 03 99  22 11 44 4F 20 59 4F 55  |70.u.*..".DO YOU|
00000960: 20 57 41 4E 54 20 54 4F  20 53 54 4F 50 3F 20 28  | WANT TO STOP? (|
00000970: 59 2F 4E 29 22 00 8B 11  2F 03 A1 5A 24 3A 8B 20  |Y/N)".../..Z$:. |
00000980: 5A 24 B2 22 22 20 A7 20  38 31 35 00 A1 11 34 03  |Z$."" . 815...4.|
00000990: 8B 5A 24 B2 22 59 22 A7  8D 39 35 30 3A 89 38 37  |.Z$."Y"..950:.87|
000009A0: 30 00 B5 11 39 03 8B 20  5A 24 B3 B1 22 4E 22 20  |0...9.. Z$.."N" |
000009B0: A7 20 38 31 35 00 BE 11  3E 03 99 22 93 22 00 E5  |. 815...>.."."..|
000009C0: 11 43 03 99 22 49 20 57  49 4C 4C 20 52 45 50 45  |.C.."I WILL REPE|
000009D0: 41 54 20 4D 59 20 51 55  45 53 54 49 4F 4E 2E 22  |AT MY QUESTION."|
000009E0: 3A 52 50 B2 31 00 F7 11  48 03 91 20 58 20 89 20  |:RP.1...H.. X . |
000009F0: 36 33 30 2C 34 33 30 00  23 12 66 03 99 22 11 11  |630,430.#.f.."..|
00000A00: 57 4F 55 4C 44 20 59 4F  55 20 4C 49 4B 45 20 54  |WOULD YOU LIKE T|
00000A10: 4F 20 54 52 59 20 41 47  41 49 4E 3F 20 28 59 2F  |O TRY AGAIN? (Y/|
00000A20: 4E 29 22 00 39 12 6B 03  A1 5A 24 3A 8B 20 5A 24  |N)".9.k..Z$:. Z$|
00000A30: B2 22 22 20 A7 20 38 37  35 00 54 12 70 03 8B 20  |."" . 875.T.p.. |
00000A40: 5A 24 B2 22 59 22 20 A7  20 99 22 93 22 3A 20 89  |Z$."Y" . .".": .|
00000A50: 20 31 36 30 00 68 12 71  03 8B 20 5A 24 B3 B1 22  | 160.h.q.. Z$.."|
00000A60: 4E 22 20 A7 20 38 37 35  00 8E 12 72 03 99 20 22  |N" . 875...r.. "|
00000A70: 93 22 3B A3 39 29 3B 22  54 48 41 4E 4B 20 59 4F  |.";.9);"THANK YO|
00000A80: 55 20 46 4F 52 20 50 4C  41 59 49 4E 47 22 00 B1  |U FOR PLAYING"..|
00000A90: 12 73 03 99 20 A3 31 30  29 3B 22 11 12 53 54 41  |.s.. .10);"..STA|
00000AA0: 54 45 53 20 41 4E 44 20  43 41 50 49 54 41 4C 53  |TES AND CAPITALS|
00000AB0: 22 00 D4 12 75 03 97 35  33 32 38 30 2C 31 34 3A  |"...u..53280,14:|
00000AC0: 97 35 33 32 38 31 2C 36  3A 99 22 93 22 3A 89 35  |.53281,6:.".":.5|
00000AD0: 30 30 30 30 00 EB 12 A7  03 8F 20 43 48 45 43 4B  |0000...... CHECK|
00000AE0: 20 46 4F 52 20 52 45 50  45 41 54 00 03 13 AC 03  | FOR REPEAT.....|
00000AF0: 99 22 11 22 3A 8B 20 52  50 B3 B1 31 20 A7 20 99  |.".":. RP..1 . .|
00000B00: 22 93 22 00 09 13 B1 03  8E 00 1B 13 B6 03 8F 20  |"."............ |
00000B10: 50 52 49 4E 54 20 53 43  4F 52 45 00 38 13 B7 03  |PRINT SCORE.8...|
00000B20: 8B 20 4E B2 30 20 B0 20  47 B2 30 20 A7 20 50 B2  |. N.0 . G.0 . P.|
00000B30: 30 3A 20 89 20 39 35 35  00 4B 13 B8 03 50 B2 B5  |0: . 955.K...P..|
00000B40: 28 28 4E AD 47 29 AC 31  30 30 29 00 68 13 BB 03  |((N.G).100).h...|
00000B50: 99 22 93 59 4F 55 52 20  53 43 4F 52 45 20 49 53  |.".YOUR SCORE IS|
00000B60: 22 3B 50 3B 22 25 2E 22  00 93 13 C0 03 99 22 11  |";P;"%."......".|
00000B70: 59 4F 55 20 48 41 56 45  22 3B 4E 3B 22 52 49 47  |YOU HAVE";N;"RIG|
00000B80: 48 54 20 49 4E 22 3B 47  3B 22 47 55 45 53 53 45  |HT IN";G;"GUESSE|
00000B90: 53 2E 22 00 99 13 CA 03  8E 00 AA 13 E8 03 8F 20  |S."............ |
00000BA0: 2A 2A 2A 44 41 54 41 2A  2A 2A 00 F7 13 F2 03 83  |***DATA***......|
00000BB0: 41 4C 41 42 41 4D 41 2C  4D 4F 4E 54 47 4F 4D 45  |ALABAMA,MONTGOME|
00000BC0: 52 59 2C 41 4C 41 53 4B  41 2C 4A 55 4E 45 41 55  |RY,ALASKA,JUNEAU|
00000BD0: 2C 41 52 49 5A 4F 4E 41  2C 50 48 4F 45 4E 49 58  |,ARIZONA,PHOENIX|
00000BE0: 2C 41 52 4B 41 4E 53 41  53 2C 22 4C 49 54 54 4C  |,ARKANSAS,"LITTL|
00000BF0: 45 20 52 4F 43 4B 22 00  40 14 FC 03 83 43 41 4C  |E ROCK".@....CAL|
00000C00: 49 46 4F 52 4E 49 41 2C  53 41 43 52 41 4D 45 4E  |IFORNIA,SACRAMEN|
00000C10: 54 4F 2C 43 4F 4C 4F 52  41 44 4F 2C 44 45 4E 56  |TO,COLORADO,DENV|
00000C20: 45 52 2C 43 4F 4E 4E 45  43 54 49 43 55 54 2C 48  |ER,CONNECTICUT,H|
00000C30: 41 52 54 46 4F 52 44 2C  44 45 4C 41 57 41 52 45  |ARTFORD,DELAWARE|
00000C40: 00 84 14 06 04 83 44 4F  56 45 52 2C 22 44 49 53  |......DOVER,"DIS|
00000C50: 54 2E 20 4F 46 20 43 4F  4C 55 4D 2E 22 2C 57 41  |T. OF COLUM.",WA|
00000C60: 53 48 49 4E 47 54 4F 4E  2C 46 4C 4F 52 49 44 41  |SHINGTON,FLORIDA|
00000C70: 2C 54 41 4C 4C 41 48 41  53 53 45 45 2C 47 45 4F  |,TALLAHASSEE,GEO|
00000C80: 52 47 49 41 00 CA 14 10  04 83 41 54 4C 41 4E 54  |RGIA......ATLANT|
00000C90: 41 2C 48 41 57 41 49 49  2C 48 4F 4E 4F 4C 55 4C  |A,HAWAII,HONOLUL|
00000CA0: 55 2C 49 44 41 48 4F 2C  42 4F 49 53 45 2C 49 4C  |U,IDAHO,BOISE,IL|
00000CB0: 4C 49 4E 4F 49 53 2C 53  50 52 49 4E 47 46 49 45  |LINOIS,SPRINGFIE|
00000CC0: 4C 44 2C 49 4E 44 49 41  4E 41 00 0F 15 1A 04 83  |LD,INDIANA......|
00000CD0: 49 4E 44 49 41 4E 41 50  4F 4C 49 53 2C 49 4F 57  |INDIANAPOLIS,IOW|
00000CE0: 41 2C 22 44 45 53 20 4D  4F 49 4E 45 53 22 2C 4B  |A,"DES MOINES",K|
00000CF0: 41 4E 53 41 53 2C 54 4F  50 45 4B 41 2C 4B 45 4E  |ANSAS,TOPEKA,KEN|
00000D00: 54 55 43 4B 59 2C 46 52  41 4E 4B 46 4F 52 54 00  |TUCKY,FRANKFORT.|
00000D10: 5B 15 24 04 83 4C 4F 55  49 53 49 41 4E 41 2C 22  |[.$..LOUISIANA,"|
00000D20: 42 41 54 4F 4E 20 52 4F  55 47 45 22 2C 4D 41 49  |BATON ROUGE",MAI|
00000D30: 4E 45 2C 41 55 47 55 53  54 41 2C 4D 41 52 59 4C  |NE,AUGUSTA,MARYL|
00000D40: 41 4E 44 2C 41 4E 4E 41  50 4F 4C 49 53 2C 4D 41  |AND,ANNAPOLIS,MA|
00000D50: 53 53 41 43 48 55 53 45  54 54 53 00 A0 15 2E 04  |SSACHUSETTS.....|
00000D60: 83 42 4F 53 54 4F 4E 2C  4D 49 43 48 49 47 41 4E  |.BOSTON,MICHIGAN|
00000D70: 2C 4C 41 4E 53 49 4E 47  2C 4D 49 4E 4E 45 53 4F  |,LANSING,MINNESO|
00000D80: 54 41 2C 22 53 54 20 50  41 55 4C 22 2C 4D 49 53  |TA,"ST PAUL",MIS|
00000D90: 53 49 53 53 49 50 50 49  2C 4A 41 43 4B 53 4F 4E  |SISSIPPI,JACKSON|
00000DA0: 00 E6 15 38 04 83 4D 49  53 53 4F 55 52 49 2C 22  |...8..MISSOURI,"|
00000DB0: 4A 45 46 46 45 52 53 4F  4E 20 43 49 54 59 22 2C  |JEFFERSON CITY",|
00000DC0: 4D 4F 4E 54 41 4E 41 2C  48 45 4C 45 4E 41 2C 4E  |MONTANA,HELENA,N|
00000DD0: 45 42 52 41 53 4B 41 2C  4C 49 4E 43 4F 4C 4E 2C  |EBRASKA,LINCOLN,|
00000DE0: 4E 45 56 41 44 41 00 33  16 42 04 83 22 43 41 52  |NEVADA.3.B.."CAR|
00000DF0: 53 4F 4E 20 43 49 54 59  22 2C 22 4E 45 57 20 48  |SON CITY","NEW H|
00000E00: 41 4D 50 53 48 49 52 45  22 2C 43 4F 4E 43 4F 52  |AMPSHIRE",CONCOR|
00000E10: 44 2C 22 4E 45 57 20 4A  45 52 53 45 59 22 2C 54  |D,"NEW JERSEY",T|
00000E20: 52 45 4E 54 4F 4E 2C 22  4E 45 57 20 4D 45 58 49  |RENTON,"NEW MEXI|
00000E30: 43 4F 22 00 6E 16 4C 04  83 22 53 41 4E 54 41 20  |CO".n.L.."SANTA |
00000E40: 46 45 22 2C 22 4E 45 57  20 59 4F 52 4B 22 2C 41  |FE","NEW YORK",A|
00000E50: 4C 42 41 4E 59 2C 22 4E  4F 52 54 48 20 43 41 52  |LBANY,"NORTH CAR|
00000E60: 4F 4C 49 4E 41 22 2C 52  41 4C 45 49 47 48 00 99  |OLINA",RALEIGH..|
00000E70: 16 51 04 83 22 4E 4F 52  54 48 20 44 41 4B 4F 54  |.Q.."NORTH DAKOT|
00000E80: 41 22 2C 42 49 53 4D 41  52 43 4B 2C 4F 48 49 4F  |A",BISMARCK,OHIO|
00000E90: 2C 43 4F 4C 55 4D 42 55  53 00 DC 16 56 04 83 4F  |,COLUMBUS...V..O|
00000EA0: 4B 4C 41 48 4F 4D 41 2C  22 4F 4B 4C 41 48 4F 4D  |KLAHOMA,"OKLAHOM|
00000EB0: 41 20 43 49 54 59 22 2C  4F 52 45 47 4F 4E 2C 53  |A CITY",OREGON,S|
00000EC0: 41 4C 45 4D 2C 50 45 4E  4E 53 59 4C 56 41 4E 49  |ALEM,PENNSYLVANI|
00000ED0: 41 2C 48 41 52 52 49 53  42 55 52 47 00 24 17 60  |A,HARRISBURG.$.`|
00000EE0: 04 83 22 52 48 4F 44 45  20 49 53 4C 41 4E 44 22  |.."RHODE ISLAND"|
00000EF0: 2C 50 52 4F 56 49 44 45  4E 43 45 2C 22 53 4F 55  |,PROVIDENCE,"SOU|
00000F00: 54 48 20 43 41 52 4F 4C  49 4E 41 22 2C 43 4F 4C  |TH CAROLINA",COL|
00000F10: 55 4D 42 49 41 2C 22 53  4F 55 54 48 20 44 41 4B  |UMBIA,"SOUTH DAK|
00000F20: 4F 54 41 22 00 6F 17 6A  04 83 50 49 45 52 52 45  |OTA".o.j..PIERRE|
00000F30: 2C 54 45 4E 4E 45 53 53  45 45 2C 4E 41 53 48 56  |,TENNESSEE,NASHV|
00000F40: 49 4C 4C 45 2C 54 45 58  41 53 2C 41 55 53 54 49  |ILLE,TEXAS,AUSTI|
00000F50: 4E 2C 55 54 41 48 2C 22  53 41 4C 54 20 4C 41 4B  |N,UTAH,"SALT LAK|
00000F60: 45 20 43 49 54 59 22 2C  56 45 52 4D 4F 4E 54 00  |E CITY",VERMONT.|
00000F70: B4 17 74 04 83 4D 4F 4E  54 50 45 4C 49 45 52 2C  |..t..MONTPELIER,|
00000F80: 56 49 52 47 49 4E 49 41  2C 52 49 43 48 4D 4F 4E  |VIRGINIA,RICHMON|
00000F90: 44 2C 57 41 53 48 49 4E  47 54 4F 4E 2C 4F 4C 59  |D,WASHINGTON,OLY|
00000FA0: 4D 50 49 41 2C 22 57 45  53 54 20 56 49 52 47 49  |MPIA,"WEST VIRGI|
00000FB0: 4E 49 41 22 00 E7 17 7E  04 83 43 48 41 52 4C 45  |NIA"...~..CHARLE|
00000FC0: 53 54 4F 4E 2C 57 49 53  43 4F 4E 53 49 4E 2C 4D  |STON,WISCONSIN,M|
00000FD0: 41 44 49 53 4F 4E 2C 57  59 4F 4D 49 4E 47 2C 43  |ADISON,WYOMING,C|
00000FE0: 48 45 59 45 4E 4E 45 00  25 18 50 C3 4B B2 36 33  |HEYENNE.%.P.K.63|
00000FF0: 31 3A 41 24 B2 22 43 36  34 20 50 41 4B 22 3A 97  |1:A$."C64 PAK":.|
00001000: 4B 2C 37 36 3A 97 4B AA  31 2C 32 30 37 3A 97 4B  |K,76:.K.1,207:.K|
00001010: AA 32 2C 36 35 3A 97 4B  AA 33 2C 33 36 3A 97 4B  |.2,65:.K.3,36:.K|
00001020: AA 34 2C 34 34 00 5C 18  38 C7 97 4B AA 35 2C 35  |.4,44.\.8..K.5,5|
00001030: 36 3A 97 4B AA 36 2C 31  33 3A 97 4B AA 37 2C 38  |6:.K.6,13:.K.7,8|
00001040: 32 3A 97 4B AA 38 2C 32  31 33 3A 97 4B AA 39 2C  |2:.K.8,213:.K.9,|
00001050: 31 33 3A 97 31 39 38 2C  31 30 3A 80 00 00 00 2E  |13:.198,10:.....|
..".S.MX.51:. TOTAL STATES/CAPITAL.A.X..
 A(MX),B(4),C$(MX),S$(MX).B.... SET UP S
TATE/CAPITAL ARRAY...... I.1.MX:. S$(I),
C$(I):.I... .. I.1.MX:A(I).0:.I:G.0:N.0.
.....53281,2:.53280,6......"..........**
*STATES AND CAPITALS***"......"...   THI
S IS A GAME WHERE YOU ARE ASKED".8....".
         TO MATCH UP THE PROPER"._....".
          STATES AND CAPITALS."......"..
..SELECT YOUR TYPE OF GAME."......".1 - 
MULTIPLE CHOICE QUESTIONS.".K....".2 - F
ILL-IN THE BLANKS."......Z$:. Z$."" . 18
0...... Z$."2" . 230...C.. Z$.."1" . 180
.0.H..".........*** MULTIPLE CHOICE ***"
.].I.."..ANSWER THE QUESTIONS AS 1,2,3 O
R 4."...R.X.1:.".TO STOP THE GAME, ANSWE
R WITH 0.":. 250......".............*** 
FILL-IN ***"......"..YOU MUST SPELL THE 
WORD EXACTLY."......".IF THE WORD BEGINS
 WITH .SAINT. USE .ST..".B...X.2:.".TO S
TOP THE GAME, ANSWER WITH AN '0'.".D....
"...WOULD YOU LIKE TO GUESS".W....".1 - 
STATES"......".2 - CAPITALS"......Z$:. Z
$."" . 265.....Y.2:. Z$."2" . Y.1:. 310.
S.... Z$.."1" . 265...6.. PICK A STATE..
.@.. I.1.10:R..(.(1).MX).1:. A(R)..2 . 4
00...^..I.<.H.. DON'T WASTE TIME PICKING
 ONE.Y.R.. R.1.MX:. A(R)..2 . 400.E....R
:.850.....RP.0:. A(R).1 . .".TRY THIS ON
E AGAIN.":RP.1...... X.1 . 520.D.... ASK
 FOR FILL-IN ANSWERS.Z.... 935:. Y.2 . 4
70.....A$.C$(R)...B.."WHAT IS THE CAPITA
L OF .";S$(R);".?.":. 490.T.V.A$.S$(R):.
".";C$(R);". IS THE CAPITAL OF WHAT STAT
E?.".E...."   ...";Z$...... Z$."T" . . 9
75:. 830...... Z$."0" . 810...... Z$." "
 . 490...... Z$.A$ . . 770.D.... 760....
.. ASK FOR MULTIPLE CHOICE...... THE VAL
UE OF C IS THE ANSWER.....C..(.(1).4).1.
;.&.. PICK 4 STATES FOR THE CHOICES.[.0.
.I.1.4:B(I)..(.(1).MX).1:.I.F.N.B(C).R..
.X.. MAKE SURE NONE ARE THE SAME...B.. B
(1).B(2) . B(1).B(3) . B(1).B(4) . 560..
.L.. B(2).B(3) . B(2).B(4) . B(3).B(4) .
 560...V.. 935:. Y.2 . 690...... PRINT C
APITAL CHOICES.I...."WHAT IS THE CAPITAL
 OF .";S$(R);"?":A$.C$(R).Q...."..1.";C$
(B(1));.20);"3.";C$(B(3))......".2.";C$(
B(2));.20);"4.";C$(B(4)):. 730...... PRI
NT STATE CHOICES...... ".";C$(R);". IS T
HE CAPITAL OF WHAT STATE?":A$.S$(R)...F.
."..1.";S$(B(1));.20);"3.";S$(B(3)).B.P.
.".2.";S$(B(2));.20);"4.";S$(B(4)).Y.Z..
 Z$:. Z$."" . 730.L.... Z$."0" . 810.X..
.Z.E(Z$)...... Z.1 . Z.4 . 730...... Z.C
 . 770.M...A(R).1:."..WRONG., IT WAS .";
A$;"..":. 790.....A(R).2:N.N.1......"..R
IGHT.!, IT WAS .";A$;"..":.".YOU HAVE";N
;"CORRECT.".3.... L.1.1200:.L:G.G.1.D. .
. N.MX . 310.R.%..950:.870.U.*..".DO YOU
 WANT TO STOP? (Y/N)".../..Z$:. Z$."" . 
815...4..Z$."Y"..950:.870...9.. Z$.."N" 
. 815...>.."."...C.."I WILL REPEAT MY QU
ESTION.":RP.1...H.. X . 630,430.#.F.."..
WOULD YOU LIKE TO TRY AGAIN? (Y/N)".9.K.
.Z$:. Z$."" . 875.T.P.. Z$."Y" . .".": .
 160.H.Q.. Z$.."N" . 875...R.. ".";.9);"
THANK YOU FOR PLAYING"...S.. .10);"..STA
TES AND CAPITALS".T.U..53280,14:.53281,6
:.".":.50000...... CHECK FOR REPEAT.....
.".":. RP..1 . ."."............ PRINT SC
ORE.8.... N.0 . G.0 . P.0: . 955.K...P..
((N.G).100).H....".YOUR SCORE IS";P;"%."
......".YOU HAVE";N;"RIGHT IN";G;"GUESSE
S."...J........ ***DATA***......ALABAMA,
MONTGOMERY,ALASKA,JUNEAU,ARIZONA,PHOENIX
,ARKANSAS,"LITTLE ROCK".@....CALIFORNIA,
SACRAMENTO,COLORADO,DENVER,CONNECTICUT,H
ARTFORD,DELAWARE......DOVER,"DIST. OF CO
LUM.",WASHINGTON,FLORIDA,TALLAHASSEE,GEO
RGIA.J....ATLANTA,HAWAII,HONOLULU,IDAHO,
BOISE,ILLINOIS,SPRINGFIELD,INDIANA......
INDIANAPOLIS,IOWA,"DES MOINES",KANSAS,TO
PEKA,KENTUCKY,FRANKFORT.[.$..LOUISIANA,"
BATON ROUGE",MAINE,AUGUSTA,MARYLAND,ANNA
POLIS,MASSACHUSETTS. ....BOSTON,MICHIGAN
,LANSING,MINNESOTA,"ST PAUL",MISSISSIPPI
,JACKSON...8..MISSOURI,"JEFFERSON CITY",
MONTANA,HELENA,NEBRASKA,LINCOLN,NEVADA.3
.B.."CARSON CITY","NEW HAMPSHIRE",CONCOR
D,"NEW JERSEY",TRENTON,"NEW MEXICO".N.L.
."SANTA FE","NEW YORK",ALBANY,"NORTH CAR
OLINA",RALEIGH...Q.."NORTH DAKOTA",BISMA
RCK,OHIO,COLUMBUS...V..OKLAHOMA,"OKLAHOM
A CITY",OREGON,SALEM,PENNSYLVANIA,HARRIS
BURG.$.`.."RHODE ISLAND",PROVIDENCE,"SOU
TH CAROLINA",COLUMBIA,"SOUTH DAKOTA".O.J
..PIERRE,TENNESSEE,NASHVILLE,TEXAS,AUSTI
N,UTAH,"SALT LAKE CITY",VERMONT...T..MON
TPELIER,VIRGINIA,RICHMOND,WASHINGTON,OLY
MPIA,"WEST VIRGINIA"...~..CHARLESTON,WIS
CONSIN,MADISON,WYOMING,CHEYENNE.%.PCK.63
1:A$."C64 PAK":.K,76:.K.1,207:.K.2,65:.K
.3,36:.K.4,44.\.8G.K.5,56:.K.6,13:.K.7,8
2:.K.8,213:.K.9,13:.198,10:.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL