PLANETARIUM
FILE INFORMATION
FILENAME(S): PLANETARIUM
FILE TYPE(S): PRG
FILE SIZE: 5.9K
FIRST SEEN: 2025-12-02 02:15:03
APPEARS ON: 1 disk(s)
FILE HASH
5027e5c46ed27b05c3843850647e96e0c76d86677f22e884cde24dbfb6907238
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PANS EDUCA 03 | PLANETARIUM | PRG | The BAM Archive | 19 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 8F 20 34 36 39 20 50 4C 41 4E |....d.. 469 PLAN|
00000010: 45 54 41 52 49 55 4D 00 32 08 6E 00 97 35 33 32 |ETARIUM.2.n..532|
00000020: 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 99 22 |80,0:.53281,0:."|
00000030: 05 22 00 4C 08 78 00 9C 3A 50 47 24 B2 22 22 3A |.".L.x..:PG$."":|
00000040: 4E 4D 24 B2 22 22 3A 89 31 36 33 30 00 70 08 82 |NM$."":.1630.p..|
00000050: 00 86 41 28 31 39 29 2C 42 28 31 39 29 2C 43 28 |..A(19),B(19),C(|
00000060: 31 39 29 2C 4D 24 28 31 32 29 2C 44 28 31 33 29 |19),M$(12),D(13)|
00000070: 00 89 08 8C 00 81 49 B2 31 A4 31 39 3A 87 41 28 |......I.1.19:.A(|
00000080: 49 29 2C 42 28 49 29 3A 82 00 D6 08 96 00 83 2E |I),B(I):........|
00000090: 37 37 39 31 2C 2E 30 30 32 37 33 37 39 30 39 33 |7791,.0027379093|
000000A0: 31 2C 2E 39 39 33 31 2C 2E 30 30 32 37 33 37 37 |1,.9931,.0027377|
000000B0: 37 38 35 2C 2E 37 30 30 37 2C 2E 30 31 31 33 36 |785,.7007,.01136|
000000C0: 37 37 31 34 2C 2E 34 38 35 35 2C 2E 30 31 31 33 |7714,.4855,.0113|
000000D0: 36 37 35 39 35 37 00 18 09 A0 00 83 2E 35 30 35 |675957.......505|
000000E0: 35 2C 2E 30 30 34 34 35 30 34 36 38 36 37 2C 2E |5,.00445046867,.|
000000F0: 31 34 2C 2E 30 30 34 34 35 30 33 36 31 37 33 2C |14,.00445036173,|
00000100: 2E 39 38 37 34 2C 2E 30 30 31 34 35 35 37 35 33 |.9874,.001455753|
00000110: 32 38 2C 2E 30 35 33 39 00 62 09 AA 00 83 2E 30 |28,.0539.b.....0|
00000120: 30 31 34 35 35 36 31 33 32 37 2C 2E 30 38 39 36 |0145561327,.0896|
00000130: 2C 32 2E 33 30 38 30 38 39 33 45 2D 34 2C 2E 30 |,2.3080893E-4,.0|
00000140: 35 36 35 2C 32 2E 33 30 38 30 38 39 33 45 2D 34 |565,2.3080893E-4|
00000150: 2C 2E 31 33 33 33 2C 39 2E 32 39 34 33 37 31 45 |,.1333,9.294371E|
00000160: 2D 35 00 AE 09 B4 00 83 2E 38 38 33 2C 39 2E 32 |-5.......883,9.2|
00000170: 39 34 33 37 31 45 2D 35 2C 2E 38 37 30 32 2C 33 |94371E-5,.8702,3|
00000180: 2E 32 36 39 34 33 38 45 2D 35 2C 2E 34 30 30 36 |.269438E-5,.4006|
00000190: 2C 33 2E 32 36 39 34 33 38 45 2D 35 2C 2E 38 34 |,3.269438E-5,.84|
000001A0: 36 39 2C 31 2E 36 37 32 30 39 32 45 2D 35 00 FA |69,1.672092E-5..|
000001B0: 09 BE 00 83 2E 37 32 35 34 2C 31 2E 36 37 32 30 |.....7254,1.6720|
000001C0: 39 32 45 2D 35 2C 2E 36 36 33 39 2C 31 2E 31 31 |92E-5,.6639,1.11|
000001D0: 35 34 38 32 45 2D 35 2C 2E 30 34 31 2C 31 2E 31 |5482E-5,.041,1.1|
000001E0: 30 34 38 36 34 45 2D 35 2C 2E 33 35 37 34 2C 31 |04864E-5,.3574,1|
000001F0: 2E 31 30 34 38 36 34 45 2D 35 00 0F 0A C8 00 81 |.104864E-5......|
00000200: 49 B2 31 A4 31 32 3A 87 4D 24 28 49 29 3A 82 00 |I.1.12:.M$(I):..|
00000210: 3B 0A D2 00 83 20 4A 41 4E 55 41 52 59 2C 46 45 |;.... JANUARY,FE|
00000220: 42 52 55 41 52 59 2C 4D 41 52 43 48 2C 41 50 52 |BRUARY,MARCH,APR|
00000230: 49 4C 2C 4D 41 59 2C 4A 55 4E 45 00 71 0A DC 00 |IL,MAY,JUNE.q...|
00000240: 83 20 4A 55 4C 59 2C 41 55 47 55 53 54 2C 53 45 |. JULY,AUGUST,SE|
00000250: 50 54 45 4D 42 45 52 2C 4F 43 54 4F 42 45 52 2C |PTEMBER,OCTOBER,|
00000260: 4E 4F 56 45 4D 42 45 52 2C 44 45 43 45 4D 42 45 |NOVEMBER,DECEMBE|
00000270: 52 00 85 0A E6 00 81 49 B2 31 A4 31 33 3A 87 44 |R......I.1.13:.D|
00000280: 28 49 29 3A 82 00 B9 0A F0 00 83 31 2C 33 32 2C |(I):.......1,32,|
00000290: 36 30 2C 39 31 2C 31 32 31 2C 31 35 32 2C 31 38 |60,91,121,152,18|
000002A0: 32 2C 32 31 33 2C 32 34 34 2C 32 37 34 2C 33 30 |2,213,244,274,30|
000002B0: 35 2C 33 33 35 2C 33 36 36 00 CD 0A FA 00 81 49 |5,335,366......I|
000002C0: B2 31 A4 39 3A 87 4F 24 28 49 29 3A 82 00 10 0B |.1.9:.O$(I):....|
000002D0: 04 01 83 20 4D 45 52 43 55 52 59 2C 56 45 4E 55 |... MERCURY,VENU|
000002E0: 53 2C 45 41 52 54 48 2C 4D 41 52 53 2C 4A 55 50 |S,EARTH,MARS,JUP|
000002F0: 49 54 45 52 2C 53 41 54 55 52 4E 2C 55 52 41 4E |ITER,SATURN,URAN|
00000300: 55 53 2C 4E 45 50 54 55 4E 45 2C 50 4C 55 54 4F |US,NEPTUNE,PLUTO|
00000310: 00 48 0B 0E 01 4F B2 31 35 33 30 3A 81 49 B2 31 |.H...O.1530:.I.1|
00000320: A4 39 3A 50 32 28 49 29 B2 4F 3A 82 3A 43 44 24 |.9:P2(I).O:.:CD$|
00000330: B2 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000340: 11 11 11 11 11 11 11 22 00 92 0B 18 01 4D 31 24 |.......".....M1$|
00000350: B2 22 49 22 3A 49 4E B2 37 3A 44 54 B2 37 AD 33 |."I":IN.7:DT.7.3|
00000360: 36 35 32 35 3A 46 B2 FF AD 36 34 38 45 33 3A 42 |6525:F...648E3:B|
00000370: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00000380: 22 3A 52 28 33 29 B2 31 3A 52 28 32 29 B2 2E 37 |":R(3).1:R(2)..7|
00000390: 32 33 00 AB 0B 22 01 52 28 38 29 B2 33 30 2E 30 |23...".R(8).30.0|
000003A0: 37 3A 99 22 93 22 3A 4D 46 B2 31 00 DF 0B 2C 01 |7:.".":MF.1...,.|
000003B0: 99 22 11 57 48 41 54 20 49 53 20 54 48 45 20 53 |.".WHAT IS THE S|
000003C0: 54 41 52 54 49 4E 47 20 59 45 41 52 3F 20 22 3B |TARTING YEAR? ";|
000003D0: 3A 8D 31 33 35 30 3A 59 B2 C5 28 49 4E 24 29 00 |:.1350:Y..(IN$).|
000003E0: F8 0B 36 01 8B 59 B1 B2 31 36 38 30 AF 59 B3 B2 |..6..Y..1680.Y..|
000003F0: 32 32 38 30 A7 33 33 30 00 24 0C 40 01 99 22 11 |2280.330.$.@..".|
00000400: 42 45 54 57 45 45 4E 20 31 36 38 30 20 41 4E 44 |BETWEEN 1680 AND|
00000410: 20 32 32 38 30 2C 20 50 4C 45 41 53 45 2E 22 3A | 2280, PLEASE.":|
00000420: 89 33 30 30 00 57 0C 4A 01 99 22 11 57 48 41 54 |.300.W.J..".WHAT|
00000430: 20 49 53 20 54 48 45 20 53 54 41 52 54 49 4E 47 | IS THE STARTING|
00000440: 20 4D 4F 4E 54 48 3F 20 22 3B 3A 8D 31 33 35 30 | MONTH? ";:.1350|
00000450: 3A 4D 24 B2 49 4E 24 00 68 0C 54 01 8B 20 49 4E |:M$.IN$.h.T.. IN|
00000460: 24 B2 22 22 A7 33 33 30 00 7F 0C 5E 01 8B C6 28 |$."".330...^...(|
00000470: C8 28 4D 24 2C 31 29 29 B1 35 37 A7 33 38 30 00 |.(M$,1)).57.380.|
00000480: BB 0C 68 01 4D B2 B5 28 C5 28 4D 24 29 29 3A 8B |..h.M..(.(M$)):.|
00000490: 4D B3 31 B0 4D B1 31 32 A7 99 22 11 42 45 54 57 |M.1.M.12..".BETW|
000004A0: 45 45 4E 20 31 20 41 4E 44 20 31 32 2C 20 50 4C |EEN 1 AND 12, PL|
000004B0: 45 41 53 45 20 22 3A 89 33 33 30 00 CD 0C 72 01 |EASE ":.330...r.|
000004C0: 4D 24 B2 4D 24 28 4D 29 3A 89 35 30 30 00 DD 0C |M$.M$(M):.500...|
000004D0: 7C 01 4D B2 30 3A 81 49 B2 31 A4 31 32 00 FC 0C ||.M.0:.I.1.12...|
000004E0: 86 01 8B 20 C8 28 4D 24 28 49 29 2C C3 28 4D 24 |... .(M$(I),.(M$|
000004F0: 29 29 B3 B1 4D 24 20 A7 20 34 32 30 00 12 0D 90 |))..M$ . 420....|
00000500: 01 8B 20 4D B2 30 20 A7 20 4D B2 49 3A 89 20 34 |.. M.0 . M.I:. 4|
00000510: 32 30 00 3A 0D 9A 01 99 22 11 54 48 41 54 20 43 |20.:....".THAT C|
00000520: 4F 55 4C 44 20 42 45 20 22 3B 4D 24 28 4D 29 3B |OULD BE ";M$(M);|
00000530: 3A 4D B2 49 3A 89 20 34 35 30 00 42 0D A4 01 82 |:M.I:. 450.B....|
00000540: 20 49 00 52 0D AE 01 8B 20 4D B1 30 20 A7 20 35 | I.R.... M.0 . 5|
00000550: 30 30 00 7A 0D B8 01 99 22 11 4E 4F 20 53 55 43 |00.z....".NO SUC|
00000560: 48 20 4D 4F 4E 54 48 2E 20 54 52 59 20 41 47 41 |H MONTH. TRY AGA|
00000570: 49 4E 2E 22 3A 89 20 33 33 30 00 89 0D C2 01 8B |IN.":. 330......|
00000580: 20 4D B2 31 32 A7 34 39 30 00 9A 0D CC 01 81 20 | M.12.490...... |
00000590: 49 B2 4D AA 31 20 A4 20 31 32 00 C5 0D D6 01 8B |I.M.1 . 12......|
000005A0: 20 C8 28 4D 24 28 49 29 2C C3 28 4D 24 29 29 B2 | .(M$(I),.(M$)).|
000005B0: 4D 24 20 A7 20 99 22 2C 20 22 3B 4D 24 28 4D 29 |M$ . .", ";M$(M)|
000005C0: 3B 3A 4D B2 49 00 CD 0D E0 01 82 20 49 00 E9 0D |;:M.I...... I...|
000005D0: EA 01 99 22 20 4F 52 20 22 3B 4D 24 28 4D 29 3B |..." OR ";M$(M);|
000005E0: 22 2E 22 3A 89 20 33 33 30 00 15 0E F4 01 44 B2 |".":. 330.....D.|
000005F0: 44 28 4D 29 3A 4C 59 B2 30 3A 8B 59 AD 34 B2 B5 |D(M):LY.0:.Y.4..|
00000600: 28 59 AD 34 29 AF 44 B1 35 39 A7 44 B2 44 AA 31 |(Y.4).D.59.D.D.1|
00000610: 3A 4C 59 B2 31 00 5B 0E FE 01 54 B2 33 36 37 AC |:LY.1.[...T.367.|
00000620: 59 AB B5 28 37 AC 28 59 AA B5 28 28 4D AA 39 29 |Y..(7.(Y..((M.9)|
00000630: AD 31 32 29 29 AD 34 29 AA B5 28 32 37 35 AC 4D |.12)).4)..(275.M|
00000640: AD 39 29 AA 31 AB 37 33 30 35 33 31 2E 35 3A 54 |.9).1.730531.5:T|
00000650: 31 B2 31 AA 54 AD 33 36 35 32 35 00 6C 0E 08 02 |1.1.T.36525.l...|
00000660: 8B 4D 31 24 B2 4D 32 24 A7 35 35 30 00 A7 0E 12 |.M1$.M2$.550....|
00000670: 02 4C 4F B2 31 3A 55 B2 35 3A 45 B2 35 2E 37 3A |.LO.1:U.5:E.5.7:|
00000680: 4D 41 B2 32 3A 54 24 B2 22 13 12 49 4E 4E 45 52 |MA.2:T$."..INNER|
00000690: 20 50 4C 41 4E 45 54 53 92 22 3A 4D 32 24 B2 4D | PLANETS.":M2$.M|
000006A0: 31 24 3A 4D 46 B2 31 00 E0 0E 1C 02 8B 4D 31 24 |1$:MF.1......M1$|
000006B0: B2 22 4F 22 A7 4C 4F B2 35 3A 55 B2 39 3A 45 B2 |."O".LO.5:U.9:E.|
000006C0: 34 39 2E 33 3A 4D 41 B2 AB 32 3A 54 24 B2 22 13 |49.3:MA..2:T$.".|
000006D0: 12 4F 55 54 45 52 20 50 4C 41 4E 45 54 53 92 22 |.OUTER PLANETS."|
000006E0: 00 03 0F 26 02 4C 4C B2 31 3A 55 55 B2 31 30 3A |...&.LL.1:UU.10:|
000006F0: 8B 4D 31 24 B2 22 4F 22 A7 4C 4C B2 39 3A 55 55 |.M1$."O".LL.9:UU|
00000700: B2 31 39 00 2B 0F 30 02 81 49 B2 4C 4C A4 55 55 |.19.+.0..I.LL.UU|
00000710: 3A 43 B2 41 28 49 29 AA 42 28 49 29 AC 54 3A 48 |:C.A(I).B(I).T:H|
00000720: B2 30 3A 8B 43 B3 30 A7 48 B2 31 00 45 0F 3A 02 |.0:.C.0.H.1.E.:.|
00000730: 43 28 49 29 B2 32 AC FF AC 28 43 AB B5 28 43 29 |C(I).2...(C..(C)|
00000740: AB 48 29 3A 82 00 56 0F 44 02 8B 4D 31 24 B2 22 |.H):..V.D..M1$."|
00000750: 4F 22 A7 36 34 30 00 86 0F 4E 02 4C 28 31 29 B2 |O".640...N.L(1).|
00000760: 46 AC 28 38 34 33 37 38 AC BF 28 43 28 34 29 29 |F.(84378..(C(4))|
00000770: AA 31 30 37 33 33 AC BF 28 32 AC 43 28 34 29 29 |.10733..(2.C(4))|
00000780: 29 AA 43 28 33 29 00 A5 0F 58 02 52 28 31 29 B2 |).C(3)...X.R(1).|
00000790: 2E 33 39 35 32 38 AB 2E 30 37 38 33 34 AC BE 28 |.39528..07834..(|
000007A0: 43 28 34 29 29 00 C4 0F 62 02 4C 28 32 29 B2 46 |C(4))...b.L(2).F|
000007B0: AC 28 32 38 31 34 AC BF 28 43 28 36 29 29 29 AA |.(2814..(C(6))).|
000007C0: 43 28 35 29 00 E5 0F 6C 02 4C 28 33 29 B2 46 AC |C(5)...l.L(3).F.|
000007D0: 28 36 39 31 30 AC BF 28 43 28 32 29 29 29 AA 43 |(6910..(C(2))).C|
000007E0: 28 31 29 AA FF 00 2E 10 76 02 4C 28 34 29 B2 46 |(1).....v.L(4).F|
000007F0: AC 28 33 38 34 35 31 AC BF 28 43 28 38 29 29 AA |.(38451..(C(8)).|
00000800: 32 32 33 38 AC BF 28 32 AC 43 28 38 29 29 29 AA |2238..(2.C(8))).|
00000810: 43 28 37 29 3A 52 28 34 29 B2 31 2E 35 33 30 33 |C(7):R(4).1.5303|
00000820: AB 2E 31 34 31 37 AC BE 28 43 28 38 29 29 00 5C |..1417..(C(8)).\|
00000830: 10 80 02 4C 28 35 29 B2 46 AC 28 31 39 39 33 34 |...L(5).F.(19934|
00000840: AC BF 28 43 28 31 30 29 29 AA 35 30 32 33 AC 54 |..(C(10)).5023.T|
00000850: 31 AA 32 35 31 31 29 AA 43 28 39 29 00 8A 10 8A |1.2511).C(9)....|
00000860: 02 52 28 35 29 B2 35 2E 32 30 38 38 33 AB 2E 32 |.R(5).5.20883..2|
00000870: 35 31 32 32 AC BE 28 43 28 31 30 29 29 3A 8B 4D |5122..(C(10)):.M|
00000880: 31 24 B2 22 49 22 A7 37 33 30 00 C4 10 94 02 4C |1$."I".730.....L|
00000890: B2 32 33 30 34 35 AC BF 28 43 28 31 32 29 29 AA |.23045..(C(12)).|
000008A0: 35 30 31 34 AC 54 31 AB 32 36 38 39 AC BE 28 32 |5014.T1.2689..(2|
000008B0: AC 43 28 31 30 29 AB 35 AC 43 28 31 32 29 29 AA |.C(10).5.C(12)).|
000008C0: 32 35 30 37 00 F6 10 9E 02 4C 28 36 29 B2 46 AC |2507.....L(6).F.|
000008D0: 28 4C AA 43 28 31 31 29 29 3A 52 28 36 29 B2 39 |(L.C(11)):R(6).9|
000008E0: 2E 35 35 37 37 34 AB 2E 35 33 32 35 32 AC BE 28 |.55774..53252..(|
000008F0: 43 28 31 32 29 29 00 36 11 A8 02 4C 28 37 29 B2 |C(12)).6...L(7).|
00000900: 46 AC 28 31 39 33 39 37 AC BF 28 43 28 31 34 29 |F.(19397..(C(14)|
00000910: 29 29 AA 43 28 31 33 29 3A 52 28 37 29 B2 31 39 |)).C(13):R(7).19|
00000920: 2E 32 31 32 31 36 AB 2E 39 30 31 35 34 AC BE 28 |.21216..90154..(|
00000930: 43 28 31 34 29 29 00 57 11 B2 02 4C 28 38 29 B2 |C(14)).W...L(8).|
00000940: 46 AC 28 33 35 32 33 AC BF 28 43 28 31 36 29 29 |F.(3523..(C(16))|
00000950: 29 AA 43 28 31 35 29 00 8E 11 BC 02 4C B2 31 30 |).C(15).....L.10|
00000960: 31 35 37 37 AC BF 28 43 28 31 38 29 29 AA 31 35 |1577..(C(18)).15|
00000970: 35 31 37 AC BF 28 32 AC 43 28 31 38 29 29 AB 33 |517..(2.C(18)).3|
00000980: 35 39 33 AC BF 28 32 AC 43 28 31 39 29 29 00 B3 |593..(2.C(19))..|
00000990: 11 C6 02 4C 28 39 29 B2 46 AC 28 4C AA 33 34 31 |...L(9).F.(L.341|
000009A0: 34 AC BF 28 33 AC 43 28 31 38 29 29 29 AA 43 28 |4..(3.C(18))).C(|
000009B0: 31 37 29 00 E9 11 D0 02 52 28 39 29 B2 34 30 2E |17).....R(9).40.|
000009C0: 37 34 36 33 38 AB 39 2E 35 38 32 33 35 AC BE 28 |74638.9.58235..(|
000009D0: 43 28 31 38 29 29 AB 31 2E 31 36 37 30 33 AC BE |C(18)).1.16703..|
000009E0: 28 32 AC 43 28 31 38 29 29 00 19 12 DA 02 81 49 |(2.C(18))......I|
000009F0: B2 4C 4F A4 55 3A 58 28 49 29 B2 52 28 49 29 AC |.LO.U:X(I).R(I).|
00000A00: BE 28 4C 28 49 29 29 3A 59 28 49 29 B2 52 28 49 |.(L(I)):Y(I).R(I|
00000A10: 29 AC BF 28 4C 28 49 29 29 00 3D 12 E4 02 58 58 |)..(L(I)).=...XX|
00000A20: B2 58 28 49 29 AC 32 34 2E 35 AD 45 3A 53 58 B2 |.X(I).24.5.E:SX.|
00000A30: 31 3A 8B 58 58 B3 30 A7 53 58 B2 AB 31 00 79 12 |1:.XX.0.SX..1.y.|
00000A40: EE 02 58 25 B2 B6 28 58 58 29 3A 56 B2 53 58 AC |..X%..(XX):V.SX.|
00000A50: B5 28 28 58 25 AA 31 29 AD 32 29 3A 46 58 B2 30 |.((X%.1).2):FX.0|
00000A60: 3A 8B 58 58 B1 B2 30 AF 58 25 AD 32 B2 B5 28 58 |:.XX..0.X%.2..(X|
00000A70: 25 AD 32 29 A7 46 58 B2 31 00 96 12 F8 02 8B 58 |%.2).FX.1......X|
00000A80: 58 B3 30 AF 58 25 AD 32 B3 B1 B5 28 58 25 AD 32 |X.0.X%.2...(X%.2|
00000A90: 29 A7 46 58 B2 31 00 BA 12 02 03 59 59 B2 59 28 |).FX.1.....YY.Y(|
00000AA0: 49 29 AC 32 34 2E 35 AD 45 3A 53 59 B2 31 3A 8B |I).24.5.E:SY.1:.|
00000AB0: 59 59 B3 30 A7 53 59 B2 AB 31 00 F6 12 0C 03 59 |YY.0.SY..1.....Y|
00000AC0: 25 B2 B6 28 59 59 29 3A 57 B2 53 59 AC B5 28 28 |%..(YY):W.SY..((|
00000AD0: 59 25 AA 31 29 AD 32 29 3A 46 59 B2 30 3A 8B 59 |Y%.1).2):FY.0:.Y|
00000AE0: 59 B1 B2 30 AF 59 25 AD 32 B2 B5 28 59 25 AD 32 |Y..0.Y%.2..(Y%.2|
00000AF0: 29 A7 46 59 B2 31 00 13 13 16 03 8B 59 59 B3 30 |).FY.1......YY.0|
00000B00: AF 59 25 AD 32 B3 B1 B5 28 59 25 AD 32 29 A7 46 |.Y%.2...(Y%.2).F|
00000B10: 59 B2 31 00 45 13 20 03 50 31 28 49 29 B2 4F AA |Y.1.E. .P1(I).O.|
00000B20: 56 AB 34 30 AC 57 3A 52 31 28 49 29 B2 31 32 33 |V.40.W:R1(I).123|
00000B30: 3A 8B 46 58 B2 31 AF 46 59 B2 30 A7 52 31 28 49 |:.FX.1.FY.0.R1(I|
00000B40: 29 B2 31 30 38 00 5E 13 2A 03 8B 46 58 B2 30 AF |).108.^.*..FX.0.|
00000B50: 46 59 B2 31 A7 52 31 28 49 29 B2 31 32 36 00 77 |FY.1.R1(I).126.w|
00000B60: 13 34 03 8B 46 58 B2 31 AF 46 59 B2 31 A7 52 31 |.4..FX.1.FY.1.R1|
00000B70: 28 49 29 B2 31 32 34 00 85 13 3E 03 8B 49 B2 4C |(I).124...>..I.L|
00000B80: 4F A7 39 32 30 00 A5 13 48 03 81 4A B2 4C 4F A4 |O.920...H..J.LO.|
00000B90: 49 AB 31 3A 8B 50 31 28 49 29 B3 B1 50 31 28 4A |I.1:.P1(I)..P1(J|
00000BA0: 29 A7 39 31 30 00 CC 13 52 03 51 B2 52 31 28 49 |).910...R.Q.R1(I|
00000BB0: 29 AA 52 31 28 4A 29 3A 8B 51 B2 32 33 31 A7 52 |).R1(J):.Q.231.R|
00000BC0: 31 28 49 29 B2 39 38 3A 89 39 31 30 00 E5 13 5C |1(I).98:.910...\|
00000BD0: 03 8B 51 B2 32 34 39 A7 52 31 28 49 29 B2 39 37 |..Q.249.R1(I).97|
00000BE0: 3A 89 39 31 30 00 FF 13 66 03 8B 51 B2 32 34 37 |:.910...f..Q.247|
00000BF0: A7 52 31 28 49 29 B2 32 35 35 3A 89 39 31 30 00 |.R1(I).255:.910.|
00000C00: 19 14 70 03 8B 51 B2 32 35 32 A7 52 31 28 49 29 |..p..Q.252.R1(I)|
00000C10: B2 32 32 35 3A 89 39 31 30 00 33 14 7A 03 8B 51 |.225:.910.3.z..Q|
00000C20: B2 32 35 30 A7 52 31 28 49 29 B2 32 32 36 3A 89 |.250.R1(I).226:.|
00000C30: 39 31 30 00 41 14 84 03 52 31 28 49 29 B2 31 32 |910.A...R1(I).12|
00000C40: 37 00 47 14 8E 03 82 00 4D 14 98 03 82 00 5B 14 |7.G.....M.....[.|
00000C50: A2 03 8B 4D 46 B2 30 A7 39 39 30 00 8D 14 AC 03 |...MF.0.990.....|
00000C60: 99 22 93 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00000C70: D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 53 C0 C0 |.............S..|
00000C80: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 22 3B 00 D0 14 |...........";...|
00000C90: B6 03 42 31 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |..B1$.".........|
00000CA0: 1D 1D 1D 1D DD 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000CB0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DD 22 |..............."|
00000CC0: 3A 81 49 B2 31 A4 31 31 3A 99 42 31 24 3B 3A 82 |:.I.1.11:.B1$;:.|
00000CD0: 00 11 15 C0 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |......".........|
00000CE0: 1D 1D 1D 1D 41 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....A...........|
00000CF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 56 22 |..............V"|
00000D00: 3B 3A 81 49 B2 31 A4 31 31 3A 99 42 31 24 3B 3A |;:.I.1.11:.B1$;:|
00000D10: 82 00 53 15 CA 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |..S...."........|
00000D20: 1D 1D 1D 1D 1D CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000D30: C0 C0 57 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 |..W............"|
00000D40: 3B 3A 97 32 30 32 33 2C 37 35 3A 97 35 36 32 39 |;:.2023,75:.5629|
00000D50: 35 2C 31 00 7D 15 D4 03 99 54 24 3A 81 49 B2 4C |5,1.}....T$:.I.L|
00000D60: 4F A4 55 3A 99 C8 28 43 44 24 2C 49 AA 4D 41 29 |O.U:..(CD$,I.MA)|
00000D70: 3B 4F 24 28 49 29 3A 82 3A 4D 46 B2 30 00 A2 15 |;O$(I):.:MF.0...|
00000D80: DE 03 99 C8 28 43 44 24 2C 31 31 29 3B CA 28 C4 |....(CD$,11);.(.|
00000D90: 28 59 29 2C 32 29 3B 22 20 20 20 20 20 20 20 20 |(Y),2);" |
00000DA0: 20 22 00 C3 15 E8 03 8B 59 B3 30 A7 99 C8 28 43 | "......Y.0...(C|
00000DB0: 44 24 2C 31 31 29 3B 22 1D 1D 1D 1D 1D 1D 42 2E |D$,11);"......B.|
00000DC0: 43 2E 22 00 E9 15 F2 03 99 22 91 22 3B 42 24 3A |C."......".";B$:|
00000DD0: 99 22 91 22 3B 4D 24 28 4D 29 3B 44 AB 44 28 4D |.".";M$(M);D.D(M|
00000DE0: 29 AA 31 AB 4C 59 AA 59 44 00 1A 16 FC 03 99 C8 |).1.LY.YD.......|
00000DF0: 28 43 44 24 2C 32 31 29 3B CA 28 C4 28 49 4E 29 |(CD$,21);.(.(IN)|
00000E00: 2C 32 29 3B 22 20 44 41 59 20 20 22 3A 99 22 91 |,2);" DAY ":.".|
00000E10: 49 4E 43 52 45 4D 45 4E 54 22 00 52 16 06 04 81 |INCREMENT".R....|
00000E20: 49 B2 4C 4F A4 55 3A 97 50 32 28 49 29 2C 33 32 |I.LO.U:.P2(I),32|
00000E30: 3A 97 50 32 28 49 29 AA 35 34 32 37 32 2C 31 3A |:.P2(I).54272,1:|
00000E40: 82 3A 97 4F 2C 38 31 3A 97 4F AA 35 34 32 37 32 |.:.O,81:.O.54272|
00000E50: 2C 31 00 8D 16 10 04 81 49 B2 4C 4F A4 55 3A 97 |,1......I.LO.U:.|
00000E60: 50 31 28 49 29 2C 52 31 28 49 29 3A 97 50 31 28 |P1(I),R1(I):.P1(|
00000E70: 49 29 AA 35 34 32 37 32 2C 31 3A 82 3A 97 4F 2C |I).54272,1:.:.O,|
00000E80: 38 31 3A 97 4F AA 35 34 32 37 32 2C 31 00 A9 16 |81:.O.54272,1...|
00000E90: 1A 04 8B 49 4E B1 30 A7 99 C8 28 43 44 24 2C 31 |...IN.0...(CD$,1|
00000EA0: 38 29 3B 42 24 3A 99 42 24 00 D2 16 24 04 8B 49 |8);B$:.B$...$..I|
00000EB0: 4E B3 30 A7 99 C8 28 43 44 24 2C 31 38 29 3B 22 |N.0...(CD$,18);"|
00000EC0: 52 45 56 45 52 53 45 22 3A 99 22 4D 4F 54 49 4F |REVERSE":."MOTIO|
00000ED0: 4E 22 00 E6 16 2E 04 A1 41 24 3A 8B 41 24 B2 22 |N"......A$:.A$."|
00000EE0: 22 A7 31 32 34 30 00 F8 16 38 04 8B 41 24 B2 22 |".1240...8..A$."|
00000EF0: 48 22 A7 8D 31 31 38 30 00 12 17 42 04 8B 41 24 |H"..1180...B..A$|
00000F00: B2 22 4F 22 B0 41 24 B2 22 49 22 A7 4D 31 24 B2 |."O".A$."I".M1$.|
00000F10: 41 24 00 29 17 4C 04 8B 41 24 B2 22 53 22 A7 49 |A$.).L..A$."S".I|
00000F20: 4E B2 37 AC B4 28 49 4E 29 00 41 17 56 04 8B 41 |N.7..(IN).A.V..A|
00000F30: 24 B2 22 4D 22 A7 49 4E B2 33 30 AC B4 28 49 4E |$."M".IN.30..(IN|
00000F40: 29 00 5A 17 60 04 8B 41 24 B2 22 46 22 A7 49 4E |).Z.`..A$."F".IN|
00000F50: B2 31 38 30 AC B4 28 49 4E 29 00 70 17 6A 04 8B |.180..(IN).p.j..|
00000F60: 41 24 B2 22 52 22 A7 49 4E B2 AB B6 28 49 4E 29 |A$."R".IN...(IN)|
00000F70: 00 85 17 74 04 8B 41 24 B2 22 44 22 A7 49 4E B2 |...t..A$."D".IN.|
00000F80: B6 28 49 4E 29 00 95 17 7E 04 8B 41 24 B2 22 4E |.(IN)...~..A$."N|
00000F90: 22 A7 32 39 30 00 A8 17 88 04 8B 41 24 B2 22 51 |".290......A$."Q|
00000FA0: 22 A7 99 22 93 22 3A 80 00 B2 17 92 04 89 31 30 |"..".":.......10|
00000FB0: 37 30 00 C7 17 9C 04 A1 41 24 3A 8B 41 24 B3 B1 |70......A$:.A$..|
00000FC0: 22 22 A7 31 31 38 30 00 E4 17 A6 04 99 C8 28 43 |"".1180.......(C|
00000FD0: 44 24 2C 31 33 29 3B 22 41 4E 44 20 48 4F 4C 44 |D$,13);"AND HOLD|
00000FE0: 49 4E 47 22 00 08 18 B0 04 99 22 50 52 45 53 53 |ING"......"PRESS|
00000FF0: 20 41 4E 59 20 4B 45 59 22 3A 99 22 91 54 4F 20 | ANY KEY":.".TO |
00001000: 52 45 53 54 41 52 54 22 00 1C 18 BA 04 A1 41 24 |RESTART"......A$|
00001010: 3A 8B 41 24 B2 22 22 A7 31 32 31 30 00 42 18 C4 |:.A$."".1210.B..|
00001020: 04 99 C8 28 43 44 24 2C 31 33 29 3B 42 24 3A 99 |...(CD$,13);B$:.|
00001030: 42 24 3A 99 22 91 22 3B 42 24 3A 99 22 91 22 3B |B$:.".";B$:.".";|
00001040: 42 24 00 48 18 CE 04 8E 00 69 18 D8 04 54 B2 54 |B$.H.....i...T.T|
00001050: AA 49 4E 3A 54 31 B2 54 31 AA 49 4E AD 33 36 35 |.IN:T1.T1.IN.365|
00001060: 32 35 3A 44 B2 44 AA 49 4E 00 77 18 E2 04 8B 44 |25:D.D.IN.w....D|
00001070: B1 30 A7 31 32 38 30 00 93 18 EC 04 59 B2 59 AB |.0.1280.....Y.Y.|
00001080: 31 3A 44 B2 44 AA 33 36 35 3A 8B 59 B2 30 A7 59 |1:D.D.365:.Y.0.Y|
00001090: B2 AB 31 00 A9 18 F6 04 8B 59 AD 34 B2 B5 28 59 |..1......Y.4..(Y|
000010A0: AD 34 29 A7 44 B2 44 AA 31 00 CD 18 00 05 4C 59 |.4).D.D.1.....LY|
000010B0: B2 30 3A 59 44 B2 30 3A 8B 59 AD 34 B2 B5 28 59 |.0:YD.0:.Y.4..(Y|
000010C0: AD 34 29 AF 44 B1 35 39 A7 4C 59 B2 31 00 E7 18 |.4).D.59.LY.1...|
000010D0: 0A 05 8B 59 AD 34 B2 B5 28 59 AD 34 29 AF 44 B2 |...Y.4..(Y.4).D.|
000010E0: 36 30 A7 59 44 B2 31 00 0F 19 14 05 81 4D B2 31 |60.YD.1......M.1|
000010F0: A4 31 32 3A 8B 44 B3 44 28 4D AA 31 29 AA 4C 59 |.12:.D.D(M.1).LY|
00001100: A7 4D 24 B2 4D 24 28 4D 29 3A 89 31 33 34 30 00 |.M$.M$(M):.1340.|
00001110: 15 19 1E 05 82 00 33 19 28 05 44 B2 44 AB 33 36 |......3.(.D.D.36|
00001120: 35 AB 4C 59 3A 59 B2 59 AA 31 3A 8B 59 B2 30 A7 |5.LY:Y.Y.1:.Y.0.|
00001130: 59 B2 31 00 3D 19 32 05 89 31 32 38 30 00 5C 19 |Y.1.=.2..1280.\.|
00001140: 3C 05 81 49 B2 4C 4F A4 55 3A 50 32 28 49 29 B2 |<..I.LO.U:P2(I).|
00001150: 50 31 28 49 29 3A 82 3A 89 35 32 30 00 7D 19 46 |P1(I):.:.520.}.F|
00001160: 05 49 4E 24 B2 22 20 22 3A 5A 54 B2 54 49 3A 5A |.IN$." ":ZT.TI:Z|
00001170: 43 B2 32 3A 5A 44 24 B2 C7 28 32 30 29 00 92 19 |C.2:ZD$..(20)...|
00001180: 50 05 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 31 33 |P..Z$:.Z$.."".13|
00001190: 39 30 00 C2 19 5A 05 8B 5A 54 B3 B2 54 49 A7 99 |90...Z..ZT..TI..|
000011A0: CA 28 22 20 A6 22 2C 5A 43 2C 31 29 3B 22 9D 22 |.(" .",ZC,1);"."|
000011B0: 3B 3A 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 AA |;:ZC.3.ZC:ZT.TI.|
000011C0: 31 35 00 CC 19 64 05 89 31 33 36 30 00 FB 19 6E |15...d..1360...n|
000011D0: 05 5A B2 C6 28 5A 24 29 3A 5A 4C B2 C3 28 49 4E |.Z..(Z$):ZL..(IN|
000011E0: 24 29 3A 8B 28 5A AF 31 32 37 29 B3 33 32 A7 99 |$):.(Z.127).32..|
000011F0: 22 20 9D 22 3B 3A 89 31 34 33 30 00 2B 1A 78 05 |" .";:.1430.+.x.|
00001200: 8B 46 4C AF 28 5A AF 31 32 37 29 B1 36 34 AF 28 |.FL.(Z.127).64.(|
00001210: 5A AF 31 32 37 29 B3 39 31 A7 5A 24 B2 C7 28 28 |Z.127).91.Z$..((|
00001220: 5A AA 31 32 38 29 AF 32 35 35 29 00 3C 1A 82 05 |Z.128).255).<...|
00001230: 8B 5A 4C B1 32 35 34 A7 31 33 36 30 00 57 1A 8C |.ZL.254.1360.W..|
00001240: 05 49 4E 24 B2 49 4E 24 AA 5A 24 3A 99 5A 24 3B |.IN$.IN$.Z$:.Z$;|
00001250: 5A 44 24 3B 5A 24 3B 00 76 1A 96 05 8B 5A B2 31 |ZD$;Z$;.v....Z.1|
00001260: 33 A7 49 4E 24 B2 CA 28 49 4E 24 2C 32 29 3A 99 |3.IN$..(IN$,2):.|
00001270: 43 52 24 3B 3A 8E 00 A1 1A A0 05 8B 5A B2 32 30 |CR$;:.......Z.20|
00001280: AF 5A 4C B1 31 A7 49 4E 24 B2 C8 28 49 4E 24 2C |.ZL.1.IN$..(IN$,|
00001290: 5A 4C AB 31 29 3A 99 22 9D 22 3B 3A 89 31 33 36 |ZL.1):.".";:.136|
000012A0: 30 00 D3 1A AA 05 8B 5A B2 31 34 31 A7 5A 24 B2 |0......Z.141.Z$.|
000012B0: C7 28 AB 32 30 AC 28 5A 4C B1 31 29 29 3A 81 5A |.(.20.(ZL.1)):.Z|
000012C0: B2 32 A4 5A 4C 3A 99 5A 24 3B 3A 82 5A 3A 89 31 |.2.ZL:.Z$;:.Z:.1|
000012D0: 33 35 30 00 DD 1A B4 05 89 31 33 36 30 00 EC 1A |350......1360...|
000012E0: BE 05 8B 50 4E B2 30 A7 31 35 33 30 00 F6 1A C8 |...PN.0.1530....|
000012F0: 05 8D 31 36 32 30 00 11 1B D2 05 99 22 50 52 45 |..1620......"PRE|
00001300: 53 53 20 12 52 45 54 55 52 4E 92 20 54 4F 20 22 |SS .RETURN. TO "|
00001310: 3B 00 2D 1B DC 05 8B 50 4E B2 4C 50 A7 99 22 42 |;.-....PN.LP.."B|
00001320: 45 47 49 4E 3A 22 3B 3A 89 31 35 32 30 00 3F 1B |EGIN:";:.1520.?.|
00001330: E6 05 99 22 43 4F 4E 54 49 4E 55 45 3A 22 3B 00 |..."CONTINUE:";.|
00001340: 53 1B F0 05 A1 54 24 3A 8B 54 24 B2 22 22 A7 31 |S....T$:.T$."".1|
00001350: 35 32 30 00 63 1B FA 05 8B 50 4E B2 4C 50 A7 31 |520.c....PN.LP.1|
00001360: 35 37 30 00 A1 1B 04 06 50 4E B2 50 4E AA 31 3A |570.....PN.PN.1:|
00001370: 99 22 93 22 3B 50 47 24 3B 22 20 2D 20 43 55 52 |.".";PG$;" - CUR|
00001380: 53 4F 52 20 23 22 3B 4E 4D 24 3B 22 20 20 28 43 |SOR #";NM$;" (C|
00001390: 29 20 31 39 38 30 20 20 20 50 41 47 45 22 3B 50 |) 1980 PAGE";P|
000013A0: 4E 00 AB 1B 0E 06 8D 31 36 32 30 00 B1 1B 18 06 |N......1620.....|
000013B0: 8E 00 C7 1B 22 06 99 22 93 22 3A 9C 3A 8D 31 35 |...."..".":.:.15|
000013C0: 38 30 3A 89 31 33 30 00 04 1C 2C 06 51 4B B2 35 |80:.130...,.QK.5|
000013D0: 32 35 3A 51 4C B2 32 34 35 3A 51 4D B2 31 33 34 |25:QL.245:QM.134|
000013E0: 3A 51 50 B2 35 31 35 3A 51 51 B2 32 33 34 3A 51 |:QP.515:QQ.234:Q|
000013F0: 53 B2 35 31 36 3A 51 56 B2 31 3A 43 52 24 B2 C7 |S.516:QV.1:CR$..|
00001400: 28 31 33 29 00 19 1C 36 06 8B 20 C2 28 35 30 30 |(13)...6.. .(500|
00001410: 30 30 29 B2 30 20 A7 20 8E 00 4B 1C 40 06 51 4B |00).0 . ..K.@.QK|
00001420: B2 31 35 38 3A 51 4C B2 32 31 36 3A 51 4D B2 35 |.158:QL.216:QM.5|
00001430: 32 3A 51 50 B2 31 35 31 3A 51 51 B2 32 30 35 3A |2:QP.151:QQ.205:|
00001440: 51 53 B2 31 35 32 3A 51 56 B2 32 00 51 1C 4A 06 |QS.152:QV.2.Q.J.|
00001450: 8E 00 6B 1C 54 06 81 49 B2 31 A4 31 30 3A 99 22 |..k.T..I.1.10:."|
00001460: C0 C0 C0 C0 22 3B 3A 82 49 3A 8E 00 79 1C 5E 06 |....";:.I:..y.^.|
00001470: 97 35 39 34 36 38 2C 31 32 00 96 1C 68 06 99 22 |.59468,12...h.."|
00001480: 93 11 11 22 3B A3 31 35 AB C3 28 50 47 24 29 29 |...";.15..(PG$))|
00001490: 3B 50 47 24 3B 22 00 A2 1C 72 06 99 A3 31 37 29 |;PG$;"...r...17)|
000014A0: 3B 22 00 D3 1C 7C 06 99 22 11 20 20 20 20 20 20 |;"...|..". |
000014B0: 20 20 20 20 20 20 20 22 3B 4E 4D 24 3B 22 20 20 | ";NM$;" |
000014C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000014D0: 20 20 11 00 DD 1C 86 06 8D 31 36 32 30 00 00 1D | .......1620...|
000014E0: 90 06 99 22 11 54 48 45 20 53 4F 4C 41 52 20 53 |...".THE SOLAR S|
000014F0: 59 53 54 45 4D 20 49 4E 20 41 43 54 49 4F 4E 21 |YSTEM IN ACTION!|
00001500: 00 2C 1D 9A 06 99 22 11 11 11 57 41 4E 54 20 54 |.,...."...WANT T|
00001510: 4F 20 53 45 45 20 54 48 45 20 43 4F 4D 4D 41 4E |O SEE THE COMMAN|
00001520: 44 53 3F 20 22 3B 3A 8D 31 33 35 30 00 44 1D A4 |DS? ";:.1350.D..|
00001530: 06 8B C8 28 49 4E 24 2C 31 29 B3 B1 22 59 22 A7 |...(IN$,1).."Y".|
00001540: 31 35 37 30 00 53 1D AE 06 4C 50 B2 31 3A 8D 31 |1570.S...LP.1:.1|
00001550: 34 37 30 00 6E 1D B8 06 99 22 20 20 20 20 20 53 |470.n...." S|
00001560: 48 4F 57 20 12 49 92 4E 4E 45 52 20 4F 52 00 8E |HOW .I.NNER OR..|
00001570: 1D C2 06 99 22 20 20 20 20 20 20 20 20 20 20 12 |...." .|
00001580: 4F 92 55 54 45 52 20 50 4C 41 4E 45 54 53 00 BE |O.UTER PLANETS..|
00001590: 1D CC 06 99 22 11 20 53 50 45 45 44 20 49 53 20 |....". SPEED IS |
000015A0: 12 53 92 4C 4F 57 20 20 20 20 28 37 20 44 41 59 |.S.LOW (7 DAY|
000015B0: 20 49 4E 54 45 52 56 41 4C 29 2C 20 4F 52 00 ED | INTERVAL), OR..|
000015C0: 1D D6 06 99 22 20 20 20 20 20 20 20 20 20 20 12 |...." .|
000015D0: 4D 92 45 44 49 55 4D 20 28 33 30 20 44 41 59 20 |M.EDIUM (30 DAY |
000015E0: 49 4E 54 45 52 56 41 4C 29 2C 20 4F 52 00 19 1E |INTERVAL), OR...|
000015F0: E0 06 99 22 20 20 20 20 20 20 20 20 20 20 12 46 |..." .F|
00001600: 92 41 53 54 20 20 28 31 38 30 20 44 41 59 20 49 |.AST (180 DAY I|
00001610: 4E 54 45 52 56 41 4C 29 2E 00 42 1E EA 06 99 22 |NTERVAL)..B...."|
00001620: 11 4D 4F 54 49 4F 4E 20 49 53 20 12 44 92 49 52 |.MOTION IS .D.IR|
00001630: 45 43 54 20 28 46 4F 52 57 41 52 44 53 29 2C 20 |ECT (FORWARDS), |
00001640: 4F 52 00 6C 1E F4 06 99 22 20 20 20 20 20 20 20 |OR.l...." |
00001650: 20 20 20 12 52 92 45 54 52 4F 47 52 41 44 45 20 | .R.ETROGRADE |
00001660: 28 42 41 43 4B 57 41 52 44 53 29 2E 00 9C 1E FE |(BACKWARDS).....|
00001670: 06 99 22 11 20 20 59 4F 55 20 4D 41 59 20 12 48 |..". YOU MAY .H|
00001680: 92 41 4C 54 20 54 48 45 20 50 4C 41 4E 45 54 53 |.ALT THE PLANETS|
00001690: 20 42 52 49 45 46 4C 59 2C 20 4F 52 00 BB 1E 08 | BRIEFLY, OR....|
000016A0: 07 99 22 20 20 20 50 49 43 4B 20 41 20 12 4E 92 |.." PICK A .N.|
000016B0: 45 57 20 44 41 54 45 2C 20 4F 52 00 DC 1E 12 07 |EW DATE, OR.....|
000016C0: 99 22 20 20 20 20 20 20 20 20 20 20 12 51 92 55 |." .Q.U|
000016D0: 49 54 20 57 41 54 43 48 49 4E 47 2E 00 04 1F 1C |IT WATCHING.....|
000016E0: 07 99 22 11 54 48 45 20 53 49 44 45 53 20 4F 46 |..".THE SIDES OF|
000016F0: 20 54 48 45 20 44 49 53 50 4C 41 59 20 41 52 45 | THE DISPLAY ARE|
00001700: 20 54 48 45 00 2A 1F 26 07 99 22 11 20 20 20 20 | THE.*.&..". |
00001710: 12 56 92 45 52 4E 41 4C 20 28 53 50 52 49 4E 47 |.V.ERNAL (SPRING|
00001720: 29 20 45 51 55 49 4E 4F 58 2C 00 47 1F 30 07 99 |) EQUINOX,.G.0..|
00001730: 22 20 20 20 20 12 53 92 55 4D 4D 45 52 20 53 4F |" .S.UMMER SO|
00001740: 4C 53 54 49 43 45 2C 00 69 1F 3A 07 99 22 20 20 |LSTICE,.i.:.." |
00001750: 20 20 12 41 92 55 54 55 4D 4E 41 4C 20 45 51 55 | .A.UTUMNAL EQU|
00001760: 49 4E 4F 58 2C 20 41 4E 44 00 86 1F 44 07 99 22 |INOX, AND...D.."|
00001770: 20 20 20 20 12 57 92 49 4E 54 45 52 20 53 4F 4C | .W.INTER SOL|
00001780: 53 54 49 43 45 2E 00 90 1F 4E 07 8D 31 34 37 30 |STICE....N..1470|
00001790: 00 00 00 00 B1 45 BC 20 FF CC 7D |.....E. ..} |
....D.. 469 PLANETARIUM.2.N..53280,0:.53
281,0:.".".L.X..:PG$."":NM$."":.1630.P..
..A(19),B(19),C(19),M$(12),D(13)......I.
1.19:.A(I),B(I):..V.....7791,.0027379093
1,.9931,.0027377785,.7007,.011367714,.48
55,.0113675957... ...5055,.00445046867,.
14,.00445036173,.9874,.00145575328,.0539
.B.....00145561327,.0896,2.3080893E-4,.0
565,2.3080893E-4,.1333,9.294371E-5......
.883,9.294371E-5,.8702,3.269438E-5,.4006
,3.269438E-5,.8469,1.672092E-5.......725
4,1.672092E-5,.6639,1.115482E-5,.041,1.1
04864E-5,.3574,1.104864E-5...H..I.1.12:.
M$(I):..;.R.. JANUARY,FEBRUARY,MARCH,APR
IL,MAY,JUNE.Q.... JULY,AUGUST,SEPTEMBER,
OCTOBER,NOVEMBER,DECEMBER......I.1.13:.D
(I):.......1,32,60,91,121,152,182,213,24
4,274,305,335,366.M....I.1.9:.O$(I):....
... MERCURY,VENUS,EARTH,MARS,JUPITER,SAT
URN,URANUS,NEPTUNE,PLUTO.H...O.1530:.I.1
.9:P2(I).O:.:CD$."....................."
.....M1$."I":IN.7:DT.7.36525:F...648E3:B
$." ":R(3).1:R(2)..723...".R
(8).30.07:.".":MF.1...,..".WHAT IS THE S
TARTING YEAR? ";:.1350:Y.E(IN$)...6..Y..
1680.Y..2280.330.$.@..".BETWEEN 1680 AND
2280, PLEASE.":.300.W.J..".WHAT IS THE
STARTING MONTH? ";:.1350:M$.IN$.H.T.. IN
$."".330..^..F(H(M$,1)).57.380...H.M..(
E(M$)):.M.1.M.12..".BETWEEN 1 AND 12, PL
EASE ":.330.M.R.M$.M$(M):.500...|.M.0:.I
.1.12...... H(M$(I),C(M$))..M$ . 420....
.. M.0 . M.I:. 420.:....".THAT COULD BE
";M$(M);:M.I:. 450.B.... I.R.... M.0 . 5
00.Z....".NO SUCH MONTH. TRY AGAIN.":. 3
30...B.. M.12.490...L.. I.M.1 . 12.E.V..
H(M$(I),C(M$)).M$ . .", ";M$(M);:M.I.M.
... I......" OR ";M$(M);".":. 330.....D.
D(M):LY.0:.Y.4..(Y.4).D.59.D.D.1:LY.1.[.
..T.367.Y..(7.(Y..((M.9).12)).4)..(275.M
.9).1.730531.5:T1.1.T.36525.L....M1$.M2$
.550.....LO.1:U.5:E.5.7:MA.2:T$."..INNER
PLANETS.":M2$.M1$:MF.1......M1$."O".LO.
5:U.9:E.49.3:MA..2:T$."..OUTER PLANETS."
...&.LL.1:UU.10:.M1$."O".LL.9:UU.19.+.0.
.I.LL.UU:C.A(I).B(I).T:H.0:.C.0.H.1.E.:.
C(I).2...(C..(C).H):..V.D..M1$."O".640..
.N.L(1).F.(84378..(C(4)).10733..(2.C(4))
).C(3)...X.R(1)..39528..07834..(C(4)).D.
B.L(2).F.(2814..(C(6))).C(5)...L.L(3).F.
(6910..(C(2))).C(1).....V.L(4).F.(38451.
.(C(8)).2238..(2.C(8))).C(7):R(4).1.5303
..1417..(C(8)).\...L(5).F.(19934..(C(10)
).5023.T1.2511).C(9).....R(5).5.20883..2
5122..(C(10)):.M1$."I".730.D...L.23045..
(C(12)).5014.T1.2689..(2.C(10).5.C(12)).
2507.....L(6).F.(L.C(11)):R(6).9.55774..
53252..(C(12)).6...L(7).F.(19397..(C(14)
)).C(13):R(7).19.21216..90154..(C(14)).W
...L(8).F.(3523..(C(16))).C(15).....L.10
1577..(C(18)).15517..(2.C(18)).3593..(2.
C(19))...F.L(9).F.(L.3414..(3.C(18))).C(
17)...P.R(9).40.74638.9.58235..(C(18)).1
.16703..(2.C(18))...Z..I.LO.U:X(I).R(I).
.(L(I)):Y(I).R(I)..(L(I)).=...XX.X(I).24
.5.E:SX.1:.XX.0.SX..1.Y...X%..(XX):V.SX.
.((X%.1).2):FX.0:.XX..0.X%.2..(X%.2).FX.
1......XX.0.X%.2...(X%.2).FX.1.....YY.Y(
I).24.5.E:SY.1:.YY.0.SY..1.....Y%..(YY):
W.SY..((Y%.1).2):FY.0:.YY..0.Y%.2..(Y%.2
).FY.1......YY.0.Y%.2...(Y%.2).FY.1.E. .
P1(I).O.V.40.W:R1(I).123:.FX.1.FY.0.R1(I
).108.^.*..FX.0.FY.1.R1(I).126.W.4..FX.1
.FY.1.R1(I).124...>..I.LO.920...H..J.LO.
I.1:.P1(I)..P1(J).910.L.R.Q.R1(I).R1(J):
.Q.231.R1(I).98:.910...\..Q.249.R1(I).97
:.910...F..Q.247.R1(I).255:.910...P..Q.2
52.R1(I).225:.910.3.Z..Q.250.R1(I).226:.
910.A...R1(I).127.G.....M.....[....MF.0.
990......"..............U............S..
..........I";.P...B1$.".................
.......................":.I.1.11:.B1$;:.
......".............A...................
......V";:.I.1.11:.B1$;:..S.J.."........
.....J............W............";:.2023,
75:.56295,1.}.T..T$:.I.LO.U:.H(CD$,I.MA)
;O$(I):.:MF.0......H(CD$,11);J(D(Y),2);"
".C....Y.0..H(CD$,11);"......B.
C."......".";B$:.".";M$(M);D.D(M).1.LY.Y
D......H(CD$,21);J(D(IN),2);" DAY ":.".
INCREMENT".R....I.LO.U:.P2(I),32:.P2(I).
54272,1:.:.O,81:.O.54272,1......I.LO.U:.
P1(I),R1(I):.P1(I).54272,1:.:.O,81:.O.54
272,1......IN.0..H(CD$,18);B$:.B$.R.$..I
N.0..H(CD$,18);"REVERSE":."MOTION"......
A$:.A$."".1240...8..A$."H"..1180...B..A$
."O".A$."I".M1$.A$.).L..A$."S".IN.7..(IN
).A.V..A$."M".IN.30..(IN).Z.`..A$."F".IN
.180..(IN).P.J..A$."R".IN...(IN)...T..A$
."D".IN..(IN)...~..A$."N".290......A$."Q
"..".":.......1070.G....A$:.A$.."".1180.
.....H(CD$,13);"AND HOLDING"......"PRESS
ANY KEY":.".TO RESTART"......A$:.A$."".
1210.B.D..H(CD$,13);B$:.B$:.".";B$:.".";
B$.H.N...I.X.T.T.IN:T1.T1.IN.36525:D.D.I
N.W....D.0.1280.....Y.Y.1:D.D.365:.Y.0.Y
..1......Y.4..(Y.4).D.D.1.M...LY.0:YD.0:
.Y.4..(Y.4).D.59.LY.1......Y.4..(Y.4).D.
60.YD.1......M.1.12:.D.D(M.1).LY.M$.M$(M
):.1340.......3.(.D.D.365.LY:Y.Y.1:.Y.0.
Y.1.=.2..1280.\.<..I.LO.U:P2(I).P1(I):.:
.520.}.F.IN$." ":ZT.TI:ZC.2:ZD$.G(20)...
P..Z$:.Z$.."".1390.B.Z..ZT..TI..J(" .",Z
C,1);".";:ZC.3.ZC:ZT.TI.15.L.D..1360...N
.Z.F(Z$):ZL.C(IN$):.(Z.127).32.." .";:.1
430.+.X..FL.(Z.127).64.(Z.127).91.Z$.G((
Z.128).255).<....ZL.254.1360.W...IN$.IN$
.Z$:.Z$;ZD$;Z$;.V....Z.13.IN$.J(IN$,2):.
CR$;:.... ..Z.20.ZL.1.IN$.H(IN$,ZL.1):."
.";:.1360.S....Z.141.Z$.G(.20.(ZL.1)):.Z
.2.ZL:.Z$;:.Z:.1350......1360......PN.0.
1530...H..1620...R.."PRESS .RETURN. TO "
;.-....PN.LP.."BEGIN:";:.1520.?...."CONT
INUE:";.S....T$:.T$."".1520.C....PN.LP.1
570.....PN.PN.1:.".";PG$;" - CURSOR #";N
M$;" (C) 1980 PAGE";PN......1620.....
..G."..".":.:.1580:.130...,.QK.525:QL.24
5:QM.134:QP.515:QQ.234:QS.516:QV.1:CR$.G
(13)...6.. B(50000).0 . ..K.@.QK.158:QL.
216:QM.52:QP.151:QQ.205:QS.152:QV.2.Q.J.
..K.T..I.1.10:."....";:.I:..Y.^..59468,1
2...H.."...";.15.C(PG$));PG$;"...R...17)
;".S.|..". ";NM$;"
.......1620......".THE SOLAR S
YSTEM IN ACTION!.,...."...WANT TO SEE TH
E COMMANDS? ";:.1350.D....H(IN$,1).."Y".
1570.S...LP.1:.1470.N...." SHOW .I.N
NER OR...B.." .O.UTER PLANETS..
.L..". SPEED IS .S.LOW (7 DAY INTERVA
L), OR...V.." .M.EDIUM (30 DAY
INTERVAL), OR......" .F.AST (1
80 DAY INTERVAL)..B....".MOTION IS .D.IR
ECT (FORWARDS), OR.L...." .R.ET
ROGRADE (BACKWARDS).......". YOU MAY .H
.ALT THE PLANETS BRIEFLY, OR......" PI
CK A .N.EW DATE, OR......" .Q.U
IT WATCHING.......".THE SIDES OF THE DIS
PLAY ARE THE.*.&..". .V.ERNAL (SPRING
) EQUINOX,.G.0.." .S.UMMER SOLSTICE,.
I.:.." .A.UTUMNAL EQUINOX, AND...D.."
.W.INTER SOLSTICE....N..1470.....E.
.L}
> CLICK IMAGE PREVIEW FOR FULL MODAL