PDA Software Library

home *** CD-ROM | disk | FTP | other *** search

/ PDA Software Library / pdasoftwarelib.iso / PSION / MISC / ASTRO / APP / ASTRO3A.OPA / ASTRO3A.txt next >

Wrap

Text File | 1995-03-19 | 10.1 KB | 957 lines

OPLObjectFile** LOC::E:\128_DEV\OPL\ASTRO4A.OPL` u"b8f ?78t" Q=t"h `cx u Astro3a.SET \OPD\ STARTUP% DUMMY% TWITYPE% LOCAT$ WLDDEV% MULTSTR% STRTYP% VWCNTRY$ VWLONG VWLAT OBTEMP% REVIEW% FULM$ NEWM$ DISPLAY$ STCAL$ DISP$ SRISAZ SSETAZ ALTIT MAGNIT ANGSIZ DISPRA DISPDEC SUNAM ANOMAE ANOMAT HALFPI TWOPI MONAGE PHASE CIRCUM% STAMP$ RSB2A$ RSB2B$ RSBVALA$ RSBVALB$ HNAME$ UTMIDDAY UTDAYJUL CIVIL GSTHR% GSTMIN% GSTSEC% LSTHR% LSTMIN% LSTSEC% TIMEZON% DAYSAV% UTYR% UTMN% UTDY% UTHR% UTMI% UTSE% GSTSECS& LSTSECS& UPHR% UPMIN% UPSEC% DNHR% DNMIN% DNSEC% SUPHR% SUPMIN% SUPSEC% SDNHR% SDNMIN% SDNSEC% TEMPHR% TEMPMI% TEMPSE% TEMPDY% TEMPMN% TEMPYR% OPNWORLD FEXIST FACTORY FILEIT BORDER SETSYS TIMEHNDL TIMEBOX LOCATBOX KGET% M:\app\Astro3a\NewAstro.lib Astrolib not found Astro3aO Pocket Astro Almanac( Version 1.20 ( Mark HodsmanKO Please Register this softwareO at the following address.....( Release Date: 19th March1995O Astro3aO Pocket Astro Almanac( Mark Hodsman,O 4 Darbeck Road, ScotterO Gainsborough, Lincs. DN21 3SU( Email:markh@rubidog.demon.co.ukO FEXIST HELP% M:\app\Astro3a\Astro3a.hlp Help not found M:\app\Astro3a\sys$help.opo Help not found FILEIT LOCATBOX TIMEHNDL TIMEBOX Astro3a( Load PreferencesO TIMEZON% LOCAT$ VWCNTRY$ TWITYPE% MULTSTR% STRTYP% TEMPYR% TEMPMN% TEMPDY% Scotter United Kingdom LOCAT$ VWCNTRY$ TWITYPE% TIMEZON% MULTSTR% STRTYP% Astro3a.SetW Astro3a.Set LOCAT$ VWCNTRY$ TWITYPE% TIMEZON% MULTSTR% STRTYP% LOCAT$' VWCNTRY$' CRS%$ TWITYPE%$ UPD%$ TIMEZON%$ LONG& MULTSTR%$ STRTYP%$ Astro3a.Set LOCAT$ VWCNTRY$ TWITYPE% TIMEZON% MULTSTR% STRTYP% LOCAT$# VWCNTRY$# CRS% TWITYPE% UPD% TIMEZON% LONG" MULTSTR% STRTYP% GETK% weumsqclofdax Display+ Whats up...Ow+ Ephemeris...Oe+ SunOu+ MoonOm+ Stars...Os Settings+ QuickSet...Oq+ Set City...Oc+ Set Time/Coord...Ol+ Options...Oo Special+ Save PreferencesOf+ Load PreferencesOd+ AboutOa+ ExitOx FEXIST M:\app\Astro3a\Stars.dbf STARNAM$ CONST$ Star Library not found STCALC% UTJD0 STARNAM$ NUMB$ NAME$ COUNT% NUMSEL% CONST$ CONNAME$ STAT$ XPOS% YPOS% TEMP% STATIND% ABORT% STAROPN GRIDDIS STARDIA% DAYFORM$ TIMFORM$ TIMEHNDL STARHNDL STFORM$ HHMM2DEC MOD360 PAGEKEY% STARKEY BORDER TIMEBOX DISPLAY UTYR% UTMN% UTDY% MULTSTR% REVIEW% STAMP$ MAGNIT STCAL$ DISPLAY$ LSTHR% LSTMIN% LSTSEC% GSTHR% GSTMIN% GSTSEC% ALTIT CIRCUM% SUPHR% SUPMIN% SUPSEC% SDNHR% SDNMIN% SDNSEC% DISP$ RSB2A$ RSB2B$ RSBVALA$ RSBVALB$ STARNAM$# CONST$# (Local) Time Stamp at K Star of 78KO DEC$# MAG$# +\RA Dec RA Dec +]LHA Dec LHA Dec +\GHA Dec GHA Dec +YAzimuth Altitude Azimuth Altitude +URise Time Set Time Rise Time Set Time + Always Up Never Rises + K +4PgUp/PgDn for pages,Cursor kys hilight,Enter Selects DEC$# MAG$# STARNAM$# 1995 M.HodsmanK + Magnitude STAMP$ STCAL$ Almanac StarsOx OUTLIN PAGDISP XPOS% YPOS% TEMP% STATIND% OUTLIN PAGDISP XPOS% YPOS% ABORT% STATIND% COUNT% TEMP% Star Select AbortedO + Last PageO First PageO OUTLIN PAGDISP STATIND% COUNT% TEMP% PgUp & PgDn to switch pagesO TableView AbortedO + Last PageO First PageO STATIND% XPOS% YPOS% STAT$ MULTSTR% DISPLAY$ CONNAME$ COUNT% TEMP% REVIEW% STCALC% +IPosition (RA) ,Position (LHA),Position (GHA),Position (Alt/Azim),Rise/Set +UReview Last,Position (RA) ,Position (LHA),Position (GHA),Position (Alt/Azim),Rise/Set Star Calculation +'NB Options setting is set to TableView.O ++Select 'Review Last' if you have previouslyO +,calculated a set of Star data. 78 Stars dataO +(will be calculated as per the following.O +&Any key but PgUp/PgDn aborts TableView( Calculation type: AZIMUP AZIMDN LSTUP LSTDN HHMM2DEC MOD24 EQHOR RISET LST2JD DISPRA DISPDEC LSTHR% LSTMIN% LSTSEC% ALTIT STCALC% MULTSTR% UTJD0 TIMEZON% DAYSAV% DUMMY% SUPHR% SUPMIN% SUPSEC% SDNHR% SDNMIN% SDNSEC% SRISAZ SSETAZ H|WB( Star Rise & Set....O SETSYS SUNDISP SETSYS MOONDISP BORDER TIMEHNDL TIMEBOX SUNHANDL DISPLAY DISP$ RSB2A$ RSB2B$ Morning Twilight Evening Twilight NUTDD0 NUTDP SUNRR SUNSR HOURANG AZIMUP AZIMDN NUTAT EQECL HHMM2DEC MOD24 EQHOR SUNRS TIMFORM$ UTDAYJUL DISPRA DISPDEC LSTHR% LSTMIN% LSTSEC% ALTIT SUPHR% UPHR% SUPMIN% UPMIN% SUPSEC% UPSEC% SDNHR% DNHR% SDNMIN% DNMIN% SDNSEC% DNSEC% CIRCUM% SRISAZ SSETAZ TWITYPE% RSBVALA$ RSBVALB$ Calc Sun position..O eNw?N Sun Rise & Set....O Twilight times....O Night BORDER TIMEHNDL TIMEBOX MOONHNDL NIFIDAY DISPLAY DISP$ RSB2A$ RSB2B$ RSBVALA$ NEWM$ RSBVALB$ FULM$ New Moon + Full Moon Phase SUNRR SUNSR NUTDD0 NUTDP HOURANG AZIMUP AZIMDN NUTAT EQECL HHMM2DEC MOD24 EQHOR MOD360 MOONRS MOONNF UTDAYJUL DISPRA DISPDEC LSTHR% LSTMIN% LSTSEC% ALTIT MONAGE PHASE SUPHR% UPHR% SUPMIN% UPMIN% SUPSEC% UPSEC% SDNHR% DNHR% SDNMIN% DNMIN% SDNSEC% DNSEC% SRISAZ SSETAZ Calc Moon positionO *PERT Wax Crescent O |2[ First Quarter Wax Gibbous Wane Gibbous Last Quarter Wane Crescent Moon Rise & Set....O New & Full MoonO BORDER TIMEHNDL TIMEBOX PLANHNDL DISPLAY RSB2A$ RSB2B$ RSBVALA$ RSBVALB$ 1995 M.HodsmanK Phase Mag Size SUNSR SUNRR NUTDP NUTDD0 PASSEDA PASSEDB PASSEDC PASSEDD PASSEDE PASSEDF PASSEDG HOURANG AZIMUP AZIMDN LSTUP LSTDN PLANS NUTAT EQECL HHMM2DEC MOD24 EQHOR DAT2JUL RISET LST2JD UTDAYJUL DISPRA DISPDEC LSTHR% LSTMIN% LSTSEC% ALTIT ANGSIZ PHASE MAGNIT UTYR% UTMN% UTDY% SRISAZ SSETAZ TIMEZON% DAYSAV% SUPHR% SUPMIN% SUPSEC% SDNHR% SDNMIN% SDNSEC% Planet positionO Planet Rise & SetO N@VJ* H|WB( SETSYS SUNDISP MOONDISP PLANDISP TIMEHNDL TIMEBOX OBTEMP% LOCAT$ VWCNTRY$ TIMEZON% DAYSAV% DISP$ Quick Settings Uses System Date and Time( Set for: + TimeZone: Daylight Saving+ Yes,No Select Object+CSun,Moon,Mercury,Venus,Mars,Jupiter,Saturn,Uranus,Neptune,No Object Mercury Venus Jupiter Saturn Uranus Neptune + No Object SETSYS TIMEHNDL SUNHANDL CARDIN$ WUSET$ MOONHNDL PLANHNDL ALTIT +#What's Up (Uses System Date & Time) MoonO MercuryO VenusO MarsO JupiterO SaturnO Setting Rising North North OD|2\[ N. East Or|2\[ S. East South S. West N. West READCITY TIMEHNDL LOCATBOX TIMEBOX VWCNTRY$ LOCAT$ TIMEZON% WLDDEV% City Search City: + Edit/NextO + AcceptO O @[K FLERRCHK FLGETC$ WLDDEV% LOCAT$ VWCNTRY$ TIMEZON% FLERRCHK READCITY WLDDEV% wld:O LOCAT$ VWCNTRY$ TWITYPE% TIMEZON% MULTSTR% STRTYP% Astro3a( Save preferencesO Astro3a.set Astro3a.Set LOCAT$ VWCNTRY$ TWITYPE% TIMEZON% MULTSTR% STRTYP% LOCAT$' VWCNTRY$' CRS%$ TWITYPE%$ UPD%$ TIMEZON%$ LONG& MULTSTR%$ STRTYP%$ Quit Astro3a( +%To those who registered Many thanks. +&Hope you find version 1.2 more useful. +$If you use this software for a month + or more, why not make a donation to the author. LeaveO Stay awhileO SECS& ABORT% TIMEHNDL SUNHANDL MOONHNDL PLANHNDL DAYFORM$ HHMM2DEC STFORM$ TIMFORM$ OBTEMP% DUMMY% DISPRA DISPDEC ALTIT SUPHR% SUPMIN% SUPSEC% SDNHR% SDNMIN% SDNSEC% SRISAZ SSETAZ PHASE MONAGE MAGNIT ANGSIZ Ephemeris (Current Location) Starting DateO Starting TimeO O;O;WE Step Interval (days)O Step Interval (hr,min)O Number of stepsO Select Object+9Sun,Moon,Mercury,Venus,Mars,Jupiter,Saturn,Uranus,Neptune Position,Rise/Set Position,Rise/Set,Phase +!Position,Rise/Set,Magnitude/Phase Ephemeris Calculation Type +!NB: Ephemeris calculations do notO incorporate Daylight savingO changes between dates.O All times are Local time.O Calculation + Ephemeris( +!Step Interval defaulted to 1 hour + Step Interval defaulted to 1 day CalculationO Mercury Venus Jupiter Saturn Uranus Neptune Delete Key AbortsO +o Date Local RA Dec Azimuth Altitude +f Date Rise Time Set Time Rise Azim Set Azim + --------- + --------- ------------- ------------- +\ Date Local Phase Mag (Age) Angular Size Od|RO %KO2 KO# ''KO# Ephemeris for object complete Astro3a( Abort DISPCLK TWITYPE% MULTSTR% STARTUP% TIMEZON% Options Calculate Rise & Set+ Yes,No Coordinate Display+ RA,LHA,GHA Running clock+ System,UTC Twilight Calculation+ Civil,Nautical,Astro Star Calculation+ TableView,Normal System Time & DateO UTC Time & DateO SUNDISP MOONDISP PLANDISP TIMEHNDL TIMEBOX OBTEMP% TIMEZON% TEMPDY% TEMPMN% TEMPYR% TEMPHR% TEMPMI% TEMPSE% DUMMY% DAYSAV% DISP$ New Local Date & Time DateO TimeO O;O;WE + Time zoneO Daylight Saving+ Yes,No Select Object+CSun,Moon,Mercury,Venus,Mars,Jupiter,Saturn,Uranus,Neptune,No Object Mercury Venus Jupiter Saturn Uranus Neptune + No Object |WBQW O<P{I DLNGD& DLNGM& DLATD& DLATM& EWCHLNG% SNCHLAT% DECHHMM% SWAPFORM LOCAT$ VWCNTRY$ Location + Location:O + Longitude( MinutesO Meridian+ West,East Latitude( MinutesO Hemisphere+ South,North Not specified No Country |NO<|R HHMM2DEC EWCHLNG% DLNGD& DLNGM& SNCHLAT% DLATD& DLATM& O<|VJ STRETCH$ STRETCH$ |NO<|Ry Od0\[ NAMEBOX LOCATBOX RISETBOX POSITBOX hO<PO<L %H:%T:%s %*E, %*N, %*D%X DISPCLK STARTUP% TIMEZON% System Time & DateO UTC Time & DateO Positional Data Local Rise/Set Data Calc Time/Date Location Latitude + Longitude RA O$ LHAO$ GHAO$ Azimuth Altitude Local UDate STFORM$ LOCAT$ DISP$ STFORM$ HHMM2DEC DISPRA LSTHR% LSTMIN% LSTSEC% GSTHR% GSTMIN% GSTSEC% DISPDEC ALTIT PHASE MONAGE MAGNIT ANGSIZ Od|RO %KO2O dysKO,O ''KO*O TIMFORM$ STFORM$ RSB2A$ RSB2B$ CIRCUM% SUPHR% SUPMIN% SUPSEC% SRISAZ SDNHR% SDNMIN% SDNSEC% SSETAZ RSBVALA$ RSBVALB$ Not processed( Use options menu to enable( 1995 M.HodsmanK( Rise( AlwaysOx NeverOx RisesOx TomorrowOx TomorrowOx TIMFORM$ DAYFORM$ UTHR% UTMI% UTSE% LSTHR% LSTMIN% LSTSEC% GSTHR% GSTMIN% GSTSEC% UTDAYJUL TIMEZON% UTDY% UTMN% UTYR% hKO FEXIST PROCAs SETSYS PROCDp FACTORY FILEIT KGET% GETK%V STAROPN PROCST OUTLIN GRIDDISK STARKEY PAGEKEY% PAGDISP STARDIA% STARHNDL PROCU PROCM PROCB SUNDISP ' SUNHANDL MOONDISP~+ MOONHNDL PLANDISPG1 PLANHNDLS2 PROCQ PROCW WUSET$ CARDIN$ PROCC"> READCITY OPNWORLD FLERRCHK FLGETC$ PROCF_A PROCX3C PROCE_D ABORT% DAYFORM$ PROCO SECS&GU PROCLkU DECHHMM%kW SWAPFORM HHMM2DEC TIMFORM$WY STFORM$ MOD2=[ STRETCH$f[ DISPLAY)\ DISPCLK BORDER LOCATBOX NAMEBOX POSITBOX RISETBOX TIMEBOXhg