abuMMONGMTCDYEAMDASGMGGSCEGESDDDETANDELALORSLLPFLASS@@  !"#$%&'()*+,-./$$******************************$$* SUNPLOTTER *$$* for ATARI XL/XE *$$* by *$$* Peter Scott Welch *$$* -------------------------- *$$* PAGE 6 MAGAZINE - ENGLAND *$$****************************** dn<<;@`,;@,;@,9@,9@,x##ŠǠҠȠÛFF6.:A%,((2,($Sunplotter and Sunrise/Sunset Finder/(2(*( ENTER YEAR&(not before 1752*"!! AS)!AA,sJ'@"P:'@,*'AP:'A,)'A"P:'A,c67@<@,.9s( a leap year63((ENTER MONTH NAME/(first 3 letters3@6-J-@@V@T47<%@,A^##6-%A:7%@<%@,,h r A|((ENTER DAY NUMBER:6(not more than [A:7%@<%@,,] :))!A:7%@<%@,,A 6-%;((ENTER TIME in GMT7(24 hour clock-4 digits;B:,@A ++A:7@<@,,!@A  6-A:,!! )!A$A 6-P:'A,6-+&$A,'@`6-+%&@,$@##ӠΠҠԠٛ6-&@v(c 6-%A`6-@WAd$G:,6-%%Ax5@&!A`6-&A`06-?9xgP$G:,:6-D:'M:6$%@,,D6-G:,'E:,N +@X7@@d'B7t@d7Š˛b1A@'A1ӛl)AR@)ԠĠƠқvU*("Plotting sunlight and darkness for-(U(  hours GMT on   ĠР 6- #A "6-@&-@ 6-6-F:@,A@IIԠǠƠȠŠ ŠΠƠŠĠԛ6-$G:,'E:,1!@6-'6-A`1 A02 6@6-A`(6-2 A0%%6-6D:'M:6$%@,,%@ 6-+&,'@%6-+A`&&,'@%  6-6-6-*/ 6-%A`#6-/6-@4/!A`6-&A`#6-/6-@> 6-&H *6-@&RԠР̯ӛ\(@>:%,f p"AeA z Ap##ŠנҠĠŠԛ6-%@E6-%@6-F:A,&@$BBy6-AV$AY@FB2w@A@-%A%A@  #A"p-@0"A6% $6-R:,.6-%8,86-%8,B!!6-%+ @,&+!@,L!!6-%+ @E,&+!A,V6-?:A6<<,`CCԠΠҠ ҠΠҠӛj!!@*"A`ty@6-((>:A%,:@wyΠӠԠŠҠԠĠŠԠś~"@A`6-+"@,"A`CAVC(Sunplot  hours GMT on   $$6-P:+&+&@,$,%?P,006-P:+AxP&+&@E,$@%,%?P,$$(UNDER CURSOR LONG O:,  (E A@ (W( LAT O:, (S Ap (N**("local time Sunrise & set GMT( ( GMT plus ( A ( GMT minus 0(P:?P%O:,'@,0AW@6-$G:,'E:,(0!@&(Sun above horizon0 A`21 6@'(Sun below horizon1 A`<%%6-6D:'M:6$%@,,%@F6-+'@,%+'@,P 6- AZ6-+'@,&+'@,d 6- An A`x Ԡ̠͠ӛ 6-%@$!@$6-&@$ 6-P:,##6-P:+&P:,,$@`%?P,)!@Y6-%@)6- @(0( @(0( $РƠŠě881,3,2,20,2,7,1,3,1,2,5,3,1,2,4,7,5,5,12,4,1,4,3,62222,1,3,35,1,2,1,3,1,2,6,5,8,4,11,4,2,4,1,63,5221,3,19,1,7,1,4,2,1,1,1,3,4,5,5,9,1,12,5,1,70226,23,1,9,6,3,2,2,6,4,14,1,5,6,2,5,1,54,1,7,8--6,1,1,1,23,7,5,9,2,21,6,2,4,1,55,3,4,11"&&4,6,20,7,5,1,1,30,6,5,54,1,1,3,1,--17,2,8,14,1,4,7,7,24,2,4,1,1,3,3,52,8,26**15,2,11,21,4,7,24,2,5,1,1,1,2,53,8,3@3328,14,2,7,1,10,21,1,1,2,4,1,2,1,1,39,1,13,8,2J//31,13,1,7,1,11,19,2,1,3,1,46,1,15,6,1,6,1T))25,21,1,2,1,6,1,1,19,1,2,3,1,62,6,1^33,14,1,12,3,3,22,64,1,1h40,15,2,9,3,3,21,64,1,1r**41,27,1,1,25,14,2,1,1,4,3,3,1,5,1,28|--43,16,1,1,2,8,26,7,1,6,4,4,2,3,2,33,2,2))40,16,1,7,27,6,3,1,2,4,6,3,2,36,3,31140,5,1,16,28,5,3,1,2,2,1,3,1,4,1,4,2,30,1,36647,22,29,4,1,1,2,1,2,1,1,2,1,10,2,29,1,1,1,1,5,2..41,22,20,1,8,4,6,2,2,1,1,10,2,29,3,2,4,11143,3,1,17,30,2,2,4,5,1,1,3,1,7,1,30,2,2,3,2))43,21,30,1,1,6,6,1,2,1,1,38,2,2,1,445,17,31,9,11,38,4,248,1,1,10,2,2,31,26,1,3254,1,1,10,2,2,31,26,1,32%%55,1,1,6,7,1,27,1,1,21,1,6,1,31!!56,1,1,5,7,1,28,22,1,6,3,29%%56,1,1,5,36,23,1,6,1,1,5,23,1,1%%58,4,6,2,27,22,1,1,2,8,5,20,2,1%%36,1,22,4,8,1,26,24,1,9,5,8,2,9))41,1,21,5,2,1,7,2,22,25,1,8,6,6,4,6$$67,6,4,1,26,25,2,6,8,4,5,6,6,1&!!64,4,29,26,1,4,10,3,8,5,4,10""66,3,29,14,1,14,12,3,8,5,4,2:))66,2,5,2,23,26,2,2,11,2,8,1,1,3,5,2D))66,1,3,2,1,4,20,30,11,2,8,1,2,1,7,1N67,11,20,28,14,1,7,1,9,3X!!69,9,20,26,14,1,9,1,6,1,2,1b""70,11,19,1,5,19,21,2,1,1,6,1l73,12,26,17,22,1,1,1,5,2v72,13,26,16,24,3,2,4,4,1&&67,13,26,10,1,4,25,2,3,4,1,2,1,1..61,1,4,13,1,2,24,10,1,4,26,2,2,3,1,2,3,3&&63,19,21,14,27,3,1,3,1,2,1,2,1,4""61,20,21,13,28,1,6,2,5,5,3,1##55,21,20,13,29,4,11,4,1,1,1,1""54,21,20,13,31,8,4,3,1,2,3,1##54,19,21,13,35,1,1,1,10,1,4,153,19,22,12,48,258,17,22,13,4,1,36,2,2,1""62,17,22,13,3,1,34,1,1,3,2,2++62,2,1,13,22,13,2,2,33,6,2,2,10,1,3,1##48,15,22,12,2,2,32,8,1,3,13,149,14,23,10,4,2,32,12""63,13,24,5,1,4,3,2,31,15,6,1 55,13,24,10,3,2,30,1761,11,26,9,4,2,30,18 60,10,27,9,36,18*60,10,28,7,37,10,1,7460,10,28,7,37,18>60,9,30,5,38,10,1,7H60,8,31,4,40,4,4,8R60,9,31,1,42,3,6,8\60,7,86,6,10,1f50,7,87,5,11,1p49,7,103,2z48,5,105,148,5,93,2,10,149,5,93,1,9,250,4,104,250,4,156,4,59,196,3,157,3,3,2,152,3158,4,12,1,628,1,1,1,265ˠԛKK0,0,0,0,0,0,0,0,0,0,1,1,1,-1,1,0,0,0,-1,1,-1,-1,-1,0,0,0,0,1,0,-1,0,0ҠқYY104,104,104,141,0,208,104,104,168,162,0,189,24,6,153,0,138,232,200,224,7,208,244,96Ҡś0,16,40,68,40,16,0D2:SUNPLOT.BAS