HOOFDSTEDEN

00000000: 01 08 37 08 02 00 97 20  35 33 32 38 30 2C 31 34  |..7.... 53280,14|
00000010: 3A 97 20 35 33 32 38 31  2C 36 3A 99 20 C7 28 31  |:. 53281,6:. .(1|
00000020: 34 32 29 3A 97 20 35 33  32 36 39 2C 30 3A 97 20  |42):. 53269,0:. |
00000030: 35 34 32 39 36 2C 30 00  43 08 03 00 86 20 5A 28  |54296,0.C.... Z(|
00000040: 37 37 29 00 68 08 04 00  8F 20 41 20 44 49 4D 45  |77).h.... A DIME|
00000050: 4E 53 49 4F 4E 20 49 53  20 4E 45 45 44 45 44 20  |NSION IS NEEDED |
00000060: 46 4F 52 20 5A 28 58 29  00 93 08 05 00 99 22 93  |FOR Z(X)......".|
00000070: 22 3A 99 3A 99 A6 36 29  22 50 4C 41 43 45 53 20  |":.:..6)"PLACES |
00000080: 41 4E 44 20 54 48 45 49  52 20 43 41 50 49 54 41  |AND THEIR CAPITA|
00000090: 4C 53 22 00 9C 08 07 00  53 43 B2 30 00 CF 08 08  |LS".....SC.0....|
000000A0: 00 8F 20 53 43 20 57 49  4C 4C 20 42 45 20 55 53  |.. SC WILL BE US|
000000B0: 45 44 20 54 4F 20 4B 45  45 50 20 54 48 45 20 53  |ED TO KEEP THE S|
000000C0: 43 4F 52 45 53 20 49 4E  20 51 55 49 5A 45 53 00  |CORES IN QUIZES.|
000000D0: E3 08 0A 00 99 3A 99 3A  99 A6 31 36 29 22 4D 45  |.....:.:..16)"ME|
000000E0: 4E 55 22 00 EB 08 0F 00  99 3A 99 00 09 09 14 00  |NU"......:......|
000000F0: 99 A6 35 29 22 31 2E 20  46 49 4E 44 20 54 48 45  |..5)"1. FIND THE|
00000100: 20 43 41 50 49 54 41 4C  22 00 0F 09 19 00 99 00  | CAPITAL".......|
00000110: 36 09 1E 00 99 A6 35 29  22 32 2E 20 46 49 4E 44  |6.....5)"2. FIND|
00000120: 20 54 48 45 20 53 54 41  54 45 20 4F 52 20 43 4F  | THE STATE OR CO|
00000130: 55 4E 54 52 59 22 00 3C  09 23 00 99 00 66 09 28  |UNTRY".<.#...f.(|
00000140: 00 99 A6 35 29 22 33 2E  20 51 55 49 5A 20 2D 20  |...5)"3. QUIZ - |
00000150: 47 49 56 45 4E 20 54 48  45 20 50 4C 41 43 45 2C  |GIVEN THE PLACE,|
00000160: 20 4E 41 4D 45 22 00 7D  09 2B 00 99 A6 38 29 22  | NAME".}.+...8)"|
00000170: 54 48 45 20 43 41 50 49  54 41 4C 2E 22 00 83 09  |THE CAPITAL."...|
00000180: 2D 00 99 00 AF 09 32 00  99 A6 35 29 22 34 2E 20  |-.....2...5)"4. |
00000190: 51 55 49 5A 20 2D 20 47  49 56 45 4E 20 54 48 45  |QUIZ - GIVEN THE|
000001A0: 20 43 41 50 49 54 41 4C  2C 20 4E 41 4D 45 22 00  | CAPITAL, NAME".|
000001B0: C4 09 35 00 99 A6 38 29  22 54 48 45 20 50 4C 41  |..5...8)"THE PLA|
000001C0: 43 45 2E 22 00 E3 09 36  00 99 3A 99 A6 35 29 22  |CE."...6..:..5)"|
000001D0: 35 2E 20 45 4E 44 20 54  48 45 20 50 52 4F 47 52  |5. END THE PROGR|
000001E0: 41 4D 22 00 ED 09 37 00  99 3A 99 3A 99 00 15 0A  |AM"...7..:.:....|
000001F0: 3C 00 85 22 20 20 20 20  20 50 4C 45 41 53 45 20  |<.."     PLEASE |
00000200: 54 59 50 45 20 31 2C 32  2C 33 2C 34 20 4F 52 20  |TYPE 1,2,3,4 OR |
00000210: 35 22 3B 49 31 00 1B 0A  3F 00 8C 00 29 0A 41 00  |5";I1...?...).A.|
00000220: 8B 49 31 B2 31 A7 33 30  30 00 37 0A 46 00 8B 49  |.I1.1.300.7.F..I|
00000230: 31 B2 32 A7 35 30 30 00  45 0A 4B 00 8B 49 31 B2  |1.2.500.E.K..I1.|
00000240: 33 A7 37 30 30 00 53 0A  50 00 8B 49 31 B2 34 A7  |3.700.S.P..I1.4.|
00000250: 37 30 30 00 65 0A 51 00  8B 20 49 31 B2 35 20 A7  |700.e.Q.. I1.5 .|
00000260: 20 31 33 30 30 00 83 0A  55 00 8F 20 47 4F 20 54  | 1300...U.. GO T|
00000270: 4F 20 54 48 45 20 55 53  45 52 27 53 20 43 48 4F  |O THE USER'S CHO|
00000280: 49 43 45 00 8B 0A 5A 00  89 36 30 00 B6 0A 5F 00  |ICE...Z..60..._.|
00000290: 8F 20 49 46 20 49 31 20  4E 4F 54 20 31 2C 32 2C  |. IF I1 NOT 1,2,|
000002A0: 33 2C 20 4F 52 20 34 20  54 48 45 4E 20 41 53 4B  |3, OR 4 THEN ASK|
000002B0: 20 41 47 41 49 4E 00 DD  0A 64 00 83 20 41 4C 41  | AGAIN...d.. ALA|
000002C0: 42 41 4D 41 2C 42 49 52  4D 49 4E 47 48 41 4D 2C  |BAMA,BIRMINGHAM,|
000002D0: 41 4C 41 53 4B 41 2C 4A  55 4E 45 41 55 00 08 0B  |ALASKA,JUNEAU...|
000002E0: 67 00 83 20 41 52 49 5A  4F 4E 41 2C 50 48 4F 45  |g.. ARIZONA,PHOE|
000002F0: 4E 49 58 2C 41 52 4B 41  4E 53 41 53 2C 4C 49 54  |NIX,ARKANSAS,LIT|
00000300: 54 4C 45 20 52 4F 43 4B  00 49 0B 69 00 83 20 43  |TLE ROCK.I.i.. C|
00000310: 41 4C 49 46 4F 52 4E 49  41 2C 53 41 43 52 41 4D  |ALIFORNIA,SACRAM|
00000320: 45 4E 54 4F 2C 43 4F 4C  4F 52 41 44 4F 2C 44 45  |ENTO,COLORADO,DE|
00000330: 4E 56 45 52 2C 43 4F 4E  4E 45 43 54 49 43 55 54  |NVER,CONNECTICUT|
00000340: 2C 48 41 52 54 46 4F 52  44 00 72 0B 6E 00 83 20  |,HARTFORD.r.n.. |
00000350: 44 45 4C 41 57 41 52 45  2C 44 4F 56 45 52 2C 46  |DELAWARE,DOVER,F|
00000360: 4C 4F 52 49 44 41 2C 54  41 4C 4C 41 48 41 53 53  |LORIDA,TALLAHASS|
00000370: 45 45 00 98 0B 71 00 83  20 47 45 4F 52 47 49 41  |EE...q.. GEORGIA|
00000380: 2C 41 54 4C 41 4E 54 41  2C 48 41 57 41 49 49 2C  |,ATLANTA,HAWAII,|
00000390: 48 4F 4E 4F 4C 55 4C 55  00 C7 0B 73 00 83 20 49  |HONOLULU...s.. I|
000003A0: 44 41 48 4F 2C 42 4F 49  53 45 2C 49 4C 4C 49 4E  |DAHO,BOISE,ILLIN|
000003B0: 4F 49 53 2C 53 50 52 49  4E 47 46 49 45 4C 44 2C  |OIS,SPRINGFIELD,|
000003C0: 49 4E 44 49 41 4E 41 00  EA 0B 75 00 83 20 49 4E  |INDIANA...u.. IN|
000003D0: 44 49 41 4E 41 50 4F 4C  49 53 2C 49 4F 57 41 2C  |DIANAPOLIS,IOWA,|
000003E0: 44 45 53 20 4D 4F 49 4E  45 53 00 1B 0C 78 00 83  |DES MOINES...x..|
000003F0: 20 4B 41 4E 53 41 53 2C  54 4F 50 45 4B 41 2C 4B  | KANSAS,TOPEKA,K|
00000400: 45 4E 54 55 43 4B 59 2C  46 52 41 4E 4B 46 4F 52  |ENTUCKY,FRANKFOR|
00000410: 54 2C 4C 4F 55 49 53 49  41 4E 41 00 3B 0C 7B 00  |T,LOUISIANA.;.{.|
00000420: 83 20 42 41 54 4F 4E 20  52 4F 55 47 45 2C 4D 41  |. BATON ROUGE,MA|
00000430: 49 4E 45 2C 41 55 47 55  53 54 41 00 69 0C 7D 00  |INE,AUGUSTA.i.}.|
00000440: 83 20 4D 41 52 59 4C 41  4E 44 2C 41 4E 4E 41 50  |. MARYLAND,ANNAP|
00000450: 4F 4C 49 53 2C 4D 41 53  53 41 43 48 55 53 45 54  |OLIS,MASSACHUSET|
00000460: 54 53 2C 42 4F 53 54 4F  4E 00 8A 0C 7F 00 83 20  |TS,BOSTON...... |
00000470: 4D 49 43 48 49 47 41 4E  2C 4C 41 4E 53 49 4E 47  |MICHIGAN,LANSING|
00000480: 2C 4D 49 4E 4E 45 53 4F  54 41 00 B6 0C 82 00 83  |,MINNESOTA......|
00000490: 20 53 54 2E 20 50 41 55  4C 2C 4D 49 53 53 49 53  | ST. PAUL,MISSIS|
000004A0: 53 49 50 50 49 2C 4A 41  43 4B 53 4F 4E 2C 4D 49  |SIPPI,JACKSON,MI|
000004B0: 53 53 4F 55 52 49 00 DA  0C 85 00 83 20 4A 45 46  |SSOURI...... JEF|
000004C0: 46 45 52 53 4F 4E 20 43  49 54 59 2C 4D 4F 4E 54  |FERSON CITY,MONT|
000004D0: 41 4E 41 2C 48 45 4C 45  4E 41 00 04 0D 87 00 83  |ANA,HELENA......|
000004E0: 20 4E 45 42 52 41 53 4B  41 2C 4C 49 4E 43 4F 4C  | NEBRASKA,LINCOL|
000004F0: 4E 2C 4E 45 56 41 44 41  2C 43 41 52 53 4F 4E 20  |N,NEVADA,CARSON |
00000500: 43 49 54 59 00 2B 0D 89  00 83 20 4E 45 57 20 48  |CITY.+.... NEW H|
00000510: 41 4D 50 53 48 49 52 45  2C 43 4F 4E 43 4F 52 44  |AMPSHIRE,CONCORD|
00000520: 2C 4E 45 57 20 4A 45 52  53 45 59 00 56 0D 8C 00  |,NEW JERSEY.V...|
00000530: 83 20 54 52 45 4E 54 4F  4E 2C 4E 45 57 20 4D 45  |. TRENTON,NEW ME|
00000540: 58 49 43 4F 2C 53 41 4E  54 41 20 46 45 2C 4E 45  |XICO,SANTA FE,NE|
00000550: 57 20 59 4F 52 4B 00 7A  0D 8F 00 83 20 41 4C 42  |W YORK.z.... ALB|
00000560: 41 4E 59 2C 4E 4F 52 54  48 20 43 41 52 4F 4C 49  |ANY,NORTH CAROLI|
00000570: 4E 41 2C 52 41 4C 45 49  47 48 00 A3 0D 91 00 83  |NA,RALEIGH......|
00000580: 20 4E 4F 52 54 48 20 44  41 4B 4F 54 41 2C 42 49  | NORTH DAKOTA,BI|
00000590: 53 4D 41 52 4B 2C 4F 48  49 4F 2C 43 4F 4C 55 4D  |SMARK,OHIO,COLUM|
000005A0: 42 55 53 00 CD 0D 93 00  83 20 4F 4B 4C 41 48 4F  |BUS...... OKLAHO|
000005B0: 4D 41 2C 4F 4B 4C 41 48  4F 4D 41 20 43 49 54 59  |MA,OKLAHOMA CITY|
000005C0: 2C 4F 52 45 47 4F 4E 2C  53 41 4C 45 4D 00 F8 0D  |,OREGON,SALEM...|
000005D0: 96 00 83 20 50 45 4E 4E  53 59 4C 56 41 4E 49 41  |... PENNSYLVANIA|
000005E0: 2C 48 41 52 52 49 53 42  55 52 47 2C 52 48 4F 44  |,HARRISBURG,RHOD|
000005F0: 45 20 49 53 4C 41 4E 44  00 21 0E 99 00 83 20 50  |E ISLAND.!.... P|
00000600: 52 4F 56 49 44 45 4E 43  45 2C 53 4F 55 54 48 20  |ROVIDENCE,SOUTH |
00000610: 43 41 52 4F 4C 49 4E 41  2C 43 4F 4C 55 4D 42 49  |CAROLINA,COLUMBI|
00000620: 41 00 4F 0E 9B 00 83 20  53 4F 55 54 48 20 44 41  |A.O.... SOUTH DA|
00000630: 4B 4F 54 41 2C 50 49 45  52 52 45 2C 54 45 4E 4E  |KOTA,PIERRE,TENN|
00000640: 45 53 53 45 45 2C 4E 41  53 48 56 49 4C 4C 45 00  |ESSEE,NASHVILLE.|
00000650: 76 0E 9D 00 83 20 54 45  58 41 53 2C 41 55 53 54  |v.... TEXAS,AUST|
00000660: 49 4E 2C 55 54 41 48 2C  53 41 4C 54 20 4C 41 4B  |IN,UTAH,SALT LAK|
00000670: 45 20 43 49 54 59 00 B4  0E A0 00 83 20 56 45 52  |E CITY...... VER|
00000680: 4D 4F 4E 54 2C 4D 4F 4E  54 50 45 4C 49 45 52 2C  |MONT,MONTPELIER,|
00000690: 56 49 52 47 49 4E 49 41  2C 52 49 43 48 4D 4F 4E  |VIRGINIA,RICHMON|
000006A0: 44 2C 57 41 53 48 49 4E  47 54 4F 4E 2C 4F 4C 59  |D,WASHINGTON,OLY|
000006B0: 4D 50 49 41 00 DD 0E A5  00 83 20 57 45 53 54 20  |MPIA...... WEST |
000006C0: 56 49 52 47 49 4E 49 41  2C 43 48 41 52 4C 45 53  |VIRGINIA,CHARLES|
000006D0: 54 4F 4E 2C 57 49 53 43  4F 4E 53 49 4E 00 FC 0E  |TON,WISCONSIN...|
000006E0: AA 00 83 20 4D 41 44 49  53 4F 4E 2C 57 59 4F 4D  |... MADISON,WYOM|
000006F0: 49 4E 47 2C 43 48 45 59  45 4E 4E 45 00 2B 0F B4  |ING,CHEYENNE.+..|
00000700: 00 83 20 41 46 47 41 4E  49 53 54 41 4E 2C 4B 41  |.. AFGANISTAN,KA|
00000710: 42 55 4C 2C 41 52 47 45  4E 54 49 4E 41 2C 42 55  |BUL,ARGENTINA,BU|
00000720: 45 4E 4F 53 20 41 49 52  49 45 53 00 53 0F C3 00  |ENOS AIRIES.S...|
00000730: 83 20 41 55 53 54 52 41  4C 49 41 2C 43 41 4E 42  |. AUSTRALIA,CANB|
00000740: 45 52 52 41 2C 41 55 53  54 52 49 41 2C 56 49 45  |ERRA,AUSTRIA,VIE|
00000750: 4E 4E 41 00 7A 0F C8 00  83 20 42 45 4C 47 49 55  |NNA.z.... BELGIU|
00000760: 4D 2C 42 52 55 53 53 45  4C 53 2C 42 52 41 5A 49  |M,BRUSSELS,BRAZI|
00000770: 4C 2C 42 52 41 53 49 4C  49 41 00 9E 0F CD 00 83  |L,BRASILIA......|
00000780: 20 43 41 4E 41 44 41 2C  4F 54 54 41 57 41 2C 43  | CANADA,OTTAWA,C|
00000790: 4F 4C 4F 4D 42 49 41 2C  42 4F 47 41 54 41 00 C3  |OLOMBIA,BOGATA..|
000007A0: 0F D2 00 83 20 43 55 42  41 2C 48 41 56 41 4E 41  |.... CUBA,HAVANA|
000007B0: 2C 44 45 4E 4D 41 52 4B  2C 43 4F 50 45 4E 48 41  |,DENMARK,COPENHA|
000007C0: 47 45 4E 00 EA 0F D7 00  83 20 46 52 41 4E 43 45  |GEN...... FRANCE|
000007D0: 2C 50 41 52 49 53 2C 45  41 53 54 20 47 45 52 4D  |,PARIS,EAST GERM|
000007E0: 41 4E 59 2C 42 45 52 4C  49 4E 00 10 10 DC 00 83  |ANY,BERLIN......|
000007F0: 20 57 45 53 54 20 47 45  52 4D 41 4E 59 2C 42 4F  | WEST GERMANY,BO|
00000800: 4E 4E 2C 47 52 45 45 43  45 2C 41 54 48 45 4E 53  |NN,GREECE,ATHENS|
00000810: 00 2F 10 E1 00 83 20 49  52 41 4E 2C 54 45 48 52  |./.... IRAN,TEHR|
00000820: 41 4E 2C 49 52 41 51 2C  42 41 47 48 44 41 44 00  |AN,IRAQ,BAGHDAD.|
00000830: 4F 10 E6 00 83 20 49 52  45 4C 41 4E 44 2C 44 55  |O.... IRELAND,DU|
00000840: 42 4C 49 4E 2C 49 54 41  4C 59 2C 52 4F 4D 45 00  |BLIN,ITALY,ROME.|
00000850: 6D 10 EB 00 83 20 4A 41  50 41 4E 2C 54 4F 4B 59  |m.... JAPAN,TOKY|
00000860: 4F 2C 4E 4F 52 57 41 59  2C 4F 53 4C 4F 00 97 10  |O,NORWAY,OSLO...|
00000870: F0 00 83 20 50 4F 52 54  55 47 41 4C 2C 4C 49 53  |... PORTUGAL,LIS|
00000880: 42 4F 4E 2C 53 4F 56 49  45 54 20 55 4E 49 4F 4E  |BON,SOVIET UNION|
00000890: 2C 4D 4F 53 43 4F 57 00  BF 10 F5 00 83 20 53 50  |,MOSCOW...... SP|
000008A0: 41 49 4E 2C 4D 41 44 52  49 44 2C 47 52 45 41 54  |AIN,MADRID,GREAT|
000008B0: 20 42 52 49 54 41 49 4E  2C 4C 4F 4E 44 4F 4E 00  | BRITAIN,LONDON.|
000008C0: D1 10 2C 01 99 C7 28 31  34 37 29 3A 99 3A 99 3A  |..,...(147):.:.:|
000008D0: 99 00 FF 10 36 01 99 22  45 4E 54 45 52 20 54 48  |....6.."ENTER TH|
000008E0: 45 20 4E 41 4D 45 20 4F  46 20 53 54 41 54 45 20  |E NAME OF STATE |
000008F0: 4F 52 20 43 4F 55 4E 54  52 59 20 41 4E 44 22 00  |OR COUNTRY AND".|
00000900: 20 11 40 01 85 22 49 27  4C 4C 20 46 49 4E 44 20  | .@.."I'LL FIND |
00000910: 49 54 53 20 43 41 50 49  54 41 4C 22 3B 49 31 24  |ITS CAPITAL";I1$|
00000920: 00 36 11 4A 01 81 4C 31  B2 31 A4 37 34 3A 87 44  |.6.J..L1.1.74:.D|
00000930: 31 24 2C 44 32 24 00 47  11 54 01 8B 44 31 24 B2  |1$,D2$.G.T..D1$.|
00000940: 49 31 24 A7 34 30 30 00  4F 11 5E 01 82 4C 31 00  |I1$.400.O.^..L1.|
00000950: 96 11 63 01 8F 20 54 48  45 20 4C 31 20 4C 4F 4F  |..c.. THE L1 LOO|
00000960: 50 20 52 45 41 44 53 20  44 41 54 41 2C 20 32 20  |P READS DATA, 2 |
00000970: 41 54 20 41 20 54 49 4D  45 2C 41 4E 44 20 53 45  |AT A TIME,AND SE|
00000980: 45 53 20 49 46 20 54 48  45 20 46 49 52 53 54 20  |ES IF THE FIRST |
00000990: 50 49 45 43 45 2D 00 B7  11 64 01 8F 20 4F 46 20  |PIECE-...d.. OF |
000009A0: 44 41 54 41 20 49 53 20  54 48 45 20 50 4C 41 43  |DATA IS THE PLAC|
000009B0: 45 20 4E 41 4D 45 44 00  E8 11 68 01 99 3A 99 3A  |E NAMED...h..:.:|
000009C0: 99 22 49 20 41 4D 20 53  4F 52 52 59 2E 20 54 48  |."I AM SORRY. TH|
000009D0: 41 54 20 50 4C 41 43 45  20 44 4F 45 53 20 4E 4F  |AT PLACE DOES NO|
000009E0: 54 20 45 58 49 53 54 22  00 03 12 72 01 99 22 49  |T EXIST"...r.."I|
000009F0: 4E 20 4D 59 20 4D 45 4D  4F 52 59 20 42 41 4E 4B  |N MY MEMORY BANK|
00000A00: 53 2E 22 00 48 12 77 01  8F 20 54 48 45 20 50 4C  |S.".H.w.. THE PL|
00000A10: 41 43 45 20 4E 41 4D 45  44 20 49 53 20 4E 4F 54  |ACE NAMED IS NOT|
00000A20: 20 49 4E 20 54 48 45 20  44 41 54 41 20 49 46 20  | IN THE DATA IF |
00000A30: 54 48 45 20 4C 31 20 4C  4F 4F 50 20 49 53 20 43  |THE L1 LOOP IS C|
00000A40: 4F 4D 50 4C 45 54 45 44  00 5E 12 7C 01 81 54 31  |OMPLETED.^.|..T1|
00000A50: B2 31 A4 31 35 30 30 3A  82 54 31 3A 89 35 00 81  |.1.1500:.T1:.5..|
00000A60: 12 86 01 8F 20 57 41 49  54 20 41 20 57 48 49 4C  |.... WAIT A WHIL|
00000A70: 45 2C 20 52 45 54 55 52  4E 20 54 4F 20 4D 45 4E  |E, RETURN TO MEN|
00000A80: 55 00 A7 12 90 01 99 22  54 48 45 20 43 41 50 49  |U......"THE CAPI|
00000A90: 54 41 4C 20 4F 46 20 22  3B 49 31 24 3B 22 20 49  |TAL OF ";I1$;" I|
00000AA0: 53 20 22 3B 44 32 24 00  D1 12 95 01 8F 20 4E 4F  |S ";D2$...... NO|
00000AB0: 57 20 54 48 45 20 55 53  45 52 20 48 41 53 20 54  |W THE USER HAS T|
00000AC0: 48 45 20 49 4E 46 4F 20  48 45 20 57 41 4E 54 45  |HE INFO HE WANTE|
00000AD0: 44 00 E7 12 9A 01 81 54  32 B2 31 A4 31 35 30 30  |D......T2.1.1500|
00000AE0: 3A 82 54 32 3A 89 35 00  02 13 A4 01 8F 20 57 41  |:.T2:.5...... WA|
00000AF0: 49 54 2C 20 52 45 54 55  52 4E 20 54 4F 20 4D 45  |IT, RETURN TO ME|
00000B00: 4E 55 00 14 13 F4 01 99  C7 28 31 34 37 29 3A 99  |NU.......(147):.|
00000B10: 3A 99 3A 99 00 40 13 F9  01 8F 20 54 48 49 53 20  |:.:..@.... THIS |
00000B20: 49 53 20 54 48 45 20 42  45 47 49 4E 4E 49 4E 47  |IS THE BEGINNING|
00000B30: 20 4F 46 20 53 45 4C 45  43 54 49 4F 4E 20 23 32  | OF SELECTION #2|
00000B40: 00 6B 13 FE 01 99 22 45  4E 54 45 52 20 54 48 45  |.k...."ENTER THE|
00000B50: 20 43 41 50 49 54 41 4C  20 41 4E 44 20 49 27 4C  | CAPITAL AND I'L|
00000B60: 4C 20 46 49 4E 44 20 54  48 45 22 00 7C 13 03 02  |L FIND THE".|...|
00000B70: 85 22 50 4C 41 43 45 22  3B 41 41 24 00 92 13 08  |."PLACE";AA$....|
00000B80: 02 81 4C 33 B2 31 A4 37  34 3A 87 44 33 24 2C 44  |..L3.1.74:.D3$,D|
00000B90: 34 24 00 A3 13 12 02 8B  44 34 24 B2 41 41 24 A7  |4$......D4$.AA$.|
00000BA0: 36 30 30 00 AB 13 1C 02  82 4C 33 00 E2 13 21 02  |600......L3...!.|
00000BB0: 8F 20 54 48 49 53 20 4C  4F 4F 50 20 48 41 53 20  |. THIS LOOP HAS |
00000BC0: 54 48 45 20 53 41 4D 45  20 50 55 52 50 4F 53 45  |THE SAME PURPOSE|
00000BD0: 20 41 53 20 54 48 45 20  4F 4E 45 20 41 54 20 33  | AS THE ONE AT 3|
00000BE0: 33 30 00 15 14 26 02 99  3A 99 3A 99 22 49 20 41  |30...&..:.:."I A|
00000BF0: 4D 20 53 4F 52 52 59 2E  20 54 48 41 54 20 43 41  |M SORRY. THAT CA|
00000C00: 50 49 54 41 4C 20 44 4F  45 53 20 4E 4F 54 20 45  |PITAL DOES NOT E|
00000C10: 58 49 53 54 22 00 30 14  30 02 99 22 49 4E 20 4D  |XIST".0.0.."IN M|
00000C20: 59 20 4D 45 4D 4F 52 59  20 42 41 4E 4B 53 2E 22  |Y MEMORY BANKS."|
00000C30: 00 46 14 3A 02 81 54 33  B2 31 A4 31 35 30 30 3A  |.F.:..T3.1.1500:|
00000C40: 82 54 33 3A 89 35 00 69  14 58 02 99 41 41 24 3B  |.T3:.5.i.X..AA$;|
00000C50: 22 20 49 53 20 54 48 45  20 43 41 50 49 54 41 4C  |" IS THE CAPITAL|
00000C60: 20 4F 46 20 22 3B 44 33  24 00 7F 14 62 02 81 54  | OF ";D3$...b..T|
00000C70: 34 B2 31 A4 31 35 30 30  3A 82 54 34 3A 89 35 00  |4.1.1500:.T4:.5.|
00000C80: C3 14 6C 02 8F 20 45 4E  44 20 4F 46 20 53 45 4C  |..l.. END OF SEL|
00000C90: 45 43 54 49 4F 4E 20 32  20 53 55 42 52 4F 55 54  |ECTION 2 SUBROUT|
00000CA0: 49 4E 45 2E 20 49 54 20  49 53 20 53 49 4D 49 4C  |INE. IT IS SIMIL|
00000CB0: 41 52 20 54 4F 20 4C 49  4E 45 53 20 33 30 30 2D  |AR TO LINES 300-|
00000CC0: 34 32 30 00 D2 14 BC 02  81 4C 34 B2 31 A4 37 34  |420......L4.1.74|
00000CD0: 3A 8C 00 02 15 BF 02 8F  20 54 48 49 53 20 53 55  |:....... THIS SU|
00000CE0: 42 52 4F 55 54 49 4E 45  20 53 45 52 56 45 53 20  |BROUTINE SERVES |
00000CF0: 53 45 4C 45 43 54 49 4F  4E 53 20 33 20 41 4E 44  |SELECTIONS 3 AND|
00000D00: 20 34 00 12 15 C1 02 8B  4C 34 B2 37 34 A7 31 32  | 4......L4.74.12|
00000D10: 30 30 00 38 15 C3 02 8F  20 54 48 45 52 45 20 41  |00.8.... THERE A|
00000D20: 52 45 20 4F 4E 4C 59 20  37 34 20 50 41 49 52 53  |RE ONLY 74 PAIRS|
00000D30: 20 4F 46 20 44 41 54 41  00 56 15 C6 02 52 31 B2  | OF DATA.V...R1.|
00000D40: B5 28 BB 28 31 29 AC 37  34 29 AA 30 3A 44 35 B2  |.(.(1).74).0:D5.|
00000D50: 28 52 31 AC 32 29 00 8D  15 C9 02 8F 20 41 20 50  |(R1.2)...... A P|
00000D60: 41 49 52 20 57 49 4C 4C  20 42 45 20 52 45 41 44  |AIR WILL BE READ|
00000D70: 20 41 54 20 52 41 4E 44  4F 4D 2E 20 44 35 20 49  | AT RANDOM. D5 I|
00000D80: 53 20 55 53 45 44 20 49  4E 20 37 33 30 00 9A 15  |S USED IN 730...|
00000D90: CB 02 81 4C 36 B2 31 A4  37 34 00 AD 15 D0 02 8B  |...L6.1.74......|
00000DA0: 52 31 B2 20 5A 28 4C 36  29 A7 37 31 30 00 F4 15  |R1. Z(L6).710...|
00000DB0: D2 02 8F 27 49 46 20 54  48 49 53 20 52 41 4E 44  |...'IF THIS RAND|
00000DC0: 4F 4D 20 4E 55 4D 42 45  52 20 57 41 53 20 41 4C  |OM NUMBER WAS AL|
00000DD0: 52 45 41 44 59 20 55 53  45 44 2C 20 47 4F 20 42  |READY USED, GO B|
00000DE0: 41 43 4B 20 41 4E 44 20  47 45 54 20 41 4E 4F 54  |ACK AND GET ANOT|
00000DF0: 48 45 52 27 00 FC 15 D3  02 82 4C 36 00 2E 16 D4  |HER'......L6....|
00000E00: 02 8F 20 54 48 49 53 20  4C 4F 4F 50 20 43 48 45  |.. THIS LOOP CHE|
00000E10: 43 4B 53 20 41 4C 4C 20  50 4F 53 53 49 42 4C 45  |CKS ALL POSSIBLE|
00000E20: 20 56 41 4C 55 45 53 20  46 4F 52 20 52 31 00 3B  | VALUES FOR R1.;|
00000E30: 16 D5 02 5A 28 4C 34 29  B2 52 31 00 70 16 D6 02  |...Z(L4).R1.p...|
00000E40: 8F 20 54 48 49 53 20 52  31 20 49 53 20 53 54 4F  |. THIS R1 IS STO|
00000E50: 52 45 44 20 53 4F 20 49  54 20 57 49 4C 4C 20 4E  |RED SO IT WILL N|
00000E60: 4F 54 20 42 45 20 55 53  45 44 20 41 47 41 49 4E  |OT BE USED AGAIN|
00000E70: 00 7E 16 DA 02 81 4C 35  B2 31 A4 20 44 35 00 8B  |.~....L5.1. D5..|
00000E80: 16 E4 02 87 44 37 24 3A  82 4C 35 00 B9 16 E9 02  |....D7$:.L5.....|
00000E90: 8F 20 27 52 31 2A 32 27  20 44 41 54 41 20 53 54  |. 'R1*2' DATA ST|
00000EA0: 41 54 45 4D 45 4E 54 53  20 41 52 45 20 53 48 4F  |ATEMENTS ARE SHO|
00000EB0: 56 45 44 20 41 53 49 44  45 00 C6 16 EE 02 87 44  |VED ASIDE......D|
00000EC0: 35 24 2C 44 36 24 00 E5  16 F1 02 8F 20 54 48 49  |5$,D6$...... THI|
00000ED0: 53 20 49 53 20 54 48 45  20 44 41 54 41 20 57 45  |S IS THE DATA WE|
00000EE0: 20 57 41 4E 54 00 F4 16  F3 02 8B 49 31 B2 34 A7  | WANT......I1.4.|
00000EF0: 31 30 31 30 00 24 17 F5  02 8F 20 27 49 46 20 54  |1010.$.... 'IF T|
00000F00: 48 45 20 53 45 43 4F 4E  44 20 51 55 49 5A 20 57  |HE SECOND QUIZ W|
00000F10: 41 53 20 43 48 4F 53 45  4E 2C 20 47 4F 54 4F 31  |AS CHOSEN, GOTO1|
00000F20: 30 31 30 27 00 30 17 F8  02 99 C7 28 31 34 37 29  |010'.0.....(147)|
00000F30: 00 56 17 FD 02 99 22 54  59 50 45 20 12 45 92 20  |.V...."TYPE .E. |
00000F40: 54 4F 20 52 45 54 55 52  4E 20 54 4F 20 54 48 45  |TO RETURN TO THE|
00000F50: 20 4D 45 4E 55 22 00 60  17 FF 02 99 3A 99 3A 99  | MENU".`....:.:.|
00000F60: 00 83 17 02 03 99 22 57  48 41 54 20 49 53 20 54  |......"WHAT IS T|
00000F70: 48 45 20 43 41 50 49 54  41 4C 20 4F 46 20 22 3B  |HE CAPITAL OF ";|
00000F80: 44 35 24 00 8C 17 0C 03  85 41 42 24 00 B0 17 0F  |D5$......AB$....|
00000F90: 03 8F 20 54 48 45 20 51  55 45 53 54 49 4F 4E 20  |.. THE QUESTION |
00000FA0: 49 53 20 41 4E 53 57 45  52 45 44 20 48 45 52 45  |IS ANSWERED HERE|
00000FB0: 00 C2 17 11 03 8B 41 42  24 B2 22 45 22 A7 31 32  |......AB$."E".12|
00000FC0: 30 30 00 E1 17 13 03 8F  20 54 48 45 20 50 4C 41  |00...... THE PLA|
00000FD0: 59 45 52 20 4F 50 54 45  44 20 54 4F 20 51 55 49  |YER OPTED TO QUI|
00000FE0: 54 00 F3 17 16 03 8B 41  42 24 B3 B1 44 36 24 A7  |T......AB$..D6$.|
00000FF0: 38 32 30 00 1F 18 1B 03  8F 20 27 49 46 20 54 48  |820...... 'IF TH|
00001000: 45 20 41 4E 53 57 45 52  20 49 53 20 49 4E 43 4F  |E ANSWER IS INCO|
00001010: 52 52 45 43 54 20 47 4F  54 4F 20 38 32 30 27 00  |RRECT GOTO 820'.|
00001020: 33 18 20 03 99 3A 99 3A  99 22 43 4F 52 52 45 43  |3. ..:.:."CORREC|
00001030: 54 2E 22 00 51 18 2A 03  81 54 35 B2 31 A4 34 30  |T.".Q.*..T5.1.40|
00001040: 30 3A 82 54 35 3A 53 43  B2 53 43 AA 31 3A 82 4C  |0:.T5:SC.SC.1:.L|
00001050: 34 00 8F 18 2F 03 8F 27  57 41 49 54 2C 20 41 44  |4.../..'WAIT, AD|
00001060: 44 20 50 4F 49 4E 54 20  54 4F 20 53 43 4F 52 45  |D POINT TO SCORE|
00001070: 2C 20 47 4F 20 42 41 43  4B 20 46 4F 52 20 41 4E  |, GO BACK FOR AN|
00001080: 4F 54 48 45 52 20 51 55  45 53 54 49 4F 4E 27 00  |OTHER QUESTION'.|
00001090: A1 18 34 03 99 3A 99 3A  99 22 57 52 4F 4E 47 2E  |..4..:.:."WRONG.|
000010A0: 22 00 C9 18 3E 03 99 3A  99 22 54 48 45 20 43 41  |"...>..:."THE CA|
000010B0: 50 49 54 41 4C 20 4F 46  20 22 3B 44 35 24 3A 99  |PITAL OF ";D5$:.|
000010C0: 22 49 53 20 22 3B 44 36  24 00 EB 18 43 03 8F 20  |"IS ";D6$...C.. |
000010D0: 54 48 45 20 43 4F 52 52  45 43 54 20 41 4E 53 57  |THE CORRECT ANSW|
000010E0: 45 52 20 49 53 20 47 49  56 45 4E 00 01 19 48 03  |ER IS GIVEN...H.|
000010F0: 81 54 36 B2 31 A4 36 30  30 3A 82 54 36 3A 82 4C  |.T6.1.600:.T6:.L|
00001100: 34 00 33 19 52 03 8F 27  57 41 49 54 20 41 20 57  |4.3.R..'WAIT A W|
00001110: 48 49 4C 45 2C 20 47 4F  20 42 41 43 4B 20 46 4F  |HILE, GO BACK FO|
00001120: 52 20 41 4E 4F 54 48 45  52 20 51 55 45 53 54 49  |R ANOTHER QUESTI|
00001130: 4F 4E 27 00 6E 19 E8 03  8F 27 54 48 45 20 53 45  |ON'.n....'THE SE|
00001140: 43 4F 4E 44 20 51 55 49  5A 20 57 41 53 20 43 48  |COND QUIZ WAS CH|
00001150: 4F 53 45 4E 2E 20 47 4F  20 47 45 54 20 53 4F 4D  |OSEN. GO GET SOM|
00001160: 45 20 52 41 4E 44 4F 4D  20 44 41 54 41 27 00 7A  |E RANDOM DATA'.z|
00001170: 19 F2 03 99 C7 28 31 34  37 29 00 A7 19 F5 03 8F  |.....(147)......|
00001180: 20 53 45 4C 45 43 54 49  4F 4E 20 34 20 42 45 47  | SELECTION 4 BEG|
00001190: 49 4E 53 20 49 54 53 20  53 55 42 52 4F 55 54 49  |INS ITS SUBROUTI|
000011A0: 4E 45 20 48 45 52 45 00  D7 19 F6 03 8F 20 49 54  |NE HERE...... IT|
000011B0: 20 49 53 20 56 45 52 59  20 53 49 4D 49 4C 41 52  | IS VERY SIMILAR|
000011C0: 20 54 4F 20 54 48 45 20  4C 41 53 54 20 4F 4E 45  | TO THE LAST ONE|
000011D0: 20 41 54 20 37 30 30 00  FD 19 F7 03 99 22 54 59  | AT 700......"TY|
000011E0: 50 45 20 12 45 92 20 54  4F 20 52 45 54 55 52 4E  |PE .E. TO RETURN|
000011F0: 20 54 4F 20 54 48 45 20  4D 45 4E 55 22 00 07 1A  | TO THE MENU"...|
00001200: F9 03 99 3A 99 3A 99 00  34 1A FC 03 99 44 36 24  |...:.:..4....D6$|
00001210: 3B 22 20 49 53 20 54 48  45 20 43 41 50 49 54 41  |;" IS THE CAPITA|
00001220: 4C 22 3A 99 20 22 4F 46  20 57 48 41 54 20 50 4C  |L":. "OF WHAT PL|
00001230: 41 43 45 22 00 3D 1A 01  04 85 41 43 24 00 4F 1A  |ACE".=....AC$.O.|
00001240: 06 04 8B 41 43 24 B2 22  45 22 A7 31 32 30 30 00  |...AC$."E".1200.|
00001250: 62 1A 10 04 8B 41 43 24  B3 B1 44 35 24 A7 31 30  |b....AC$..D5$.10|
00001260: 37 30 00 75 1A 1A 04 99  3A 99 3A 99 22 43 4F 52  |70.u....:.:."COR|
00001270: 52 45 43 54 22 00 93 1A  24 04 81 54 36 B2 31 A4  |RECT"...$..T6.1.|
00001280: 36 30 30 3A 82 54 36 3A  53 43 B2 53 43 AA 31 3A  |600:.T6:SC.SC.1:|
00001290: 82 4C 34 00 A4 1A 2E 04  99 3A 99 3A 99 22 57 52  |.L4......:.:."WR|
000012A0: 4F 4E 47 22 00 C9 1A 38  04 99 44 36 24 3B 22 20  |ONG"...8..D6$;" |
000012B0: 49 53 20 54 48 45 20 43  41 50 49 54 41 4C 20 4F  |IS THE CAPITAL O|
000012C0: 46 20 22 3A 99 20 44 35  24 00 DF 1A 42 04 81 54  |F ":. D5$...B..T|
000012D0: 37 B2 31 A4 36 30 30 3A  82 54 37 3A 82 4C 34 00  |7.1.600:.T7:.L4.|
000012E0: F1 1A B0 04 99 C7 28 31  34 37 29 3A 99 3A 99 3A  |......(147):.:.:|
000012F0: 99 00 29 1B BA 04 99 22  59 4F 55 20 47 4F 54 22  |..)...."YOU GOT"|
00001300: 3B 53 43 3B 22 51 55 45  53 54 49 4F 4E 53 20 43  |;SC;"QUESTIONS C|
00001310: 4F 52 52 45 43 54 20 4F  55 54 20 4F 46 22 3B 28  |ORRECT OUT OF";(|
00001320: 4C 34 AB 31 29 3B 22 2E  22 00 57 1B C4 04 99 3A  |L4.1);".".W....:|
00001330: 99 22 59 4F 55 52 20 50  45 52 43 45 4E 54 41 47  |."YOUR PERCENTAG|
00001340: 45 20 49 53 22 3B 53 43  AD 28 4C 34 AB 31 29 AC  |E IS";SC.(L4.1).|
00001350: 31 30 30 3B 22 2E 22 00  8E 1B C9 04 8F 28 4C 34  |100;"."......(L4|
00001360: 2D 31 29 20 49 53 20 54  48 45 20 54 4F 54 41 4C  |-1) IS THE TOTAL|
00001370: 20 4E 55 4D 42 45 52 20  4F 46 20 51 55 45 53 54  | NUMBER OF QUEST|
00001380: 49 4F 4E 53 20 41 54 54  45 4D 50 54 45 44 00 A3  |IONS ATTEMPTED..|
00001390: 1B CE 04 81 54 38 B2 31  A4 32 31 30 30 3A 82 54  |....T8.1.2100:.T|
000013A0: 38 3A 8A 00 C7 1B D3 04  8F 20 31 32 30 30 2D 31  |8:....... 1200-1|
000013B0: 32 33 30 20 53 45 52 56  45 53 20 42 4F 54 48 20  |230 SERVES BOTH |
000013C0: 51 55 49 5A 5A 45 53 00  E8 1B 14 05 97 20 35 33  |QUIZZES...... 53|
000013D0: 32 38 30 2C 31 34 3A 97  20 35 33 32 38 31 2C 36  |280,14:. 53281,6|
000013E0: 3A 99 20 22 93 22 3A 80  00 00 00                 |:. ".":....     |

..7.... 53280,14:. 53281,6:. G(142):. 53
269,0:. 54296,0.C.... Z(77).H.... A DIME
NSION IS NEEDED FOR Z(X)......".":.:..6)
"PLACES AND THEIR CAPITALS".....SC.0.O..
.. SC WILL BE USED TO KEEP THE SCORES IN
 QUIZES......:.:..16)"MENU"......:......
..5)"1. FIND THE CAPITAL".......6.....5)
"2. FIND THE STATE OR COUNTRY".<.#...F.(
...5)"3. QUIZ - GIVEN THE PLACE, NAME".}
.+...8)"THE CAPITAL."...-.....2...5)"4. 
QUIZ - GIVEN THE CAPITAL, NAME".D.5...8)
"THE PLACE."...6..:..5)"5. END THE PROGR
AM"...7..:.:....<.."     PLEASE TYPE 1,2
,3,4 OR 5";I1...?...).A..I1.1.300.7.F..I
1.2.500.E.K..I1.3.700.S.P..I1.4.700.E.Q.
. I1.5 . 1300...U.. GO TO THE USER'S CHO
ICE...Z..60..._.. IF I1 NOT 1,2,3, OR 4 
THEN ASK AGAIN...D.. ALABAMA,BIRMINGHAM,
ALASKA,JUNEAU...G.. ARIZONA,PHOENIX,ARKA
NSAS,LITTLE ROCK.I.I.. CALIFORNIA,SACRAM
ENTO,COLORADO,DENVER,CONNECTICUT,HARTFOR
D.R.N.. DELAWARE,DOVER,FLORIDA,TALLAHASS
EE...Q.. GEORGIA,ATLANTA,HAWAII,HONOLULU
.G.S.. IDAHO,BOISE,ILLINOIS,SPRINGFIELD,
INDIANA...U.. INDIANAPOLIS,IOWA,DES MOIN
ES...X.. KANSAS,TOPEKA,KENTUCKY,FRANKFOR
T,LOUISIANA.;.{.. BATON ROUGE,MAINE,AUGU
STA.I.}.. MARYLAND,ANNAPOLIS,MASSACHUSET
TS,BOSTON..... MICHIGAN,LANSING,MINNESO
TA...... ST. PAUL,MISSISSIPPI,JACKSON,MI
SSOURI.Z.... JEFFERSON CITY,MONTANA,HELE
NA...... NEBRASKA,LINCOLN,NEVADA,CARSON 
CITY.+.... NEW HAMPSHIRE,CONCORD,NEW JER
SEY.V.... TRENTON,NEW MEXICO,SANTA FE,NE
W YORK.Z.... ALBANY,NORTH CAROLINA,RALEI
GH...... NORTH DAKOTA,BISMARK,OHIO,COLUM
BUS.M.... OKLAHOMA,OKLAHOMA CITY,OREGON,
SALEM...... PENNSYLVANIA,HARRISBURG,RHOD
E ISLAND.!.... PROVIDENCE,SOUTH CAROLINA
,COLUMBIA.O.... SOUTH DAKOTA,PIERRE,TENN
ESSEE,NASHVILLE.V.... TEXAS,AUSTIN,UTAH,
SALT LAKE CITY... .. VERMONT,MONTPELIER,
VIRGINIA,RICHMOND,WASHINGTON,OLYMPIA....
.. WEST VIRGINIA,CHARLESTON,WISCONSIN...
... MADISON,WYOMING,CHEYENNE.+.... AFGAN
ISTAN,KABUL,ARGENTINA,BUENOS AIRIES.S.C.
. AUSTRALIA,CANBERRA,AUSTRIA,VIENNA.Z.H.
. BELGIUM,BRUSSELS,BRAZIL,BRASILIA...M..
 CANADA,OTTAWA,COLOMBIA,BOGATA.C.R.. CUB
A,HAVANA,DENMARK,COPENHAGEN...W.. FRANCE
,PARIS,EAST GERMANY,BERLIN...... WEST GE
RMANY,BONN,GREECE,ATHENS./.... IRAN,TEHR
AN,IRAQ,BAGHDAD.O.... IRELAND,DUBLIN,ITA
LY,ROME.M.... JAPAN,TOKYO,NORWAY,OSLO...
... PORTUGAL,LISBON,SOVIET UNION,MOSCOW.
..... SPAIN,MADRID,GREAT BRITAIN,LONDON.
Q.,..G(147):.:.:....6.."ENTER THE NAME O
F STATE OR COUNTRY AND". .@.."I'LL FIND 
ITS CAPITAL";I1$.6.J..L1.1.74:.D1$,D2$.G
.T..D1$.I1$.400.O.^..L1...C.. THE L1 LOO
P READS DATA, 2 AT A TIME,AND SEES IF TH
E FIRST PIECE-...D.. OF DATA IS THE PLAC
E NAMED...H..:.:."I AM SORRY. THAT PLACE
 DOES NOT EXIST"...R.."IN MY MEMORY BANK
S.".H.W.. THE PLACE NAMED IS NOT IN THE 
DATA IF THE L1 LOOP IS COMPLETED.^.|..T1
.1.1500:.T1:.5...... WAIT A WHILE, RETUR
N TO MENU......"THE CAPITAL OF ";I1$;" I
S ";D2$.Q.... NOW THE USER HAS THE INFO 
HE WANTED......T2.1.1500:.T2:.5...... WA
IT, RETURN TO MENU......G(147):.:.:..@..
.. THIS IS THE BEGINNING OF SELECTION #2
.K...."ENTER THE CAPITAL AND I'LL FIND T
HE".|...."PLACE";AA$......L3.1.74:.D3$,D
4$......D4$.AA$.600......L3...!.. THIS L
OOP HAS THE SAME PURPOSE AS THE ONE AT 3
30...&..:.:."I AM SORRY. THAT CAPITAL DO
ES NOT EXIST".0.0.."IN MY MEMORY BANKS."
.F.:..T3.1.1500:.T3:.5.I.X..AA$;" IS THE
 CAPITAL OF ";D3$..B..T4.1.1500:.T4:.5.
C.L.. END OF SELECTION 2 SUBROUTINE. IT 
IS SIMILAR TO LINES 300-420.R....L4.1.74
:....... THIS SUBROUTINE SERVES SELECTIO
NS 3 AND 4...A..L4.74.1200.8.C.. THERE A
RE ONLY 74 PAIRS OF DATA.V.F.R1..(.(1).7
4).0:D5.(R1.2)...I.. A PAIR WILL BE READ
 AT RANDOM. D5 IS USED IN 730...K..L6.1.
74...P..R1. Z(L6).710...R..'IF THIS RAND
OM NUMBER WAS ALREADY USED, GO BACK AND 
GET ANOTHER'...S..L6...T.. THIS LOOP CHE
CKS ALL POSSIBLE VALUES FOR R1.;.U.Z(L4)
.R1.P.V.. THIS R1 IS STORED SO IT WILL N
OT BE USED AGAIN.~.Z..L5.1. D5......D7$:
.L5...... 'R1*2' DATA STATEMENTS ARE SHO
VED ASIDE.F....D5$,D6$...... THIS IS THE
 DATA WE WANT......I1.4.1010.$.... 'IF T
HE SECOND QUIZ WAS CHOSEN, GOTO1010'.0..
..G(147).V...."TYPE .E. TO RETURN TO THE
 MENU".`....:.:......."WHAT IS THE CAPIT
