NEWTONIAN
FILE INFORMATION
FILENAME(S): NEWTONIAN
FILE TYPE(S): PRG
FILE SIZE: 4.1K
FIRST SEEN: 2025-10-20 14:30:51
APPEARS ON: 1 disk(s)
FILE HASH
729b2a28593f911a6a118bf21d42877a90a12acc5cb9a63d0b8696a5b71123a8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 0047ED | NEWTONIAN | PRG | Treasure Chest - Klaus Der Suhler | 11 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 1C 1C 64 00 99 C7 28 31 34 37 29 3A 8F 20 |....d...(147):. |
00000010: 43 4C 45 41 52 20 53 43 52 45 45 4E 00 47 1C 6E |CLEAR SCREEN.G.n|
00000020: 00 99 22 20 54 48 49 53 20 50 52 4F 47 52 41 4D |.." THIS PROGRAM|
00000030: 20 49 53 20 43 4F 4E 43 45 52 4E 45 44 20 57 49 | IS CONCERNED WI|
00000040: 54 48 20 54 48 45 22 00 77 1C 78 00 99 3A 99 22 |TH THE".w.x..:."|
00000050: 20 49 4C 4C 55 4D 49 4E 41 54 49 4F 4E 20 4F 46 | ILLUMINATION OF|
00000060: 20 54 48 45 20 50 52 49 4D 45 20 46 4F 43 55 53 | THE PRIME FOCUS|
00000070: 20 49 4D 41 47 45 22 00 9B 1C 82 00 99 3A 99 22 | IMAGE"......:."|
00000080: 20 4F 46 20 41 20 4E 45 57 54 4F 4E 49 41 4E 20 | OF A NEWTONIAN |
00000090: 54 45 4C 45 53 43 4F 50 45 2E 22 00 C1 1C 8C 00 |TELESCOPE.".....|
000000A0: 99 3A 99 3A 99 22 20 54 48 45 20 45 51 55 41 54 |.:.:." THE EQUAT|
000000B0: 49 4F 4E 20 55 54 49 4C 49 5A 45 44 20 49 53 3A |ION UTILIZED IS:|
000000C0: 22 00 E4 1C 96 00 99 3A 99 22 20 20 20 20 20 20 |"......:." |
000000D0: 20 20 41 3D 28 46 2A 57 2D 44 2A 4D 29 2F 28 46 | A=(F*W-D*M)/(F|
000000E0: 2D 44 29 22 00 13 1D A0 00 99 3A 99 22 20 46 3D |-D)"......:." F=|
000000F0: 46 4F 43 41 4C 20 4C 45 4E 47 54 48 20 4F 46 20 |FOCAL LENGTH OF |
00000100: 54 48 45 20 50 52 49 4D 41 52 59 20 4D 49 52 52 |THE PRIMARY MIRR|
00000110: 4F 52 22 00 3E 1D AA 00 99 3A 99 22 20 4D 3D 44 |OR".>....:." M=D|
00000120: 49 41 4D 45 54 45 52 20 4F 46 20 54 48 45 20 50 |IAMETER OF THE P|
00000130: 52 49 4D 41 52 59 20 4D 49 52 52 4F 52 22 00 6D |RIMARY MIRROR".m|
00000140: 1D B4 00 99 3A 99 22 20 57 3D 4D 49 4E 4F 52 20 |....:." W=MINOR |
00000150: 41 58 49 53 20 4F 46 20 54 48 45 20 53 45 43 4F |AXIS OF THE SECO|
00000160: 4E 44 41 52 59 20 4D 49 52 52 4F 52 22 00 9C 1D |NDARY MIRROR"...|
00000170: BE 00 99 3A 99 22 20 41 3D 44 49 41 4D 45 54 45 |...:." A=DIAMETE|
00000180: 52 20 4F 46 20 31 30 30 25 20 49 4C 4C 55 4D 49 |R OF 100% ILLUMI|
00000190: 4E 41 54 45 44 20 49 4D 41 47 45 22 00 C9 1D C8 |NATED IMAGE"....|
000001A0: 00 99 3A 99 22 20 44 3D 44 49 53 54 41 4E 43 45 |..:." D=DISTANCE|
000001B0: 20 46 52 4F 4D 20 53 45 43 4F 4E 44 41 52 59 20 | FROM SECONDARY |
000001C0: 54 4F 20 49 4D 41 47 45 22 00 06 1E D2 00 99 3A |TO IMAGE"......:|
000001D0: 99 3A 99 22 20 20 20 20 20 20 22 3B C7 28 31 38 |.:." ";.(18|
000001E0: 29 3B 22 48 49 54 20 41 4E 59 20 4B 45 59 20 54 |);"HIT ANY KEY T|
000001F0: 4F 20 43 4F 4E 54 49 4E 55 45 22 3A 8F 20 52 45 |O CONTINUE":. RE|
00000200: 56 20 43 48 41 52 00 1D 1E DC 00 A1 20 41 24 3A |V CHAR...... A$:|
00000210: 8B 20 41 24 B2 22 22 20 A7 20 32 32 30 00 38 1E |. A$."" . 220.8.|
00000220: E6 00 99 C7 28 31 34 37 29 3A 8F 20 43 4C 45 41 |....(147):. CLEA|
00000230: 52 20 53 43 52 45 45 4E 00 66 1E F0 00 99 22 20 |R SCREEN.f...." |
00000240: 54 48 45 20 45 51 55 41 54 49 4F 4E 20 43 4F 4E |THE EQUATION CON|
00000250: 54 41 49 4E 53 20 46 49 56 45 20 56 41 52 49 41 |TAINS FIVE VARIA|
00000260: 42 4C 45 53 2E 22 00 96 1E FA 00 99 3A 99 22 20 |BLES."......:." |
00000270: 54 48 45 20 55 53 45 52 20 4D 55 53 54 20 41 53 |THE USER MUST AS|
00000280: 53 49 47 4E 20 41 20 43 4F 4E 53 54 41 4E 54 20 |SIGN A CONSTANT |
00000290: 56 41 4C 55 45 22 00 C4 1E 04 01 99 3A 99 22 20 |VALUE"......:." |
000002A0: 54 4F 20 41 4E 59 20 54 48 52 45 45 20 4F 46 20 |TO ANY THREE OF |
000002B0: 54 48 45 20 46 49 56 45 20 56 41 52 49 41 42 4C |THE FIVE VARIABL|
000002C0: 45 53 2E 22 00 F3 1E 0E 01 99 3A 99 22 20 54 48 |ES."......:." TH|
000002D0: 45 20 55 53 45 52 20 4D 55 53 54 20 49 4E 50 55 |E USER MUST INPU|
000002E0: 54 20 54 48 45 20 52 41 4E 47 45 20 46 4F 52 20 |T THE RANGE FOR |
000002F0: 4F 4E 45 00 21 1F 18 01 99 3A 99 22 20 4F 46 20 |ONE.!....:." OF |
00000300: 54 48 45 20 52 45 4D 41 49 4E 49 4E 47 20 56 41 |THE REMAINING VA|
00000310: 52 49 41 42 4C 45 53 2E 20 20 56 41 4C 55 45 53 |RIABLES. VALUES|
00000320: 22 00 4E 1F 22 01 99 3A 99 22 20 46 4F 52 20 54 |".N."..:." FOR T|
00000330: 48 45 20 52 45 4D 41 49 4E 49 4E 47 20 56 41 52 |HE REMAINING VAR|
00000340: 49 41 42 4C 45 20 57 49 4C 4C 20 42 45 22 00 73 |IABLE WILL BE".s|
00000350: 1F 2C 01 99 3A 99 22 20 43 41 4C 43 55 4C 41 54 |.,..:." CALCULAT|
00000360: 45 44 20 42 59 20 54 48 45 20 50 52 4F 47 52 41 |ED BY THE PROGRA|
00000370: 4D 2E 22 00 A0 1F 36 01 99 3A 99 22 20 45 4E 54 |M."...6..:." ENT|
00000380: 45 52 20 2D 31 20 46 4F 52 20 54 48 45 20 56 41 |ER -1 FOR THE VA|
00000390: 52 49 41 42 4C 45 20 54 48 41 54 20 59 4F 55 22 |RIABLE THAT YOU"|
000003A0: 00 CF 1F 40 01 99 3A 99 22 20 57 49 53 48 20 54 |...@..:." WISH T|
000003B0: 4F 20 53 45 54 20 54 48 45 20 52 41 4E 47 45 2E |O SET THE RANGE.|
000003C0: 20 20 45 4E 54 45 52 20 2D 32 20 46 4F 52 22 00 | ENTER -2 FOR".|
000003D0: F8 1F 4A 01 99 3A 99 22 20 54 48 45 20 56 41 52 |..J..:." THE VAR|
000003E0: 49 41 42 4C 45 20 54 4F 20 42 45 20 43 41 4C 43 |IABLE TO BE CALC|
000003F0: 55 4C 41 54 45 44 2E 22 00 2D 20 54 01 99 3A 99 |ULATED.".- T..:.|
00000400: 22 20 20 20 20 22 3B C7 28 31 38 29 3B 22 48 49 |" ";.(18);"HI|
00000410: 54 20 5F 20 54 4F 20 52 45 56 49 45 57 20 54 48 |T _ TO REVIEW TH|
00000420: 45 20 56 41 52 49 41 42 4C 45 53 2E 22 00 62 20 |E VARIABLES.".b |
00000430: 5E 01 99 3A 99 22 20 20 20 20 22 3B C7 28 31 38 |^..:." ";.(18|
00000440: 29 3B 22 48 49 54 20 41 4E 59 20 4F 54 48 45 52 |);"HIT ANY OTHER|
00000450: 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | KEY TO CONTINUE|
00000460: 2E 22 00 79 20 68 01 A1 20 42 24 3A 8B 20 42 24 |.".y h.. B$:. B$|
00000470: B2 22 22 20 A7 20 33 36 30 00 8C 20 72 01 8B 20 |."" . 360.. r.. |
00000480: 42 24 B2 22 5F 22 20 A7 20 31 30 30 00 98 20 7C |B$."_" . 100.. ||
00000490: 01 99 C7 28 31 34 37 29 00 CA 20 86 01 99 3A 99 |...(147).. ...:.|
000004A0: 22 20 44 49 4D 45 4E 53 49 4F 4E 53 20 4D 41 59 |" DIMENSIONS MAY|
000004B0: 20 42 45 20 49 4E 20 41 4E 59 20 55 4E 49 54 20 | BE IN ANY UNIT |
000004C0: 4F 46 20 4C 45 4E 47 54 48 22 00 FC 20 90 01 99 |OF LENGTH".. ...|
000004D0: 3A 99 22 20 28 49 4E 43 48 45 53 2C 20 43 4D 2C |:." (INCHES, CM,|
000004E0: 20 45 54 43 2E 29 2C 20 41 53 20 4C 4F 4E 47 20 | ETC.), AS LONG |
000004F0: 41 53 20 54 48 45 20 53 41 4D 45 22 00 2B 21 9A |AS THE SAME".+!.|
00000500: 01 99 3A 99 22 20 55 4E 49 54 20 49 53 20 55 53 |..:." UNIT IS US|
00000510: 45 44 20 46 4F 52 20 41 4C 4C 20 46 49 56 45 20 |ED FOR ALL FIVE |
00000520: 56 41 52 49 41 42 4C 45 53 2E 22 00 59 21 A4 01 |VARIABLES.".Y!..|
00000530: 99 3A 99 3A 99 22 20 45 4E 54 45 52 20 54 48 45 |.:.:." ENTER THE|
00000540: 20 44 49 41 4D 45 54 45 52 20 4F 46 20 54 48 45 | DIAMETER OF THE|
00000550: 20 50 52 49 4D 41 52 59 22 00 6B 21 AE 01 85 22 | PRIMARY".k!..."|
00000560: 20 4D 49 52 52 4F 52 3A 22 3B 4D 00 97 21 B8 01 | MIRROR:";M..!..|
00000570: 99 3A 85 22 20 45 4E 54 45 52 20 54 48 45 20 50 |.:." ENTER THE P|
00000580: 52 49 4D 41 52 59 20 46 4F 43 41 4C 20 4C 45 4E |RIMARY FOCAL LEN|
00000590: 47 54 48 3A 22 3B 46 00 C7 21 C2 01 99 3A 99 22 |GTH:";F..!...:."|
000005A0: 20 45 4E 54 45 52 20 54 48 45 20 4D 49 4E 4F 52 | ENTER THE MINOR|
000005B0: 20 41 58 49 53 20 4F 46 20 54 48 45 20 53 45 43 | AXIS OF THE SEC|
000005C0: 4F 4E 44 41 52 59 22 00 D9 21 CC 01 85 22 20 4D |ONDARY"..!..." M|
000005D0: 49 52 52 4F 52 3A 22 3B 57 00 09 22 D6 01 99 3A |IRROR:";W.."...:|
000005E0: 99 22 20 45 4E 54 45 52 20 54 48 45 20 44 49 53 |." ENTER THE DIS|
000005F0: 54 41 4E 43 45 20 46 52 4F 4D 20 54 48 45 20 53 |TANCE FROM THE S|
00000600: 45 43 4F 4E 44 41 52 59 22 00 28 22 E0 01 85 22 |ECONDARY".("..."|
00000610: 20 4D 49 52 52 4F 52 20 54 4F 20 54 48 45 20 49 | MIRROR TO THE I|
00000620: 4D 41 47 45 3A 22 3B 44 00 51 22 EA 01 99 3A 99 |MAGE:";D.Q"...:.|
00000630: 22 20 45 4E 54 45 52 20 54 48 45 20 44 49 41 4D |" ENTER THE DIAM|
00000640: 45 54 45 52 20 4F 46 20 54 48 45 20 31 30 30 25 |ETER OF THE 100%|
00000650: 22 00 6E 22 F4 01 85 22 20 49 4C 4C 55 4D 49 4E |".n"..." ILLUMIN|
00000660: 41 54 45 44 20 49 4D 41 47 45 3A 22 3B 41 00 92 |ATED IMAGE:";A..|
00000670: 22 FE 01 99 3A 99 22 20 59 4F 55 52 20 56 41 52 |"...:." YOUR VAR|
00000680: 49 41 42 4C 45 20 49 53 20 54 4F 20 52 41 4E 47 |IABLE IS TO RANG|
00000690: 45 22 00 A1 22 08 02 85 22 20 46 52 4F 4D 22 3B |E".."..." FROM";|
000006A0: 4C 00 AE 22 12 02 85 22 20 54 4F 22 3B 48 00 CB |L.."..." TO";H..|
000006B0: 22 1C 02 85 22 20 49 4E 20 57 48 41 54 20 49 4E |"..." IN WHAT IN|
000006C0: 43 52 45 4D 45 4E 54 53 22 3B 49 00 DC 22 26 02 |CREMENTS";I.."&.|
000006D0: 8B 20 4C B1 48 20 A7 20 49 B2 AB 49 00 E8 22 30 |. L.H . I..I.."0|
000006E0: 02 99 C7 28 31 34 37 29 00 FB 22 3A 02 8B 20 46 |...(147)..":.. F|
000006F0: B2 AB 32 20 A7 20 89 20 39 33 30 00 0F 23 44 02 |..2 . . 930..#D.|
00000700: 8B 20 57 B2 AB 32 20 A7 20 89 20 31 32 32 30 00 |. W..2 . . 1220.|
00000710: 23 23 4E 02 8B 20 4D B2 AB 32 20 A7 20 89 20 31 |##N.. M..2 . . 1|
00000720: 35 31 30 00 37 23 58 02 8B 20 44 B2 AB 32 20 A7 |510.7#X.. D..2 .|
00000730: 20 89 20 31 38 30 30 00 4A 23 62 02 8B 20 41 B2 | . 1800.J#b.. A.|
00000740: AB 32 20 A7 20 89 20 36 34 30 00 81 23 6C 02 99 |.2 . . 640..#l..|
00000750: C7 28 31 34 37 29 3A 99 3A 99 3A 99 3A 99 22 20 |.(147):.:.:.:." |
00000760: 20 53 54 41 52 54 20 4F 56 45 52 2C 20 41 20 46 | START OVER, A F|
00000770: 4C 41 47 20 57 41 53 20 4D 49 53 53 49 4E 47 2E |LAG WAS MISSING.|
00000780: 22 00 9A 23 76 02 81 20 5A B2 31 20 A4 20 33 30 |"..#v.. Z.1 . 30|
00000790: 30 30 3A 82 3A 89 20 31 30 30 00 AD 23 80 02 8B |00:.:. 100..#...|
000007A0: 20 46 B2 AB 31 20 A7 20 89 20 36 39 30 00 C0 23 | F..1 . . 690..#|
000007B0: 8A 02 8B 20 57 B2 AB 31 20 A7 20 89 20 37 35 30 |... W..1 . . 750|
000007C0: 00 D3 23 94 02 8B 20 4D B2 AB 31 20 A7 20 89 20 |..#... M..1 . . |
000007D0: 38 31 30 00 E6 23 9E 02 8B 20 44 B2 AB 31 20 A7 |810..#... D..1 .|
000007E0: 20 89 20 38 37 30 00 F0 23 A8 02 89 20 36 32 30 | . 870..#... 620|
000007F0: 00 01 24 B2 02 99 22 20 20 46 22 2C 22 20 20 41 |..$..." F"," A|
00000800: 22 00 16 24 BC 02 99 22 2D 2D 2D 2D 2D 22 2C 22 |"..$..."-----","|
00000810: 2D 2D 2D 2D 2D 22 00 28 24 C6 02 81 20 46 B2 4C |-----".($... F.L|
00000820: 20 A4 20 48 20 A9 20 49 00 40 24 D0 02 99 20 46 | . H . I.@$... F|
00000830: 2C 28 46 AC 57 AB 44 AC 4D 29 AD 28 46 AB 44 29 |,(F.W.D.M).(F.D)|
00000840: 00 46 24 DA 02 82 00 4C 24 E4 02 80 00 5D 24 EE |.F$....L$....]$.|
00000850: 02 99 22 20 20 57 22 2C 22 20 20 41 22 00 72 24 |.." W"," A".r$|
00000860: F8 02 99 22 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D |..."-----","----|
00000870: 2D 22 00 84 24 02 03 81 20 57 B2 4C 20 A4 20 48 |-"..$... W.L . H|
00000880: 20 A9 20 49 00 9C 24 0C 03 99 20 57 2C 28 46 AC | . I..$... W,(F.|
00000890: 57 AB 44 AC 4D 29 AD 28 46 AB 44 29 00 A2 24 16 |W.D.M).(F.D)..$.|
000008A0: 03 82 00 A8 24 20 03 80 00 B9 24 2A 03 99 22 20 |....$ ....$*.." |
000008B0: 20 4D 22 2C 22 20 20 41 22 00 CE 24 34 03 99 22 | M"," A"..$4.."|
000008C0: 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 E0 |-----","-----"..|
000008D0: 24 3E 03 81 20 4D B2 4C 20 A4 20 48 20 A9 20 49 |$>.. M.L . H . I|
000008E0: 00 F8 24 48 03 99 20 4D 2C 28 46 AC 57 AB 44 AC |..$H.. M,(F.W.D.|
000008F0: 4D 29 AD 28 46 AB 44 29 00 FE 24 52 03 82 00 04 |M).(F.D)..$R....|
00000900: 25 5C 03 80 00 15 25 66 03 99 22 20 20 44 22 2C |%\....%f.." D",|
00000910: 22 20 20 41 22 00 2A 25 70 03 99 22 2D 2D 2D 2D |" A".*%p.."----|
00000920: 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 3C 25 7A 03 81 |-","-----".<%z..|
00000930: 20 44 B2 4C 20 A4 20 48 20 A9 20 49 00 54 25 84 | D.L . H . I.T%.|
00000940: 03 99 20 44 2C 28 46 AC 57 AB 44 AC 4D 29 AD 28 |.. D,(F.W.D.M).(|
00000950: 46 AB 44 29 00 5A 25 8E 03 82 00 60 25 98 03 80 |F.D).Z%....`%...|
00000960: 00 73 25 A2 03 8B 20 41 B2 AB 31 20 A7 20 89 20 |.s%... A..1 . . |
00000970: 39 38 30 00 87 25 AC 03 8B 20 57 B2 AB 31 20 A7 |980..%... W..1 .|
00000980: 20 89 20 31 30 34 30 00 9B 25 B6 03 8B 20 4D B2 | . 1040..%... M.|
00000990: AB 31 20 A7 20 89 20 31 31 30 30 00 AF 25 C0 03 |.1 . . 1100..%..|
000009A0: 8B 20 44 B2 AB 31 20 A7 20 89 20 31 31 36 30 00 |. D..1 . . 1160.|
000009B0: B9 25 CA 03 89 20 36 32 30 00 CA 25 D4 03 99 22 |.%... 620..%..."|
000009C0: 20 20 41 22 2C 22 20 20 46 22 00 DF 25 DE 03 99 | A"," F"..%...|
000009D0: 22 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 |"-----","-----".|
000009E0: F1 25 E8 03 81 20 41 B2 4C 20 A4 20 48 20 A9 20 |.%... A.L . H . |
000009F0: 49 00 09 26 F2 03 99 20 41 2C 28 41 AC 44 AB 44 |I..&... A,(A.D.D|
00000A00: AC 4D 29 AD 28 41 AB 57 29 00 0F 26 FC 03 82 00 |.M).(A.W)..&....|
00000A10: 15 26 06 04 80 00 26 26 10 04 99 22 20 20 57 22 |.&....&&..." W"|
00000A20: 2C 22 20 20 46 22 00 3B 26 1A 04 99 22 2D 2D 2D |," F".;&..."---|
00000A30: 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 4D 26 24 04 |--","-----".M&$.|
00000A40: 81 20 57 B2 4C 20 A4 20 48 20 A9 20 49 00 65 26 |. W.L . H . I.e&|
00000A50: 2E 04 99 20 57 2C 28 41 AC 44 AB 44 AC 4D 29 AD |... W,(A.D.D.M).|
00000A60: 28 41 AB 57 29 00 6B 26 38 04 82 00 71 26 42 04 |(A.W).k&8...q&B.|
00000A70: 80 00 82 26 4C 04 99 22 20 20 4D 22 2C 22 20 20 |...&L.." M"," |
00000A80: 46 22 00 97 26 56 04 99 22 2D 2D 2D 2D 2D 22 2C |F"..&V.."-----",|
00000A90: 22 2D 2D 2D 2D 2D 22 00 A9 26 60 04 81 20 4D B2 |"-----"..&`.. M.|
00000AA0: 4C 20 A4 20 48 20 A9 20 49 00 C1 26 6A 04 99 20 |L . H . I..&j.. |
00000AB0: 4D 2C 28 41 AC 44 AB 44 AC 4D 29 AD 28 41 AB 57 |M,(A.D.D.M).(A.W|
00000AC0: 29 00 C7 26 74 04 82 00 CD 26 7E 04 80 00 DE 26 |)..&t....&~....&|
00000AD0: 88 04 99 22 20 20 44 22 2C 22 20 20 46 22 00 F3 |..." D"," F"..|
00000AE0: 26 92 04 99 22 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D |&..."-----","---|
00000AF0: 2D 2D 22 00 05 27 9C 04 81 20 44 B2 4C 20 A4 20 |--"..'... D.L . |
00000B00: 48 20 A9 20 49 00 1D 27 A6 04 99 20 44 2C 28 41 |H . I..'... D,(A|
00000B10: AC 44 AB 44 AC 4D 29 AD 28 41 AB 57 29 00 23 27 |.D.D.M).(A.W).#'|
00000B20: B0 04 82 00 29 27 BA 04 80 00 39 27 C4 04 8B 46 |....)'....9'...F|
00000B30: B2 AB 31 A7 89 31 32 37 30 00 49 27 CE 04 8B 4D |..1..1270.I'...M|
00000B40: B2 AB 31 A7 89 31 33 39 30 00 59 27 D8 04 8B 41 |..1..1390.Y'...A|
00000B50: B2 AB 31 A7 89 31 33 33 30 00 69 27 E2 04 8B 44 |..1..1330.i'...D|
00000B60: B2 AB 31 A7 89 31 34 35 30 00 73 27 EC 04 89 20 |..1..1450.s'... |
00000B70: 36 32 30 00 84 27 F6 04 99 22 20 20 46 22 2C 22 |620..'..." F","|
00000B80: 20 20 57 22 00 99 27 00 05 99 22 2D 2D 2D 2D 2D | W"..'..."-----|
00000B90: 22 2C 22 2D 2D 2D 2D 2D 22 00 AB 27 0A 05 81 20 |","-----"..'... |
00000BA0: 46 B2 4C 20 A4 20 48 20 A9 20 49 00 C3 27 14 05 |F.L . H . I..'..|
00000BB0: 99 20 46 2C 28 41 AC 46 AB 41 AC 44 AA 44 AC 4D |. F,(A.F.A.D.D.M|
00000BC0: 29 AD 46 00 C9 27 1E 05 82 00 CF 27 28 05 80 00 |).F..'.....'(...|
00000BD0: E0 27 32 05 99 22 20 20 41 22 2C 22 20 20 57 22 |.'2.." A"," W"|
00000BE0: 00 F5 27 3C 05 99 22 2D 2D 2D 2D 2D 22 2C 22 2D |..'<.."-----","-|
00000BF0: 2D 2D 2D 2D 22 00 07 28 46 05 81 20 41 B2 4C 20 |----"..(F.. A.L |
00000C00: A4 20 48 20 A9 20 49 00 1F 28 50 05 99 20 41 2C |. H . I..(P.. A,|
00000C10: 28 41 AC 46 AB 41 AC 44 AA 44 AC 4D 29 AD 46 00 |(A.F.A.D.D.M).F.|
00000C20: 25 28 5A 05 82 00 2B 28 64 05 80 00 3C 28 6E 05 |%(Z...+(d...<(n.|
00000C30: 99 22 20 20 4D 22 2C 22 20 20 57 22 00 51 28 78 |." M"," W".Q(x|
00000C40: 05 99 22 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D |.."-----","-----|
00000C50: 22 00 63 28 82 05 81 20 4D B2 4C 20 A4 20 48 20 |".c(... M.L . H |
00000C60: A9 20 49 00 7B 28 8C 05 99 20 4D 2C 28 41 AC 46 |. I.{(... M,(A.F|
00000C70: AB 41 AC 44 AA 44 AC 4D 29 AD 46 00 81 28 96 05 |.A.D.D.M).F..(..|
00000C80: 82 00 87 28 A0 05 80 00 98 28 AA 05 99 22 20 20 |...(.....(..." |
00000C90: 44 22 2C 22 20 20 57 22 00 AD 28 B4 05 99 22 2D |D"," W"..(..."-|
00000CA0: 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 BF 28 |----","-----"..(|
00000CB0: BE 05 81 20 44 B2 4C 20 A4 20 48 20 A9 20 49 00 |... D.L . H . I.|
00000CC0: D7 28 C8 05 99 20 44 2C 28 41 AC 46 AB 41 AC 44 |.(... D,(A.F.A.D|
00000CD0: AA 44 AC 4D 29 AD 46 00 DD 28 D2 05 82 00 E3 28 |.D.M).F..(.....(|
00000CE0: DC 05 80 00 F3 28 E6 05 8B 46 B2 AB 31 A7 89 31 |.....(...F..1..1|
00000CF0: 35 36 30 00 03 29 F0 05 8B 44 B2 AB 31 A7 89 31 |560..)...D..1..1|
00000D00: 37 34 30 00 13 29 FA 05 8B 41 B2 AB 31 A7 89 31 |740..)...A..1..1|
00000D10: 36 32 30 00 23 29 04 06 8B 57 B2 AB 31 A7 89 31 |620.#)...W..1..1|
00000D20: 36 38 30 00 2D 29 0E 06 89 20 36 32 30 00 3E 29 |680.-)... 620.>)|
00000D30: 18 06 99 22 20 20 46 22 2C 22 20 20 4D 22 00 53 |..." F"," M".S|
00000D40: 29 22 06 99 22 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D |)".."-----","---|
00000D50: 2D 2D 22 00 65 29 2C 06 81 20 46 B2 4C 20 A4 20 |--".e),.. F.L . |
00000D60: 48 20 A9 20 49 00 7D 29 36 06 99 20 46 2C 28 57 |H . I.})6.. F,(W|
00000D70: AC 46 AB 41 AC 46 AA 41 AC 44 29 AD 44 00 83 29 |.F.A.F.A.D).D..)|
00000D80: 40 06 82 00 89 29 4A 06 80 00 9A 29 54 06 99 22 |@....)J....)T.."|
00000D90: 20 20 41 22 2C 22 20 20 4D 22 00 AF 29 5E 06 99 | A"," M"..)^..|
00000DA0: 22 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 |"-----","-----".|
00000DB0: C1 29 68 06 81 20 41 B2 4C 20 A4 20 48 20 A9 20 |.)h.. A.L . H . |
00000DC0: 49 00 D9 29 72 06 99 20 41 2C 28 57 AC 46 AB 41 |I..)r.. A,(W.F.A|
00000DD0: AC 46 AA 41 AC 44 29 AD 44 00 DF 29 7C 06 82 00 |.F.A.D).D..)|...|
00000DE0: E5 29 86 06 80 00 F6 29 90 06 99 22 20 20 57 22 |.).....)..." W"|
00000DF0: 2C 22 20 20 4D 22 00 0B 2A 9A 06 99 22 2D 2D 2D |," M"..*..."---|
00000E00: 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 1D 2A A4 06 |--","-----"..*..|
00000E10: 81 20 57 B2 4C 20 A4 20 48 20 A9 20 49 00 35 2A |. W.L . H . I.5*|
00000E20: AE 06 99 20 57 2C 28 57 AC 46 AB 41 AC 46 AA 41 |... W,(W.F.A.F.A|
00000E30: AC 44 29 AD 44 00 3B 2A B8 06 82 00 41 2A C2 06 |.D).D.;*....A*..|
00000E40: 80 00 52 2A CC 06 99 22 20 20 44 22 2C 22 20 20 |..R*..." D"," |
00000E50: 4D 22 00 67 2A D6 06 99 22 2D 2D 2D 2D 2D 22 2C |M".g*..."-----",|
00000E60: 22 2D 2D 2D 2D 2D 22 00 79 2A E0 06 81 20 44 B2 |"-----".y*... D.|
00000E70: 4C 20 A4 20 48 20 A9 20 49 00 91 2A EA 06 99 20 |L . H . I..*... |
00000E80: 44 2C 28 57 AC 46 AB 41 AC 46 AA 41 AC 44 29 AD |D,(W.F.A.F.A.D).|
00000E90: 44 00 97 2A F4 06 82 00 9D 2A FE 06 80 00 AD 2A |D..*.....*.....*|
00000EA0: 08 07 8B 46 B2 AB 31 A7 89 31 38 35 30 00 BD 2A |...F..1..1850..*|
00000EB0: 12 07 8B 57 B2 AB 31 A7 89 31 39 37 30 00 CD 2A |...W..1..1970..*|
00000EC0: 1C 07 8B 41 B2 AB 31 A7 89 31 39 31 30 00 DD 2A |...A..1..1910..*|
00000ED0: 26 07 8B 4D B2 AB 31 A7 89 32 30 33 30 00 E7 2A |&..M..1..2030..*|
00000EE0: 30 07 89 20 36 32 30 00 F8 2A 3A 07 99 22 20 20 |0.. 620..*:.." |
00000EF0: 46 22 2C 22 20 20 44 22 00 0D 2B 44 07 99 22 2D |F"," D"..+D.."-|
00000F00: 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D 22 00 1F 2B |----","-----"..+|
00000F10: 4E 07 81 20 46 B2 4C 20 A4 20 48 20 A9 20 49 00 |N.. F.L . H . I.|
00000F20: 37 2B 58 07 99 20 46 2C 28 41 AC 46 AB 46 AC 57 |7+X.. F,(A.F.F.W|
00000F30: 29 AD 28 41 AB 4D 29 00 3D 2B 62 07 82 00 43 2B |).(A.M).=+b...C+|
00000F40: 6C 07 80 00 54 2B 76 07 99 22 20 20 41 22 2C 22 |l...T+v.." A","|
00000F50: 20 20 44 22 00 69 2B 80 07 99 22 2D 2D 2D 2D 2D | D".i+..."-----|
00000F60: 22 2C 22 2D 2D 2D 2D 2D 22 00 7B 2B 8A 07 81 20 |","-----".{+... |
00000F70: 41 B2 4C 20 A4 20 48 20 A9 20 49 00 93 2B 94 07 |A.L . H . I..+..|
00000F80: 99 20 41 2C 28 41 AC 46 AB 46 AC 57 29 AD 28 41 |. A,(A.F.F.W).(A|
00000F90: AB 4D 29 00 99 2B 9E 07 82 00 9F 2B A8 07 80 00 |.M)..+.....+....|
00000FA0: B0 2B B2 07 99 22 20 20 57 22 2C 22 20 20 44 22 |.+..." W"," D"|
00000FB0: 00 C5 2B BC 07 99 22 2D 2D 2D 2D 2D 22 2C 22 2D |..+..."-----","-|
00000FC0: 2D 2D 2D 2D 22 00 D7 2B C6 07 81 20 57 B2 4C 20 |----"..+... W.L |
00000FD0: A4 20 48 20 A9 20 49 00 EF 2B D0 07 99 20 57 2C |. H . I..+... W,|
00000FE0: 28 41 AC 46 AB 46 AC 57 29 AD 28 41 AB 4D 29 00 |(A.F.F.W).(A.M).|
00000FF0: F5 2B DA 07 82 00 FB 2B E4 07 80 00 0C 2C EE 07 |.+.....+.....,..|
00001000: 99 22 20 20 4D 22 2C 22 20 20 44 22 00 21 2C F8 |." M"," D".!,.|
00001010: 07 99 22 2D 2D 2D 2D 2D 22 2C 22 2D 2D 2D 2D 2D |.."-----","-----|
00001020: 22 00 33 2C 02 08 81 20 4D B2 4C 20 A4 20 48 20 |".3,... M.L . H |
00001030: A9 20 49 00 4B 2C 0C 08 99 20 4D 2C 28 41 AC 46 |. I.K,... M,(A.F|
00001040: AB 46 AC 57 29 AD 28 41 AB 4D 29 00 51 2C 16 08 |.F.W).(A.M).Q,..|
00001050: 82 00 57 2C 20 08 80 00 00 00 |..W, ..... |
....D..G(147):. CLEAR SCREEN.G.N.." THIS
PROGRAM IS CONCERNED WITH THE".W.X..:."
ILLUMINATION OF THE PRIME FOCUS IMAGE".
.....:." OF A NEWTONIAN TELESCOPE.".A...
.:.:." THE EQUATION UTILIZED IS:"......:
." A=(F*W-D*M)/(F-D)"... ..:." F=
FOCAL LENGTH OF THE PRIMARY MIRROR".>...
.:." M=DIAMETER OF THE PRIMARY MIRROR".M
....:." W=MINOR AXIS OF THE SECONDARY MI
RROR"......:." A=DIAMETER OF 100% ILLUMI
NATED IMAGE".I.H..:." D=DISTANCE FROM SE
CONDARY TO IMAGE"...R..:.:." ";G(18
);"HIT ANY KEY TO CONTINUE":. REV CHAR..
.... A$:. A$."" . 220.8....G(147):. CLEA
R SCREEN.F...." THE EQUATION CONTAINS FI
VE VARIABLES."......:." THE USER MUST AS
SIGN A CONSTANT VALUE".D....:." TO ANY T
HREE OF THE FIVE VARIABLES."......:." TH
E USER MUST INPUT THE RANGE FOR ONE.!...
.:." OF THE REMAINING VARIABLES. VALUES
".N."..:." FOR THE REMAINING VARIABLE WI
LL BE".S.,..:." CALCULATED BY THE PROGRA
M.". .6..:." ENTER -1 FOR THE VARIABLE T
HAT YOU".O.@..:." WISH TO SET THE RANGE.
ENTER -2 FOR"...J..:." THE VARIABLE TO
BE CALCULATED.".- T..:." ";G(18);"HI
T _ TO REVIEW THE VARIABLES.".B ^..:."
";G(18);"HIT ANY OTHER KEY TO CONTINUE
.".Y H.. B$:. B$."" . 360.. R.. B$."_" .
100.. |..G(147).J ...:." DIMENSIONS MAY
BE IN ANY UNIT OF LENGTH".. ...:." (INC
HES, CM, ETC.), AS LONG AS THE SAME".+!.
..:." UNIT IS USED FOR ALL FIVE VARIABLE
S.".Y!...:.:." ENTER THE DIAMETER OF THE
PRIMARY".K!..." MIRROR:";M..!...:." ENT
ER THE PRIMARY FOCAL LENGTH:";F.G!B..:."
ENTER THE MINOR AXIS OF THE SECONDARY".
Y!L.." MIRROR:";W.."V..:." ENTER THE DIS
TANCE FROM THE SECONDARY".("..." MIRROR
TO THE IMAGE:";D.Q"...:." ENTER THE DIAM
ETER OF THE 100%".N"..." ILLUMINATED IMA
GE:";A.."...:." YOUR VARIABLE IS TO RANG
E".."..." FROM";L.."..." TO";H.K"..." IN
WHAT INCREMENTS";I.."&.. L.H . I..I.."0
..G(147)..":.. F..2 . . 930..#D.. W..2 .
. 1220.##N.. M..2 . . 1510.7#X.. D..2 .
. 1800.J#B.. A..2 . . 640..#L..G(147):.
:.:.:." START OVER, A FLAG WAS MISSING.
"..#V.. Z.1 . 3000:.:. 100..#... F..1 .
. 690..#... W..1 . . 750.S#... M..1 . .
810..#... D..1 . . 870..#... 620..$..."
F"," A"..$..."-----","-----".($F.. F.L
. H . I.@$P.. F,(F.W.D.M).(F.D).F$Z...L
$....]$..." W"," A".R$..."-----","----
-"..$... W.L . H . I..$... W,(F.W.D.M).(
F.D)..$.....$ ....$*.." M"," A".N$4.."
-----","-----"..$>.. M.L . H . I..$H.. M
,(F.W.D.M).(F.D)..$R....%\....%F.." D",
" A".*%P.."-----","-----".<%Z.. D.L . H
. I.T%... D,(F.W.D.M).(F.D).Z%....`%...
.S%... A..1 . . 980..%... W..1 . . 1040.
.%... M..1 . . 1100..%... D..1 . . 1160.
.%J.. 620.J%T.." A"," F"..%..."-----",
"-----"..%... A.L . H . I..&... A,(A.D.D
.M).(A.W)..&.....&....&&..." W"," F".;
&..."-----","-----".M&$.. W.L . H . I.E&
... W,(A.D.D.M).(A.W).K&8...Q&B....&L.."
M"," F"..&V.."-----","-----"..&`.. M.
L . H . I.A&J.. M,(A.D.D.M).(A.W).G&T...
M&~....&..." D"," F"..&..."-----","---
--"..'... D.L . H . I..'... D,(A.D.D.M).
(A.W).#'....)'....9'D..F..1..1270.I'N..M
..1..1390.Y'X..A..1..1330.I'...D..1..145
0.S'... 620..'..." F"," W"..'..."-----
","-----"..'... F.L . H . I.C'... F,(A.F
.A.D.D.M).F.I'....O'(....'2.." A"," W"
..'<.."-----","-----"..(F.. A.L . H . I.
.(P.. A,(A.F.A.D.D.M).F.%(Z...+(D...<(N.
." M"," W".Q(X.."-----","-----".C(...
M.L . H . I.{(... M,(A.F.A.D.D.M).F..(..
...( ....(..." D"," W"..(..."-----","-
----"..(... D.L . H . I.W(H.. D,(A.F.A.D
.D.M).F..(R....(.....(...F..1..1560..)..
.D..1..1740..)...A..1..1620.#)...W..1..1
680.-)... 620.>)..." F"," M".S)".."---
--","-----".E),.. F.L . H . I.})6.. F,(W
.F.A.F.A.D).D..)@....)J....)T.." A","
M"..)^.."-----","-----".A)H.. A.L . H .
I.Y)R.. A,(W.F.A.F.A.D).D..)|....).....)
..." W"," M"..*..."-----","-----"..*..
. W.L . H . I.5*... W,(W.F.A.F.A.D).D.;*
....A*B...R*L.." D"," M".G*V.."-----",
"-----".Y*... D.L . H . I..*... D,(W.F.A
.F.A.D).D..*.....*.....*...F..1..1850..*
...W..1..1970.M*...A..1..1910..*&..M..1.
.2030..*0.. 620..*:.." F"," D"..+D.."-
----","-----"..+N.. F.L . H . I.7+X.. F,
(A.F.F.W).(A.M).=+B...C+L...T+V.." A","
D".I+..."-----","-----".{+... A.L . H
. I..+... A,(A.F.F.W).(A.M)..+.....+....
.+..." W"," D".E+..."-----","-----".W+
F.. W.L . H . I..+P.. W,(A.F.F.W).(A.M).
.+Z....+.....,..." M"," D".!,..."-----
","-----".3,... M.L . H . I.K,... M,(A.F
.F.W).(A.M).Q,....W, .....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL