' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"_]` L/浍굺L  !"#$%&'()*+,-./0123456789:;<=>?  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( D Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`F d ֠z# u`CLOSE STATES.LST":"OPEN STATES.LST":"WRITE STATES.LST":SQ%Y^ ȁST150:S2%(ST):STt^Ⱥ"CLOSE STATES.LST":^dȺ"BSAVE STATES.LST,A$600,L51"^nȱ^8000^59000:RT$(13)58010^ DROP THROUGHT TO NEXT ROUTINE,_772,24:24:10511000]jǁSTSQ%50:S2%(STSQ%1)(BP%ST):STH]tSQ%SQ%SN:BP%,SQ%S]~ǫ51300o]ǁST150:S2%(ST)ST:ST]ǁST150:AR(50):BR(50):S2%S2%(A):S2%(A)S2%(B):S2%(B)S2%:ST]ǁST150:BP%ST,S2%(ST):ST]SQ%SN1:BP%,SQ%]ǫ51300?^Ⱥ"LV2-\NA$(0)"RONALD":NA$(1)"MARY ANNE"D\NA$(0)"JOSEPHINE"N\SN20T\ Ʊ}\pƁYYY1Y2:X1:YY:(SP$,X2X1);:YY\zƱ\8Dz ROUTINE TO GENERATE RANDOM\BDz STATES LIST\GǢ5\LǺ"BLOAD STATES.LST"\VBP%1536]`SQ%(BP%):SQ%SN490420[vŲ TIMEOUT ROUTINE+[xź(18);=[{TMTS%1:RT1X[Ŗ16:23:"Time's up!";m[Ţ1:(7);:(7);[Ŗ16:23:" ";[Ŗ10:10:[RT$"":[Ų INITIALIZING ROUTINE[PN%1[SC%(0)0:SC%(1)0:TM(0)0:TM(1)0[PN%2:LV1\550550ZĭA3150500'ZĭA2739000lZŭA8CC%0CC%CC%1:XPCC%2:772,24:(PR$,1);:772,28:50420ZŭA13ĺ"";:50420ZŹ16368,0Z!RT$""Z&ŁZ0CC%1:RT$RT$(RT%(Z)):Z:ZDŭCC%LN1ĺ"";:50420[NRT%(CC%)A:CC%CC%1:(A):50);YĭPN%1ī50340(YĭSC%(1)10Ė36:YĭSC%(1)9Ė34MYĭSC%(1)99Ė32^YĢ20:SC%(1);jYĺ(18);pYıYĖXP:YP:772,24:(PR$,LN);:772,28YĹ16368,0YCC%0:TI%1:RT$"":252,0:253,0:254,TS%YĢYP:XPCC%2ZČ44544:A(255):A250:33,39:34,1:35,23*XÖ4:23:"SCORE";7XíPN%1ıMXÖ32:23:"SCORE";SXñqXHC(7I29((NA$(I)))2)}XĖHC:18XĺNA$(I)X{ıX|IJ THIS DISPLAYS SCOREX}ĺ(3);"3";(5);XĭSC%(0)9Ė6XĭSC%(0)99Ė4XĭSC%(0)10Ė8YĢ20:SC%(3:19:"]******^":10:20:"+":10:21:"+":3:20:"+":3:21:"+":3:22:"[******\"iWíPN%1ī50120WÖ31:19:"]******^":38:20:"+":38:21:"+":31:20:"+":31:21:"+":31:22:"[******\"Wù32,1:33,38:34,BT:35,BB:BT1::772,FXù32,3:YY:40:"++":YY:23:40:"+[**************************************\";wVnù32,1:33,38:34,BT:35,BB:BT1::772,FVwù32,1:33,38:34,1:35,23VxñVâ18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:34,BT:35,BB3WWCL%0:39040+UCL%0RW%7ST51İ80003UƘPL>UИ37000[U(A$)1(A$)240080aUOóUPâ18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:34,BT:35,BB3IVdâ1:1:"]**************************************^+":YY221);:PN%1Ė26:"MAXIMUM: ";SN5LV@Tg14:5:"STATES MISSED"sTlCL%0:RW%7:ST150:SS%(ST)PL2ĂST:39100TvCL%183:RW%:(ST$(ST),3,14);:RW%RW%1:RW%21RW%7:CL%CL%1:CL%239060TSTT39100 U8000:34,6:35,22:(12);:RW%7:RUN MENU"S␭RT3630005SpSS%(ST%)2(PL%1)CR%;Sz_SX ROUTINE TO DO SCORING PAGEpS]32,1:33,38wS^1S`(18)SbPL1PN%:32,1:33,38:34,1:35,23:1:(12):50000:13:1:" FINAL REPORT "$Td1:3:NA$(PL1);:14:"SCORE: ";SC%(PL)R4:05:"Do you want to:")R::YR32,7:33,30::" 1. Play this game again"vR:" 2. Go back to MenuR:" 3. Quit"RĐ4:18:"Enter a number >";:8102:RT1RT337060RŐ32,1:33,38Rǐ28:18RɐRTRΐRT1Ĭ SؐRT2ĺ:" ROUTINE TO GET NAMES AND INFO FROM DISK FILELQˆPN%(SA%):SN(SA%1)iQ̈TS%(SA%2):LV(SA%3)QֈNA$(1)"":NA$(2)""QPTSA%4SA%12:NA$(0)NA$(0)((PT)):NA$(1)NA$(1)((PT10)):PTQꈱQ50000R32,1:33,38:34,1:35,23:(1220A::(ST$(S2%(X)),3,14):@P"y12:18:" Very good! ";[P1ySC%(I)SC%(I)5:50300aP6yP@yX112:Y118:X230:Y222:50800P{yP}12:18:" That's right! ";:SC%(I)SC%(I)1:50300P}14:20A::(ST$(S2%(X)),3,14):P }50200Pc}1QONu50300OXu26000OuzOu18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:34,BT:35,BB3Ov12:24:"******************";O v32,0:33,39:34,BT:35,BB2:BT1::772,FOvOy THIS IS WHEN RIGHT SECOND TIMEPy14:******************^+":YY223:YY:40:"++":YY:23:40:"+[**************************************\";!nù32,1:33,39:34,BT:35,BB:BT1::772,F!xñ!â18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:34,BT:35,BB3V"Ö 2"READ BORDER STATES,R";ST%4 ";:8102:RT1RT337060^ǐ28:18fɐRTrΐRT1ĬؐRT2ĺ:"RUN MENU"␭RT363000pSS%(ST%)2(PL%1)CR%zX ROUTINE TO DO SCORING PAGE]32,1:33,38CbPL1PN%:1)"":NA$(0)""YPTSA%4SA%12:NA$(0)NA$(0)((PT)):NA$(1)NA$(1)((PT10)):PT_ꈱs:(12):500004:05:"Do you want to:"::32,7:33,30::" 1. Play this game again":" 2. Go back to Menu":" 3. Quit"}14:20A::CA$(S2%(X)):^}12:18:" That's right! ";:SC%(I)SC%(I)1:50300:8700 }X112:Y118:X230:Y222:50800c} ROUTINE TO GET NAMES AND INFO FROM DISK FILEˆPN%(SA%):SN(SA%1)̈TS%(SA%2):LV(SA%3)ֈNA$(1:33,39:34,BT:35,BB:BT1::772,FBv32,0:33,39:34,1:35,23Hvny THIS IS WHEN RIGHT SECOND TIMEy14:20A::CA$(S2%(X)):"y12:18:" Very good! ";1ySC%(I)SC%(I)5:503006y8700@yX112:Y118:X230:Y222:50800{y/)0u WHAT TO DO IF ANSWER IS RIGHT?:u18:21:"Right!"TNuSC%(I)SC%(I)10_Xu50300euu18:(18);:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:(18):32,0:33,40:34,BT:35,BB3v12:24:"******************";$ v32,:251,40.FI$.249,43:251,50,.FI@/249,68:251,52H/FI\ /249,70:251,62d/FIx/249,73:251,71/FI!/249,77:251,58&/FI+/249,84:251,700/FIC/D/ FILL KODIAKN/31,1:250,0X/249,63:251,98b/FI000j%QQ%2İ12100Bl%QQ%22Ĺ249,60:250,0:251,37:31,1:FIV& FLASH CAPITOLa&41000x&FL15:1CX%,CY%&ZZ1DL:ZZ:1CX%,CY%&ZZ1DL:ZZ:FL&1CX%,CY%&'(12):50000. FILL HAWAII.31,1:250,0.249,48INAL PAGEc c c %c +cFc":"BLOAD FINAL.PAGE"Rc,63030cc6THISISANERRdprogram";|c"63010dO,NYNEW YORK,NCNORTH CAROLINA,NDNORTH DAKOTA,OHOHIO,OKOKLAHOMA,OROREGON,PAPENNSYLVANIA,RIRHODE ISLAND|bo SCSOUTH CAROLINAbt SDSOUTH DAKOTA,TNTENNESSEE,TXTEXAS,UTUTAH,VTVERMONT,VAVIRGINIA,WAWASHINGTON,WVWEST VIRGINIA,WIWISCONSIN,WYWYOMING c FA,GAGEORGIA,HIHAWAII,IDIDAHO,ILILLINOIS,ININDIANA,IAIOWA,KSKANSAS,KYKENTUCKY,LALOUISIANA,MEMAINE,MDMARYLAND,MAMASSACHUSETTSae MIMICHIGANebj MNMINNESOTA,MSMISSISSIPPI,MOMISSOURI,MTMONTANA,NENEBRASKA,NVNEVADA,NHNEW HAMPSHIRE,NJNEW JERSEY,NMNEW MEXIC0`RT(RT$)$`RT1RT359000*`]`l ROUTINE TO CLEAR AREA AT BOTTOM OF SCREE`vXX1822:XX:11:" ";:XX:10:{a` ALALABAMA,AKALASKA,AZARIZONA,ARARKANSAS,CACALIFORNIA,COCOLORADO,CTCONNECTICUT,DEDELAWARE,FLFLORID:"*************************";:16:772,28:V_x ROUTINE TO GET A SINGLE CHARd_}16368,0_252,0:253,0:254,TS%:44544_16368,0_CH1282739000_TM(252)(253)256_RT%(255):RT$(RT%)_RT%25550550`RT%273900 0<`|f|>fff>||``|fff| >ffff<080006f66f<$~~ff>ffffff>|ff|``v|

~ l8ffff|fff<ff~~$f<~0 ~xx88p880":"BLOAD FINAL.PAGE"'0,63030806THISISANERRdddNAL.PAGE"Wh,63030hh6THISISANERRdP,CHEYENNEh FINAL PAGEh h h h h":"BLOAD FINAL.PAGE"h,63030h6THISISANERRdTRENTON,SANTA FE,ALBANY,RALEIGH,BISMARCK,COLUMBUS,OKLAHOMA CITY,SALEM,HARRISBURG,PROVIDENCE,COLUMBIA,PIERRE,NASHVILLE,AUSTIN,SALT LAKE CITY,MONTPELIER/ RICHMOND,OLYMPIA,CHARLESTON,MADISON,CHEYENNE/ FINAL PAGE/ / / / 0ENIX,LITTLE ROCK,SACRAMENTO,DENVER,HARTFORD,DOVER,TALLAHASSEE,ATLANTA,HONOLULU,BOISE,SPRINGFIELD,INDIANAPOLIS,DES MOINES,TOPEKA,FRANKFORT,BATON ROUGE,AUGUSTA,ANNAPOLIS,BOSTON/ LANSING,ST. PAUL,JACKSON,JEFFERSON CITY,HELENA,LINCOLN,CARSON CITY,CONCORD,ROLINA,NDNORTH DAKOTA,OHOHIO,OKOKLAHOMA,OROREGON,PAPENNSYLVANIA,RIRHODE ISLANDe-o SCSOUTH CAROLINA-t SDSOUTH DAKOTA,TNTENNESSEE,TXTEXAS,UTUTAH,VTVERMONT,VAVIRGINIA,WAWASHINGTON,WVWEST VIRGINIA,WIWISCONSIN,WYWYOMING. MONTGOMERY,JUNEAU,PHOIDAHO,ILILLINOIS,ININDIANA,IAIOWA,KSKANSAS,KYKENTUCKY,LALOUISIANA,MEMAINE,MDMARYLAND,MAMASSACHUSETTSv,e MIMICHIGANN-j MNMINNESOTA,MSMISSISSIPPI,MOMISSOURI,MTMONTANA,NENEBRASKA,NVNEVADA,NHNEW HAMPSHIRE,NJNEW JERSEY,NMNEW MEXICO,NYNEW YORK,NCNORTH CART3ī59000+E+l ROUTINE TO CLEAR AREA AT BOTTOM OF SCREE}+vXX1822:XX:11:" ";:XX:10:d,` ALALABAMA,AKALASKA,AZARIZONA,ARARKANSAS,CACALIFORNIA,COCOLORADO,CTCONNECTICUT,DEDELAWARE,FLFLORIDA,GAGEORGIA,HIHAWAII,ID***";:16:772,28:=*x ROUTINE TO GET A SINGLE CHARK*}16368,0m*252,0:253,0:254,TS%:44544{*16368,0*CH1282739000*TM(252)(253)256*RT%(255):RT$(RT%)*RT%25550550*RT%2739000*RT(RT$) +RT1EN STATES.LST":"WRITE STATES.LST":SQ%B) ȁST150:S2%(ST):ST])Ⱥ"CLOSE STATES.LST":)dȺ"BSAVE STATES.LST,A$600,L51")nȱ)8000)59000:RT$(13)58010) DROP THROUGHT TO NEXT ROUTINE*772,24:24:10:"********************%(STSQ%1)(BP%ST):ST1(tSQ%SQ%SN:BP%,SQ%<(~ǫ51300X(ǁST150:S2%(ST)ST:ST(ǁST150:AR(50):BR(50):S2%S2%(A):S2%(A)S2%(B):S2%(B)S2%:ST(ǁST150:BP%ST,S2%(ST):ST(SQ%SN1:BP%,SQ%(ǫ51300()Ⱥ"CLOSE STATES.LST":"OPRONALD":NA$(1)"MARY ANNE"1'NA$(0)"JOSEPHINE"7'ű='pƲf'zƁYYY1Y2:X1:YY:(SP$,X2X1);:YYl'Ʊ'8Dz ROUTINE TO GENERATE RANDOM'BDz STATES LIST'GǢ5'LǺ"BLOAD STATES.LST"'VBP%1536'`SQ%(BP%):SQ%SN4951100(jǁSTSQ%50:S2C%)A:CC%CC%1:(A):504207&vŲ TIMEOUT ROUTINEG&{TMTS%:RT1b&Ŗ16:23:"Time's up!";w&Ţ1:(7);:(7);&Ű8700&Ŗ16:23:" ";&RT$"":&Ų SN,PL,NA$&PN%1&SC%(0)0:SC%(1)0:TM(0)0:TM(1)0&PN%2'NA$(0)"550%ĭA3150500#%ĭA2739000f%ŭA8CC%0CC%CC%1:XPCC%:772,24:(PR$,1);:772,28:50420~%ŭA13ĺ"";:50420%Ź16368,0%TMTCTI%:CC%0RT$"":%!RT$""%&ŁZ0CC%1:RT$RT$(RT%(Z)):Z:%DŭCC%LN1ĺ"";:50420&NRT%(C);$ĭPN%1ī50340'$ĭSC%(1)10Ė369$ĭSC%(1)9Ė34L$ĭSC%(1)99Ė32]$Ģ20:SC%(1);h$Ĺ780,0n$ı$ĖXP:YP:772,24:(PR$,LN);:772,28$Ĺ16368,0$CC%0:TI%1:RT$"":252,0:253,0:254,TS%$ĢYP:XPCC%%Č44544:A(255):A25550:33,39:34,1:35,23)#Ö4:23:"SCORE";6#íPN%1ıL#Ö32:23:"SCORE";R#ñp#HC(7I29((NA$(I)))2)|#ĖHC:18#ĺNA$(I)#{ı#|IJ THIS DISPLAYS SCORE#}ĺ(3);"3";(5);#ĭSC%(0)9Ė6#ĭSC%(0)99Ė4#ĭSC%(0)10Ė8$Ģ20:SC%(03:19:"]******^":10:20:"+":10:21:"+":3:20:"+":3:21:"+":3:22:"[******\"h"íPN%1ī50120"Ö31:19:"]******^":38:20:"+":38:21:"+":31:20:"+":31:21:"+":31:22:"[******\""ù32,1:33,39:34,BT:35,BB:BT1::772,F#ù32,0,BT1:35,BB1:32,0:33,40:34,BT:35,BB3Ö3:19:"]******^":10:20:"+":10:21:"+":3:20:"+":3:21:"+":3:22:"[******\"íPN%1ī50120Ö31:19:"]******^":38:20:"+":38:21:"+":31:20:"+":31:21:"+":31:22:"[******\"'ù334,BT:35,BB3dâ1:1:"]**************************************^+":YY223:YY:40:"++":YY:23:40:"+[**************************************\";nù32,1:33,38:34,BT:35,BB:BT1::772,Fxñ+â18:BT2:BB22:F(772):772,24:32,1:33,38:34TO PLOT THE NAME OF THE STATE AT THE TOP OF THE SCREENi櫢2:2:" "ST$(ST$(ST%),3,14):S1%(ST$)22:20S1%2:MB$;ST$;NR$:Pâ18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:X%,ZY%,ZS%GZS%252ZS%17GHZX%0ĖZX%:ZY%:(ST$(ZS%),2):ZBPP""VZ{ ROUTINE TO ERASE STATE AREA2:2:" "3$ZZ214:" ":3:ZZ.6૲ ROUTINE XO,(Y%128)YO:40180(꜓X%XO,Y%YO3A:FIFQQ%11İ12000XQQ%2İ12100gQQ%22ı249,60:250,0:251,37:31,1:FI( ROUTINE TO DRAW BORDER STATES-10:2"READ BORDER STATES,R";ST%fff>||``|fff| >ffff<080006f6>f<$~~ff>ffffff>|ff|``v|

~ l8ffff|fff<ff~~$f<~0 ~xx88p88f0ff>ff>fffff>~>~~>|vf|fff~fff<<000006f66f~Bf~~fffffn~vffff>ff>6f> 0`>00000> >66666666|f0 f`  n6l  0```0~<<~~~ ~~`0 ``f<x >ff<~`0 A]EE]A>?""? P"""A~?I**II*I* 08<80 @@  """""""" 08<80 @@  **>"6*""">$ >>>>*>><> ?:{>F>F>||>FFF>~~~~~|vF<FF~FF| FF>ff~?[[[[FNVfFf>f>ff|

~ffff<fff<VVVV,ff[[[[,""*:<`@>>>>>>>>>>>>>>>>>>>>>>>>8888|8aqqa!#>#!""&*2""""""">2RLJIHHHHIIGIIIsDDGDDD xp px  >@``ppppp<<  > "2*&" >>>>>>>>"I]]I"aqqa!#>#!>]]]c>c""A>""<  |xx| 6??6$$>A]EE]A>?""? P"""A~?I**II*I* 08<80 @@  """""""" 08<80 @@  **>"6*""">$ >>>>*>><> ?:{>D- MINNEAPOLIS,DULUTH,EDINA,MANKATO,ST. LOUIS PARK,ST. CLOUD- BILOXI,MERIDIAN,HATTIESBURG,GREENVILLE,GULFPORT,OXFORD- ST. LOUIS,INDEPENDENCE,ST. JOSEPH,FLORISSANT,HANNIBAL,JOPLIN . BILLINGS,GREAT FALLS,BUTTE,MISSOULA,BOZEMAIBOU,BANGOR,AUBURN,BIDDEFORD,SANFORD,WATERVILLEt, BALTIMORE,SILVER SPRING,HAGERSTOWN,BETHESDA,DUNDALK,TOWSON, WORCESTER, NEW BEDFORD,CAMBRIDGE,PITTSFIELD,FALL RIVER,LOWELL- DETROIT,GRAND RAPIDS,SAGINAW,FLINT,MUSKEGON,ANN ARBORTERLOO,DUBUQUE,COUNCIL BLUFFS`+ WICHITA,KANSAS CITY,MANHATTAN,LAWRENCE,SALINA,HUTCHINSON+ LOUISVILLE,LEXINGTON,OWENSBORO,COVINGTON,BOWLING GREEN,PADUCAH+ NEW ORLEANS,SHREVEPORT,MONROE,LAFAYETTE,LAKE CHARLES,ALEXANDRIA/, CAR CITY,WAHIAWA,HILO,KAILUAY* POCATELLO,IDAHO FALLS,MOSCOW,TWIN FALLS,NAMPA,PULLMAN* CHICAGO,ROCKFORD,PEORIA,DECATUR,KANKAKEE,EVANSTON* FT. WAYNE,GARY,EVANSVILLE,SOUTH BEND,HAMMOND,MUNCIE+ CEDAR RAPIDS,DAVENPORT,SIOUX CITY,WARBURY,STAMFORD,NORWALK,NEW BRITAIN_)k WILMINGTON,LAUREL,EDGEMOOR,NEWARK,ELSMERE,STANTON)p JACKSONVILLE,MIAMI,TAMPA,ST. PETERSBURG,FT. LAUDERDALE,ORLANDO)u COLUMBUS,SAVANNAH,MACON,ALBANY,AUGUSTA,AMERICUS*z EWA,KOOLAUPOKO,PEARLYUMAN(W FORT SMITH,PINE BLUFF,JONESBORO,HOT SPRINGS,HARRISON,EL DORADO(\ LOS ANGELES,SAN DIEGO,SAN FRANCISCO,SAN JOSE,OAKLAND,PALM SPRINGS(a COLORADO SPRINGS,GREELEY,LAKEWOOD,PUEBLO,ARVADA,BOULDER")f BRIDGEPORT,NEW HAVEN,WATEEXAS,UTUTAH,VTVERMONT,VAVIRGINIA,WAWASHINGTON,WVWEST VIRGINIA,WIWISCONSIN,WYWYOMING'H BIRMINGHAM,MOBILE,HUNTSVILLE,TUSCALOOSA,SELMA,GADSDEN'M ANCHORAGE,FAIRBANKS,SITKA,KETCHIKAN,KODIAK,NOME(R TUSCON,MESA,TEMPE,FLAGSTAFF,SCOTTSDALE,A,MSMISSISSIPPI,MOMISSOURI,MTMONTANA,NENEBRASKA,NVNEVADA,NHNEW HAMPSHIRE,NJNEW JERSEY,NMNEW MEXICO,NYNEW YORK,NCNORTH CAROLINA,NDNORTH DAKOTA,OHOHIO,OKOKLAHOMA,OROREGON,PAPENNSYLVANIA,RIRHODE ISLAND,SCSOUTH CAROLINAS't SDSOUTH DAKOTA,TNTENNESSEE,TXTALALABAMA,AKALASKA,AZARIZONA,ARARKANSAS,CACALIFORNIA,COCOLORADO,CTCONNECTICUT,DEDELAWARE,FLFLORIDA,GAGEORGIA,HIHAWAII,IDIDAHO,ILILLINOIS,ININDIANA,IAIOWA,KSKANSAS,KYKENTUCKY,LALOUISIANA,MEMAINE,MDMARYLAND,MAMASSACHUSETTS%e MIMICHIGAN&j MNMINNESOT4$TM(252)(253)2564$RT%(255):RT$(RT%)N$RT%255TS%050550`$RT%2739000n$RT(RT$)$RT1RT459000$$l ROUTINE TO CLEAR AREA AT BOTTOM OF SCREE$vXX1822:XX:11:" ";:XX:10:%` #ޖ(20(MM$)2):MM$;:$#8000A#59000:RT$(13)58010h# DROP THROUGHT TO NEXT ROUTINE#772,24:24:10:"*************************";:16:772,28:#x ROUTINE TO GET A SINGLE CHAR#}16368,0$252,0:253,0:254,TS%:4454T%(J):CT%(J)CT%(CQ):CT%(CQ)CT%:J)"˱<"ڱ: NOT USED"TM$((TM.5)):3:392(TM$):780,192:770,2:TM$:780,0:770,0:"ܱ: NOT USED"ܹ32,33:2:772,24"T1$"]****^":T2$"+ +":T3$"[****\":T1$:T2$:T2$:T3$"ܹ32,0:772,28ST:STN!ǁST150:AR(50):BR(50):S2%S2%(A):S2%(A)S2%(B):S2%(B)S2%:STo!ǁST150:BP%ST,S2%(ST):ST!SQ%SN1:BP%,SQ%!ǫ51300!dȺ"BSAVE STATES.LST,A$600,L51"!nȱ! ˲ LIST 4 STATES!*ˁJ05:CT%(J)J:J#"4ˁJ05:CQR(6)1:CT%CRT$"": pƫ42000 zƱ= 8Dz ROUTINE TO GENERATE RANDOMP BDz STATES LISTW GǢ1p LǺ"BLOAD STATES.LST"} VBP%1536 `SQ%(BP%):SQ%SN4951100 jǁSTSQ%50:S2%(STSQ%1)(BP%ST):ST tSQ%SQ%SN:BP%,SQ% ~ǫ51300!ǁST150:S2%(ST) THIS DISPLAYS SCORE+}ĺ(3);"3";(5);PĖ10(2((SC%(0)))):20:SC%(0)|ĭPN%2Ė38(2((SC%(1)))):20:SC%(1)ĺ(18);ıvŲ TIMEOUT ROUTINEŖ16:23:"Time's up!";Ţ1:(7);:(7);Ű8700Ŗ16:23:" "; 2,1:33,38:34,BT:35,BB:BT1::772,FEù32,0:33,39:34,1:35,23ZÖ4:23:"SCORE";gíPN%1ı}Ö32:23:"SCORE";ñHC(7I29((NA$(I)))2)ĖHC:18ĺNA$(I)"Ė31:18:NA$(1),ıJĖ229PL%:18TĺNA$(PL%){ı|IJ ation"*/" is given. You must select"S/" the state name from a list of 3"}/" states. You get only two tries:"/" 5 points for the first try and"/" 1 point for the second try.";/58000:(12)/6: /" LEVEL 2: Enter th For the state name displayed,"@:/"you must give the correct"UD/"abbreviation."]N/""X/"GAME PLAY: For this game, the state"b/"names and abbreviations are"l/"displayed in large blue letters."v/""/" LEVEL 1: The state abbrevi2):50000/.9:1:" THE ABBREVIATION GAME ";J.3:14:"INSTRUCTIONS"h.32,2:33,37:34,5:35,23o/6/"OBJECT: In Level 1, you must identify";/"the state name for the abbreviation"&/"shown. Level 2 simply reverses the"0/"task. ,"TWO PLAYERS: Twenty states are given";P,"per game (ten states for each"z,"player). Players alternate turns.","The timing option is not included.","","EXIT: Press the ESC key to exit","from the game.",58000: .(1se the number of":j,"states to be given (1-50). Press"_o,"RETURN for 20 states. Select"t,"the timed or untimed version."~,"Answers must be entered before","selected time elapses. You may","select from 1 to 30 seconds.",""+ntire"+," capital city name. See the"T," instruction booklet for correct"q," spelling (10 pts.)."y$,"".," 2nd and 3rd try - Same as in"8," Level 1, first and second try."J,6L,58000:(12)V,""`,"ONE PLAYER: Choo"+" cities (5 pts.)."-+58000:(12)4+5M+" LEVEL 1 (cont.)"U+""{+" 2nd try - Select the capital"+" city from the remaining two"+" choices (1 pt.).+""+""+" LEVEL 2"+""+" 1st try - Enter the ee shown on"4+"the screen."&>+""QH+"GAME PLAY: For each state, you are"{R+"shown a map with the state name at"\+"the top."f+""k+""p+" LEVEL 1"z+""+" 1st try - Select the correct"+" capital city from a list of 3next program";m"63010CNGS,SHERIDAN,GREEN RIVER,GILLETTE24 FINAL PAGE84>4D4J4P4k4":"BLOAD FINAL.PAGE"w4,6303046THISISANERR^SISANERR"l14:10:"See you next time!"l9:23:"Turn off your computer"m6:24:"before loading NEWPORT NEWS,HAMPTON,ROANOKEX3. SEATTLE,SPOKANE,TACOMA,YAKIMA,BELLINGHAM,BELLEVUE33 HUNTINGTON,WHEELING,PARKERSBURG,MORGANTOWN,WEIRTON,FAIRMONT38 MILWAUKEE,GREEN BAY,RACINE,KENOSHA,EAU CLAIRE,APPLETON!4= CASPER,LARAMIE,ROCK SPRICKSON,JOHNSON CITYW2 HOUSTON,DALLAS,SAN ANTONIO,FT. WORTH,CORPUS CHRISTI,AMARILLO 2 PROVO,OGDEN,OREM,SANDY CITY,BOUNTIFUL,LOGAN2$ BURLINGTON,RUTLAND,BENNINGTON,ESSEX,ST. JOHNSBURY,BRATTLEBORO3) NORFOLK,VIRGINIA BEACH,ARLINGTON,1 WARWICK,CRANSTON,PAWTUCKET,WOONSOCKET,NEWPORT,BRISTOL1 CHARLESTON,GREENVILLE,SPARTANBURG,ROCK HILL,FLORENCE,ANDERSON1 SIOUX FALLS,RAPID CITY,ABERDEEN,WATERTOWN,BROOKINGS,MITCHELL2 MEMPHIS,KNOXVILLE,CHATTANOOGA,CLARKSVILLE,JAANDANB0 CLEVELAND,CINCINNATI,TOLEDO,AKRON,DAYTON,YOUNGSTOWNy0 TULSA,LAWTON,NORMAN,ENID,STILLWATER,MUSKOGEE0 ASHLAND,EUGENE,KLAMATH FALLS,CORVALLIS,MEDFORD,GRESHAM0 PHILADELPHIA,PITTSBURGH,ERIE,ALLENTOWN,SCRANTON,JOHNSTOWN= CITYD/ ALBUQERQUE,LAS CRUCES,ROSWELL,CLOVIS,FARMINGTON,HOBBS/ NEW YORK,BUFFALO,UTICA,ELMIRA,SYRACUSE,BINGHAMTON/ CHARLOTTE,GREENSBORO,WINSTON-SALEM,DURHAM,HIGH POINT,ASHEVILLE0 FARGO,GRAND FORKS,MINOT,JAMESTOWN,DICKINSON,MN,ANACONDAM. OMAHA,GRAND ISLAND,NORTH PLATTE,FREMONT,HASTINGS,KEARNEY. LAS VEGAS,RENO,SPARKS,HENDERSON,BOULDER CITY,ELKO. MANCHESTER,NASHUA,PORTSMOUTH,SALEM,DOVER,KEENE/ NEWARK,JERSEY CITY,PATERSON,ELIZABETH,CAMDEN,ATLANTIC)))2)ML:PT,((NA$(1),ML,1)):ML)..Pâ18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:34,BT:35,BB3/dâ1:1:"]**************************************^+":YY223:YY:40:"++":YY:23:40:"+[************************ML,1))P-ML1(NA$(1)):PTSA%3((11(NA$(1)))2)ML:PT,((NA$(0),ML,1))V-n-SA%,PN%:SA%1,SN%-SA%2,TS%:SA%3,LV-ҌML1(NA$(O)):PTSA%3((10(NA$(0)))2)ML:PT,((NA$(0),ML,1)):ML#.܌ML1(NA$(1)):PTSA%13((9(NA$(1S))2:PG$(MS);:34,2,=J7,BJ33,38:(12);:33,39:l, ROUTINE TO GET NAMES AND INFO FROM DISK FILE,ˆPN%(SA%):SN(SA%1),̈TS%(SA%2):LV(SA%3),ֈNA$(0)"":NA$(1)""-ꈁML1(NA$(O)):PTSA%3((12(NA$(0)))2)ML:PT,((NA$(0),TWO PLAYERS: Twenty states per"I+7"game (10 states for each player)."n+7"Players alternate turns. The"+7"timing option is not included."+7""+7"EXIT: Press the ESC key to exit"+7"from the game."+758000:,8J34,0:1:20(PG$(Mn this game.""*V758000:(12):6K*Z7"ONE PLAYER: Choose the number of"q*d7"states you want (1-50). Press"*n7"RETURN for 20 states. Select the"*x7"timed or untimed version. Answers"*7"must be entered before time elapses."*7" " +7"try, and"+)F7"1 point for the third try."3)P7""_)Q7"NOTE: For a city to be considered a")R7(162);"major city,";(162);" it must be one of the")S7"top six cities in population within")T7"that state. State capitals are not" *U7"included i6"shown."(7"":( 7"GAME PLAY: For each state, four"e(7"cities are listed. You must select"(7"the one which is NOT a major city"((7"in that state. You will receive"(27"three tries: 10 points for the" )<7"first try, 5 for the second e ESC key to exit")'v4"from the game.";6'458000:H'6(12):50000k'611:1:" MAJOR CITIES GAME ";'614:3:"INSTRUCTIONS"'632,2:33,37:34,5:35,23'66'6"OBJECT: To select the city which"'6"is not a major city in the state" (nswers must"6&&4"be entered before time is up. You"^&04"may select from 1 to 30 seconds."f&:4""&D4"TWO PLAYERS: Players alternate"&N4"turns, each player receiving 10"&X4"turns. No timing option is included.";&b4""'l4"EXIT: Press thooklet for correct">%3"spelling. The second and third try"a%3"are the same as in Level 1."i%3""%3"ONE PLAYER: Choose the number of"%4"states you want (1-50). Press"%4"RETURN for 20 states. Select timed" &4"or untimed version. A"of three states (5 pts.). On the"I$3"second try, select the correct"m$3"state from the remaining two"$3"states (1 pt.)."$358000:(12):5$3"LEVEL 2: Enter the full state name"$3"on the first try (10 pts.). See"%3"instruction b: A state is displayed"?#63"with the state name at the top."g#@3"A question mark (?) is placed in"#J3"the location of the neighbor to be"#^3"identified."#h3""#r3" LEVEL 1: On the first try,"#|3"select the state name from a list"#$3(12):50000"28:1:8"2" NAME THE NEIGHBORS GAME ";S"214:3:"INSTRUCTIONS"q"232,2:33,37:34,5:35,23x"26"3"OBJECT: To name all the states which";"3"are neighbors of the state displayed""3"on the screen."""3""#,3"GAME PLAY0:(12)!06=!0"TWO PLAYERS: Twenty states are given";f!0"per game. Players take alternate"!0"turns. The timing option is not"!0"included."!0"!0""!0"EXIT: Press the ESC key to exit"!0"from the game."!058000: "2f"( 40"states you want (1-50). Press"N >0"RETURN to automatically get 20"z H0"states. Select the timed or untimed" \0"version. Answers not entered before" f0"time elapses are incorrect. You may" p0"select from 1 to 30 seconds."!05800e correct"2/" 2-letter abbreviation when the"Y/" state name is shown. You get"0" 10 points for the first try," 0" 5 points for the second, and"0" 1 point for the third try." 0""%0"" *0"ONE PLAYER: Choose the number oժժժժժժժժժժժժժժժժժժ`a`@F@@QB 0ժժժժժժժժժժժժժժժժժժE "t" MAJOR CITIES GAME " Ftj" NAME THE CAPITOL CITY GAME "att" ABBREVIATION GAME "t~" NAME THE NEIGHBORS GAME "t" MAJOR CITIES GAME "HBORS GAME "t" MAJOR CITIES GAME "68,0:9sl ROUTINE TO CLEAR AREA AT BOTTOM OF SCREEqsvXX1822:XX:11:" ";:XX:10:s` NAME,CAPITAL,ABBREVIATION,NEIGHBORS,MAJOR sj" NAME THE CAPITOL CITY GAME "st" ABBREVIATION GAME "t~" NAME THE NEIGHBORS GAM";r59000:RT$(13)58010Gr DROP THROUGHT TO NEXT ROUTINEr772,24:24:10:"************************";:16:772,28:rx ROUTINE TO GET A SINGLE CHARr}16384,0rCH(16384):CH12859010r16368,0sRT$(CH128):163%1:XPCC%:772,24:(PR$,1);:772,28:50420EqŭA13ĺ"";:50420SqŹ16368,0qqTITCTI%:CC%0RT$"":|q!RT$""q&ŁZ0CC%1:RT$RT$(RT%(Z)):Z:qDŭCC%LN1ĺ"";:50420qNRT%(CC%)A:CC%CC%1:(A):50420r24:13:" Press RETURN C%1:RT$RT$(RT%(Z)):Z:6p|ĭCC%LN1ĺ"";:50220\pRT%(CC%)A:CC%CC%1:(A):50220pĖXP:YP:772,24:(PR$,LN);:772,28pCC%0:TI%1:RT$""pĢYP:XPCC%:16368,0pA(16384):A12850425pAA128:A3150500-qŭA8CC%0CC%CC0:TI%1:RT$"")o,ĢYP:XPCC%:16368,0Fo1A(16384):A12850225ho3AA128:A31A48A5750300o@ĭA8CC%0CC%CC%1:XPCC%:772,24:(PR$,1);:772,28:50220oJĭA13ĺ"";:50220oOĹ16368,0oTĭCC%0RT$"":50225oYRT$""p^āZ0C3,40:34,BT:35,BB3ndâ1:1:"]**************************************^+":YY223:YY:40:"++":YY:23:40:"+[**************************************\";nnù32,1:33,38:34,BT:35,BB:BT1::772,FnxñnĖXP:YP:772,24:(PR$,LN);:772,28o"CC%A%2,TS%:SA%3,LV`mҌML1(NA$(O)):PTSA%3((10(NA$(0)))2)ML:PT,((NA$(0),ML,1)):MLm܌ML1(NA$(1)):PTSA%13((9(NA$(1)))2)ML:PT,((NA$(1),ML,1)):MLmnPâ18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:3:XX:11:" ";:XX:10:\4` NAME,CAPITAL,ABBREVIATION,NEIGHBORS,MAJOR 4j" NAME THE CAPITOL CITY GAME "4t" ABBREVIATION GAME "4~" NAME THE NEIGHBORS GAME "4" MAJOR CITIES GAME "llSA%,PN%:SA%1,SN%mS*********************";:16:772,28:L3x ROUTINE TO GET A SINGLE CHARZ3}16384,0y3CH(16384):CH12859010316368,03CH12827ĉ:(12):3RT$(CH128):16368,0:3l ROUTINE TO CLEAR AREA AT BOTTOM OF SCREE*4vXX1822:CC%0RT$"":2!RT$""A2&ŁZ0CC%1:RT$RT$(RT%(Z)):Z:\2DŭCC%LN1ĺ"";:504202NRT%(CC%)A:CC%CC%1:(A):50420224:14:" Press RETURN ";259000:RT$(13)580102 DROP THROUGHT TO NEXT ROUTINE%3772,24:24:10:"***$,LN);:772,28%1CC%0:TI%1:RT$""?1ĢYP:XPCC%:16368,0\1A(16384):A12850425t1AA128:A31505001ĭA27ĉ:(12):1ŭA8CC%0CC%CC%1:XPCC%:772,24:(PR$,1);:772,28:504201ŭA13ĺ"";:504201Ź16368,02TITCTI%0CC%CC%1:XPCC%:772,24:(PR$,1);:772,28:50220M0JĭA13ĺ"";:50220[0OĹ16368,0t0TĭCC%0RT$"":502250YRT$""0^āZ0CC%1:RT$RT$(RT%(Z)):Z:0|ĭCC%LN1ĺ"";:502200RT%(CC%)A:CC%CC%1:(A):502201ĖXP:YP:772,24:(PR**************\";?/nù32,1:33,38:34,BT:35,BB:BT1::772,FE/xñm/ĖXP:YP:772,24:(PR$,LN);:772,28/"CC%0:TI%1:RT$""/,ĢYP:XPCC%:16368,0/1A(16384):A12850225/3AA128:A31A48A5750300/6ĭA27ĉ:(12):50@ĭA8CC%ժժժժժժժժժժժժժժժժժժժժf 0` 3` ` f`LAx`pp 3` ` f`LA90@HQIB|``Fafpp sp `gpLa9x` 0` 3` ` f`LA0`gG__9|@p$p b{@#gK\w':~?p`FqsgxOc?|c? @xc?Lp?La 0` so `|g`LA0 x`~Fy@%  "@$)HR)E@s8`@F9`a]_O_;> 0scpOC|C paL?`?La 0`lso `|{c`LA0 x`Fy@ 5  "8@#gyZpgGTI%:CC%0RT$"":&!RT$""E&&ŁZ0CC%1:RT$RT$(RT%(Z)):Z:`&DŭCC%LN1ĺ"";:50420&NRT%(CC%)A:CC%CC%1:(A):50420&vŲ TIMEOUT ROUTINE&{RT1:TMTS%&Ŗ16:23:"Time's up!";&Ţ1:(7);:(7);&Ű8700'Ŗ16:23:" %Ĺ16368,0<%CC%0:TI%1:RT$"":252,0:253,0:254,TS%L%ĢYP:XPCC%m%Č44544:A(255):A25550550}%ĭA3150500%ĭA2739000%ŭA8CC%0CC%CC%1:XPCC%:772,24:(PR$,1);:772,28:50420%ŭA13ĺ"";:50420%Ź16368,0&TMTCJĖ229(PL%):18:NA$(PL%)!${ı=$|IJ THIS DISPLAYS SCOREQ$}ĺ(3);"3";(5);$Ė10(2((SC%(0))))(SC%(0)999):20:SC%(0)$ĭPN%2Ė38(2((SC%(1)))):20:SC%(1)$ĺ(18);$ĭSC%(0)999İ50142$ı%ĖXP:YP:772,24:(PR$,LN);:772,28T:35,BB3j#Ö2:19:"]********^":11:20:"+":11:21:"+":2:20:"+":2:21:"+":2:22:"[********\"#ù32,1:33,38:34,BT:35,BB:BT1::772,F#ù32,0:33,40:34,0:35,24#ñ#IJ #Ė2:18:NA$(0)#ĭPN%1ı#"Ė31:18:NA$(1)#,ı$31:21:"+":31:22:"[******\"N"ù32,1:33,38:34,BT:35,BB:BT1::772,Fl"ù32,0:33,40:34,0:35,24"Ö4:23:"SCORE";"íPN%1ı"Ö32:23:"SCORE";"ñ #â18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:34,B(772):772,24:32,1:33,38:34,BT1:35,BB1:(18):32,0:33,40:34,BT:35,BB3!Ö3:19:"]******^":10:20:"+":10:21:"+":3:20:"+":3:21:"+":3:22:"[******\"!íPN%1ī50120 "Ö31:19:"]******^":38:20:"+":38:21:"+":31:20:"+":1:35,BB1:32,0:33,40:34,BT:35,BB3 dâ1:1:"]**************************************^+":YY223:YY:40:"++":YY:23:40:"+[**************************************\"; nù32,1:33,38:34,BT:35,BB:BT1::772,F xñR!â18:(18);:BT2:BB22:FXP%:FL$;16368,0( A(16384)5*A127ı;R૲ ROUTINE TO PLOT THE NAME OF THE STATE AT THE TOP OF THE SCREENST$(ST$(ST%),3,14):S1%(ST$)22:20S1%2:MB$;ST$;NR$:' Pâ18:BT2:BB22:F(772):772,24:32,1:33,38:34,BTP"" Z/ ROUTINE TO ERASE STATE AREA>YP%:XP%:s$ZZXP%XP%12:" ":XP%:ZZy. ROUTINE TO FLASH ?? AT XP%,YP%YP%:FL$MB$"?"NR$ Z112:XP%:FL$;:XP%:Z31DL%:Z3:" ";:Z31DL%:Z3:Z1 X%XO,Y%YOA:QQ%11ı%FI4QQ%22ıY249,60:250,0:251,37:31,1:FI_( ROUTINE TO DRAW BORDER STATES-10:2"READ BORDER STATES,R";ST%";:8100:RT1RT337060ǐ28:18ɐRTΐRT1ĬؐRT2ĺ:"RUN MENU"␭RT363000pCR%0ızSS%(ST%)3ıSS%(ST%)2PL%SS%(ST%)(SA%3) ֈNA$(1)"":NA$(0)""jPTSA%4SA%12:NA$(0)NA$(0)((PT)):NA$(1)NA$(1)((PT10)):PTpꈱ32,1:33,38:34,1:35,23:(12):500004:05:"Do you want to:"::32,7:33,30::" 1. Play this game again":" 2.MNPTVXZ^fgbYT~NzJtJoNiJfDeAa?^^n7h3a+]&^!ei`[WS*߻e__?__3\U*RN*9t2hoq&}%''%$!#"(.17=?V`V^U^R]N_K]HbD^Bd>b=b7e4e/h'j%f$ghgff׳W׺Wِ^f^]\^aaaaf\Grr$&-26=FMJOcOc(r!wzzvsolgaZWR!`]PZSYssVzZ[ހbxfډXXړ]ߗcgi`ݟZפ[e洝WRLÝѸTԹWڹ]_caaWaab^UXPKXD?o&*))%"5DKOQVVRTxRtOpMo&mg&c^&# ! """@èCٍ^egokThdX'C`*YVVXVUPP~LwHw1_1_*__!__#11ڻ\IFWFbB`@f=c9c6h4r9x6}410+(!<<ʬJʵJذWֻT١`fѓUא\eW>5s&+./1799DORYaceiifb`ccz`v_t[qWoUqRqPtNvJxJxH}CB@?{8z3|2z0+~*(}||2-*sqGolGhiIhgTfe\vxdykue&/t VVXZuZu]v^q^q t rrrr**ٗ]ߡbhmf^da^af im 7<11VVONK@@V{{\{{eYSGPJG#:qXWXY[]`r8000:34,6:35,22:(12);:RW%7:CL%0:39040]CL%0RW%7ST51İ8000eƘPLpИ37000(A$)1(A$)240080( ROUTINE TO DRAW BORDER STATES-10:2"READ BORDER STATES,R";ST%" ROUTINE TO GET NAMES AND INFO FROM DISK FILEHˆPN%(SA%):SN(SA%1)ëTS%(SA%2):LV(SA%3)}ֈNA$(0)"":NA$(1)""PTSA%4SA%12:NA$(0)NA$(0)((PT)):NA$(1)NA$(1)((PT10)):PTꈱP119:PTSA%3P1:PT,((NA$(0),P1,1)):PTI)SC%(I)51y50300 4y8700C@yX112:Y118:X230:Y222:50800I{yp}14:20A::(ST$(S2%(X)),3,14):}12:18:" That's right! ";:SC%(I)SC%(I)1:50300:8700:X112:Y118:X230:Y222:50800 }X112:Y118:X230:Y222:50800c}- "v12:24:"******************";O v32,1:33,38:34,BT:35,BB:BT1::772,Fmv32,0:33,40:34,0:35,23svy THIS IS WHEN RIGHT SECOND TIMEy14:20A::(ST$(S2%(X)),3,14): y11:18:" ""y13:18:" Very good! "; ,ySC%(,0X/249,63:251,98b/FI$/H0u WHAT TO DO IF ANSWER IS RIGHTY5uCR%1:38000o:u18:21:"Right!"DuSC%(I)SC%(I)10Nu50300Xu8700uu18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT1:35,BB1:32,0:33,40:34,BT:35,BB3WAII.31,1:250,0).249,48:251,401.FIE.249,43:251,50M.FIa/249,68:251,52i/FI} /249,70:251,62/FI/249,73:251,71/FI!/249,77:251,58&/FI+/249,84:251,700/FIC/D/ FILL KODIAKN/31,1:250AMA30.+ۛ]ߝaa`ݦZبTejz~\~~a~|iroKkhK#Nj TjTj ::ԴTԼTؼ\xx\xxegbG^YGgc&`Z'WT%EEEEEEEEEEEEEEEEEEEEEDDEDEDEDEDEDEDEDEDDLXXAXXXMAXDAWDWAXAXXXLLZZXXXXXXXMAADD1AXDWAXDDALABAMA!%CXWWWWWWWALABJ11=:::8999>ACDADEHJLPRVZ\_}au^t[mXmWmVjRlPjMmIrFnEq@s?v>v;v8{7631/,(%#!///ºFLrmdkhihdFb^A\XBPR|z%%')-3;76@DKX{WzUwQuMvIvGqCoBq@k=i9h8k4h1m.o&q$s#w#|!tv w{~# KC!$-38:<@CHMRPR\L\IcHfCkCoGtDB?;.0.*$!!kk%q fd-^0]`"$"* ЂЂ Ђ xЪ x ĈĈĀ Ǣ ""&$"$"&""*$"& ЪѪ """"$""&$"" ԊТը AROLINA-t SDSOUTH DAKOTA,TNTENNESSEE,TXTEXAS,UTUTAH,VTVERMONT,VAVIRGINIA,WAWASHINGTON,WVWEST VIRGINIA,WIWISCONSIN,WYWYOMING- FINAL PAGE--":"BLOAD FINAL.PAGE"-,63030-6THISISANERRKEASSACHUSETTS,e MIMICHIGAN-j MNMINNESOTA,MSMISSISSIPPI,MOMISSOURI,MTMONTANA,NENEBRASKA,NVNEVADA,NHNEW HAMPSHIRE,NJNEW JERSEY,NMNEW MEXICO,NYNEW YORK,NCNORTH CAROLINA,NDNORTH DAKOTA,OHOHIO,OKOKLAHOMA,OROREGON,PAPENNSYLVANIA,RIRHODE ISLAND,SCSOUTH C:11:" ";:XX:10: ,` ALALABAMA,AKALASKA,AZARIZONA,ARARKANSAS,CACALIFORNIA,COCOLORADO,CTCONNECTICUT,DEDELAWARE,FLFLORIDA,GAGEORGIA,HIHAWAII,IDIDAHO,ILILLINOIS,ININDIANA,IAIOWA,KSKANSAS,KYKENTUCKY,LALOUISIANA,MEMAINE,MDMARYLAND,MAMTS%08100*}16368,0:*252,0:253,0:254,TS%:44544O*CH1282739000h*TM(252)(253)256*RT%(255):RT$(RT%)*RT%25550550*RT%2739000*RT(RT$)**l ROUTINE TO CLEAR AREA AT BOTTOM OF SCREE&+vXX1822:XXST)Ⱥ"CLOSE STATES.LST":A)dȺ"BSAVE STATES.LST,A$600,L51"G)nȱQ)8000n)59000:RT$(13)58010) DROP THROUGHT TO NEXT ROUTINE)772,24:24:10:"*******************";:16:772,28:)x ROUTINE TO GET A SINGLE CHAR *y歜ǁST150:S2%(ST)ST:ST`(ǁST150:AR(50):BR(50):S2%S2%(A):S2%(A)S2%(B):S2%(B)S2%:ST(ǁST150:BP%ST,S2%(ST):ST(SQ%SN1:BP%,SQ%(ǫ51300(Ⱥ"CLOSE STATES.LST":"OPEN STATES.LST":"WRITE STATES.LST":SQ%) ȁST150:S2%(ST):'pƁYYY1Y2:X1:YY:(SP$,X2X1);:YY-'zƱO'8Dz ROUTINE TO GENERATE RANDOMb'BDz STATES LISTi'GǢ5'LǺ"BLOAD STATES.LST"'VBP%1536'`SQ%(BP%):SQ%SN4951100'jǁSTSQ%50:S2%(STSQ%1)(BP%ST):ST'tSQ%SQ%SN:BP%,SQ%'~ǫ51300(&{TMTS%:RT1)&Ŗ16:23:"Time's up!";>&Ţ1:(7);:(7);H&Ű8700c&Ŗ16:23:" ";p&RT$"":&Ų SN,PL,NA$&PN%1&SC%(0)0:SC%(1)0:TM(0)0:TM(1)0&PN%2&NA$(0)"RONALD":NA$(1)"MARY ANNE"&NA$(0)"JOSEPHINE"&ű'%1:XPCC%:772,24:(PR$,1);:772,28:50420E%ŭA13ĺ"";:50420S%Ź16368,0q%TMTCTI%:CC%0RT$"":|%!RT$""%&ŁZ0CC%1:RT$RT$(RT%(Z)):Z:%DŭCC%LN1ĺ"";:50420%NRT%(CC%)A:CC%CC%1:(A):50420%vŲ TIMEOUT ROUTINE$ĭSC%(1)99Ė32$$Ģ20:SC%(1);/$Ĺ780,05$ı]$ĖXP:YP:772,24:(PR$,LN);:772,28k$Ĺ16368,0$CC%0:TI%1:RT$"":252,0:253,0:254,TS%$ĢYP:XPCC%$Č44544:A(255):A25550550$ĭA3150500$ĭA2739000-%ŭA8CC%0CC%CC23:"SCORE";#ñ#ñ7#HC(7I29((NA$(I)))2)C#ĖHC:18O#ĺNA$(I)U#{ıo#|IJ THIS DISPLAYS SCORE#}ĺ(3);"3";(5);#ĭSC%(0)9Ė6#ĭSC%(0)99Ė4#ĭSC%(0)10Ė8#Ģ20:SC%(0);#ĭPN%1ī50340#ĭSC%(1)10Ė36$ĭSC%(1)9Ė34 pЊ Ĉ  ĈĈ $<" ЪѪ <"" ԊТը Њ ĀĀ ݻݻ $$$ Ъ " $ ԊТը Њ ժ лݻݠ   Ъ   ԊТը Њ          0)L)``z#????    !Ӯʠ"Š'Ҡ ̮Š" Ҡ/ՠ6̠Š"Ӡ(Ӡű ӮԠϠΠ%ҠӠ ̠*̮ʠҠԠͺ ժ  ԊТը  ЂЂ Њ Ъ Ъժժժժ .,$,<*, ԊТը <<$ ЂЂ Њ Ъ Ъժժժժ  $"""* ժЪѪ """"""$"* ЂЂ Ђ Ъ p ݣ >>$"""*$> ) Ne8700NeNeDR(4)GNe8:14:" "_Ne20(WW$(D))2:14kNfWW$(D)uNf8700Nf20(WW$(D))2:14:" "NWfN0u WHAT TO DO IF ANSWER IS RIGHT N5uCR%1:38000N:uSC%(I)SC%(I)10 YP9:LN14MN%50400MX%A:0M'(12):50000\M N14:24:" Press RETURN ";:8000:30200~M%NX12:Y114:X239:Y216:50800M*NMaRT$S3$CC%1:MaCC%0M bMeDR(4)Me8:14:" ";Me20(RW$(D))2:14NeRW$(D:YP10:LN2LZ#50400 L_#TMTI+Ld#(18)1Ln#GLx#X%(A):Y%(A1)gL#X%127ēX%XO128,Y%:9110vL#X%XO,Y%}L#AL#L% ABR FIRSTL0%(5):(3);4;L5%2:9L:%S2$;:(18);:" ";:(5);:(3);4;:">" MD%XPHC((ST$(S2%(X)),2))24:39000 K"JK_"K'#,K(# PLOT ST / AB3K*#1EK-#(5):(3);4UK2#LV1ī1500K3#S2$(ST$(S2%(X)),3,14):S3$(ST$(S2%(X)),2)K7#HC%16(S2$)K:#HC%:10K<#S2$;:(18);:" ";:(5);:(3);4;:">";KP#1:(5);:(3);4; LU#XPHC%(S2$)240 JT8005JTS%059000+J16368,0IJRT(16384):RT1288103WJ16368,0eJRTRT128wJRT27ī39000JRT((RT)):RT1RT38102JJ! 'AUTO RETURNJ!30200J"16368,0J"J1100J"(16384)141ıK"(16384)15500#I12:18:" The answer was: "JI14:20A::(ST$(S2%(X)),3,14):UI20000^I999mI:(12):sI?I@14:24:" Press RETURN ";IB16368,0IEA(16384):A1288005IFAA128IGA13İ58500:IHA27ī39000JJA127Ĺ16368,0TMTS%2195$Hz12:19RT::RT*HUHRTA1CR%1:38000:31000:8700:999fHCR%0:38000H14:24:" Try again. ";:8100HTS%0TMTS%2230H12:19RT::RT:HRTA1İ32000:8700:999H12:18:" Wrong again. "I87 G(18)GG LEVEL 1@G412:18:" Multiple choice."NG>AR(3)1iGHS2%(X)1S2%(X)2A0GRS2%(X)49S2%(X)50A2G\ZQ02:12:20ZQ:ZQ1;" ";(ST$(ZQS2%(X)A),3,14):ZQGf12:24:" Enter a number. ";Gp8100:30200HuTS%FU:I0:50200:I1:50200"FVZF`SC%(0)SC%(1)I0:50200::14:20:NA$(0);" WON!"FjSC%(0)SC%(1)I1:50200::12:20:NA$(1);" WON!"FtSC%(0)SC%(1)ĝ:16:20:"TIE GAME!"F~58000:F(5):(3);4;:F19:11F(ST$(S2%(X)),2)300:26000:999E26100fE12(S3$)2:14:"The answer was ";(23);(3);"3";S3$;(18);".";:8000lEwE50200E20005:LV1İ31040EXEPN%2İ1100E39000EL:I0:50200:I1:50200FQ3:16:" "RT$S3$İ30000:999D261008D15:14:"Try again."IDCR%0:38000SD9040jDTS%0TMTS%670DRT$S3$SC%(I)SC%(I)5:50300:26000:999D26100D16:14:"Last try."D9040DTS%0TMTS%695ERT$S3$SC%(I)SC%(I)1:50:"and press RETURN.":200BC11:6:"STATE":8:"ABBREVIATION:"NCX1SNeCST%S2%(X):PL%I1CX12:Y110:Y212:X239:50800CPN%2(X2)X2I1:240CI0CST%S2%(X):PL%ICPN%2Ğ:50200:C9000CTS%0TMTS%517D,0:33,40:34,0:35,24'BiPN%2SN209Bk(12):50000DBn6:1:hBx" NAME THE ABBREVIATION GAME "sB}16:3B~"LEVEL "LVB50100BI0:50200BPN%2I1:50200B50300B8(2LV)2:5CLV2Ė3:6:"Type in the abbreviation":7S)((1)ZS)1MA(SP$" "nA2XO10:YO129:TC135:NC135A<R(ZZ)((1)ZZ)1AFS1%(50),S2%(50)APSC%(1),TM(1),RT%(40)AQST$(50),SS%(50)ASX150:ST$(X):XA`35000Ad51000Bf32e# @5000@29951&@SA%21265H@PR$"_______________________"@ RW$(1)"Fantastic!":RW$(2)"Congratulations!":RW$(3)"Excellent!":RW$(4)"Very good!"@ WW$(1)"No.":WW$(2)"Incorrect.":WW$(3)"That's not it.":WW$(4)"Wrong answer."AR(Z                  Y% #A#QQ%119117 #(#FIU#QQ%22Ĺ249,60:250,0:251,37:31,1:FI_#9900e#t%LN(AD1)&%STAD4:ENADLN220%ASTEN2:%X%(A):Y%(A1)D%Y%127ēX%XO,Y%128:9560N%X%XO,Y%X%Ab%FIg%QQ%11İ12%(AD2):CY%(AD3):@#249,CX%2:250,0:251,CY%:31,1UF#MO19500: 256X128jP# 128X256 MODEU#CX%(AD2):CY%(AD3)Z#LN(AD1)d#STAD4:ENSTLN22n#ASTEN2x#X%(A):Y%(A1)#X%127ēX%XO128,Y%:9110#X%XO,T38102"! 'AUTO RETURN-!30200;"16368,0H"J1100]"(16384)141ıw"(16384)155ī39000~"J_"'#(# ROUTINE TO PLOT THE STATE-#QQ%ST2#AD(LC(ST2))256(LC1(ST2))<#MO(AD): MODE BYTE>#CX";B16368,0,EA(16384):A12880058FAA128KGA13İ58500:\HA27ī39000qJA127Ĺ16368,0{T8005TS%0ī5900016368,0RT(16384):RT128810316368,0RTRT128RT27ī39000RT((RT)):RT1R1İ32000:999/12:18:" Wrong again. "98700Z12:18:" The answer was: "z14:20A2::CA$(S2%(X)):14:24:" Press RETURN ";:8000:30200:X111:Y118:X230:Y222:50800999:(12):?@14:24:" Press RETURN f12:24:" Enter a number. ";)kA2A:p8100:30200RuTS%0TMTS%2195gz12:19RT::RTmRTA1CR%1:38000:31000:999CR%0:3800014:24:" Try again. ";:8100TS%0TMTS%225012:19RT::RT: RTA12:20:NA$(1);" WON!"@tSC%(0)SC%(1)ĝ:16:20:"TIE GAME!"R~58000:39000a LEVEL 1412:18:" Multiple choice.">AR(3)1HS2%(X)1S2%(X)2A0RS2%(X)49S2%(X)50A2\ZQ02:12:20ZQ:ZQ1;" ";CA$(ZQS2%(X)A):ZQ "X+PN%21100639000RL:I0:50200:I1:50200Q3:16:" "U:I0:50200:I1:50200V`SC%(0)SC%(1)I0:50200::14:20:NA$(0);" WON!"jSC%(0)SC%(1)I1:50200::RT:RTA1İ32000:999E12:18:" Wrong again. ";:8700Km12:18:" The answer was: "14:20A2::CA$(S2%(X)):ST%S2%(X):CR%0:380008000:30200:X111:Y118:X230:Y222:50800502002:2:" 02:12:20ZQ:ZQ1;" ";CA$(ZQS2%(X)A):ZQO 12:24:" Enter a number. ";X A2Ai 8100:30200 TS%0TMTS%702 12:19RT::RT  RTA1İ31000:999 14:24:" Try again. ";:8100 TS%0TMTS%71212:19RT::A$(S2%(X))İ30000:8700:X111:Y118:X230:Y223:50800:999Q X17:21:"Sorry."[ ]8700~ bX112:Y118:X230:Y223:50800 gCR%0:38000 q12:18:"Here is some help." vAR(3)1 {S2%(X)1S2%(X)2A0 }S2%(X)49S2%(X)50A2- ZQТ1:& 20((ST$(S2%(X)),3,14)):29 (23);(3);1;R (ST$(S2%(X)),3,14) (18):5:16:"What is the CAPITAL CITY name?" LV1ī2000 14:24:" Press RETURN "; :XP14:YP18:LN14:50400 30200 TS%0TMTS%610; RT$CME THE STATE CAPITAL GAME "& 501005 I0:50200K PN%2I1:50200V 50300b X1SN X13:Y12:Y215:X232:50800 PN%2(X2)X2I1:240 I0 CONTINUE ON ST%S2%(X):PL%I PN%2Ğ:50200: STS2%(X):9000 135:NC135& <R(ZZ)((1)ZZ)1; FS1%(50),S2%(50)U PSC%(1),TM(1),RT%(40)r QST$(50),CA$(50),SS%(50) SX150:ST$(X):X UX150:CA$(X):X V `35000 d51000 i32,0:33,40:34,0:35,24 k(12):50000 n5:1 x" NA:( 500029952!10:CPR$"_______________________"M10:f"BLOAD STATES.OBJ"uSA%21265"OPEN BORDER STATES,L60"0:1#DL100:FI30104$LC31744(SP$" " 2XO0:YO129:TC            7ʠҷϠƠ٠ԠϠҠӸĠҷĠРٶ̱̠ҬӸĠĠ ҷĠӠ٠̠Ӹ͠ ҷĠвȠӠ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ƹ  !!!!!!!"""""""#######$$$$$$$%%%%%%%&&&&&&&''''''' @ @ @ @PPP                        @& Lu4 Lu- u uL+v) uFfyz`Ff` ((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPu;Gvw Fv$xy wx I1``Q`Gvw Fv xyLruwx1)``xIxkyIky`)xLux uyzyz u u u u`ɌF     f0ff>ff>fffff>~>~~>|vf|fff~fff<<000006f66f~f~~~fffffn~vffff>ff>6f> 0`>00000> >66666666|f0 f`  n6l  0```0~<<~~~ ~~`0 ``f<x >ff<~`0 A]EE]A>?""? P"""A~?I**II*I* 08<80 @@  """""""" 08<80 @@  **>"6*""">$ >>>>*>><> ?:{> W         O ң/  M $' 1$L11 $$ ɍ` )?~?7 , AY M 3 o 2+I`*)hQL$h 1L$h)L$h*`ɇ :I :`,0`  I`UU**ժU**U4+;߂ +|[?,$ +|B\|#B\9 Σ8 0h`H 0Iȱ 0I _ 0h `+i,^!*i,4*iPII*&if*+`, P\H_p , PPH` Bh $ 0IPH*&& h*H&& h& f$)% Ș)% L$, J , 0IH)hl )M H4+))`,1ɰ(ɸ$)_ B``ɠhɃ`ə`ɚ`ɂ`ɀ`ɐ`ɑ `ɗ@ `Ʌ `ɒ `ɔL `H, P $$!$  , %%#%% y $h( k HH _ 0h,  k  $( ɛɍ `HH 3, P Ș! 3$hh` k,  %%#%*I* 0`H, ,0 h`(*)) &+`H,0 @ &,P,R,Wh,  N H%2 hH)*** **m(L(mhH h '`,ɰ Ʌ+hi#2H $)) &)!(*e))e++8) )L Lp"H $)) &+(*hi#H j j L *(+) 0!*(`$ H))? @(hN    Vɖ ILɓ%Ɂ)ɍ*ɘ&,  ɕ( ` (LN N ` `(5 $, P$$!#$%, i#V%i#%M%L" `"%$Iiii=ߤ$%H " %%, %%#h%LB y ,fH <hLp $,  %%#%  kH %+I`*L )*! 0h`"H $)) &)(*)#`LkL Li ލR,0 ,J̩@K @& &  < 2 y6789L8L< | $(  ΰɐ$, P$$~!$$P$"%n%, %%L"ɍ7Ɋ7ɈɌOɎfɆ>ɉɋɏZ $ H h .#` L}%J u H h d #` L Q ; #` Q #`#2 '( H() 1 eȱm)h`JJ`#JȱJLh `#  <(eΨ =)eϰ%Hh>?iJK̅  1& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`00', "&,i8i#H&ii&hif&i'`'i, &i,. &iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaIL &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%0J$)` .Q&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j          IELD, CT 06430"- 16:11:"(800) 232-2224"Q 20:11:"ALL RIGHTS RESERVED."W '4:"PRESS RETURN."{ GEA$:: m3086& D$;"BLOAD VL TITLE,A$4000"R 16297,0:16302,0:16304,0:16299,0c J15000:Jv 230,32:3086~ : (23):7:12::"GAME OF THE STATES" :13:11:"(C) QUEUE, INC. 1990":14:11:"338 COMMERCE DRIVE" 15:11:"FAIRF222)4ī3 3X 87:2:"REMOVE";:9:2:"WRITE PROTECT TAB";:11:2:"AND RESTART";` 957i <50 >:(4)"LOCK NAME" ?:(4)"UNLOCK NAME" @3 d1012,0 n4 x:: z12:12:"ONE MOMENT PLEASE..." |D$(13)(4) ~230,64:Y 3276760!1012,0V HGR : POKE - 16302,0: PRINT "BLOAD PIC.LOGO"j HELLO PROGRAMs 120 I12000:I"BLOAD TIMER""BRUN LOMEM:":16384"BRUN HIGHER TEXT"#15:12:"LOADING..."("RUN MENU" 2(   0L@` g RgƖ8PgPQhQghe Ӣi  g y  gh^_8^eP^ȱ^ eQ^^_Ll8ePeQ`LM: ";SN5LV(g14:5:"STATES MISSED"[lCL%0:RW%7:ST150:SS%(ST)PL2ĂST:39100vCL%183:RW%:(ST$(ST),3,14);:RW%RW%1:RW%21RW%7:CL%CL%1:CL%239060ST391008000:34,6:35,22:(12);:RW%7:CL%0:39040CL%0ENU"␭RT363000/pSS%(ST%)2(PL%1)CR%5zYX ROUTINE TO DO SCORING PAGEj]32,1:33,38bPL1PN%:32,1:33,38:34,1:35,23:1:(12):50000:13:1:" FINAL REPORT " d1:3:NA$(PL1);:14:"SCORE: ";SC%(PL1);:PN%1Ė26:"MAXIMU4:05:"Do you want to:"(::X32,7:33,30::" 1. Play this game again"u:" 2. Go back to Menu:" 3. Quit"TS%0Đ:10:18:"Enter a number >";:59000:RT(RT$):RT1RT337060ɐRTΐRT1ĬؐRT2ĺ:"RUN M ROUTINE TO GET NAMES AND INFO FROM DISK FILEOˆPN%(SA%):SN(SA%1)l̈TS%(SA%2):LV(SA%3)ֈNA$(1)"":NA$(0)""PTSA%4SA%12:NA$(0)NA$(0)((PT)):NA$(1)NA$(1)((PT10)):PTꈱ32,0:33,40:34,0:35,24:(12):50000,84:251,700/FIC/,D/ FILL KODIAK=N/31,1:250,0QX/249,63:251,98Yb/FI_/e/u0uTM(PL%)TM(PL%)PTTI:uSC%(PL%)SC%(PL%)SC?u50300DuCR%0:SC10CR%1Iu38000XuPN%1TMTM(PL%):56000buPN%2PL%1PL%lu4410000s'%*:12:18RT:RT:+[+>. FILL HAWAIIO.31,1:250,0c.249,48:251,40k.FI.249,43:251,50.FI/249,68:251,52/FI /249,70:251,62/FI/249,73:251,71/FI!/249,77:251,58&/FI +/2496384):A1288005FAA1280GA13İ58500:@HA2739000UJA127Ĺ16368,0_T8005s! 'AUTO RETURN~!58500"16368,0"J1"JJ1"(16384)141ı"(16384)155ī39000"J708710_"'59000:RT(RT$):RT1RT "VH`SC%(0)SC%(1)PL%0:50250::14:20:NA$(0);" WON!"jSC%(0)SC%(1)PL%1:50250::12:20:NA$(1);" WON!"tSC%(0)SC%(1)ĝ:16:20:"TIE GAME!"~58000::(12):@14:24:" Press RETURN ";B16368,0EA(1 g570004l18:MM$(ST$(RS%),3,14):57000:".">8000I50800T5950016:3:" "PN%2İ50200TRPN%2İ110039000L:I0:50200:I1:50200Q3:16:" 5 N58500:13:17:" Wrong again. ":8700:SC0:600L X CORRECT ANSWERW Y58500b [30000 ]14:18SB%::CT$(RS%,RC%)::8700 `13:17:" "b59500:16:2:" ":16:MM$CT$(RS%,RC%)" is in"14:24:" Try again. ";$ 59000; !TS%0TMTS%555n &11000:RTSB%SC5:15:17:"Very good!":600t + 013:24:" One last try. "; 559000:TS%0TMTS%SC0:600 :11000:RTSB%SC1:13:17:"That's right!":600 D LOSER CITY(4):CL14# 18CL:12:CL;" ";B CLSB%ĺCT$(RS%,RC%):500] CT$(ST%,CT%(CL)):500e CL 16:03:"Choose the city not in this state:" 59000:TS%0TMTS%525 11000:RTSB%SC10:16:17:"Right!":600  CR%0:38000 1:11:" MAJOR CITIES GAME "' J501002 T50300D ^PN%1İ56500O h50200n rPL%0: PLAYER 1 STARTS |TR1SN:ST%S2%(TR) STST% 40000 44000 PN%2Ğ:50250: RS%R(50):RS%ST%430 RC%R(6)1 52000 SB%RSP$" "C MB$(23)(3)"1":NR$(18)Q HM$(12)j R(RZ)((1)RZ)1 SC%(0)0:SC%(1)0 ""BLOAD STATES.OBJ" ,ST150:ST$(ST):ST 1ST150:CT05:CT$(ST,CT):CT,ST 651000 7HM$ 850000 :, 5000c MAJOR CITIES*d299513f1:Ri"OPEN BORDER STATES,L60"anSA%21265nsFI30104{uLC31744xTC135ST$(50),S2%(50),SS%(50),RT%(20),RS%(50),CT$(50,5)35000LV2DL%100PR$"__________________""                Press the ESC key to exit from";1")"the game.">,)58000:I*(12){+50000:6:1:" NAME THE CAPITAL CITY GAME "; +14:3:"INSTRUCTIONS"+32,2:33,37:34,4:35,23+6 +"OBJECT: To correctly name the" *+"capital city of the statYou may select from 1 to 30 seconds."7x(58000:(12)>(6l("TWO PLAYERS: Twenty states are given";("per game (ten states to each player).";("Players take alternate turns. The")"timing option is not included.")"" )"EXIT: "*2("ONE PLAYER: Choose the number of"P<("states you want. If you press"zF("RETURN, you will automatically get"P("20 states. Select the timed or"Z("untimed version. Answers not entered";d("before time elapses are incorrect."%n("For your first try, enter"A'"the entire state name. See the"h'"instruction booklet for correct"("spelling (10 pts.). The second and" ("third tries are presented exactly as"("described in Level 1, first and"("second try."(("'""0'"LEVEL 1: On your first try, select"Z'"the correct state name from a list"'"of 3 states (5 pts.) On the second"'"try, select the state name from the"'"remaining two states (1 pt.)."'58000:(12)'6:'"LEVEL 2: correctly identify the">L'"name of the state shown on the"MV'"screen."U`'""j'"GAME PLAY: For each turn, you are"t'"shown the outline of the state in"~'"question. Neighboring states are"'"labeled with the state abbreviation."ss the ESC key."- GO TO APPROPRIATE GAMEC:"RUN";PG$(RT)oRT10000,11000,12000,13000,14000,15000u{'(12)'50000:12:1:" NAME THE STATE ";$'14:3:"INSTRUCTIONS".'32,2:33,37:34,4:35,238'6:B'"OBJECT: To? (1-30) >">XP33:YP20CH50400:TS%(RT$):TS%1TS%30840b13:24:" Press RETURN ";32,0:33,40:34,0:35,2458000:(12)3600011:10"Getting the states."10:20"To exit from the game,"12"pre150400:SN%(RT$):(SN%1SN%50)RT$""650IRT$""SN%20:SN%[ TIMER STUFFf6:18"Timed or Untimed? (U/T) > ";59000:RT$"T"RT$"U"730RT$RT$"U"900  SECONDS PER STATE*5:20 4"Seconds per state LEVEL 0 9:13:" "> RT5600J 12:13c "Level 1 or 2? > "; 59000:LV(RT$):LV2LV1520 LV X NUMBER OF STATES. bPN%2SN%20:900 l6:16 v"How many states? (1-50) >" XP32:YP16:LN2E ENTRY 9:8) "Enter your name";: PN%2ĺ"s";I " here:";o 9:13:"Press RETURN when done." PN%2Ė5:10:"#1" XP16(PN%1)8:YP10:LN9 50200:NA$(0)RT$ PN%1500 22:10:"#2" XP25 50200:NA$(1)RT$ 59000:RT$"Y"RT$"N"320& ERT$D T32,0:33,40:34,0:35,24O ^(12)b cRT$"Y"İ1500 f32,0:33,40:34,0:35,24 g(12) h50000 r5:5 w"How many players? (1 or 2) > "; |59000:PN%(RT$):PN%2PN%1380 PN%  NAM"3 - Abbreviation Game"$ 5:12G "4 - Name the Neighbors Game"R 5:14o "5 - Major Cities Game"{ 11:24 " Choose a Number "; 59000:RT(RT$):RT1RT5270 5:RT24::RT;: ,8:19 6"Instructions? (Y/N) > "; @___________"# <NA$(0)" ": FNA$(1)" "E P36050c Z32,0:33,40:34,0:35,24n c(12)y d50000 i3 n17:1 x" MENU " 5:6 "1 - Name the State Game 5:8 "2 - Name the Capital City Game" 5:10 , 200029951&SA%21265/1:90:1P"BLOAD POINTERS"e"BLOAD SHAPE1"| "BLOAD FILL.OBJ" PR$"______________________"J15:PG$(J):JSP$" "(DS$".................." 2PR$"__________                        c 0`l3` @ {c`LA0 8`@F8@-  "@T)HB)F`@`@F@@@c 0` 3` @ g`LA? 0`@F0@wdpx]/x@ g3\pg9`@9`@g90`p@ 3`| f`LAa?@G<f 0` 3` ` f`LA? 0`@F0~g@q?~y{p?0`x`? 3`|G f`LAq?@HEf 0` 3` ` f`LA 8`@F8 ժժժժժժժժժժժժժժժժժժժժ|g@a?~~y9`?                 1:35,BB1:32,0:33,40:34,BT:35,BB3Jv12:24:"******************";w v32,1:33,38:34,BT:35,BB:BT1::772,Fv32,0:33,40:34,0:35,23v ROUTINE TO GET NAMES AND INFO FROM DISK FILEˆPN%(SA%):SN(SA%1)̈TS%(SA%2):LVЖ13:23:"TIME EXCEEDED";:J1800:J:13:23:" ";E:RK/u[0u IF RIGHT t:uSC%(PL%)SC%(PL%)SC?uTMTS%TS%0SC10SC%(PL%)SC%(PL%)5Nu50300buPN%2PL%1PL%lu'u18:BT2:BB22:F(772):772,24:32,1:33,38:34,BT !58500"16368,0&"J1100;"(16384)141ıU"(16384)155ī39000\"Jb_"yR DISPLAYS TIMERAS$((TM))RTS%0ıR34:4:" "R34:5:" "R382(AS$):4&R(5);:(3);4;:(TM)0R780,0?5RTMTS%A(16384):A1288005#FAA1286GA13İ58500:GHA27ī39000\JA127Ĺ16368,0fT8005lz16368,0RT(16384):RT128810316368,0RTRT128RT27ī39000RT((RT)):RT1RT38103! 'AUTO RETURN:50200(I2SC%(0)SC%(1)PL%0:50250::14:20:NA$(0);" WON!"<SC%(0)SC%(1)PL%1:50250::14:20:NA$(1);" WON!"FSC%(0)SC%(1)ĝ:16:20:"TIE GAME."P58000:39000:(12):@14:24:" Press RETURN ";B16368,0EYP%:XP%:(ST$(S%(BN)),2)%V595000j50200F~PN%2NSSN1300cPN%2TRNSĞ:50250:oNSNS1MAX%MAX%1:BN3:16:" "5800050800:TRPN%2130039000 WINNER/LOSER correct!"020:MM$(ST$(S%(BN)),3,14):57000@8700:1100T LESSER LOSERiSC5:PT3:3000059500:18:16:"Good job!"20:MM$(ST$(S%(BN)),3,14):570008700:110015:20:"Very good!"SC10:PT0:300008700L:PT10:3000059500I16:03:" The correct answer is: "p20:MM$(ST$(S%(BN)),3,14):57000{5800016:3:" "1100 PARTIAL LOSER MODESC1:PT5:30000 59500:18:14:"Thats TSB41000$19RT:12::RT;")"C:14:24:" Try again. ";TCR%0:38000n59000:RT1RT394658500:TS%0TMTS%953RTSB4980:12:19RT:RT;")":12:18:" Wrong again. "8700 LOSER MODE SC0BN)S(3)ST%760D S(2)R(50):S(2)S(3)S(2)S%(BN)S(2)ST%780] S(1)S%(BN):SBR(3) 4AN13:19AN:12:AN;") ";:ANSB3ĺ(ST$(S(ANSB3)),3,14):860 H(ST$(S(ANSB)),3,14) \AN p59000:RT1RT3880 zTS%0TMTS%941 R 14:24:" Press RETURN ";< XP14:YP18:LN14:50400G 30200^ TS%0TMTS%730 RT$(ST$(S%(BN)),3,14)1020 17:20:"Sorry.":8700 17:20:" " CR%0:38000 18:11:" Here is some help." S(3)R(50):S(3)S%(ST% X40000 l44000k 1::"READ BORDER STATES,R";ST%:BS%:ZQ17:X%(ZQ),Y%(ZQ),S%(ZQ):ZQ:"" "":BN1BS%1:XP%X%(BN):YP%Y%(BN):BT%S%(BN):43000 6:16:"What is the border state name?" LV1Ė12:18:"Multiple choice.":76000 HM$ 50000= 7:1:" NAME THE NEIGHBORS GAME "H 50100S 50300^ 50200{ PL%0: PLAYER 1 STARTS PN%2Ğ:50250: NS1:FDG%0 TR1SN 0S2%(TRFDG%)2S2%(TRFDG%)11FDG%FDG%1:560 5ST%S2%(TRFDG%) DSTYO0" PR$"__________________"I SP$" "j MB$(23)(3)"1":NR$(18)x HM$(12) R(RZ)((1)RZ)1 ,SC%(0)0:SC%(1)0:TM(0)0:TM(1)0 MM$"": "BLOAD STATES.OBJ" ST150:ST$(ST):ST 510& 5000*P32,0:33,40:34,0:35,245d29951DnSA%21265QpFI30104^rLC31744jsTC135u1:"""OPEN BORDER STATES,L60"ST$(50),S1%(50),S2%(50),SS%(50),RT%(20),RS%(50)MAX%035000SN48SN48DL%100                   ii? d-6#Ūų30 ' , /() ".*!$%# &+-21 Sr3m.q,o*k*h!gggggf ѯRӳVڤ]ߢafܪ\ܮ\rrYrr^olSjfSjg*eb,*y2XNN{VvWtRoUlUkNgOfHaIbBb?^=^7X2X/Y+U'XUPMIśBBһXܻaуY߃d8L^,//,,0279<@EHJNQUuUuG\G],]]%]].)%$"s;qn;lj;yyXyy]yyaԡX[ܧ_c#!--/HD#WVVXSSPtPtKvHtGyCw@z;85531.+%hVgh]ikelkihfcc^c`].ZV*S18f'+023OeOe'ee!eeb^[X#ҽX`gb_O\XOUQOQVYZ_YdiYmpYpp`I;,-.0026;ADDGIKMPScT^WSWVSUOXP]P_N^JcGhBlAx@|>z;;962.,)%/.GNճUլerp5nl5@>MOPUVXZ[YZ\\~^}]|]y]v]u]s]s[uXtVxRyOzG|#~&%#"͜LˠKˤMΦOrpapodoepfqnizwvuuFBg'*.259;=@BFFGIKOTXROjPgKgHgDf>e;e8f6c0d-f*f'ee"ffff"<<ݥahi6<8=?CCEECCAazaxMwLzIxGwEz@|;{7x5yvsqnéCïCdhdiwtaroawt7qn7N?{!*++DFIKNTXZ\[^[XUT~P|L~IzGwAtAAǘDCEFHHGÎ@<=?AC423137877{x*t'r(q,m/r4u3{3bd+d(^%](Z)Y-a-[X0S3X6[3@Pz!#&',/13(*+37:<=@EEHKLOPRSUXVG2"|!{x!us!ٗ]ޕae8(g{"}$$'%""*?BDMUZZchhecb^ZUSIF=8620-,-|.w-u*t*r(l'i&g"fc)`Z+{{|}g:6t"$&*,1?EHNPUXW\[Z|ZzQ{NzL~G{Es5w3s0s+u*s(s$srrrrΟKIǟFEƥFܞ_cߒ`affffff!7l+RlRl+gb+_Y+gbR_YRll[lldף[ߣdӳSӼS//"n'*9m)IJJJKNNPPN}PvSsUpUeYaUmNmLjJl)mm#mqrt))ȮGƷEýBb]]\Wfn,0=!%&&ffb]ݸ]li[gd[aa[][qm:if4c_.xxxxf&A7r(+,.3479:=??CIKLLxLxFsFs3r')#'';;;ϓQӕUVWٔ\ސbxxSxxYqpColClCjgCss#sss7@9s6OQSUUY\\WUUSROOHFD|C}A~?{u;u9s7s5t5r/r.s.u.v.x,x&&|q||};~~IQǀA߁e3冇7͉W's[ݍ/GiّYA|G*Cz?ACDFGINOUU\~]{[u\yvtrnmj֤Xڨ\ܬ\ro\lg`ebaadmnc !#JLNPPQSUVX[]_eaf!! ! ! ! ! !!!!!!!!!          LN(AD1)#&%STAD4:ENADLN2220%ASTEN2H:%X%(A):Y%(A1)hD%Y%127ēX%XO,Y%128:9560wN%X%XO,Y%~X%Ab%FIg%QQ%11İ12000j%QQ%2İ12100l%QQ%22Ĺ249,60:250,0:251,37:31,1:FI:%'(12):50000. FILL HAAD2):CY%(AD3)6@#249,CX%2:250,0:251,CY%:31,1PF#MO19500: 256X128dP# 128X256 MODEsZ#LN(AD1)d#STAD4:ENSTLN22n#ASTEN2x#X%(A):Y%(A1)#X%127ēX%XO128,Y%:9110#X%XO,Y%##A#FI# %200 ! 'AUTO RETURN'!302005"16368,0B"J1100W"(16384)141ıq"(16384)155ī39000x"J~_"'#(# ROUTINE TO PLOT THE STATE-#QQ%S2%(X)2#AD(LC(ST2))256(LC1(ST2))<#MO(AD): MODE BYTE>#CX%( B16368,0)EA(16384):A12880055FAA128HGA13İ58500:YHA27ī39000nJA127Ĺ16368,0xT8005~16368,0RT(16384):RT128810316368,0RTRT128RT27ī39000RT((RT)):RT1RT3810330T:RTA1İ32000:999C12:18:" Wrong again. ":8700Ij12:18:" The answer was: "14:20A2::(ST$(S2%(X)),3,14):8000:30200:X111:Y118:X230:Y222:50800999:(12):?@14:24:" Press RETURN ";000:RT1RT32160:30200%r30200=uTS%0TMTS%2195Rz12:19RT::RTX}RTA1CR%1:38000:31000:999CR%0:3800014:24:" Try again. ";:59000:RT1RT32200:3020030200TS%0TMTS%225012:19RT::R:"TIE GAME!"~58000:( LEVEL 1I412:18:" Multiple choice."W>AR(3)1rHS2%(X)1S2%(X)2A0RS2%(X)49S2%(X)50A2\ZQ02:12:20ZQ:ZQ1;" ";(ST$(ZQS2%(X)A),3,14):ZQaA2Af12:24:" Enter a number. ";p59000L:I0:50200:I1:50200QQ3:16:" "mU:I0:50200:I1:50200sV`SC%(0)SC%(1)I0:50200::14:20:NA$(0);" WON!"jSC%(0)SC%(1)I1:50200::12:20:NA$(1);" WON!" tSC%(0)SC%(1)ĝ:16:20RTA1İ32000:999612:18:" Wrong again. "@8700b12:18:" The answer was: "14:20A2::(ST$(S2%(X)),3,14):14:24:" Press RETURN ";:8000:30200:X111:Y118:X230:Y222:5080050200XPN%2İ1100394:" Enter a number. ";8 59000:RT1RT3660:30200C 30200Z TS%0TMTS%700o 12:19RT::RTu  RTA1İ31000:999 14:24:" Try again. ";:59000:RT1RT3700:30200 30200:TS%0TMTS%715 12:19RT::RT:"Sorry." b8700# hCR%0:38000F lX112:Y118:X230:Y223:50800h q12:18:"Here is some help."v vAR(3)1 {S2%(X)1S2%(X)2A0 }S2%(X)49S2%(X)50A2 ZQ02:12:20ZQ:ZQ1;" ";(ST$(ZQS2%(X)A),3,14):ZQ A2A 12:2 the STATE NAME?"( :XP14:YP18:LN148 LV1ī2000W 14:24:" Press RETURN ";b 50400m 30200 TS%0TMTS%616 RT$(ST$(S2%(X)),3,14)TS%0(ST$(S2%(X)),3,14)RT$TITS%İ30000:X111:Y118:X230:Y223::50800:999 X18:21:TE GAME " 50100# I0:502009 PN%2I1:50200D 50300P X1SNq X13:Y12:Y215:X232:50800 PN%2(X2)X2I1:240 I0 ST%S2%(X):PL%I PN%2Ğ:50200: STS2%(X):9000 41000 1: 9:16:"What is FS1%(50),S2%(50)- PSC%(1),TM(1),RT%(40)B QST$(50),SS%(50)Y SX150:ST$(X):Xd `35000o d51000 f32,0:33,40:34,0:35,24 iPN%2SN20 j"OPEN BORDER STATES,L60" k(12):50000 n10:1 s32,0:33,40: x" NAME THE STA% 500029952,SA%21265:10:NPR$"_______________________"U3jSA%21265:10::"BLOAD STATES.OBJ" FI30104LC31744(SP$" "2XO0:YO129:TC135<R(ZZ)((1)ZZ)1"" " " " " """""""""