œ:—59468,12= CIRCLE COPYRIGHT (C) 1979 GLEN FISHERZ CURSOR #9, APRIL, 1979{ BOX 550, GOLETA, CA. 93017:ª BASED ON A PROGRAM BY MARTIN MABEEÀ AS OF DEC 22 79ËZ‰62000üdDR²ÿ­180:D$²"¾":M$²"'":S$²"'' ":CR$²Ç(13)n–¥R(X)²µ(X¬10ª.5)­10/è™"WHERE FROM?":7000?í‹N$²""§1000còA0²DA:A1²MA:A2²SA:A0$²DA$:BA²LA‡üO0²DO:O1²MO:O2²SO:O0$²DO$:BO²LO™C0$²C$:N0$²N$±™"WHERE TO?":7000Á ‹N$²""§1030åA5²DA:A6²MA:A7²SA:A5$²DA$:EA²LA O5²DO:O6²MO:O7²SO:O5$²DO$:EO²LOC5$²C$:N5$²N$%$9100MЙ"“FROM ";N0$;:‹C0$³±""§™",";C0$;€Ú™:™A0;D$;A1;M$;A2;S$;A0$,O0;D$;O1;M$;O2;S$;O0$¤ä™"TO ";N5$;:‹C5$³±""§™",";C5$;×î™:™A5;D$;A6;M$;A7;S$;A5$,O5;D$;O6;M$;O7;S$;O5$öøX²AN:9300:™"DISTANCE: ";™D;D$;M;M$;S;S$;" ="2 ™¥R(NM);£10);"NAUTICAL MILES"S™¥R(SM);£10);"STATUTE MILES"q ™¥R(KM);£10);"KILOMETERS"*™"HEADING: ";:X²HD:9300£4™D;D$;M;M$;S;S$¿˜™"ANOTHER? ";:60000×¢‹È(IN$,1)³±"N"§1000ÝW€ X™"WHAT LETTER DOES THE STATE OR COUNTRY<b™" START WITH? ";:60000:‹IN$²""§7400:‰7200tg‹Ã(IN$)±1°IN$³"A"°IN$±"Z"§™"I SAID LETTER’!":‰7000ˆlŒ:MR$²"":L$²IN$˜v‡N$,LA$,LO$¨€‹N$²""§7900ºŠ‹LA$³±""§7030Ï”‹È(N$,1)³L$§7030äž‹È(N$,1)±L$§7900 ¨MR$²"MORE ":™N$;"? ";:60000 ²‹IN$³±"Y"§70305 ·C$²N$:™"IS THE CITY..."E ¼‡N$,LA$,LO$V Æ‹LA$²""§7950k ЙN$;"? ";:60000~ Ú‹IN$³±"Y"§7100œ äDA$²É(LA$,1):DO$²É(LO$,1)ª îSA²0:SO²0Ì øMA²Å(É(LA$,3)):MO²Å(É(LO$,3))ä DA²Å(LA$):DO²Å(LO$) LA²DAªMA­60ªSA­3600:LO²DOªMO­60ªSO­3600, *‹DA$²"S"°DA$²"E"§LA²«LAH 4‹DO$²"S"°DO$²"E"§LO²«LON >Ž~ è™:™"WHAT'S ITS NAME? ";:60000:N$²IN$:C$²""Œ ò‹IN$²""§Ž» üPR$²"LATITUDE":NW$²"N":SE$²"S":MD²89:7500Õ DA²D:MA²M:SA²S:DA$²A$ PR$²"LONGITUDE":NW$²"W":SE$²"E":MD²179:7500 DO²D:MO²M:SO²S:DO$²A$& $Ž? LT(0)²0:T(1)²0:T(2)²0t V™: ™"WHAT IS ITS ";PR$;"? ";:60000:‹IN$²""§7510Œ `N²0¤2:‹IN$²""§7600ª jT²1¤Ã(IN$):T$²Ê(IN$,T,1) t‹T$³"0"°T$±"9"§7560Ô ~‚T:T²Ã(IN$)ª1ø ˆT(N)²Å(È(IN$,T«1)):IN$²Ê(IN$,T) ’‹È(IN$,1)³±","§7600! œIN$²Ê(IN$,2)( ¦‚NO °‹T³2§™"THAT'S NOT AN ANGLE.":‰7510l ºA²0:D²T(0):M²T(1):S²T(2)Š ¿‹D²0¯M²0¯S²0§A$²NW$:‰7650¬ Ä‹IN$²NW$°IN$²SE$§A$²IN$:‰7650å ΋IN$³±""§™"I DON'T KNOW WHAT '";IN$;"' MEANS.":‰7500 Ø™"YOU DIDN'T SAY '";NW$;"' OR '";SE$;"'.":‰7510) â‹D³²MD§7670_ ì™"NO ANGLES BIGGER THAN":™MD;D$;59;M$;59;S$:‰7500‚ ö‹M±59°S±59§™"BAD ANGLE.":‰7500¤ ™PR$;" IS ";D;D$;M;M$;S;S$;A$ª ŽÖ Ü™"I DON'T KNOW ANY ";MR$;"COUNTRIES OR"ú æ™"STATES STARTING WITH ";L$;"."ðN$²"":ŽB™"I DON'T KNOW ANY MORE CITIES IN ";:‹¹(0)ªÃ(C$)ª1±39§™N™C$;"."Z"N$²"":Ž`¤€®‹¶(V)±²1§V²´(V)¬.9999999999š¸V²«Á(V­º(«V¬Vª1))ªÿ­2 Âަ ¾ D²Dª(M­60)ª(S­3600)Ú ‹D$²"S"§D²«D:D$²"SOUTH"õ& ‹D$²"E"§D²«D:D$²"EAST" 0 ‹D$²"N"§D$²"NORTH"": ‹D$²"W"§D$²"WEST"(D Ž?4!Q²(H¬3600ª.5)­3600UH!D²µ(Q):Q²(Q«D)¬60kR!M²µ(Q):Q²(Q«M)¬60x\!S²µ(Q):Ž’Ä"E²90«E:F²90«F:K²180­ÿ¥Î"‹C±180§C²C«360¹Ø"‹C³«180§C²Cª360Ïâ"C²C­K:E²E­K:F²F­Køì"V²¾(E)¬¾(F)ª¿(E)¬¿(F)¬¾(C):8100:G²V'ö"V²(¾(E)«(¾(F)¬¾(G)))­(¿(F)¬¿(G)):8100:A²VD#G²G¬K:A²A¬K:‹C³0§A²360«AJ #ŽP'#€|Œ#T²ÿ­180:BA²BA¬T:EA²EA¬T:BO²BO¬T:EO²EO¬T® #X²¿(BA)¬¿(EA)ª¾(BA)¬¾(EA)¬¾(EO«BO):9200:AN²FΪ#‹BO²EO§HD²90¬´(EA«BA):‰9160´#X²(¿(EA)«¿(BA)¬¾(AN))­(¿(AN)¬¾(BA)):9200:HD²F­DR¾#‹¿(EO«BO)±²0§HD²360«HDOÈ#NM²60¬AN­DR:SM²NM¬1.150779448:KM²SM­0.62137\Í#AN²AN­DRbÒ#Žsð#‹X²0§F²ÿ­2:އú#F²Á(º(1«X¬X)­X)–$‹F³0§F²Fªÿœ$Ž´T$XX²(X¬3600ª.5)­3600Í^$D²µ(XX):XX²(XX«D)¬60æh$M²µ(XX):XX²(XX«M)¬60ôr$S²µ(XX):Ž8'ƒALASKA,,B'ƒANCHORAGE,61/10N,150/0W.¡'ƒARIZONA,,J¢'ƒPHOENIX,33/25N,112/10W[º'ƒAUSTRALIA,,vì'ƒSYDNEY,33/55S,151/10Eˆd(ƒCALIFORNIA,,£i(ƒGOLETA,34/26N,119/50WÃx(ƒLOS ANGELES,34/00N,118/15Wâ‚(ƒSACRAMENTO,38/32N,121/30Wðª(ƒCANADA,, ´(ƒMONTREAL,45/31N,73/34W&¾(ƒOTTAWA,45/27N,75/42W@È(ƒQUEBEC,46/50N,71/15W[Ò(ƒTORONTO,43/39N,79/20WyÜ(ƒVANCOUVER,49/17N,123/50W•æ(ƒWINNIPEG,49/55N,97/06W¢)ƒCHINA,,½,)ƒPEKING,39/55N,116/24EÍT)ƒCOLORADO,,è^)ƒDENVER,39/45N,105/00W¤)ƒDISTRICT OF COLUMBIA,,"®)ƒWASHINGTON,38/55N,77/04W/¸)ƒEGYPT,,HÂ)ƒCAIRO,30/03N,31/15EWÌ)ƒENGLAND,,pô)ƒLONDON,51/30N,0/10W0*ƒFLORIDA,,˜:*ƒMIAMI,25/46N,80/12W¦D*ƒFRANCE,,¾b*ƒPARIS,48/51N,2/20EÍl*ƒGEORGIA,,èv*ƒATLANTA,33/45N,84/23W÷€*ƒGERMANY,,Š*ƒBERLIN,52/32N,13/25EÆ*ƒGREECE,,9Ð*ƒATHENS,38/00N,23/44EG+ƒHAWAII,,d +ƒHONOLULU,21/19N,157/50WtR+ƒILLINOIS,,\+ƒCHICAGO,41/50N,87/45Wœf+ƒINDIA,,¸z+ƒCALCUTTA,22/35N,88/21EÑ„+ƒDELHI,28/40N,77/14EÝ¢+ƒIRAN,,÷¬+ƒTEHRAN,35/40N,51/26Eè+ƒISRAEL,,!ò+ƒTEL AVIV,32/05N,34/46E>,ƒJERUSALEM,31/47N,35/13EK,ƒITALY,,c8,ƒROME,41/54N,12/28EpV,ƒJAPAN,,Šˆ,ƒTOKYO,35/40N,138/45E›â,ƒLOUISIANA,,¹ì,ƒNEW ORLEANS,30/00N,90/1WÉ -ƒMARYLAND,,æ-ƒBALTIMORE,39/18N,76/38Wû-ƒMASSACHUSETTS,,(-ƒBOSTON,42/20N,71/05W#2-ƒMEXICO,,B<-ƒMEXICO CITY,19/25N,99/10WRP-ƒMICHIGAN,,mZ-ƒDETROIT,42/23N,83/05W~d-ƒMINNESOTA,,n-ƒMINNEAPOLIS,44/59N,93/17W­x-ƒMISSOURI,,Ì‚-ƒKANSAS CITY,39/02N,94/33WßÒ-ƒNETHERLANDS,,ûÜ-ƒAMSTERDAM,52/21N,4/54E ð-ƒNEVADA,,'ú-ƒLAS VEGAS,36/10N,115/10W7.ƒNEW YORK,,Q.ƒALBANY,42/40N,73/49Wm,.ƒNEW YORK,40/43N,74/01Wy|.ƒOHIO,,–.ƒCLEVELAND,41/30N,81/41W¤®.ƒOREGON,,Á¸.ƒPORTLAND,45/30N,122/40WÕà.ƒPENNSYLVANIA,,õê.ƒPHILADELPHIA,39/57N,75/10W/ƒPHILIPPINES,,#/ƒMANILA,14/36N,120/59E3Š/ƒSCOTLAND,,M”/ƒGLASGOW,55/53N,4/15Waø/ƒSOVIET UNION,,~ 0ƒLENINGRAD,59/55N,30/25E˜ 0ƒMOSCOW,55/45N,37/37E¥40ƒSPAIN,,¾H0ƒMADRID,40/25N,3/43WÌR0ƒSWEDEN,,é\0ƒSTOCKHOLM,59/20N,18/05EöÀ0ƒTEXAS,,Ê0ƒDALLAS,32/47N,96/48W.Ô0ƒFORT WORTH,32/45N,97/20WIÞ0ƒHOUSTON,29/45N,95/25WUV1ƒUTAH,,x`1ƒSALT LAKE CITY,40/43N,111/55Wˆˆ1ƒVIRGINIA,,¤’1ƒRICHMOND,37/34N,77/24Wµœ1ƒVENEZUELA,,Ц1ƒCARACAS,10/35N,66/56Wâ°1ƒWASHINGTON,,þº1ƒSEATTLE,47/36N,122/21WÄ1ƒWISCONSIN,,,Î1ƒMILWAUKEE,43/09N,87/55W4È2ƒ,,U`êIN$²" ":ZT²TI:ZC²2:ZD$²Ç(20)kjê¡Z$:‹Z$³±""§60070›tê‹ZT³²TI§™Ê(" ¦",ZC,1);"";:ZC²3«ZC:ZT²TIª15¦~ê‰60010Ö¦êZ²Æ(Z$):ZL²Ã(IN$):‹(Z¯127)³32§™" ";:‰60110°ê‹FL¯(Z¯127)±64¯(Z¯127)³91§Z$²Ç((Zª128)¯255)ºê‹ZL±254§600103ÄêIN$²IN$ªZ$:™Z$;ZD$;Z$;RÎê‹Z²13§IN$²Ê(IN$,2):™CR$;:Ž~Øê‹Z²20¯ZL±1§IN$²È(IN$,ZL«1):™"";:‰60010±âê‹Z²141§Z$²Ç(«20¬(ZL±1)):Z²2¤ZL:™Z$;:‚Z:‰60000¼ìê‰60010ÖTìI²1¤10:™"ÄÄÄÄ";:‚I:Žù0ò™"“";£9);"CURSOR #9 CIRCLE"#2ò™"COPYRIGHT (C) 1979 BY GLEN FISHER/4ò 60500N:ò™"GREAT CIRCLE NAVIGATIONzDò™"PRESS RETURN’ TO BEGIN...";:60000ŠXò™"“":œ:‰100