AL OF ";D5$......AB$...... THE QUESTION 
IS ANSWERED HERE.B....AB$."E".1200......
 THE PLAYER OPTED TO QUIT......AB$..D6$.
820...... 'IF THE ANSWER IS INCORRECT GO
TO 820'.3. ..:.:."CORRECT.".Q.*..T5.1.40
0:.T5:SC.SC.1:.L4.../..'WAIT, ADD POINT 
TO SCORE, GO BACK FOR ANOTHER QUESTION'.
..4..:.:."WRONG.".I.>..:."THE CAPITAL OF
 ";D5$:."IS ";D6$...C.. THE CORRECT ANSW
ER IS GIVEN...H..T6.1.600:.T6:.L4.3.R..'
WAIT A WHILE, GO BACK FOR ANOTHER QUESTI
ON'.N....'THE SECOND QUIZ WAS CHOSEN. GO
 GET SOME RANDOM DATA'.Z....G(147)......
 SELECTION 4 BEGINS ITS SUBROUTINE HERE.
W.... IT IS VERY SIMILAR TO THE LAST ONE
 AT 700......"TYPE .E. TO RETURN TO THE 
MENU"......:.:..4....D6$;" IS THE CAPITA
L":. "OF WHAT PLACE".=....AC$.O....AC$."
E".1200.B....AC$..D5$.1070.U....:.:."COR
RECT"...$..T6.1.600:.T6:SC.SC.1:.L4.....
.:.:."WRONG".I.8..D6$;" IS THE CAPITAL O
F ":. D5$...B..T7.1.600:.T7:.L4......G(1
47):.:.:..)...."YOU GOT";SC;"QUESTIONS C
ORRECT OUT OF";(L4.1);".".W.D..:."YOUR P
ERCENTAGE IS";SC.(L4.1).100;"."...I..(L4
-1) IS THE TOTAL NUMBER OF QUESTIONS ATT
EMPTED...N..T8.1.2100:.T8:..G.S.. 1200-1
230 SERVES BOTH QUIZZES...... 53280,14:.
 53281,6:. ".":....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL