PLANETENSYSTEM
FILE INFORMATION
FILENAME(S): PLANETENSYSTEM
FILE TYPE(S): PRG
FILE SIZE: 5.9K
FIRST SEEN: 2025-11-02 16:39:17
APPEARS ON: 2 disk(s)
FILE HASH
34cc397a7e3225b29804bb2f530e050f1971fa941965d49bf578ca700519bc31
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD DISK NR | PLANETENSYSTEM | PRG | Treasure Chest - Plattfuss | 16 | 0 | DOWNLOAD FILE |
| PD DISK NR | PLANETENSYSTEM | PRG | Treasure Chest - Plattfuss | 16 | 0 | 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 54 08 78 00 9C 3A 50 47 24 B2 22 4F 52 |.".T.x..:PG$."OR|
00000040: 52 45 52 59 22 3A 4E 4D 24 B2 22 32 33 22 3A 89 |RERY":NM$."23":.|
00000050: 31 36 33 30 00 78 08 82 00 86 41 28 31 39 29 2C |1630.x....A(19),|
00000060: 42 28 31 39 29 2C 43 28 31 39 29 2C 4D 24 28 31 |B(19),C(19),M$(1|
00000070: 32 29 2C 44 28 31 33 29 00 91 08 8C 00 81 49 B2 |2),D(13)......I.|
00000080: 31 A4 31 39 3A 87 41 28 49 29 2C 42 28 49 29 3A |1.19:.A(I),B(I):|
00000090: 82 00 DE 08 96 00 83 2E 37 37 39 31 2C 2E 30 30 |........7791,.00|
000000A0: 32 37 33 37 39 30 39 33 31 2C 2E 39 39 33 31 2C |273790931,.9931,|
000000B0: 2E 30 30 32 37 33 37 37 37 38 35 2C 2E 37 30 30 |.0027377785,.700|
000000C0: 37 2C 2E 30 31 31 33 36 37 37 31 34 2C 2E 34 38 |7,.011367714,.48|
000000D0: 35 35 2C 2E 30 31 31 33 36 37 35 39 35 37 00 20 |55,.0113675957. |
000000E0: 09 A0 00 83 2E 35 30 35 35 2C 2E 30 30 34 34 35 |.....5055,.00445|
000000F0: 30 34 36 38 36 37 2C 2E 31 34 2C 2E 30 30 34 34 |046867,.14,.0044|
00000100: 35 30 33 36 31 37 33 2C 2E 39 38 37 34 2C 2E 30 |5036173,.9874,.0|
00000110: 30 31 34 35 35 37 35 33 32 38 2C 2E 30 35 33 39 |0145575328,.0539|
00000120: 00 6A 09 AA 00 83 2E 30 30 31 34 35 35 36 31 33 |.j.....001455613|
00000130: 32 37 2C 2E 30 38 39 36 2C 32 2E 33 30 38 30 38 |27,.0896,2.30808|
00000140: 39 33 45 2D 34 2C 2E 30 35 36 35 2C 32 2E 33 30 |93E-4,.0565,2.30|
00000150: 38 30 38 39 33 45 2D 34 2C 2E 31 33 33 33 2C 39 |80893E-4,.1333,9|
00000160: 2E 32 39 34 33 37 31 45 2D 35 00 B6 09 B4 00 83 |.294371E-5......|
00000170: 2E 38 38 33 2C 39 2E 32 39 34 33 37 31 45 2D 35 |.883,9.294371E-5|
00000180: 2C 2E 38 37 30 32 2C 33 2E 32 36 39 34 33 38 45 |,.8702,3.269438E|
00000190: 2D 35 2C 2E 34 30 30 36 2C 33 2E 32 36 39 34 33 |-5,.4006,3.26943|
000001A0: 38 45 2D 35 2C 2E 38 34 36 39 2C 31 2E 36 37 32 |8E-5,.8469,1.672|
000001B0: 30 39 32 45 2D 35 00 02 0A BE 00 83 2E 37 32 35 |092E-5.......725|
000001C0: 34 2C 31 2E 36 37 32 30 39 32 45 2D 35 2C 2E 36 |4,1.672092E-5,.6|
000001D0: 36 33 39 2C 31 2E 31 31 35 34 38 32 45 2D 35 2C |639,1.115482E-5,|
000001E0: 2E 30 34 31 2C 31 2E 31 30 34 38 36 34 45 2D 35 |.041,1.104864E-5|
000001F0: 2C 2E 33 35 37 34 2C 31 2E 31 30 34 38 36 34 45 |,.3574,1.104864E|
00000200: 2D 35 00 17 0A C8 00 81 49 B2 31 A4 31 32 3A 87 |-5......I.1.12:.|
00000210: 4D 24 28 49 29 3A 82 00 43 0A D2 00 83 20 4A 41 |M$(I):..C.... JA|
00000220: 4E 55 41 52 59 2C 46 45 42 52 55 41 52 59 2C 4D |NUARY,FEBRUARY,M|
00000230: 41 52 43 48 2C 41 50 52 49 4C 2C 4D 41 59 2C 4A |ARCH,APRIL,MAY,J|
00000240: 55 4E 45 00 79 0A DC 00 83 20 4A 55 4C 59 2C 41 |UNE.y.... JULY,A|
00000250: 55 47 55 53 54 2C 53 45 50 54 45 4D 42 45 52 2C |UGUST,SEPTEMBER,|
00000260: 4F 43 54 4F 42 45 52 2C 4E 4F 56 45 4D 42 45 52 |OCTOBER,NOVEMBER|
00000270: 2C 44 45 43 45 4D 42 45 52 00 8D 0A E6 00 81 49 |,DECEMBER......I|
00000280: B2 31 A4 31 33 3A 87 44 28 49 29 3A 82 00 C1 0A |.1.13:.D(I):....|
00000290: F0 00 83 31 2C 33 32 2C 36 30 2C 39 31 2C 31 32 |...1,32,60,91,12|
000002A0: 31 2C 31 35 32 2C 31 38 32 2C 32 31 33 2C 32 34 |1,152,182,213,24|
000002B0: 34 2C 32 37 34 2C 33 30 35 2C 33 33 35 2C 33 36 |4,274,305,335,36|
000002C0: 36 00 D5 0A FA 00 81 49 B2 31 A4 39 3A 87 4F 24 |6......I.1.9:.O$|
000002D0: 28 49 29 3A 82 00 18 0B 04 01 83 20 4D 45 52 43 |(I):....... MERC|
000002E0: 55 52 59 2C 56 45 4E 55 53 2C 45 41 52 54 48 2C |URY,VENUS,EARTH,|
000002F0: 4D 41 52 53 2C 4A 55 50 49 54 45 52 2C 53 41 54 |MARS,JUPITER,SAT|
00000300: 55 52 4E 2C 55 52 41 4E 55 53 2C 4E 45 50 54 55 |URN,URANUS,NEPTU|
00000310: 4E 45 2C 50 4C 55 54 4F 00 50 0B 0E 01 4F B2 31 |NE,PLUTO.P...O.1|
00000320: 35 33 30 3A 81 49 B2 31 A4 39 3A 50 32 28 49 29 |530:.I.1.9:P2(I)|
00000330: B2 4F 3A 82 3A 43 44 24 B2 22 13 11 11 11 11 11 |.O:.:CD$."......|
00000340: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
00000350: 00 9A 0B 18 01 4D 31 24 B2 22 49 22 3A 49 4E B2 |.....M1$."I":IN.|
00000360: 37 3A 44 54 B2 37 AD 33 36 35 32 35 3A 46 B2 FF |7:DT.7.36525:F..|
00000370: AD 36 34 38 45 33 3A 42 24 B2 22 20 20 20 20 20 |.648E3:B$." |
00000380: 20 20 20 20 20 20 20 20 22 3A 52 28 33 29 B2 31 | ":R(3).1|
00000390: 3A 52 28 32 29 B2 2E 37 32 33 00 B3 0B 22 01 52 |:R(2)..723...".R|
000003A0: 28 38 29 B2 33 30 2E 30 37 3A 99 22 93 22 3A 4D |(8).30.07:.".":M|
000003B0: 46 B2 31 00 E7 0B 2C 01 99 22 11 57 48 41 54 20 |F.1...,..".WHAT |
000003C0: 49 53 20 54 48 45 20 53 54 41 52 54 49 4E 47 20 |IS THE STARTING |
000003D0: 59 45 41 52 3F 20 22 3B 3A 8D 31 33 35 30 3A 59 |YEAR? ";:.1350:Y|
000003E0: B2 C5 28 49 4E 24 29 00 00 0C 36 01 8B 59 B1 B2 |..(IN$)...6..Y..|
000003F0: 31 36 38 30 AF 59 B3 B2 32 32 38 30 A7 33 33 30 |1680.Y..2280.330|
00000400: 00 2C 0C 40 01 99 22 11 42 45 54 57 45 45 4E 20 |.,.@..".BETWEEN |
00000410: 31 36 38 30 20 41 4E 44 20 32 32 38 30 2C 20 50 |1680 AND 2280, P|
00000420: 4C 45 41 53 45 2E 22 3A 89 33 30 30 00 5F 0C 4A |LEASE.":.300._.J|
00000430: 01 99 22 11 57 48 41 54 20 49 53 20 54 48 45 20 |..".WHAT IS THE |
00000440: 53 54 41 52 54 49 4E 47 20 4D 4F 4E 54 48 3F 20 |STARTING MONTH? |
00000450: 22 3B 3A 8D 31 33 35 30 3A 4D 24 B2 49 4E 24 00 |";:.1350:M$.IN$.|
00000460: 70 0C 54 01 8B 20 49 4E 24 B2 22 22 A7 33 33 30 |p.T.. IN$."".330|
00000470: 00 87 0C 5E 01 8B C6 28 C8 28 4D 24 2C 31 29 29 |...^...(.(M$,1))|
00000480: B1 35 37 A7 33 38 30 00 C3 0C 68 01 4D B2 B5 28 |.57.380...h.M..(|
00000490: C5 28 4D 24 29 29 3A 8B 4D B3 31 B0 4D B1 31 32 |.(M$)):.M.1.M.12|
000004A0: A7 99 22 11 42 45 54 57 45 45 4E 20 31 20 41 4E |..".BETWEEN 1 AN|
000004B0: 44 20 31 32 2C 20 50 4C 45 41 53 45 20 22 3A 89 |D 12, PLEASE ":.|
000004C0: 33 33 30 00 D5 0C 72 01 4D 24 B2 4D 24 28 4D 29 |330...r.M$.M$(M)|
000004D0: 3A 89 35 30 30 00 E5 0C 7C 01 4D B2 30 3A 81 49 |:.500...|.M.0:.I|
000004E0: B2 31 A4 31 32 00 04 0D 86 01 8B 20 C8 28 4D 24 |.1.12...... .(M$|
000004F0: 28 49 29 2C C3 28 4D 24 29 29 B3 B1 4D 24 20 A7 |(I),.(M$))..M$ .|
00000500: 20 34 32 30 00 1A 0D 90 01 8B 20 4D B2 30 20 A7 | 420...... M.0 .|
00000510: 20 4D B2 49 3A 89 20 34 32 30 00 42 0D 9A 01 99 | M.I:. 420.B....|
00000520: 22 11 54 48 41 54 20 43 4F 55 4C 44 20 42 45 20 |".THAT COULD BE |
00000530: 22 3B 4D 24 28 4D 29 3B 3A 4D B2 49 3A 89 20 34 |";M$(M);:M.I:. 4|
00000540: 35 30 00 4A 0D A4 01 82 20 49 00 5A 0D AE 01 8B |50.J.... I.Z....|
00000550: 20 4D B1 30 20 A7 20 35 30 30 00 82 0D B8 01 99 | M.0 . 500......|
00000560: 22 11 4E 4F 20 53 55 43 48 20 4D 4F 4E 54 48 2E |".NO SUCH MONTH.|
00000570: 20 54 52 59 20 41 47 41 49 4E 2E 22 3A 89 20 33 | TRY AGAIN.":. 3|
00000580: 33 30 00 91 0D C2 01 8B 20 4D B2 31 32 A7 34 39 |30...... M.12.49|
00000590: 30 00 A2 0D CC 01 81 20 49 B2 4D AA 31 20 A4 20 |0...... I.M.1 . |
000005A0: 31 32 00 CD 0D D6 01 8B 20 C8 28 4D 24 28 49 29 |12...... .(M$(I)|
000005B0: 2C C3 28 4D 24 29 29 B2 4D 24 20 A7 20 99 22 2C |,.(M$)).M$ . .",|
000005C0: 20 22 3B 4D 24 28 4D 29 3B 3A 4D B2 49 00 D5 0D | ";M$(M);:M.I...|
000005D0: E0 01 82 20 49 00 F1 0D EA 01 99 22 20 4F 52 20 |... I......" OR |
000005E0: 22 3B 4D 24 28 4D 29 3B 22 2E 22 3A 89 20 33 33 |";M$(M);".":. 33|
000005F0: 30 00 1D 0E F4 01 44 B2 44 28 4D 29 3A 4C 59 B2 |0.....D.D(M):LY.|
00000600: 30 3A 8B 59 AD 34 B2 B5 28 59 AD 34 29 AF 44 B1 |0:.Y.4..(Y.4).D.|
00000610: 35 39 A7 44 B2 44 AA 31 3A 4C 59 B2 31 00 63 0E |59.D.D.1:LY.1.c.|
00000620: FE 01 54 B2 33 36 37 AC 59 AB B5 28 37 AC 28 59 |..T.367.Y..(7.(Y|
00000630: AA B5 28 28 4D AA 39 29 AD 31 32 29 29 AD 34 29 |..((M.9).12)).4)|
00000640: AA B5 28 32 37 35 AC 4D AD 39 29 AA 31 AB 37 33 |..(275.M.9).1.73|
00000650: 30 35 33 31 2E 35 3A 54 31 B2 31 AA 54 AD 33 36 |0531.5:T1.1.T.36|
00000660: 35 32 35 00 74 0E 08 02 8B 4D 31 24 B2 4D 32 24 |525.t....M1$.M2$|
00000670: A7 35 35 30 00 AF 0E 12 02 4C 4F B2 31 3A 55 B2 |.550.....LO.1:U.|
00000680: 35 3A 45 B2 35 2E 37 3A 4D 41 B2 32 3A 54 24 B2 |5:E.5.7:MA.2:T$.|
00000690: 22 13 12 49 4E 4E 45 52 20 50 4C 41 4E 45 54 53 |"..INNER PLANETS|
000006A0: 92 22 3A 4D 32 24 B2 4D 31 24 3A 4D 46 B2 31 00 |.":M2$.M1$:MF.1.|
000006B0: E8 0E 1C 02 8B 4D 31 24 B2 22 4F 22 A7 4C 4F B2 |.....M1$."O".LO.|
000006C0: 35 3A 55 B2 39 3A 45 B2 34 39 2E 33 3A 4D 41 B2 |5:U.9:E.49.3:MA.|
000006D0: AB 32 3A 54 24 B2 22 13 12 4F 55 54 45 52 20 50 |.2:T$."..OUTER P|
000006E0: 4C 41 4E 45 54 53 92 22 00 0B 0F 26 02 4C 4C B2 |LANETS."...&.LL.|
000006F0: 31 3A 55 55 B2 31 30 3A 8B 4D 31 24 B2 22 4F 22 |1:UU.10:.M1$."O"|
00000700: A7 4C 4C B2 39 3A 55 55 B2 31 39 00 33 0F 30 02 |.LL.9:UU.19.3.0.|
00000710: 81 49 B2 4C 4C A4 55 55 3A 43 B2 41 28 49 29 AA |.I.LL.UU:C.A(I).|
00000720: 42 28 49 29 AC 54 3A 48 B2 30 3A 8B 43 B3 30 A7 |B(I).T:H.0:.C.0.|
00000730: 48 B2 31 00 4D 0F 3A 02 43 28 49 29 B2 32 AC FF |H.1.M.:.C(I).2..|
00000740: AC 28 43 AB B5 28 43 29 AB 48 29 3A 82 00 5E 0F |.(C..(C).H):..^.|
00000750: 44 02 8B 4D 31 24 B2 22 4F 22 A7 36 34 30 00 8E |D..M1$."O".640..|
00000760: 0F 4E 02 4C 28 31 29 B2 46 AC 28 38 34 33 37 38 |.N.L(1).F.(84378|
00000770: AC BF 28 43 28 34 29 29 AA 31 30 37 33 33 AC BF |..(C(4)).10733..|
00000780: 28 32 AC 43 28 34 29 29 29 AA 43 28 33 29 00 AD |(2.C(4))).C(3)..|
00000790: 0F 58 02 52 28 31 29 B2 2E 33 39 35 32 38 AB 2E |.X.R(1)..39528..|
000007A0: 30 37 38 33 34 AC BE 28 43 28 34 29 29 00 CC 0F |07834..(C(4))...|
000007B0: 62 02 4C 28 32 29 B2 46 AC 28 32 38 31 34 AC BF |b.L(2).F.(2814..|
000007C0: 28 43 28 36 29 29 29 AA 43 28 35 29 00 ED 0F 6C |(C(6))).C(5)...l|
000007D0: 02 4C 28 33 29 B2 46 AC 28 36 39 31 30 AC BF 28 |.L(3).F.(6910..(|
000007E0: 43 28 32 29 29 29 AA 43 28 31 29 AA FF 00 36 10 |C(2))).C(1)...6.|
000007F0: 76 02 4C 28 34 29 B2 46 AC 28 33 38 34 35 31 AC |v.L(4).F.(38451.|
00000800: BF 28 43 28 38 29 29 AA 32 32 33 38 AC BF 28 32 |.(C(8)).2238..(2|
00000810: AC 43 28 38 29 29 29 AA 43 28 37 29 3A 52 28 34 |.C(8))).C(7):R(4|
00000820: 29 B2 31 2E 35 33 30 33 AB 2E 31 34 31 37 AC BE |).1.5303..1417..|
00000830: 28 43 28 38 29 29 00 64 10 80 02 4C 28 35 29 B2 |(C(8)).d...L(5).|
00000840: 46 AC 28 31 39 39 33 34 AC BF 28 43 28 31 30 29 |F.(19934..(C(10)|
00000850: 29 AA 35 30 32 33 AC 54 31 AA 32 35 31 31 29 AA |).5023.T1.2511).|
00000860: 43 28 39 29 00 92 10 8A 02 52 28 35 29 B2 35 2E |C(9).....R(5).5.|
00000870: 32 30 38 38 33 AB 2E 32 35 31 32 32 AC BE 28 43 |20883..25122..(C|
00000880: 28 31 30 29 29 3A 8B 4D 31 24 B2 22 49 22 A7 37 |(10)):.M1$."I".7|
00000890: 33 30 00 CC 10 94 02 4C B2 32 33 30 34 35 AC BF |30.....L.23045..|
000008A0: 28 43 28 31 32 29 29 AA 35 30 31 34 AC 54 31 AB |(C(12)).5014.T1.|
000008B0: 32 36 38 39 AC BE 28 32 AC 43 28 31 30 29 AB 35 |2689..(2.C(10).5|
000008C0: AC 43 28 31 32 29 29 AA 32 35 30 37 00 FE 10 9E |.C(12)).2507....|
000008D0: 02 4C 28 36 29 B2 46 AC 28 4C AA 43 28 31 31 29 |.L(6).F.(L.C(11)|
000008E0: 29 3A 52 28 36 29 B2 39 2E 35 35 37 37 34 AB 2E |):R(6).9.55774..|
000008F0: 35 33 32 35 32 AC BE 28 43 28 31 32 29 29 00 3E |53252..(C(12)).>|
00000900: 11 A8 02 4C 28 37 29 B2 46 AC 28 31 39 33 39 37 |...L(7).F.(19397|
00000910: AC BF 28 43 28 31 34 29 29 29 AA 43 28 31 33 29 |..(C(14))).C(13)|
00000920: 3A 52 28 37 29 B2 31 39 2E 32 31 32 31 36 AB 2E |:R(7).19.21216..|
00000930: 39 30 31 35 34 AC BE 28 43 28 31 34 29 29 00 5F |90154..(C(14))._|
00000940: 11 B2 02 4C 28 38 29 B2 46 AC 28 33 35 32 33 AC |...L(8).F.(3523.|
00000950: BF 28 43 28 31 36 29 29 29 AA 43 28 31 35 29 00 |.(C(16))).C(15).|
00000960: 96 11 BC 02 4C B2 31 30 31 35 37 37 AC BF 28 43 |....L.101577..(C|
00000970: 28 31 38 29 29 AA 31 35 35 31 37 AC BF 28 32 AC |(18)).15517..(2.|
00000980: 43 28 31 38 29 29 AB 33 35 39 33 AC BF 28 32 AC |C(18)).3593..(2.|
00000990: 43 28 31 39 29 29 00 BB 11 C6 02 4C 28 39 29 B2 |C(19)).....L(9).|
000009A0: 46 AC 28 4C AA 33 34 31 34 AC BF 28 33 AC 43 28 |F.(L.3414..(3.C(|
000009B0: 31 38 29 29 29 AA 43 28 31 37 29 00 F1 11 D0 02 |18))).C(17).....|
000009C0: 52 28 39 29 B2 34 30 2E 37 34 36 33 38 AB 39 2E |R(9).40.74638.9.|
000009D0: 35 38 32 33 35 AC BE 28 43 28 31 38 29 29 AB 31 |58235..(C(18)).1|
000009E0: 2E 31 36 37 30 33 AC BE 28 32 AC 43 28 31 38 29 |.16703..(2.C(18)|
000009F0: 29 00 21 12 DA 02 81 49 B2 4C 4F A4 55 3A 58 28 |).!....I.LO.U:X(|
00000A00: 49 29 B2 52 28 49 29 AC BE 28 4C 28 49 29 29 3A |I).R(I)..(L(I)):|
00000A10: 59 28 49 29 B2 52 28 49 29 AC BF 28 4C 28 49 29 |Y(I).R(I)..(L(I)|
00000A20: 29 00 45 12 E4 02 58 58 B2 58 28 49 29 AC 32 34 |).E...XX.X(I).24|
00000A30: 2E 35 AD 45 3A 53 58 B2 31 3A 8B 58 58 B3 30 A7 |.5.E:SX.1:.XX.0.|
00000A40: 53 58 B2 AB 31 00 81 12 EE 02 58 25 B2 B6 28 58 |SX..1.....X%..(X|
00000A50: 58 29 3A 56 B2 53 58 AC B5 28 28 58 25 AA 31 29 |X):V.SX..((X%.1)|
00000A60: AD 32 29 3A 46 58 B2 30 3A 8B 58 58 B1 B2 30 AF |.2):FX.0:.XX..0.|
00000A70: 58 25 AD 32 B2 B5 28 58 25 AD 32 29 A7 46 58 B2 |X%.2..(X%.2).FX.|
00000A80: 31 00 9E 12 F8 02 8B 58 58 B3 30 AF 58 25 AD 32 |1......XX.0.X%.2|
00000A90: B3 B1 B5 28 58 25 AD 32 29 A7 46 58 B2 31 00 C2 |...(X%.2).FX.1..|
00000AA0: 12 02 03 59 59 B2 59 28 49 29 AC 32 34 2E 35 AD |...YY.Y(I).24.5.|
00000AB0: 45 3A 53 59 B2 31 3A 8B 59 59 B3 30 A7 53 59 B2 |E:SY.1:.YY.0.SY.|
00000AC0: AB 31 00 FE 12 0C 03 59 25 B2 B6 28 59 59 29 3A |.1.....Y%..(YY):|
00000AD0: 57 B2 53 59 AC B5 28 28 59 25 AA 31 29 AD 32 29 |W.SY..((Y%.1).2)|
00000AE0: 3A 46 59 B2 30 3A 8B 59 59 B1 B2 30 AF 59 25 AD |:FY.0:.YY..0.Y%.|
00000AF0: 32 B2 B5 28 59 25 AD 32 29 A7 46 59 B2 31 00 1B |2..(Y%.2).FY.1..|
00000B00: 13 16 03 8B 59 59 B3 30 AF 59 25 AD 32 B3 B1 B5 |....YY.0.Y%.2...|
00000B10: 28 59 25 AD 32 29 A7 46 59 B2 31 00 4D 13 20 03 |(Y%.2).FY.1.M. .|
00000B20: 50 31 28 49 29 B2 4F AA 56 AB 34 30 AC 57 3A 52 |P1(I).O.V.40.W:R|
00000B30: 31 28 49 29 B2 31 32 33 3A 8B 46 58 B2 31 AF 46 |1(I).123:.FX.1.F|
00000B40: 59 B2 30 A7 52 31 28 49 29 B2 31 30 38 00 66 13 |Y.0.R1(I).108.f.|
00000B50: 2A 03 8B 46 58 B2 30 AF 46 59 B2 31 A7 52 31 28 |*..FX.0.FY.1.R1(|
00000B60: 49 29 B2 31 32 36 00 7F 13 34 03 8B 46 58 B2 31 |I).126...4..FX.1|
00000B70: AF 46 59 B2 31 A7 52 31 28 49 29 B2 31 32 34 00 |.FY.1.R1(I).124.|
00000B80: 8D 13 3E 03 8B 49 B2 4C 4F A7 39 32 30 00 AD 13 |..>..I.LO.920...|
00000B90: 48 03 81 4A B2 4C 4F A4 49 AB 31 3A 8B 50 31 28 |H..J.LO.I.1:.P1(|
00000BA0: 49 29 B3 B1 50 31 28 4A 29 A7 39 31 30 00 D4 13 |I)..P1(J).910...|
00000BB0: 52 03 51 B2 52 31 28 49 29 AA 52 31 28 4A 29 3A |R.Q.R1(I).R1(J):|
00000BC0: 8B 51 B2 32 33 31 A7 52 31 28 49 29 B2 39 38 3A |.Q.231.R1(I).98:|
00000BD0: 89 39 31 30 00 ED 13 5C 03 8B 51 B2 32 34 39 A7 |.910...\..Q.249.|
00000BE0: 52 31 28 49 29 B2 39 37 3A 89 39 31 30 00 07 14 |R1(I).97:.910...|
00000BF0: 66 03 8B 51 B2 32 34 37 A7 52 31 28 49 29 B2 32 |f..Q.247.R1(I).2|
00000C00: 35 35 3A 89 39 31 30 00 21 14 70 03 8B 51 B2 32 |55:.910.!.p..Q.2|
00000C10: 35 32 A7 52 31 28 49 29 B2 32 32 35 3A 89 39 31 |52.R1(I).225:.91|
00000C20: 30 00 3B 14 7A 03 8B 51 B2 32 35 30 A7 52 31 28 |0.;.z..Q.250.R1(|
00000C30: 49 29 B2 32 32 36 3A 89 39 31 30 00 49 14 84 03 |I).226:.910.I...|
00000C40: 52 31 28 49 29 B2 31 32 37 00 4F 14 8E 03 82 00 |R1(I).127.O.....|
00000C50: 55 14 98 03 82 00 63 14 A2 03 8B 4D 46 B2 30 A7 |U.....c....MF.0.|
00000C60: 39 39 30 00 95 14 AC 03 99 22 93 1D 1D 1D 1D 1D |990......"......|
00000C70: 1D 1D 1D 1D 1D 1D 1D 1D D5 C0 C0 C0 C0 C0 C0 C0 |................|
00000C80: C0 C0 C0 C0 C0 53 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.....S..........|
00000C90: C0 C0 C9 22 3B 00 D8 14 B6 03 42 31 24 B2 22 1D |...";.....B1$.".|
00000CA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DD 1D 1D 1D |................|
00000CB0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000CC0: 1D 1D 1D 1D 1D 1D DD 22 3A 81 49 B2 31 A4 31 31 |.......":.I.1.11|
00000CD0: 3A 99 42 31 24 3B 3A 82 00 19 15 C0 03 99 22 1D |:.B1$;:.......".|
00000CE0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 41 1D 1D 1D |............A...|
00000CF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000D00: 1D 1D 1D 1D 1D 1D 56 22 3B 3A 81 49 B2 31 A4 31 |......V";:.I.1.1|
00000D10: 31 3A 99 42 31 24 3B 3A 82 00 5B 15 CA 03 99 22 |1:.B1$;:..[...."|
00000D20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D CA C0 C0 |................|
00000D30: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 57 C0 C0 C0 C0 C0 |..........W.....|
00000D40: C0 C0 C0 C0 C0 C0 C0 22 3B 3A 97 32 30 32 33 2C |.......";:.2023,|
00000D50: 37 35 3A 97 35 36 32 39 35 2C 31 00 85 15 D4 03 |75:.56295,1.....|
00000D60: 99 54 24 3A 81 49 B2 4C 4F A4 55 3A 99 C8 28 43 |.T$:.I.LO.U:..(C|
00000D70: 44 24 2C 49 AA 4D 41 29 3B 4F 24 28 49 29 3A 82 |D$,I.MA);O$(I):.|
00000D80: 3A 4D 46 B2 30 00 AA 15 DE 03 99 C8 28 43 44 24 |:MF.0.......(CD$|
00000D90: 2C 31 31 29 3B CA 28 C4 28 59 29 2C 32 29 3B 22 |,11);.(.(Y),2);"|
00000DA0: 20 20 20 20 20 20 20 20 20 22 00 CB 15 E8 03 8B | "......|
00000DB0: 59 B3 30 A7 99 C8 28 43 44 24 2C 31 31 29 3B 22 |Y.0...(CD$,11);"|
00000DC0: 1D 1D 1D 1D 1D 1D 42 2E 43 2E 22 00 F1 15 F2 03 |......B.C.".....|
00000DD0: 99 22 91 22 3B 42 24 3A 99 22 91 22 3B 4D 24 28 |.".";B$:.".";M$(|
00000DE0: 4D 29 3B 44 AB 44 28 4D 29 AA 31 AB 4C 59 AA 59 |M);D.D(M).1.LY.Y|
00000DF0: 44 00 22 16 FC 03 99 C8 28 43 44 24 2C 32 31 29 |D.".....(CD$,21)|
00000E00: 3B CA 28 C4 28 49 4E 29 2C 32 29 3B 22 20 44 41 |;.(.(IN),2);" DA|
00000E10: 59 20 20 22 3A 99 22 91 49 4E 43 52 45 4D 45 4E |Y ":.".INCREMEN|
00000E20: 54 22 00 5A 16 06 04 81 49 B2 4C 4F A4 55 3A 97 |T".Z....I.LO.U:.|
00000E30: 50 32 28 49 29 2C 33 32 3A 97 50 32 28 49 29 AA |P2(I),32:.P2(I).|
00000E40: 35 34 32 37 32 2C 31 3A 82 3A 97 4F 2C 38 31 3A |54272,1:.:.O,81:|
00000E50: 97 4F AA 35 34 32 37 32 2C 31 00 95 16 10 04 81 |.O.54272,1......|
00000E60: 49 B2 4C 4F A4 55 3A 97 50 31 28 49 29 2C 52 31 |I.LO.U:.P1(I),R1|
00000E70: 28 49 29 3A 97 50 31 28 49 29 AA 35 34 32 37 32 |(I):.P1(I).54272|
00000E80: 2C 31 3A 82 3A 97 4F 2C 38 31 3A 97 4F AA 35 34 |,1:.:.O,81:.O.54|
00000E90: 32 37 32 2C 31 00 B1 16 1A 04 8B 49 4E B1 30 A7 |272,1......IN.0.|
00000EA0: 99 C8 28 43 44 24 2C 31 38 29 3B 42 24 3A 99 42 |..(CD$,18);B$:.B|
00000EB0: 24 00 DA 16 24 04 8B 49 4E B3 30 A7 99 C8 28 43 |$...$..IN.0...(C|
00000EC0: 44 24 2C 31 38 29 3B 22 52 45 56 45 52 53 45 22 |D$,18);"REVERSE"|
00000ED0: 3A 99 22 4D 4F 54 49 4F 4E 22 00 EE 16 2E 04 A1 |:."MOTION"......|
00000EE0: 41 24 3A 8B 41 24 B2 22 22 A7 31 32 34 30 00 00 |A$:.A$."".1240..|
00000EF0: 17 38 04 8B 41 24 B2 22 48 22 A7 8D 31 31 38 30 |.8..A$."H"..1180|
00000F00: 00 1A 17 42 04 8B 41 24 B2 22 4F 22 B0 41 24 B2 |...B..A$."O".A$.|
00000F10: 22 49 22 A7 4D 31 24 B2 41 24 00 31 17 4C 04 8B |"I".M1$.A$.1.L..|
00000F20: 41 24 B2 22 53 22 A7 49 4E B2 37 AC B4 28 49 4E |A$."S".IN.7..(IN|
00000F30: 29 00 49 17 56 04 8B 41 24 B2 22 4D 22 A7 49 4E |).I.V..A$."M".IN|
00000F40: B2 33 30 AC B4 28 49 4E 29 00 62 17 60 04 8B 41 |.30..(IN).b.`..A|
00000F50: 24 B2 22 46 22 A7 49 4E B2 31 38 30 AC B4 28 49 |$."F".IN.180..(I|
00000F60: 4E 29 00 78 17 6A 04 8B 41 24 B2 22 52 22 A7 49 |N).x.j..A$."R".I|
00000F70: 4E B2 AB B6 28 49 4E 29 00 8D 17 74 04 8B 41 24 |N...(IN)...t..A$|
00000F80: B2 22 44 22 A7 49 4E B2 B6 28 49 4E 29 00 9D 17 |."D".IN..(IN)...|
00000F90: 7E 04 8B 41 24 B2 22 4E 22 A7 32 39 30 00 B0 17 |~..A$."N".290...|
00000FA0: 88 04 8B 41 24 B2 22 51 22 A7 99 22 93 22 3A 80 |...A$."Q"..".":.|
00000FB0: 00 BA 17 92 04 89 31 30 37 30 00 CF 17 9C 04 A1 |......1070......|
00000FC0: 41 24 3A 8B 41 24 B3 B1 22 22 A7 31 31 38 30 00 |A$:.A$.."".1180.|
00000FD0: EC 17 A6 04 99 C8 28 43 44 24 2C 31 33 29 3B 22 |......(CD$,13);"|
00000FE0: 41 4E 44 20 48 4F 4C 44 49 4E 47 22 00 10 18 B0 |AND HOLDING"....|
00000FF0: 04 99 22 50 52 45 53 53 20 41 4E 59 20 4B 45 59 |.."PRESS ANY KEY|
00001000: 22 3A 99 22 91 54 4F 20 52 45 53 54 41 52 54 22 |":.".TO RESTART"|
00001010: 00 24 18 BA 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 |.$....A$:.A$."".|
00001020: 31 32 31 30 00 4A 18 C4 04 99 C8 28 43 44 24 2C |1210.J.....(CD$,|
00001030: 31 33 29 3B 42 24 3A 99 42 24 3A 99 22 91 22 3B |13);B$:.B$:.".";|
00001040: 42 24 3A 99 22 91 22 3B 42 24 00 50 18 CE 04 8E |B$:.".";B$.P....|
00001050: 00 71 18 D8 04 54 B2 54 AA 49 4E 3A 54 31 B2 54 |.q...T.T.IN:T1.T|
00001060: 31 AA 49 4E AD 33 36 35 32 35 3A 44 B2 44 AA 49 |1.IN.36525:D.D.I|
00001070: 4E 00 7F 18 E2 04 8B 44 B1 30 A7 31 32 38 30 00 |N......D.0.1280.|
00001080: 9B 18 EC 04 59 B2 59 AB 31 3A 44 B2 44 AA 33 36 |....Y.Y.1:D.D.36|
00001090: 35 3A 8B 59 B2 30 A7 59 B2 AB 31 00 B1 18 F6 04 |5:.Y.0.Y..1.....|
000010A0: 8B 59 AD 34 B2 B5 28 59 AD 34 29 A7 44 B2 44 AA |.Y.4..(Y.4).D.D.|
000010B0: 31 00 D5 18 00 05 4C 59 B2 30 3A 59 44 B2 30 3A |1.....LY.0:YD.0:|
000010C0: 8B 59 AD 34 B2 B5 28 59 AD 34 29 AF 44 B1 35 39 |.Y.4..(Y.4).D.59|
000010D0: A7 4C 59 B2 31 00 EF 18 0A 05 8B 59 AD 34 B2 B5 |.LY.1......Y.4..|
000010E0: 28 59 AD 34 29 AF 44 B2 36 30 A7 59 44 B2 31 00 |(Y.4).D.60.YD.1.|
000010F0: 17 19 14 05 81 4D B2 31 A4 31 32 3A 8B 44 B3 44 |.....M.1.12:.D.D|
00001100: 28 4D AA 31 29 AA 4C 59 A7 4D 24 B2 4D 24 28 4D |(M.1).LY.M$.M$(M|
00001110: 29 3A 89 31 33 34 30 00 1D 19 1E 05 82 00 3B 19 |):.1340.......;.|
00001120: 28 05 44 B2 44 AB 33 36 35 AB 4C 59 3A 59 B2 59 |(.D.D.365.LY:Y.Y|
00001130: AA 31 3A 8B 59 B2 30 A7 59 B2 31 00 45 19 32 05 |.1:.Y.0.Y.1.E.2.|
00001140: 89 31 32 38 30 00 64 19 3C 05 81 49 B2 4C 4F A4 |.1280.d.<..I.LO.|
00001150: 55 3A 50 32 28 49 29 B2 50 31 28 49 29 3A 82 3A |U:P2(I).P1(I):.:|
00001160: 89 35 32 30 00 85 19 46 05 49 4E 24 B2 22 20 22 |.520...F.IN$." "|
00001170: 3A 5A 54 B2 54 49 3A 5A 43 B2 32 3A 5A 44 24 B2 |:ZT.TI:ZC.2:ZD$.|
00001180: C7 28 32 30 29 00 9A 19 50 05 A1 5A 24 3A 8B 5A |.(20)...P..Z$:.Z|
00001190: 24 B3 B1 22 22 A7 31 33 39 30 00 CA 19 5A 05 8B |$.."".1390...Z..|
000011A0: 5A 54 B3 B2 54 49 A7 99 CA 28 22 20 A6 22 2C 5A |ZT..TI...(" .",Z|
000011B0: 43 2C 31 29 3B 22 9D 22 3B 3A 5A 43 B2 33 AB 5A |C,1);".";:ZC.3.Z|
000011C0: 43 3A 5A 54 B2 54 49 AA 31 35 00 D4 19 64 05 89 |C:ZT.TI.15...d..|
000011D0: 31 33 36 30 00 03 1A 6E 05 5A B2 C6 28 5A 24 29 |1360...n.Z..(Z$)|
000011E0: 3A 5A 4C B2 C3 28 49 4E 24 29 3A 8B 28 5A AF 31 |:ZL..(IN$):.(Z.1|
000011F0: 32 37 29 B3 33 32 A7 99 22 20 9D 22 3B 3A 89 31 |27).32.." .";:.1|
00001200: 34 33 30 00 33 1A 78 05 8B 46 4C AF 28 5A AF 31 |430.3.x..FL.(Z.1|
00001210: 32 37 29 B1 36 34 AF 28 5A AF 31 32 37 29 B3 39 |27).64.(Z.127).9|
00001220: 31 A7 5A 24 B2 C7 28 28 5A AA 31 32 38 29 AF 32 |1.Z$..((Z.128).2|
00001230: 35 35 29 00 44 1A 82 05 8B 5A 4C B1 32 35 34 A7 |55).D....ZL.254.|
00001240: 31 33 36 30 00 5F 1A 8C 05 49 4E 24 B2 49 4E 24 |1360._...IN$.IN$|
00001250: AA 5A 24 3A 99 5A 24 3B 5A 44 24 3B 5A 24 3B 00 |.Z$:.Z$;ZD$;Z$;.|
00001260: 7E 1A 96 05 8B 5A B2 31 33 A7 49 4E 24 B2 CA 28 |~....Z.13.IN$..(|
00001270: 49 4E 24 2C 32 29 3A 99 43 52 24 3B 3A 8E 00 A9 |IN$,2):.CR$;:...|
00001280: 1A A0 05 8B 5A B2 32 30 AF 5A 4C B1 31 A7 49 4E |....Z.20.ZL.1.IN|
00001290: 24 B2 C8 28 49 4E 24 2C 5A 4C AB 31 29 3A 99 22 |$..(IN$,ZL.1):."|
000012A0: 9D 22 3B 3A 89 31 33 36 30 00 DB 1A AA 05 8B 5A |.";:.1360......Z|
000012B0: B2 31 34 31 A7 5A 24 B2 C7 28 AB 32 30 AC 28 5A |.141.Z$..(.20.(Z|
000012C0: 4C B1 31 29 29 3A 81 5A B2 32 A4 5A 4C 3A 99 5A |L.1)):.Z.2.ZL:.Z|
000012D0: 24 3B 3A 82 5A 3A 89 31 33 35 30 00 E5 1A B4 05 |$;:.Z:.1350.....|
000012E0: 89 31 33 36 30 00 F4 1A BE 05 8B 50 4E B2 30 A7 |.1360......PN.0.|
000012F0: 31 35 33 30 00 FE 1A C8 05 8D 31 36 32 30 00 19 |1530......1620..|
00001300: 1B D2 05 99 22 50 52 45 53 53 20 12 52 45 54 55 |...."PRESS .RETU|
00001310: 52 4E 92 20 54 4F 20 22 3B 00 35 1B DC 05 8B 50 |RN. TO ";.5....P|
00001320: 4E B2 4C 50 A7 99 22 42 45 47 49 4E 3A 22 3B 3A |N.LP.."BEGIN:";:|
00001330: 89 31 35 32 30 00 47 1B E6 05 99 22 43 4F 4E 54 |.1520.G...."CONT|
00001340: 49 4E 55 45 3A 22 3B 00 5B 1B F0 05 A1 54 24 3A |INUE:";.[....T$:|
00001350: 8B 54 24 B2 22 22 A7 31 35 32 30 00 6B 1B FA 05 |.T$."".1520.k...|
00001360: 8B 50 4E B2 4C 50 A7 31 35 37 30 00 A9 1B 04 06 |.PN.LP.1570.....|
00001370: 50 4E B2 50 4E AA 31 3A 99 22 93 22 3B 50 47 24 |PN.PN.1:.".";PG$|
00001380: 3B 22 20 2D 20 43 55 52 53 4F 52 20 23 22 3B 4E |;" - CURSOR #";N|
00001390: 4D 24 3B 22 20 20 28 43 29 20 31 39 38 30 20 20 |M$;" (C) 1980 |
000013A0: 20 50 41 47 45 22 3B 50 4E 00 B3 1B 0E 06 8D 31 | PAGE";PN......1|
000013B0: 36 32 30 00 B9 1B 18 06 8E 00 CF 1B 22 06 99 22 |620.........".."|
000013C0: 93 22 3A 9C 3A 8D 31 35 38 30 3A 89 31 33 30 00 |.":.:.1580:.130.|
000013D0: 0C 1C 2C 06 51 4B B2 35 32 35 3A 51 4C B2 32 34 |..,.QK.525:QL.24|
000013E0: 35 3A 51 4D B2 31 33 34 3A 51 50 B2 35 31 35 3A |5:QM.134:QP.515:|
000013F0: 51 51 B2 32 33 34 3A 51 53 B2 35 31 36 3A 51 56 |QQ.234:QS.516:QV|
00001400: B2 31 3A 43 52 24 B2 C7 28 31 33 29 00 21 1C 36 |.1:CR$..(13).!.6|
00001410: 06 8B 20 C2 28 35 30 30 30 30 29 B2 30 20 A7 20 |.. .(50000).0 . |
00001420: 8E 00 53 1C 40 06 51 4B B2 31 35 38 3A 51 4C B2 |..S.@.QK.158:QL.|
00001430: 32 31 36 3A 51 4D B2 35 32 3A 51 50 B2 31 35 31 |216:QM.52:QP.151|
00001440: 3A 51 51 B2 32 30 35 3A 51 53 B2 31 35 32 3A 51 |:QQ.205:QS.152:Q|
00001450: 56 B2 32 00 59 1C 4A 06 8E 00 73 1C 54 06 81 49 |V.2.Y.J...s.T..I|
00001460: B2 31 A4 31 30 3A 99 22 C0 C0 C0 C0 22 3B 3A 82 |.1.10:."....";:.|
00001470: 49 3A 8E 00 81 1C 5E 06 97 35 39 34 36 38 2C 31 |I:....^..59468,1|
00001480: 32 00 B1 1C 68 06 99 22 93 11 11 22 3B A3 31 35 |2...h.."...";.15|
00001490: AB C3 28 50 47 24 29 29 3B 50 47 24 3B 22 20 20 |..(PG$));PG$;" |
000014A0: 42 59 20 20 4B 41 52 4C 20 4D 41 52 48 45 4E 4B |BY KARL MARHENK|
000014B0: 45 00 D0 1C 72 06 99 A3 31 37 29 3B 22 41 4E 44 |E...r...17);"AND|
000014C0: 20 45 52 4E 45 53 54 20 4D 41 52 48 45 4E 4B 45 | ERNEST MARHENKE|
000014D0: 00 01 1D 7C 06 99 22 11 20 20 20 20 20 43 55 52 |...|..". CUR|
000014E0: 53 4F 52 20 23 22 3B 4E 4D 24 3B 22 20 20 43 4F |SOR #";NM$;" CO|
000014F0: 50 59 52 49 47 48 54 20 28 43 29 20 31 39 38 30 |PYRIGHT (C) 1980|
00001500: 11 00 0B 1D 86 06 8D 31 36 32 30 00 2E 1D 90 06 |.......1620.....|
00001510: 99 22 11 54 48 45 20 53 4F 4C 41 52 20 53 59 53 |.".THE SOLAR SYS|
00001520: 54 45 4D 20 49 4E 20 41 43 54 49 4F 4E 21 00 5A |TEM IN ACTION!.Z|
00001530: 1D 9A 06 99 22 11 11 11 57 41 4E 54 20 54 4F 20 |...."...WANT TO |
00001540: 53 45 45 20 54 48 45 20 43 4F 4D 4D 41 4E 44 53 |SEE THE COMMANDS|
00001550: 3F 20 22 3B 3A 8D 31 33 35 30 00 72 1D A4 06 8B |? ";:.1350.r....|
00001560: C8 28 49 4E 24 2C 31 29 B3 B1 22 59 22 A7 31 35 |.(IN$,1).."Y".15|
00001570: 37 30 00 81 1D AE 06 4C 50 B2 31 3A 8D 31 34 37 |70.....LP.1:.147|
00001580: 30 00 9C 1D B8 06 99 22 20 20 20 20 20 53 48 4F |0......" SHO|
00001590: 57 20 12 49 92 4E 4E 45 52 20 4F 52 00 BC 1D C2 |W .I.NNER OR....|
000015A0: 06 99 22 20 20 20 20 20 20 20 20 20 20 12 4F 92 |.." .O.|
000015B0: 55 54 45 52 20 50 4C 41 4E 45 54 53 00 EC 1D CC |UTER PLANETS....|
000015C0: 06 99 22 11 20 53 50 45 45 44 20 49 53 20 12 53 |..". SPEED IS .S|
000015D0: 92 4C 4F 57 20 20 20 20 28 37 20 44 41 59 20 49 |.LOW (7 DAY I|
000015E0: 4E 54 45 52 56 41 4C 29 2C 20 4F 52 00 1B 1E D6 |NTERVAL), OR....|
000015F0: 06 99 22 20 20 20 20 20 20 20 20 20 20 12 4D 92 |.." .M.|
00001600: 45 44 49 55 4D 20 28 33 30 20 44 41 59 20 49 4E |EDIUM (30 DAY IN|
00001610: 54 45 52 56 41 4C 29 2C 20 4F 52 00 47 1E E0 06 |TERVAL), OR.G...|
00001620: 99 22 20 20 20 20 20 20 20 20 20 20 12 46 92 41 |." .F.A|
00001630: 53 54 20 20 28 31 38 30 20 44 41 59 20 49 4E 54 |ST (180 DAY INT|
00001640: 45 52 56 41 4C 29 2E 00 70 1E EA 06 99 22 11 4D |ERVAL)..p....".M|
00001650: 4F 54 49 4F 4E 20 49 53 20 12 44 92 49 52 45 43 |OTION IS .D.IREC|
00001660: 54 20 28 46 4F 52 57 41 52 44 53 29 2C 20 4F 52 |T (FORWARDS), OR|
00001670: 00 9A 1E F4 06 99 22 20 20 20 20 20 20 20 20 20 |......" |
00001680: 20 12 52 92 45 54 52 4F 47 52 41 44 45 20 28 42 | .R.ETROGRADE (B|
00001690: 41 43 4B 57 41 52 44 53 29 2E 00 CA 1E FE 06 99 |ACKWARDS).......|
000016A0: 22 11 20 20 59 4F 55 20 4D 41 59 20 12 48 92 41 |". YOU MAY .H.A|
000016B0: 4C 54 20 54 48 45 20 50 4C 41 4E 45 54 53 20 42 |LT THE PLANETS B|
000016C0: 52 49 45 46 4C 59 2C 20 4F 52 00 E9 1E 08 07 99 |RIEFLY, OR......|
000016D0: 22 20 20 20 50 49 43 4B 20 41 20 12 4E 92 45 57 |" PICK A .N.EW|
000016E0: 20 44 41 54 45 2C 20 4F 52 00 0A 1F 12 07 99 22 | DATE, OR......"|
000016F0: 20 20 20 20 20 20 20 20 20 20 12 51 92 55 49 54 | .Q.UIT|
00001700: 20 57 41 54 43 48 49 4E 47 2E 00 32 1F 1C 07 99 | WATCHING..2....|
00001710: 22 11 54 48 45 20 53 49 44 45 53 20 4F 46 20 54 |".THE SIDES OF T|
00001720: 48 45 20 44 49 53 50 4C 41 59 20 41 52 45 20 54 |HE DISPLAY ARE T|
00001730: 48 45 00 58 1F 26 07 99 22 11 20 20 20 20 12 56 |HE.X.&..". .V|
00001740: 92 45 52 4E 41 4C 20 28 53 50 52 49 4E 47 29 20 |.ERNAL (SPRING) |
00001750: 45 51 55 49 4E 4F 58 2C 00 75 1F 30 07 99 22 20 |EQUINOX,.u.0.." |
00001760: 20 20 20 12 53 92 55 4D 4D 45 52 20 53 4F 4C 53 | .S.UMMER SOLS|
00001770: 54 49 43 45 2C 00 97 1F 3A 07 99 22 20 20 20 20 |TICE,...:.." |
00001780: 12 41 92 55 54 55 4D 4E 41 4C 20 45 51 55 49 4E |.A.UTUMNAL EQUIN|
00001790: 4F 58 2C 20 41 4E 44 00 B4 1F 44 07 99 22 20 20 |OX, AND...D.." |
000017A0: 20 20 12 57 92 49 4E 54 45 52 20 53 4F 4C 53 54 | .W.INTER SOLST|
000017B0: 49 43 45 2E 00 BE 1F 4E 07 8D 31 34 37 30 00 00 |ICE....N..1470..|
000017C0: 00 00 80 |... |
....D.. 469 PLANETARIUM.2.N..53280,0:.53
281,0:.".".T.X..:PG$."ORRERY":NM$."23":.
1630.X....A(19),B(19),C(19),M$(12),D(13)
......I.1.19:.A(I),B(I):........7791,.00
273790931,.9931,.0027377785,.7007,.01136
7714,.4855,.0113675957. . ...5055,.00445
046867,.14,.00445036173,.9874,.001455753
28,.0539.J.....00145561327,.0896,2.30808
93E-4,.0565,2.3080893E-4,.1333,9.294371E
-5.......883,9.294371E-5,.8702,3.269438E
-5,.4006,3.269438E-5,.8469,1.672092E-5..
.....7254,1.672092E-5,.6639,1.115482E-5,
.041,1.104864E-5,.3574,1.104864E-5...H..
I.1.12:.M$(I):..C.R.. JANUARY,FEBRUARY,M
ARCH,APRIL,MAY,JUNE.Y.... JULY,AUGUST,SE
PTEMBER,OCTOBER,NOVEMBER,DECEMBER......I
.1.13:.D(I):..A....1,32,60,91,121,152,18
2,213,244,274,305,335,366.U....I.1.9:.O$
(I):....... MERCURY,VENUS,EARTH,MARS,JUP
ITER,SATURN,URANUS,NEPTUNE,PLUTO.P...O.1
530:.I.1.9:P2(I).O:.:CD$."..............
.......".....M1$."I":IN.7:DT.7.36525:F..
.648E3:B$." ":R(3).1:R(2)..7
23...".R(8).30.07:.".":MF.1...,..".WHAT
IS THE STARTING YEAR? ";:.1350:Y.E(IN$).
..6..Y..1680.Y..2280.330.,.@..".BETWEEN
1680 AND 2280, PLEASE.":.300._.J..".WHAT
IS THE STARTING MONTH? ";:.1350:M$.IN$.
P.T.. IN$."".330...^..F(H(M$,1)).57.380.
C.H.M..(E(M$)):.M.1.M.12..".BETWEEN 1 AN
D 12, PLEASE ":.330.U.R.M$.M$(M):.500...
|.M.0:.I.1.12...... H(M$(I),C(M$))..M$ .
420...... M.0 . M.I:. 420.B....".THAT C
OULD BE ";M$(M);:M.I:. 450.J.... I.Z....
M.0 . 500......".NO SUCH MONTH. TRY AGA
IN.":. 330...B.. M.12.490...L.. I.M.1 .
12.M.V.. H(M$(I),C(M$)).M$ . .", ";M$(M)
;:M.I.U.... I......" OR ";M$(M);".":. 33
0.....D.D(M):LY.0:.Y.4..(Y.4).D.59.D.D.1
:LY.1.C...T.367.Y..(7.(Y..((M.9).12)).4)
..(275.M.9).1.730531.5:T1.1.T.36525.T...
.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 P
LANETS."...&.LL.1:UU.10:.M1$."O".LL.9:UU
.19.3.0..I.LL.UU:C.A(I).B(I).T:H.0:.C.0.
H.1.M.:.C(I).2...(C..(C).H):..^.D..M1$."
O".640...N.L(1).F.(84378..(C(4)).10733..
(2.C(4))).C(3)...X.R(1)..39528..07834..(
C(4)).L.B.L(2).F.(2814..(C(6))).C(5)...L
.L(3).F.(6910..(C(2))).C(1)...6.V.L(4).F
.(38451..(C(8)).2238..(2.C(8))).C(7):R(4
).1.5303..1417..(C(8)).D...L(5).F.(19934
..(C(10)).5023.T1.2511).C(9).....R(5).5.
20883..25122..(C(10)):.M1$."I".730.L...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)).>...L(7).F.(19397
..(C(14))).C(13):R(7).19.21216..90154..(
C(14))._...L(8).F.(3523..(C(16))).C(15).
....L.101577..(C(18)).15517..(2.C(18)).3
593..(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)).E...XX
.X(I).24.5.E:SX.1:.XX.0.SX..1.....X%..(X
X):V.SX..((X%.1).2):FX.0:.XX..0.X%.2..(X
%.2).FX.1......XX.0.X%.2...(X%.2).FX.1.B
...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).F
Y.1.M. .P1(I).O.V.40.W:R1(I).123:.FX.1.F
Y.0.R1(I).108.F.*..FX.0.FY.1.R1(I).126.
.4..FX.1.FY.1.R1(I).124...>..I.LO.920...
H..J.LO.I.1:.P1(I)..P1(J).910.T.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.252.R1(I).225:.910.;.Z..Q.250.R1(
I).226:.910.I...R1(I).127.O.....U.....C.
...MF.0.990......"..............U.......
.....S............I";.X...B1$.".........
...............................":.I.1.11
:.B1$;:.......".............A...........
..............V";:.I.1.11:.B1$;:..[.J.."
.............J............W............"
;:.2023,75:.56295,1...T..T$:.I.LO.U:.H(C
D$,I.MA);O$(I):.:MF.0......H(CD$,11);J(D
(Y),2);" ".K....Y.0..H(CD$,11);"
......B.C."......".";B$:.".";M$(M);D.D(M
).1.LY.YD."....H(CD$,21);J(D(IN),2);" DA
Y ":.".INCREMENT".Z....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.54272,1......IN.0..H(CD$,18);B$:.B
$.Z.$..IN.0..H(CD$,18);"REVERSE":."MOTIO
N"......A$:.A$."".1240...8..A$."H"..1180
...B..A$."O".A$."I".M1$.A$.1.L..A$."S".I
N.7..(IN).I.V..A$."M".IN.30..(IN).B.`..A
$."F".IN.180..(IN).X.J..A$."R".IN...(IN)
...T..A$."D".IN..(IN)...~..A$."N".290...
...A$."Q"..".":.......1070.O....A$:.A$..
"".1180......H(CD$,13);"AND HOLDING"....
.."PRESS ANY KEY":.".TO RESTART".$....A$
:.A$."".1210.J.D..H(CD$,13);B$:.B$:.".";
B$:.".";B$.P.N...Q.X.T.T.IN:T1.T1.IN.365
25:D.D.IN.....D.0.1280.....Y.Y.1:D.D.36
5:.Y.0.Y..1......Y.4..(Y.4).D.D.1.U...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.......;.(.D.D.365.LY:Y.Y
.1:.Y.0.Y.1.E.2..1280.D.<..I.LO.U:P2(I).
P1(I):.:.520...F.IN$." ":ZT.TI:ZC.2:ZD$.
G(20)...P..Z$:.Z$.."".1390.J.Z..ZT..TI..
J(" .",ZC,1);".";:ZC.3.ZC:ZT.TI.15.T.D..
1360...N.Z.F(Z$):ZL.C(IN$):.(Z.127).32..
" .";:.1430.3.X..FL.(Z.127).64.(Z.127).9
1.Z$.G((Z.128).255).D....ZL.254.1360._..
.IN$.IN$.Z$:.Z$;ZD$;Z$;.~....Z.13.IN$.J(
IN$,2):.CR$;:.... ..Z.20.ZL.1.IN$.H(IN$,
ZL.1):.".";:.1360......Z.141.Z$.G(.20.(Z
L.1)):.Z.2.ZL:.Z$;:.Z:.1350......1360...
...PN.0.1530...H..1620...R.."PRESS .RETU
RN. TO ";.5....PN.LP.."BEGIN:";:.1520.G.
..."CONTINUE:";.[....T$:.T$."".1520.K...
.PN.LP.1570.....PN.PN.1:.".";PG$;" - CUR
SOR #";NM$;" (C) 1980 PAGE";PN......1
620.......O."..".":.:.1580:.130...,.QK.5
25:QL.245:QM.134:QP.515:QQ.234:QS.516:QV
.1:CR$.G(13).!.6.. B(50000).0 . ..S.@.QK
.158:QL.216:QM.52:QP.151:QQ.205:QS.152:Q
V.2.Y.J...S.T..I.1.10:."....";:.I:....^.
.59468,12...H.."...";.15.C(PG$));PG$;"
BY KARL MARHENKE.P.R...17);"AND ERNEST
MARHENKE...|..". CURSOR #";NM$;" CO
PYRIGHT (C) 1980.......1620......".THE S
OLAR SYSTEM IN ACTION!.Z...."...WANT TO
SEE THE COMMANDS? ";:.1350.R....H(IN$,1)
.."Y".1570.....LP.1:.1470......" SHO
W .I.NNER OR...B.." .O.UTER PLA
NETS...L..". SPEED IS .S.LOW (7 DAY I
NTERVAL), OR...V.." .M.EDIUM (3
0 DAY INTERVAL), OR.G...." .F.A
ST (180 DAY INTERVAL)..P....".MOTION IS
.D.IRECT (FORWARDS), OR......"
.R.ETROGRADE (BACKWARDS)..J....". YOU
MAY .H.ALT THE PLANETS BRIEFLY, OR......
" PICK A .N.EW DATE, OR......"
.Q.UIT WATCHING..2....".THE SIDES OF T
HE DISPLAY ARE THE.X.&..". .V.ERNAL (
SPRING) EQUINOX,.U.0.." .S.UMMER SOLS
TICE,...:.." .A.UTUMNAL EQUINOX, AND.
..D.." .W.INTER SOLSTICE....N..1470..
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL