[comp.binaries.apple2] Solar System/Planetary Probe orbit simulation in Applesoft

reeder@reed.UUCP (Doug Reeder) (09/11/89)

see the accompanying documentation file for instrutions
-------------------cut here & exec----------------------
CALL-151
E00:38 A5 FF D0 32 D8 20 8E FD AD 30 BF 8D 6A 0E 20 00 BF C7 6D 0E 0D 80 02
E18:D0 1D 20 00 BF C5 69 0E B0 15 AD 81 02 29 0F AA E8 8E 80 02 A9 2F 8D 81
E30:02 20 00 BF C6 6D 0E A2 08 B0 0E 20 00 BF C3 70 0E B0 06 A2 26 20 53 0E
E48:AA 20 53 0E 4C D0 03 20 ED FD E8 BD 59 0E D0 F7 60 A0 F3 E1 F6 E5 E4 8D
E60:00 C5 F2 F2 EF F2 87 8D 00 02 00 81 02 01 80 02 07 7E 0E E3 FC 01 08 00
E78:00 00 00 00 00 00 09 D3 CF CC C1 D2 AE B1 AE B4 00
F00:D8 A0 00 84 FF 88 84 E0 A9 0F 85 E1 20 67 FD A0 00 A2 FF 20 2F 0F E6 E0
F18:D0 02 E6 E1 0A 0A 0A 0A 91 E0 20 2F 0F 11 E0 91 E0 45 FF 85 FF 90 E4 E8
F30:BD 00 02 09 80 C9 A0 F0 F6 49 B0 C9 0A 90 17 69 88 09 20 C9 FA B0 0C 68
F48:68 E0 04 B0 BF 98 91 E0 4C 69 FF 18 29 0F 60
F00G
0B080100AB323030300016080A008149D031C14E0022080F00814AD030C14E50
002E081200AD4AD049C43533007508140041D04D284A29CA54CB282854582849
29C95458284A2929CA285458284929C95458284A2929C8285459284929C95459
284A2929CA285459284929C95459284A29292900A0081E005448455441D0E128
D4285459284929C95459284A2929CBD4285458284929C95458284A29292900CA
0828005856284929D05856284929C941CAD2285458284929C95458284A2929CA
DE2854484554412900F40832005956284929D05956284929C941CAD228545928
4929C95459284A2929CADF2854484554412900FB083500824A0013093C005458
284929D05458284929C85856284929CA54002B093F005459284929D054592849
29C85956284929CA540038094100AD50284929C43732006C094300AD28582849
29CF31343029C82858284929D1C931333929C82859284929CF383029C8285928
4929D1C9373929C43732008509460092303A9358284929C83133392C59284929
C83739009E09480058284929D0285458284929C9545828462929CA5300B70949
0059284929D0285459284929C9545928462929CA5300EB094B00AD2858284929
CF31343029C82858284929D1C931333929C82859284929CF383029C828592849
29D1C9373929C4383500040A500092333A9358284929C83133392C59284929C8
3739000B0A5500824900230A5A00ADE228C9313633383429CF313237C4B03530
30002F0A6400434CD0434CC85400370ABE00AB3130003D0AF4013A00450AFE01
BE412400560A0802AD4124D1CF225322C435343000640A0D02913A933133392C
3739008D0A1202BA224F4C44205343414C453A20223B533B3A842220204E4557
205343414C453A20223B53009E0A1C02AD4124D1CF225422C435363000CB0A26
02BA224F4C442054494D453A20223B543B3A842220204E45572054494D452053
43414C453A20223B5400DC0A3002AD4124D1CF224222C436303000FD0A350284
2252656C617469766520746F207768617420626F64793F20223B49001B0B3A02
84224F52424954414C20434F4D504F4E454E543A20223B4F43003C0B44028422
5452414E53564552534520434F4D504F4E454E543A20223B5443007D0B470252
D0DA28285856285A29C9585628492929CA285856285A29C9585628492929C828
5956285A29C9595628492929CA285956285A29C95956284929292900AF0B4902
594255524ED0284F43CA285956285A29C9595628492929CB5229C85443CA2858
56285A29C9585628492929CB5200E10B4B02584255524ED0284F43CA28585628
5A29C9585628492929CB5229C95443CA285956285A29C9595628492929CB5200
090C4E025856285A29D05856285A29C8584255524E3A5956285A29D05956285A
29C8594255524E001A0C5802AD4124D1CF225122C436323000200C6202AC0031
0C6C02AD4124D1CF225022C436343000470C74028422576869636820626F6479
3F20223B4900560C770250284929D0C65028492900670C8002AD4124D1CF2249
22C4363630007C0C850284225748415420424F44593F20223B49009C0C8A02BA
22583A20223B54582849293B22202058563A20223B585628492900BC0C8F02BA
22593A20223B54592849293B22202059563A20223B595628492900CD0C9402AD
4124D1CF224622C436383000DB0C9902913A933133392C373900FA0C9E028422
464F435553204F4E20574849434820424F44593F20223B46000B0DA802AD4124
D1CF225222C437303000270DAD02842252454C415449564520544F2057484154
3F20223B49005C0DB202BA2252454C2058563A20223B5856285A29C958562849
293B22202052454C2059563A20223B5956285A29C95956284929006D0DBC02AD
4124D1CF224322C437323000840DC602BA2254696D6520456C61707365643A20
223B009F0DC902BAD328434CCB333635293B222079656172732020223B00BD0D
CC02BA434CC9D328434CCB33363529CA3336353B2220646179732200C30DD002
3A00D10D0C03B9C931363336382C3000D70D1603B100DD0DD0073A00150EE407
8654582835293A8654592835293A86582835293A86592835293A865856283529
3A8659562835293A86502835293A864D28352900280EE907B0323130303A4E50
D0303A4ED03000350EEE07BA2245617274682200440EEF07BA224A7570697465
722200560EF007BA22332E204D6572637572792200680EF107BA22342E204E65
7074756E6522007F0EF707BA22352E2041204E657720506C616E65742200980E
F807BA2257616E7420746F20616464206F6E653F202200B60E0208BE41243AAD
4124D0E728313329CE4124D0224E22C43230363000CC0E05084E50D04E50C831
3A4ED04EC8313A48D04E00FA0E070841D0E5284124293AB441B0323133302C32
3132302C323131302C323134302C333030303AAB3230333000150F0C08BA2231
2E204A75706974657220617070726F6163682200270F11084ED04EC8313A48D0
4E3A5AD04E00310F1608B032313530003B0F2F08AB3232303000660F34085458
283029D0303A5459283029D0303A5856283029D0303A5956283029D0303A4D28
3029D031006C0F3908B100A20F3E085458284829D0352E37393A5459284829D0
303A5856284829D0303A5956284829D02E34313A4D284829D0312E363645C937
00A80F4308B100DF0F48085458284829D037372E383A5459284829D0303A5856
284829D0303A5956284829D02E3131343A4D284829D0392E353945C93400E50F
4D08B1001B1052085458284829D031342E393A5459284829D0303A5856284829
D0303A5956284829D02E32363A4D284829D0332E303245C9360021105708B100
57105C085458284829D03435303A5459284829D0303A5856284829D0303A5956
284829D02E303437333A4D284829D02E353245C934005D106108B10098106608
5458284829D0C9352E30333A5459284829D0C931342E353A5856284829D02E32
33333A5956284829D0C92E303937373A4D284829D030009E106B08B100B31098
088149D031C1353A50284929D0313A824900C310A20853D0313A54D0313A46D0
3000CC106009913A923300DA106A09B9C931363336382C3000E910740992333A
933133392C373900F3107E09973AA2323100FB10C409AB3130000C11B80B8422
583A20223B5458284829001D11C20B8422593A20223B5459284829003711CC0B
8422582076656C6F636974793A20223B5856284829005111D60B842259207665
6C6F636974793A20223B5956284829006411E00B84224D6173733A20223B4D28
4829006A11120CB1000000008F

BSAVE SOLAR.1.4,A$1000,L$096C
E00G

--------------------cut off this trailer---------------------
-- 
Doug Reeder                         USENET: ...!tektronix!reed!reeder
Institute of Knowledge, Jinx        BITNET: reeder@reed.BITNET
"A blaster can point two ways."  from ARPA: tektronix!reed!reeder@berkeley.EDU
       -Salvor Hardin               Box 722 Reed College,Portland,OR 97202