[comp.binaries.apple2] Corewar source...

whitney@think.COM (David Whitney) (07/21/88)

Well, I posted this before, but it stands a pretty good chance that it
never left this machine. I am therefore posting again. Send me some
comments so that I know this is going out...

This is a Binary II file which holds the source code for Corewars and
a few battle programs (which I didn't write). Note that I wrote this
in high school, so style may not be up to par... I wrote it under
Apple Pascal, but it ought to port easily enough to other Pascals.
You'll need to supply code for a routine I have linked into my library
file called CHECKKEY or KEYPRESS or somesuch. It returns TRUE if a key
has been pressed and FALSE otherwise. I needed a way to check the
keyboard without stopping program execution (a la READ(CH);...).
You'll find the call to it in the main execution loop.

Instructions for writing battle programs and using my program are in
the comments at the beginning of the source code. The Corewar assembly
language consists of 7 instructions and 3 addressing modes, so it ought
to be easy to learn. One might consider it to be a good instruction in
assembly language programming (gosh, could I actually make money
selling this game as educational software?? :-)

Whole thing is public domain, so feel free to distribute to any
interested parties.

----cut here-------
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 06 00 00 00
E78:00 00 ED B0 2D 10 08 C3 CF D2 C5 AE C2 D1 D9 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
0A474CE3040000010100E4B0130C7BA8000002001201000B47454D494E492E54
4558540000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000005A0000000000000000
0000000000000000000000000000000000000000002B00000000000000000006
2446524F4D2020204441542020202020202020202020202023300D24544F2020
202020444154202020202020202020202020202339390D24535441525420204D
4F562020202020402446524F4D2020204024544F0D2020202020202020434D50
20202020202446524F4D2020202023390D20202020202020204A4D5020202020
20244F55540D2020202020202020414444202020202023312020202020202446
524F4D0D20202020202020204144442020202020233120202020202024544F0D
20202020202020204A4D5020202020202453544152540D244F5554202020204D
4F562020202020233939202020202039330D20202020202020204A4D50202020
202039330D2020202020202020454E440D0D0000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0A474CE3040000020300E4B0130C7BA800000200C701000C434544452E544558
542E515100000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000005A0000000000000000
0000000000000000000000000000000000000000000000000000000000800005
76FFA178434544452E54455854002700020001000400030006000500DFFF0700
6FFF08000A0009000C000B000E000D00B0FF0F00F2FFB2FF1000DBFF12001100
1300FAFFAFFF1400160015001700F7FF19001800DCFFBEFF1B001A00BBFFB6FF
1C00B3FFF9FFCFFFABFFB4FF1D00A9FFB1FF1E00D2FFB5FF1F002000FBFFBCFF
BDFF2100230022002400BFFFCEFFCAFFACFFBAFF2500FCFFB7FF2600C8FFADFF
CBFFC9FFFFFECCFFC7FFAAFFCAA503FA9B57BB20BB974BA09AFE556FF926FD2D
C8EEE512646DE9A2BF05F5AF7AB674AF7641762F9740B5A57BB50BB27BB90459
5BBA57BB20BB974B68B0A57BB50BB27BB98466B674D1DF82CAA503FA33FDABCE
E51BF0633146BD6F53DAC11B8F8DF4B7A05CFFAA7363B72D5DF4B7A04289B4A5
8BFE16D44FF9C7144AE442700016640DCBA57FD5694B27FD2D287C955950A13F
5BBAE86F41E5D201FDD9D2457F0B2AEDE08D87E9A7FCB37CD39A7F166494E5D2
BFEAB4A57BB50B2AF4B71072FDAB4E5B3A07604146592EFDAB4E5BBA57BBA042
7F0B21D7BFEAB4A57300166494E5D2BFEAB4A57BB50B2AF4B71072FDAB4E5BBA
E86F418512690AFD2D8457BBA0427F0BA1BC89CE81296FA273B0017E2CC66E5B
3A5D02665F00FF00000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0A474CE3040000020300E4B0130C7BA8000002002B02000E4D454D4F52592E54
4558542E51510000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000005A0000000000000000
0000000000000000000000000000000000000000000000000000000000800004
76FFF3A44D454D4F52592E544558540028000200010004000300060005000800
07000900DFFF6FFF0A000C000B00F2FF0D000F000E0011001000DBFFB2FF1300
1200BBFF1400B0FF1500DCFF1600BDFFABFF1700BEFFFAFFBAFF190018001A00
F7FF1C00CEFF1D001B00C8FFAFFF1F001E002000C6FFA9FF2100B1FFFCFFB6FF
B5FFF9FFCFFFACFFFBFF2200BFFFCDFFB3FF25002300ADFF24002700AAFFCAFF
2600B8FFB7FFBCFFB9FFD2FFFFFEA8FFA7FFF688587D21CFEA16BF9DCD14AFFA
429ED52D7E3B9BECAC185BC8B3BAC56F679C2F9555919067758BDFCE387F4CAC
48C8B3BAC56F679F5FCAEA0B7956B7F8EDEC139948B49067758BDFCEE28F8D7D
B69067758BDFCE881F112B12F2AC6EF1DBD98C44F5853CAB5BFC76E6D1AB2FE4
59DD42CF3C3AAE48C8B3BA859E7D6666CD3603546161B40AE6D1AFA21CBE5721
6D1EBD226D46E22AFAF7BD0A063FE62AFAF7BD0AF6999935CFE0C754DF4FEAA8
C2C26815CCA35F453340151657859847C757D1BFB355C1E0C7545FF3E867C9F7
F68AF4C754216DE3F968D3E6D1F15594C3F72AD8783E2A726D57D1BFEF55489B
47C757D10C5085852BC43C3ABE8A66802A2C5C21369E8FABE8DFF72A58F2BDFD
6C3C1F15097956B7D0B3F17CE016F2AC6E71E33A1BCF47A2853CAB5BDB59F2BD
1DB7FE982A2CB442D2369E0F7C15F5C75461A11592B6F17C24AEA29FD4518595
A8101BCF07BE8A66802AAC4485D8783E1257D1BFEF55B0E47B3BBE8AFE7DAF82
25DFDBF155341270C71DFF000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0A474CE3040000020300E4B0130C7BA8000002001602000F4D454D4F5259312E
544558542E515100000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000005A0000000000000000
0000000000000000000000000000000000000000000000000000000000800003
76FF279B4D454D4F5259312E5445585400280002000100040003000600050008
0007000900DFFF6FFF0A000C000B000E000D000F00F2FF110010001200DBFF14
001300BEFFB0FF1500B2FFDCFFBBFF1600ABFFBDFF1700FAFF18001A0019001C
00F7FFBAFF1B001D00AFFF1E00C8FF1F00B3FF2000C6FF2100CEFF2200FCFFB7
FFB1FFF9FFB9FFCFFFB5FFCDFFBFFFFBFFA9FF2300ACFFB6FF24002500ADFF27
002600BCFFCAFFB8FFAAFFD2FFFFFEA8FFA7FF8E34A9321766B5271ED76704AC
321766B5271ED7276524A4BD30AB3DF1B8CEA2A1B1322FCC6A4F3CAEB3962CA9
CC0BB3DA138FEB514BC42A7361567BE2713D4AB2846E2FCC6A4F3CAE138B0135
DB0BB3DA138FEBB48526957961567BE2717D12BACA5C98D59E785CFFE457990B
B3DAF358A720672BF3C2ACF63CD6A3138CB3857BAB70EC4715FC93BF15877BAB
70AC2BC629C8D9ADB8D57FAB30F44F7E65FA24F456FCF9DF2A788EF86EC59FFF
AD82472718E77A8EF856E6C76C15869EF0A776E814E4EC56DCEABF55F0843F55
E619B7E2CFFF5661E814E4EC561CEEADC2B12BC629C8D9AD38DC5B8563578C27
FC692BFEFC6F153C477CD713FE54991766B5E7B19EF027BBBD30AB3D91ACD713
FE34682FCC6ACFB89E23BE76FB315B85F3A898A127FCC9DE8A7FCC56E13C2A66
E8097F1A6CC5A386A90A6750319EF0277B2B0EF756E10C2AC613FE34D88A3FFF
5B05CF115F7B2BFEFC6F153C477CEDAD38A1EF6E64FF00000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0A474CE3040000010100E4B0130C7BA800000200240000094E554C4C2E544558
5400000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000005A0000000000000000
0000000000000000000000000000000000000000000000000000000000000002
24535441525420204A4D5020202020202453544152540D202020202020202045
4E440D0D00000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0A474CE3040000020300E4B0130C7BA800000200BC01000E4B494C4C45522E54
4558542E51510000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000005A0000000000000000
0000000000000000000000000000000000000000000000000000000000800001
76FF797B4B494C4C45522E54455854002400020001000400030006000500DFFF
0700090008000A006FFF0C000B000E000D000F00B0FFB2FFF2FFDBFF1000BDFF
110013001200DCFFFAFF150014001600F7FFCEFFABFF1700BBFF190018001A00
F9FFBEFFA9FFCDFF1B00AFFF1C001E001D00ADFF1F00BFFFBCFFB9FFB1FF2000
CAFFFCFF2100CCFF2200CFFFB5FFC8FFFBFFCBFF2300D2FFB3FFBAFFACFFAAFF
FFFE421DA4367EE9395F994A01B08EB9C42F3DE763A5E89E3FBFF49C4F9DE052
5050CF787EE9391F23855D5F98DEA2EFF9BF32357FA10E5239D7E87BFE4FCD50
A8838E9C6BF43DFFC79AA1005847CE35FA9EFF5327B8192FBA73AED1F7FC1F63
8682823AA5BCBB984B6814F31700EB984BEF60E55C9951CC5FA88372AED1F7FC
1101B08E0D11DD39D78BF3F93F354301B08E9CEBC5F9FC9F9AA1E84EA10E9A4B
D1F7FCDF7986885007A99C6BF43DFF779E2122D44147CE35FA9EFF3BCF1011EA
2095738DBEE7FFCE3344843AE8C8B9B29FA2F9BF6386421DA472AE17E7F37FC7
0C853AE8C8B95E9CCFFFA9190A0AEA9C2B1AC5FC0505F58C7F6746CE9519C5FC
D581CBB932A398BF94771729D441C7C62F3DE75339573690679E06FF00000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0A474CE3040000021D00E4B0130C7BA8000002004525000F434F524557415253
2E5445582E515100000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000005A0000000000000000
0000000000000000000000000000000000000000000000000000000000800000
76FFC6A5434F5245574152532E54455854006300020001000400030006000500
DFFF0700090008000B000A000D000C000F000E001100100013001200BAFF1400
16001500180017001A0019001C001B00ADFFF2FF1E001D001F00ABFF2000B1FF
2100B0FFB6FFBBFF23002200BEFF240025006FFFC4FFB2FF27002600BCFF2800
2A0029002B00AFFF2D002C002E00A0FF2F009AFF3000C5FFACFF3100D7FFD3FF
3200D6FF3300B3FFD8FF34008BFF3500C2FF36009EFFBDFF3700B9FFB7FFFCFF
3800B8FF8DFF90FF3900A6FFA8FF3A003B008CFFFBFF91FF96FFAAFFD1FF3C00
A2FF3D003E00A4FFFAFF3F00CEFF9BFF400093FF4100CFFF92FFCDFF4200B5FF
4300A9FFD2FF44009CFF8AFF97FF450099FFA7FF4700460048009DFF8FFF4900
86FF4A004C004B00A5FF98FF4E004D004F00D4FF88FFCCFFC3FFC1FF89FF5000
5200CBFF53005100540055005600C6FFD5FF57005900580082FFB4FFC8FF84FF
5A00DBFFC9FF87FFDCFFCAFF5C005B00BFFF5D00F4FFC7FFC0FFD0FF5F00F9FF
620060005E00610094FFDDFFFFFEDEFFE8FF85FFE9FFF7FFF8FFEBFFF0FFDAFF
EF89CF23E8403CD6102798E6F21BAEFA62B8BEE1AA921B0E2C18F81850B6B2AD
4BEEADDDD7EE5C0E6A5BBBAF0D99D64C5F5D78AF076158A7B15007F4D59B292B
BD993E75DFCC4AF7A2AAE44EF8D3D6EE6B43A6B9EC7547A97E4C56C91D358A1A
B263201E7F3797837AC2A0BA9897CEE5A0B6B5FB1AB91B8DDE5AA18F466F2DBC
74C29FB6765F23778BAF9D56E88BAF9D165E3A97AB3DED903BCB9EDC51A34326
CE115DF6A342F1E04FF957B2F81F358A22F7168A73478DC6D35D3A6A94DCBDA0
45E97B41DBB9742E577BDA21F72AF7FAB228D50B35C142FDE4FA783BE641F4B6
50B288F5A4A5B0503F594C6F337DC77162BCE09AA53B9A0CEBEFB72F0561A17E
72A1243A240561257A0F0B4C5CE1FD384E8CE3E0715C80F57BE58AD21DEBE34D
0C4AA2070FC2062B6E1086C771621C078FE302ACDF2B870EE1E195BD322955AE
8F3731BC5EBF63F0206CB0E2D258388E13E338781C5708FD4A97EBE34DEBF7F6
DB9782B0503FA94EEC81D0EFEF1E966BF20B4995E88592832FA0EF384E8CE3E0
719CC35B41D0AF7439089B58534DAF20E857BA1C840D1EC6522657FC61A1264B
963F8B2D942C623D69292CD44FDE66CA6A1C27C671F038AE99BE130BE1AD20E8
57BA9CD6EF4DAA9FC4CA245654D7C71B3C648FB7993EC771621C078FE39AE93B
B110DE0A827EA5CB69FDDEA4FA49AC4C6245757DBCC16B7A8FD737B31AC78971
1C3C8EF3A554AFEC2893D80A827EA5CB69FDDEA4FA49AC4C6245757DBCC18A39
BCF5CAA2F42F36648FFA9AE93B71BDA8E305078FE33C84418AC1EB800A2CD9C7
F6B01C945C28890EF54A296C101ADD2B8BC53B9E0858FAD2BFE841F3A2AE8841
58D95126B13D2C57FE6C29258D95687D184BB926BD3EEB1ED4318C05C286EE97
C515FBFBED17CBE24F78AF40A37B65B1184AB25E471F5D16D33BA5715CAFFC85
B05041A562B93F96124297BD3D2CF1FABD72184BB9A474C7C3B2A798C3162A0E
4AAE8F87572CB1416874AF2C1615F7E794C671A18E8E121D82B052B12CDDF1B0
EC2D541C941C24854943BF2B08FA952E15A3508125FBD81E96932E96E841C541
C9416874AF2C1615F78794C671A1243AD42BA530C5B274C7C3B2B726FD50122B
0EEBEFB72F0561A17E720FB094BD725072101ADD2B8BC5754005F6B01C5E5F3A
8956DCF19FBCB29483D0E85E592CAEFF108342C912BD5071184B995CAFFC85B0
5041E5B0FE309672A12456F63A4A7408C2CA1531082B3BCA24A6B85716B0C941
7AC5EFEF7EA187E56F711DD2456C0FCB35E9955225BA44EF61814143F77F7FA1
DE3465AA2B86582715AB2C6581754005F6B09C74B1442F945C935F48AABC7DBC
41C9024B4A7794BD9014F4BB7E93B20725D18A55967249A8A35C8774115B1183
7AD81E08612C83F65B6258D91B9444AF032A30A97EB2182A62B78F3728596052
2C500F92C2CA5E71101E56F686B194C30BF58AD87E4B0C2B7B8AE53E560E6381
B03DC052622C656FFDDE927D6CD09AF4FAAC7B50C7952E96C5FD420FCBDFA23E
8CA5EC95EB902E627B580EC2F65B42456CFD64A94F0AFAFD2DD1536650C5A9FA
1E600949B12C944487A420AC2C0E63292F5EA857C4F61B4A96EBE30D6329D7A4
D767DD833A86F5F7B05CF9B3A5943456A21513BFC5BE3E080F2B7BC358CA35E9
F559F7A08E858AFBED43E812AD5F8CA5DC2FF4B0FC2D0EEA9593EA773491C64A
F44249ACBF5EF90B61A182CA416874AF2C16CBA26295A5EC9578FD5EA90FDD0F
25590F1AD683A4CADBC71BC652AE279D5CBFB78242E503A124EB75941DFD5E81
417858D91BC652EE218461BFE542C5A1FBC9720F847E7F97EC63EB950595D0EF
A06481FB0B3D2C7F97843ACAE294D64FFE1618C652867AC30B25A1DFFD70E922
F4F0B7FCE183D0E85E592C9645C5BD34168692AC072517EAE828D121082B174A
62FD41FBED4B4158A89F1C26DD4B1687B140D87EFB521016EA27174A62FD41F3
A22AAE4B0E9A17551FC6520E42A37B65B1184AB25E471F5DAE8F378CA55C52BA
E361D95BA838A97EB2184297BD123DACBF87E57AE52F84850A2AF7004B99BC4D
FAA12456A287F5F7B0C0A0E4424974A8574A61FAFA184BD97B20542C17C2162A
4EAA9F2C86D065AF440FEBEF61B9504747890E4158A9B8B149D98392E8E23016
081BD42B57946ED2A45F2CD1C3FA7B580E42A37B65B15816A7612CE5E0E185CA
5FB43EE9A234F4FB5B405D075460C93E761F960B757494E81084958AB98E8E12
1D82B072101ADD2B8BC5B238A8572EC43AD9EF9568C59AE9BB9F7B70A1E24A3C
BC520A0B1554FE1618B466FAEE5171C5EFEF20292CD44F1607F5CA35297B78FD
5E47895E3F398CA51CBC7E93B20725D18A559672FDE46F8161A18E72184B39B1
7E93B20725D10B15AF140B94645DA2172A0EC2C3CADEA0D158A8B8CABA57B94A
BCE04E09A18B0B25D74F96C30BFD968392E835818AC5B2B88790D40F1BC652AE
88413D6C101ADD2B8B45257E9575EF027B52CB75FF7006D5C5BC63C2B77F27DB
343982A573B9DAD38EBA742E577BDA2177B5FBDADD822E1DB263201E7FC7BF59
505BBAA01E979F63FF8C84DCF1EF0B96CEE56A4F3BE46E963DB95BD0A5709487
4C9C23BA63A3148A071FF54785A253B2F85FD0A5E4DE158A73B77F16D4962EA8
C7E5275BF94709B95B35FAA62E577BDA2177FB2F5D35FC4AEEE67250CFD205F5
B8FC643F28217793056C720B6238D7A513E788EED88F0A45A764F13F97AB3DED
90BB055D0A473958BAA04BE128937BB7F744603E7C6CC7846FC1479C6985E2EC
9F56C3AF6485E20C7C52F01147257783EDE9F21DFF1E137EDA5F071F95DCF1AF
FB0F7CE6F2D80CC428148C326424AB1FCB039FA5C8C0E74C8BC74F031F55E9C1
4E95DCCDB227F76EFF7006D5C5BC6CF8B5CD31B7C12B804D2B1467FFA5AB865F
D5A5031F71C8DD0AC5B9E35FF0593AF01187DCBBC1F674F98E7F1B1F27DB2CCA
79DA5F9D8F3B26BC9CA7FD5572C7BFC75E13F58E278E09DF828F38DA5F1FF8A8
E48E7FC3B93A79E03397C76604A35030AC189D7964140AE6A78CCEFC10A3333F
C7E88C12A333CA6424E48E7FB3E1D736C7DC06AF00B61419F890BB59F6E4DEED
3D11980F1F9B3721B70D573FAD2C6093A7158AB37F5A0DBF92097FF4BD31485D
AEF6B4A392BB158A33B7D4E56A4F3BE48EE3C06729F88843EEDD607BBA7CC7BF
B2804D6E410CE73AF61B03C95264B2804D6E410CE73AF61B03C97E1C8ADCF1AF
5B8A0C45EEF8B7E1EA674197C2510EC696056C720B623857F61B0389BE370692
F938D89E2EDFF14416D4962263C6959121773C910535364AB2145936FCDAE698
DBE015C0A6FD5572C7138D8F936D9A5B53FB197522FB6959501BDB49D654D363
C6A8F371B03D5DBEE338B71499DB8F43913B8E3B267C0B3EE24CFBEB031F95DC
715C16D4C67692A5C8C087DCF184654FEE78E2054B91097FC81DFF5AF6E46E96
3DB9777B4F04E6C3C7762C8872A1B5B2804D0EA6158AB318AEA9CBD59E765472
B74271E6F4E6A573B9DAD30EB91B6C4F97EFF8F71FCFDC5264A8D53859C026B7
208673653F4AE6E3607BBA7CC713EEBFA04BE128076CA73F4A1459501B3226A8
E2D431AB1FCB8BE1BA1459D0A5709483B19DFE2851BC80DCF1C43F9E352F4586
5A8D93056C720B623857364A321FEF38CEFD1774291CE5606CA73F4A1459501B
B2A04BE128076337EB2889220B6AAB1FCB775C19A9D178BAECA04BE12807EC66
1D2551BC40A288AF9D562C451674291CE580EDF44789E205535AD0A570940376
B38E92285E40EE78E21FCF9A972243ADC6C90236B905319C2BBB53321FEF38CE
FD1774291CE5606CA73F4A1459501BB2A04BE128076337EB9D124516D4563F96
EFB83252A3F174D94197C2510ED8CD7AA744F1028922BE765A7829B2A04BE128
076CA73F4A142F98D2822E85A31CB09BF54E89E205E48E7F2D7B72C7BF8DE3AA
C9791A633F5B4A4963A17E720F847E7F57C4A01E3608DB6F5F0AC242FDE4183D
86AB4AEEF8B7715C353993BB59F6E4DEED1FCEA0BA98F7B4DA0A7F5A1ABD4D2B
1467FFA5AB865FC90AC519F82C1DF888A32E9DF0A7ADDDD7C8DD607BBA7CC7BF
E0B3145936FCDAE698DBE015C0B4BF4AEEF8D7FD073E43C6FC10B3FAB13CD89E
2EDFF1C4D36A2BFC6969F4B61499CB9EDCF104F82C45960DBFB639E636780530
EDAF923BFEB5ECEFF8D7E4C0E6FE039F21637E8E59FD581E6C4F97EF78E269B5
15FEB4347A5B8ACC514AEE78027C9622CB865FDB1C731BBC0298F657C91DFF5A
F677FC6B726077FCFBB4DA0A7F5A1ABD2D45764C2677B3ECC9BDDB3F9C417531
EF69B58DAF9D6985E2ECBF74D5F02B19583AF011475D3A97AB3DED90BB158A73
C7BFE0B374E0230EB9E3DF1CA64BE772B5A71D7237D89E2EDFF16F0ED3A5C81E
C91DFFBAFFC09A6A7A8C12B3FAB13CF0598A0CDCF1AFC9810D7C9622631E1972
C7BFC75E13F58E2772982E4596C3743F18EA713F2E1EAF818F3AA5C5E335E691
51C91D4F1C135EFBEB031F95DCF16F3857272FC73A0D7CE6F2D8CC23A350303F
65242AB9E35FF71F1832468959FD585E0ED3A5C89450FBC17298923BFE7D5A6D
E36B6729B21CA6E46E963DB9777B4F04E6C3C716586D831AFEFFA7158AB3FFD2
55C3AF6472044BE772B5A71DB24271468D2E1D358A22775C19B81CD4A57339A8
6DEDBE46E6632BF4F9D8C24B07C7289BC82AB95BA138039FA5031F71C8DD607B
BA7CC7BF0D573FA346E7E3607BBA7CC7132E07F5844175312F45E67250C91D4F
B8FF7C6CC5EAC7F2607BBA7CC771347A6BC552644FABADF0A7A5D19BF6D7073E
2AB9E338F71FF80C19A34C66F56379DE84DC365CFDB4B2804D9EF6D7E5087494
7AC7712607B6F8DA69C552644FAB6D7CED687F7DE0A3923B9EB0ECC91D4FB8FF
7C6CE1D58FE5C1F674F98EE368F4D6C24B913DADB6C29F96466FDA5F1FF8A8E4
8EE3DC7FE033648C3299D58FE5791372DB70F5D3CA023679DA5F9723D03BD53B
8E3339B0C5D74E0B2F45F6B4DAC6D78EF6D7073E2AB9E309CB9EDCF1AF654FEE
66D9937B07DBD3E5BBFDE35935FA2E45F6B81AD7391F270BD8E416C470AE6357
A3AF6429B247723797837A962263C6BF0CB95BE3B86A1A93A18E727DBC3D8430
ECB75C935E9F750FEA18A30F7C8EA6C911ECC7A11EF9579D7785EB7CE4DFFDB8
9FF979551F33A5A61995DCED98F072D6FE595053C9DDFE59505B8A0CC40C449D
F6CF829ACE28AAE1574625773B1658D5FEFAFE595053C9DD1AC75593B3C6BCBD
3EEB1ED4B12206F5B0E2206CBF7D29080BF5936374398214A592BB1D7B4DD43B
FE7539A8878D92A44836FCDAE698DBE015C0B4BF4AEEF8D7FDE772500F1B2519
324699CCEAC7F2607BBA7CC713DE84DC365CFDB4B2804DD6FEBA1C81FEA8923B
9E7039A8878D922C45960DBFB639E636780530EDAF923BFEB5ECC91DFFBA1CD4
C3EE94A44836FCDAE698DBE015C0B4BF4AEEF8D7E5A01EF6839214C9865FDB1C
731BBC0298F657C91DFFBAFF5C0EEA1932A699BECCEAC7F202AB6D50C3FFBFF6
D72747A08F1A8DA7CB962390E86BA6AFBE7AC2A6EF2FE4C05472C7BFEE3F9783
7A868C11DE33AB1FCB0BACB6410DFFFFDA5F9F1C813E6A349E2E5B8E40A24F78
AFAF9EB0E9AB276C2AB9E35FF79FCB413D43C604619859FD585E60B50D6AF8FF
D7FEFAE408F451A3F174D97204127D4118D6574FD8F4D5133695DCF1AFFBCFE5
A09E2163682C64563F9617586D831AFEFFB5BF3E39027DD4683C5DB61C81441F
8D85FAEA099BBE7AC2A6923BFE75FFB91CD433640CA02FB3FAB1BCC06A1BD4F0
FFAFFDF5C911E8A346E3E9B2E50824FA007DF5D513367DF5844D2577FCEBFE73
39A867C89866CA8A59FD585E60B50D6AF8FFD7FEFAE408F451A3F174D9720412
7DCD9495BE7AC2A6AF9EB0A9E48E7FDD7F2E07F50C19D34C9FCCEAC7F202AB6D
50C3FFBFF6D72747A08F1A8DA7CB962390E86BA64F7DF5844D5F3D6153C91DFF
BAFF5C0EEA1932C637B362563F9617586D831AFEFFB5BF3E39027DD4683C5DB6
1C81449F6F66A5AF9EB0E9AB276C2AB9E35FF79FCB413D43C6785199D58FE505
56DBA086FF7FEDAF4F8E401F351A4F972D4720D1E745D5F7177260FAEA099B4A
EEF8578E6029323982FD3814B95B385727CFE5A09E21632C7B86DCAD715C3539
6BCCDBEBB3EE411D2B93E8E2206CBF7D29080BF59363743902A5CE14A592BB1D
0BA25C68AD2C60938369D5E8AB92BB1D13BEFD3BD99622AB465F7267D9937B95
ABC495ADAC7B95ABC47F62FBD9524A1A2B8BC358CA610FF4D7A4D767DD833A8A
2B863AA47F312859F6A58BBF0594F84FA2AC7B17D8935AAE7B4F04E6C3C7F6CA
A2DB3E0535725728CEDD40A45464BF745A3D0298DE70D9C786FECAC26595DC0D
7C960E7CC421770BAA3855773AE802D982A573B9DAD30EB9777B4F04E6C3C7E6
5DF0CAA23BCD2D9DCBD59E76547237D89E2EDFF1AFFBCFADA905559CBAFAB13C
B71499DB8F53FE917FC91DFFBAFF34A7145471EA9A1AEA671E1FD589ECA739A5
A08A53D7F49450EAEAC7F2607BBA7CC713CF58237E57D39C5250C5A9EA68F42B
F8475D734A4115A7AAF3AE7005FFA8923B9E704B91B9D1E8A7FC23FF923B9E00
22B051A3F174C7761285CB413D61505DCC8BFF3B8E6BA6EFD2358EAB368D6966
5472C771C2FBA56B1C576D1A231895DC715C108697AE715CB5694CC0A8E48EE3
682C5CBAC671D5A6319451C91DC701FA2E5DE3B86AD318C0A8E48EE39A29ABA5
6B1C576D1AC38A51C91DC735D3E7D2358EAB368D79322AB9E338DFCC6AE91AC7
559BC6784625771CE7455D3AF71F351A4F97ED248AF8DA6961E471F563798DE3
AA4D63148C3A93035BE3B86AD398CAA8E48E272C7B72C7BF963DB99B654FEEDD
DE1381F9F0B1BDC7E5DACA114C7B813EFCD4E56A4F3B2AB977FCFB9E08CC878F
ED3D2ED7D6E5A04E7339A84BE77250DBDA7D8D0C3F9DCBD59E765472C7BFB03D
5DBEE38967AC11BF3B4D393F2AFFF8037CBDF34195DCF1041081CDE5A02EFEEF
38AE99BE4BD738AE9AC634D39751C91DC709EF97AE715C358D11DE332AB9E3B8
200C2F5DE3B86A1A1384614625771C4763E1D2358EABA6313416322AB9E33840
DFA56B1C574D63007D1995DC715C3365B5748DE3AA694C3365C5A8E48EE39AE9
73E91AC755D39866FA645472C771BE99D5D2358EABA631BE9915A3923B8EF3A2
2E5DE3B86A1AE345655472C713963DB9E35FCB9EDC3BFE7D4F04E6C3C7F61E97
6B1B5F3BD384F7A7A5D1DBD2097FDADA7D8D2CBE76747CBDBB742E577BDA51C9
1DFFC2F674F98E279EB146FCEE34E5FC00FFC79FFEA8FCE30FBA7AE7832AB9E3
0920029BF0FEB4347A5BFCDF719CA374E91AC755D3989F635472C7712EFBA56B
1C574D637E8851C91DC71D9397AE715C358D615472C713963DB9E389C671D5B4
F8DA593A944AEEF8D7B227F76EB03D5DBEE3DF67AC11BFAB29FFF8030D5F09A5
EA9D0FAAE48E7F1BC7559BF68254799D9912A3923BFE6DB8FA19351A4F97FD02
C97C1C6C4F97EF78E23D2ED7D6E5A06A2E07F584417531EBF84A2895DCF184FB
CFE5A09E30A82EE635D5F4BCA8AB1FCB7B8FCBB58DAF1D8D466FADD0E36BA715
3A4AC75742A9E48E27DC7F2E07F584417531AFA9A6D74CDFD58FE5BDC7E5DAC6
D78E46A3B716D6E36BA785F54E1D5F09A5923BFEB5ECC9DD2C7B72EFF69E08CC
878F8DC6429B5628CE5EB0742E577BDA51C9DD0AC5B9E35FE10F4A9FF0A7535F
A19097CEE56A4F3BE4DEF1EF3F9C4175312F5BA315DE9F692FD017FFFFC0EAD2
B95CED69475D3A97AB3DED903BFE85EDE9F21D4FBC6029B217ECC7C5FF3FB04A
EE78A2F171B2ED056B6A8FF3712F588AEC05FB71CA3FF22FB9E389C6C7C9B617
ACE93DF853FE9D8F7BC152642F98D2947FE45F72C713D91AADF0FE2C45F60272
C7BF963DB977FCFB0F67505DCC7B5A6D85F7675A35FA2E9DCBD59E76C8843F2D
8DDE964EF8D3D6EE6BE48EFF6485425E3A97AB3DEDA84BE772B5A71D72C7BFB0
3D5DBEE309F79FF0A7A5D1DB9A6A7A8ED2D58FE555A3EF5264D91AADF0FE68D5
E8AB170A5925773CE1FE13FEB4347A1B3297FDEAC7F2AAD17729B26C8D56787F
B46AF4D5A9D178BAEC6AF49528E26BA7855572C7134FABADF0FE2C45568DBEE4
8E7F2D7B72EFF8F73D11980F1F9B8F6D337DC91DFFC2F674F98E275EB014D9D3
6A2BBC3FDA0BF451A3F174D92F902868F4D60A7DD4683C5DF60B248AF8DA6985
4AEEF8D7B227F78E7FDF1381F9F0B1F9D80AEFC91DFFC2F674F98E271AAE7E46
8DC6D365BF40321F07DBD3E53B8E13FEA096227B5A6D85F7477B813E1ABDB542
5F7CEDB44225771C27FCE95C8AEC69B515DE1FED05FA68F4D6C2FAE26BA78555
72C713963DB9E309F71F351A4F97FD028982466FAD183247E9EAC7F20A85BC14
19351A4F97FD028922BE765A71C7132607B642212F45468DC6D3650B7F501245
7CEDB430B9E3096A349E2E5BF8D32951C4D74E0B2F45468DC6D3650B7F3A258A
F8DA69E1FDB84221933B9E70FF8148A9C87EC81A2EFBD858FD589E77C12B8BEE
34E14FA74AEE78E2054B91656BB4C2FBA3BD401F4A2577FC6BD9937BC7BFEF89
C07CF8D87C6C83304CEEF817B6A7CB773CD170F5336A349E2EFB0592F938D89E
2EDF719CF007B514D9D36A2BBC3FDA0BF4D1E8AD15FAE26BA7152AB9E338E14F
E752644FABADF0FE682FD047A3B716D6175F3B2DAC923B9EB0ECC91D4FB8FFA8
D178BAEC174814347A6BC590394A573F965728E4A5C8A8D178BAEC174814F1B5
D38A3B9E3039B0150A7929326A349E2E5BF8839228E26BA785C91D4F50A3F174
D9C29F4E8922BE765A7829326A349E2E5BF8D32951C4D74E0B4F69854226773C
E1FE03915291FD90355CF6B1B1FAB13CEF825716DD69C29F4E95DCF1C40B9622
CBD66885F7477B813E944AEEF8D7B227F78E7FDF1381F9F0B1F9D8D25848EEF8
17B6A7CB773CD170F5336A349E2EFB0592F938D89E2EDF719CF007B514D9D36A
2BBC3FDA0BF4D1E8AD15FAE26BA7152AB9E338E14FE752644FABADF0FE682FD0
47A3B716D6175F3B2DAC923B9EB0ECC91D4FB8FFA8D178BAEC174814347A6BC5
90394A573F9607DBD3E53B8EA346E3E9B2853F9D1285CB413D61505DCC4B9179
51C91DC751A3F174D9C29F4E8982466F2DBC1499A394DC711C351A4F972DFCE9
9428E26BA7859722A346E3E9B25F2051C4D74E2BC81D4F58F6773C617260A346
E3E9B2853F9D92A5C8A8D178BA6CE10F4A42EE78C2FD0722A522FB216BB8EC63
63F56379DE05AF2CBAD3843F9D2AB9E389172C4596ADD10AEF8FF6027D2895DC
F1AF654FEE1DFFBE2702F3E163F3B105F42577FC0BDBD3E53B9E68B8FA19351A
4F97FD02C97C1C6C4F97EF384EF8835A8AEC69B515DE1FED05FA68F4D60A7DF1
B5D30A95DC719CF0A77329B2A7D556787FB417E8A3D15B0BEB8BAF9D1656C91D
FF894C0E6C85425E8A8C1A8DA7CB16FEA0248AF8DA696172C713EE3F6A349E2E
5BF8D32951C4D74E0BAFA9A65728E4D58FE5BD6029B26C8D56787FB417E843A9
E48E275EB01459B6462BBC3FDA0BF4A15472C7BF963DB977FCFB9E08CC878FCD
C7B699B22277FC0BDBD3E53B9E68B8FA19351A4F97FD02C97C1C6C4F97EF384E
F8835A8AEC69B515DE1FED05FA68F4D60A7DF1B5D30A95DC719CF0A77329B2A7
D556787FB417E8A3D15B0BEB8BAF9D1656C91D4F58F6E48E27DC7FD4683C5DB6
F0A753A288AF9D161EB2C7D58FE5BD602932E10FEA8E274C0E6C2F588A2C5BA3
15DE1FED05FA502AB9E35FCB9EDC3BFE7D4F04E6C3C7E663DB4C9FE48E7F617B
BA7CC7130D573FA346E3E9B25F20998F83EDE9F21DC7097F504B913DADB6C2FB
A3BD401F8DDE5AA12FBE765AA1923B8E13FE742E45F6B4DA0AEF8FF6027D347A
6B617DF1B5D3C22AB9E309CB9EDCF184FB8F1A8DA7CB16FE744A14F1B5D3C26B
7A8FAB1FCB7BC15264C21FD41D4F981CD85EB01459B6462BBC3FDA0BF4A15472
C7BF963DB977FCFB9E08CC878FCDC7D637B32277FC0BDBD3E53B9E68B8FA1935
1A4F97FD02C97C1C6C4F97EF384EF8835A8AEC69B515DE1FED05FA68F4D60A7D
F1B5D30A95DC719CF0A77329B2A7D556787FB417E8A3D15B0BEB8BAF9D1656C9
1D4F58F6E48E27A8D178BA6CE14FA744115F3B2DBC1419351A4F972DFCE99428
E26BA785A73414B9E309F71F351A4F972DFCE99428E26BA78587EC71F563792F
588A4CF883BAE3099303DB0B9622CBD66885F7477B813E944AEE78C2FD0722A5
22FB216BB8EC6363F56379DE05AF2CBAD3843F9D2AB9E35FCB9EDCBBC1F67479
1CA75C25251A0B4D49495977FC0B4460A346E3E9B25F2051B81CD41306D5C5BC
F8BFE38966FA2E9D8F6D337DC91D4F08EF97CEC756784FEE782208C34BE7631B
846172C71334162E9D8F2D8D85E48E27007D97CEC716D097DCF1443365B5743E
B6CD9415B9E38966FA5C3A1FDB66FA24773CE19B592D9D8FAD6F6645EE78C28B
BA742F588A4C890A7C972BB9E35FCB9EDCCDB227F76EEF89C07CF8D8DEE3726D
A95172B74271E696CEE56A4F3BE48EE3C067E9C0471C72EF06DBD3E53BFE6D1C
576D1AE3FB83D65176F47B058696EE68B28299D62DD8AC322AB9E3DF63C2CB79
1AF8A8E48E7FDD7FE033644C9759FD581E6C4F97EF78C22D45F648EE78E2D86B
A2DE71DC7B5CAEAD1CC134A7A35472C7718DE3AAC999DC719C5B8ACCEDC7A1C8
1D4F847375F234655BF73D1604EAE299E610E51FF9572577FC6BD993BB59F6E4
DEED3D11980F1F5B6035FCB60D977D6C90BBC1F674F98E7F9FB146FCEEB447BD
F3512577FCDB38AE9A9C350648F77A6512DBDBEBB3EE411D037DE92456F686D7
EFED218461BFE59AF4FAAC7B50C7C4D231FA0B5A548A52C91DFF368EAB26678D
01D2BD5E99C4F6F6FAAC7B50C7405F3A8995BDE1F57B7B0861D86FB926BD3EEB
1ED43178E918FD056D678A52C91DFF368EAB368DB12456F6063D2CF67FA5B172
450CEA61A124EB416874AF2C1687D7EFED815012DD7F60DAA3D2833FE55F758C
4AEEF8F798F0729E165471AA4AEEF8B7F171B22DA8E2D435B5C7F9B8A08A5397
220BAA38753F4EF947FE2577FCDBF838D9165471EA9ADE833FE5DFF9B8A08A53
97220BAA38754A53FE917FC91DFF368EAB360D7C8E86EA545572C7BFFF78E696
220BAA3875352EA8E2D41F513FFFD39FCEC77917BCB2E84E732AB9E3DF67AC11
BF3BED67F4CE075572C7BF8DE3AA4D634001A9DFB2A8E05F462577B3ECC9DD1D
6C4F97EF0622A522FBA5C85E59B84CEED638AEDA34C6F7070DEB4152E5FA78C3
58CAF5A4930533AD5BB0591DA392BB1D135ECED3C047257773FF81CF5C1E9BE9
323A538091AC7E2C0F444A45F64B91D5238091BBB9FF40A454643F64AF2C5C5E
FD581E6C4F97EFF8B7715CB5694CB8580E1D2A36F9850AEC815012DD7FA060A6
750B36AB635472C7BFC78497F334F051C91DFFBAFFC0672E8FCD74199D29C048
563F960722A522FBA5C81A2EFBD82077B3ECC9DDDC7F20522AB21FB286CB3E36
563F9617580DBF6DC3651F1BE46EEE3F102915D90F593D02D8EAC7F21AC75593
F334061490FA2D8B2BF68707F514FCCBA8E46EA00B640B96227B24773BF69AA8
77FC0BBA40B6602932D005B205FB712872C7BFEE3F102915D90F59C3651F1BAB
1FCB83EDE9F21D4F3C638DF8DD698F7AE7832AB9E389C671D5A6812E902D487F
5E25773CE1FE53B675DF6341B0FAB13CD89E2EDF71DC31E135F051C91DC7B9FF
C0674D353DF039D33A95A3AE7E2C2FB01A7EDB86CB3E36C81D4F58F6E48E7F2D
FB3BFE3539B0B9FF40A454643F64F50860AB1FCB83EDE9F21D4FBCC7E5DACA11
682F68513A4A25773CF11E976B2B47A0BDA0EDD43B5572C713CF58237E779A72
94D73B1F54C91D4F348EAB26670D74816C41FAF32AB9E35FCBFE8E7F4D0E6CEE
3F102915D90FD92B0B97573F96EF78C2FD07BA40B66034FAA11E1F87EC71F563
798DE3AA4D637EC0A83339B0358EAB368D51302AB9E35F1A0B4D7B418B52C91D
FFBAFF5ED0A2D654D353A202DFE5BAFAB13C1A0B4D7B41DBA9923BFE75FF29DB
BAEFB12058FD58DE31E135F051C9DDC2B93A79DA0B5AD490295181EF725517CF
B417B49D43A64405BECB555D3CD3C067C8C0E7689DCA515572B7C671D5E44CEE
D638AE9A9CC9DDDC7F2F685143A64405BECB75F563798DE3AA69CC2B8BAE9DD5
465CC3E58051EF66726073FFBDA0ED1C32252AF05DAEAB1FCB6B1C574D635E59
74ED2C665BC3E58051EF6672606B1C574D63C4FC110D05FF322AB95BE3B86A72
D698897FB5B3FAB10561002C08FE617920D257B6EA625EFC8FD107BA40B64009
B574287DCC4017C816281895DCED3D2ED7961A2577963DB957B94A5C56D6BD7B
4F04E6C3C7066413A7A546C95DA138734BE772B5A71D7207DBD3E5BB358EAB26
670D7C8E86EA547506FC96502F9464BD8EB2A3DF2BA0E0DF07A010C6A8E46EFF
78E6962243ADC629A7733EEE8E7FDD7F6E34FA15FC903DAE7E2C0FB6A7CB773C
F18C35E277A7392594DEA9923B9E681C574D73FBC1508FF3AE7005AF333F29A3
923BFEB5ECC9DD9EB146FCAEF6A8A35472B77F3C734B913DAEC63DF853FE9D8F
6BB8FA19351A4F776C27998F83EDE9F21DFFBA1CD41306D5C5BC149917952CBE
765AB114D923597CEDB4F052648F64347A6BC552648E52321ABDB5F052648E52
72C7BFEE3FCDFD885247A3DFCF3F0ED9E3EAC7F21AC7559BC6281895DCCDB227
776B1C574DCEE4CEB227F7C2F674F90EC8264E4B8D92BB17B4A8A5C88E09FF77
B2698F2AB97B41DBB914D931E1FF4E36ADF3917F5572F7CAA2DB3E0535722D7B
C5BD3F01FF000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000001B

BSAVE CORE.BQY,A$1000,L$3400
E00G
David Whitney, MIT '90                     Still learning about my Apple //GS
{out there}!harvard!think!whitney          and all of its secrets. Any and all
whitney@think.com                          technical info appreciated.
DISCLAIMER: You think they even know I'm doing this?