ÿœ :�ÙDisplay city and startup routine for PitStop AmericaÑ:�ÙVersion 1.1 developed by FutureWave Sharewareù:�ÙProgrammed by M. Broughton Boone:�Ù A Shareware Program5dº "Fuel.dat" ‚ OUTPUT AS #>n» #_xº "Sleep.dat" ‚ OUTPUT AS #h‚» #‰Œº "Route.dat" ‚ OUTPUT AS #’–» #ž DAY ç ¿ª:�ÙCity Display Data RoutineÊ´:�ÙVarÕ¾:�ÙVarȆ I(K):† C$(¯):† S$(¯): † M(¯): † MA(¯): † MN(¯);Ò† CS$(K): † SS$(K): † MS(K):† H(K)i܆ RC$(K):† RHI(K): † RS$(K): † RMA(K)vᆠHI(d)“æ:�ÙRead cities from data¤ð‚ E ç  Ì K¶ú‡ C$(E),S$(E)¾ƒ EÄÀÚ:�ÙDisplay citiesú"‘ Î);"Cities in Database" ,X ç : Y ç 6‚ E ç  Ì K;@‹ X ç  Í Y ç Yé: X ç fJÊ X,Y: ‘ E;:Ê X,Yé: ‘ C$(E);",";S$(E)tTX ç X é |^ƒ E”h:�ÙDetermine pointsÄrÊ , : … "What is your starting number";Sÿ|Ê , : ‘ " "+†Ê , : … "What is your destination";D`�Ê , : ‘ " "µšÊ , : ‘"You chose ";C$(S);",";S$(S);" & ";C$(D);",";S$(D);". Correct?";:… Q$¤Ê , : ‘ " ";®‹ Q$ ç "Y" ï Q$ ç "y" Í ¸ :¡ rr¸CS$ ç C$(S): SS$ ç S$(S): DC$ ç C$(D): DS$ ç S$(D)­ÂÊ , : … "What Route will you be starting on: I-";IHìÌÊ , : ‘ "Please wait while I load that information... "ýÑIH$ ç ÿ“(IH)Ö:�ÙRead in highway info5Ûº "I",#,"Interste.dat"Dà±é Ó ÿ£()^å … #,H,C$,S$,MA,M,MN°ê ‹ H ç IH Í C$(I) ç C$: S$(I) ç S$: MA(I) ç MA: M(I) ç M: MN(I) ç MN: I ç Ié¶ï²¿ô» #Ïþ‚ X ç  Ì Iõ‹ C$(X)çCS$ î S$(X) ç SS$ Í � Œ‹ C$(X)çDC$ î S$(X) ç DS$ Í � –#&ƒ X-+J ç I0º "I",#,"Intrstrc.dat"X5±é Ó ÿ£()t: … #,H,RC$,RS$,RHI,RMAÄ? ‹ H ç IH Í RC$(J) ç RC$: RS$(J) ç RS$: RHI(J) ç RHI: RMA(J) ç RMA: J ç JéÊD²ÓI» #÷bº "overview.dat" ‚ OUTPUT AS #l· #,CS$,SS$,DC$,DS$v» #F€‹ K ç  î L ç  Í ‰   :�Ùload oneroutecŠ‹ K ç  î L èæ  Í ‰ žx”‹ K èæ  Í ‰ —ž:�ÙRoute Change Data InputÙ¨Ê , : ‘ "Your destination is not on I-";IH;". Please wait"ý²º "overview.dat" ‚ OUTPUT AS #¼· #,CS$,SS$,DC$,DS$Æ» #KÐ:�ÙDisplay Route Change Info SubroutineQÚÀyä‘ Î);"Routes Connecting to I-";IH…îHF ç IH–øX ç : Y ç ¨‚ P ç  Ì JêÇ ‹ X ç  Í Y ç Yé(: X ç Ê X,Y: ‘ P;:Ê X,Yé: ‘"I-";:Ê X,Yé: ‘ RHI(P);:Ê X,Yé : ‘ RC$(P);",";RS$(P)$ X ç Xé,*ƒ Pe4Ê , : ‘ "Number ( 1 -";Pê;") of new route";: … Aƒ>‹ A æ P Í 4: HT ç RH(A)±H HT ç RHI(A): CD$ ç RC$(A) : SD$ ç RS$(A)»R� Òàf:�ÙDetermine inital segment dataûpº "I",#,"Driving.dat"z… #,AS,HD,AT$,MD,AT„» #7Žº "I",#,"Refuel.dat"M˜… #,TC,MPG,B$,MTV¢» #j¬:�ÙMileage infou¶:�ÙVar€À:�Ùvar§ÊSM ç DêS: ‹ SM è  Í Fçê :¡ F ç ÄÔSM ç ÿ†(SM): TM ç TMé SMÓÞ:�ÙRefuel?÷èML ç MT: CM ç : T ç  : J ç SIòJ ç SIéF'üCM ç CM é M(J): ML ç ML ê M(J)@‹ ML è MN(J) Í � .S‹ J ç DI Í j_J ç JéFi$‰ üw.:�ÙRefuel�8º "A",#,"Fuel.dat"§B· #,C$(J),S$(J),CM°L» #ÍVT ç Té: CM ç : ML ç MTÓ`Žëj:�ÙSleep SubroutinetDM ç MD :�Ùdays miles = miles per day:~ED ç : :�Ùmiles driven this dayFˆDAY ç U’J ç SI é FxœDM ç DM ê M(J): ED ç ED é M(J)‘¦‹ MN(J) æ DM Í � Τ°‹ J ç DI Í °ºJ ç JéFºÄ‰ œÇÎ:�ÙSleepìØTR ç EDìAS: :�Ùtodays hours (TR) âTR ç ÿ…(TRé€) ìº "A",#,"Sleep.dat": ö· #,DAY,TR,C$(J),S$(J),EDC » #d DM ç MD: ED ç : DAY ç DAYéj Žƒ :�ÙRoute informationœ (º "A",#,"Route.dat"¾ 2· #,CS$,SS$,CD$,SD$,HF,HT,SMÇ <» #ä F:�ÙCarryover Information!Pº "Carry.dat" ‚ OUTPUT AS #9!Z· #,CD$,SD$,DC$,DS$,DAY,SM,ED,ML,T,HT,TM,DM,CMB!d» #e!n:�ÙGoto loop route sub-programu!xþŒ "Routing‰!‚:�ÙHousekeeping©!ŒSI ç X: S ç MA(X): K ç : ŽÉ!–DI ç X: D ç MA(X): L ç : Žê! º "carry.dat" ‚ OUTPUT AS #"ªHT$ ç IH$: ML ç MT: ED ç :SM ç :TM ç :L"´· #,CS$,SS$,DC$,DS$,DAY,SM,ED,ML,T,HT,TM,DM,CMU"¾» #f"ÈþŒ "oneroute‚"Òº "I",#,"interste.dat"Œ"×I ç ›"ܱé Ó ÿ£()µ"æ … #,H,C$,S$,MA,M,MN#ð ‹ H ç IH Í C$(I) ç C$: S$(I) ç S$: MA(I) ç MA: M(I) ç M: MN(I) ç MN: I ç Ié #ú²#ÿ» #&#‚ X ç  Ì IZ#‹ CD$ ç C$(X) î SD$ ç S$(X) Í DI ç X: D ç MA(X)†#‹ CD$ ç C$(X) î SD$ ç S$(X) Í D ç MA(X)Ž#ƒ X”#,ލ#6„ Birmingham,AL¸#@„ Mobile,ALÉ#J„ Phoenix,AZÙ#T„ Tucson,AZî#^„ Little Rock,AR$h„ Los Angeles,CA$r„ Sacramento,CA*$|„ San Diego,CAA$†„ San Francisco,CAS$�„ Hartford,CNc$š„ Denver,COw$¤„ Washington,DC‹$®„ Wilmington,DEš$¸„ Tampa,FL©$„ Miami,FLº$Ì„ Atlanta,GAÎ$Ö„ Des Moines,IAÝ$à„ Boise,IDî$ê„ Chicago,IL%ô„ Springfield,IL%þ„ Indianapolis,IN)%„ Topeka,KS:%„ Wichita,KSM%„ Lexington,KYa%&„ Louisville,KYv%0„ Baton Rouge,LA‹%:„ New Orleans,LA›%D„ Boston,MA®%N„ Baltimore,MD¿%X„ Detroit,MIÕ%b„ Grand Rapids,MIê%l„ Kansas City,MOü%v„ St Louis,MO&€„ Minneapolis,MN &Š„ Butte,MT0&”„ Helena,MTB&ž„ Missoula,MTU&¨„ Charlotte,NCi&²„ Greensboro,NCz&¼„ Raleigh,NC‹&Æ„ Bismark,NDœ&Є Lincoln,NE«&Ú„ Omaha,NE¼&ä„ Concord,NHÌ&î„ Newark,NJÝ&ø„ Trenton,NJò&„ Albuquerque,NM' „ Las Vegas,NV'„ Reno,NV$' „ Buffalo,NY6'*„ New York,NYJ'4„ Cincinnati,OH]'>„ Cleveland,OHo'H„ Columbus,OH'R„ Toledo,OH–'\„ Oklahoma City,OK¥'f„ Tulsa,OK·'p„ Portland,ORÍ'z„ Philadelphia,PAà'„„ Pittsburg,PAô'Ž„ Providence,RI(˜„ Charleston,SC(¢„ Columbia,SC-(¬„ Knoxville,TN>(¶„ Memphis,TNQ(À„ Nashville,TNa(Ê„ Dallas,TXr(Ô„ Houston,TX‰(Þ„ Salt Lake Cty,UT›(è„ Richmond,VA¯(ò„ Montpelier,VTÀ(ü„ Seattle,WAÑ( „ Spokane,WAä( „ Milwaukee,WIö( „ Cheyenne,WY