mhill@pnet91.cts.com (Martin Hill) (11/20/90)
Here's a little project I worked on for something to do. It purges all purgable blocks and then compacts memory. It's basically the Purge.Mem program in Merlin-16+ in CDA form. FiLeStArTfIlEsTaRt ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789() MPURGE.MEM.SHK AgAoAAAACA(4GIAg1OHAzdBARsTtAgAoAUG1 GVvTlzW6CEPTAAAARszFKIhWPIAAadBAAogEAEgAAAAAAAAAgCAAAAACAAAAAAAA GVvTNBD2DAAPAMAABAAAAoDAAAw4AkLAAAAAAAAAAAgAahgLAoQEkAQARoFEBAgC RszFKIhWAIAAAAAAAAwAAAAAJAAAAAAAAAAIAAAABAAAAAAAAAwbAgMACAAAAMAA hCAAF4BOnDAAAAwAyVHUuU2ZtVWTAAAAAAAAAAAAAAAAAAAAAAAAAAAAQBAAnJXd NBSZv1WZgkncu92YyVmdkVGdyZGIg02blhGdoNHIsxWZwFGIpxGc0F2Yu9WavRHI oRHIDBSZgEERgknYyFWTulGdphEIuwGbPBCInlmch5WawBCbn9mctFmc5JGIsdEI g4WZlJnQu9GZA0gLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAb7PAkTIuK4xAQNAbBIA4VgAAACBECBAMXMACIhBBAUAggCAIzFJ1LyopaXmJ IDNgINS0MIfkARmIIOisk)2kAmK5NCIEWuomEpCrvUB4SFOAQOA)0GCzoQ2BDABg FQBoAZAaAoAAAag4EtWVqIAoTSQABqlmSVvKBx8EqxFhASgTCHCwb4AVQgQ)LwhN c3DEQrmwAqkKAoAZgPEwg6iboY8cLkKgdQYAaFfvQnQ4AyACGctRyJHNA0cGGsKE SAEMZ0gxAVmNC5AqcyohmPnMDZKra40RoXXMRaAwIyAhnqaETFNpIshZeBlAzn02 s5opK7EEjFK4yCInPvRkzFHpDWkxKwcbBYAq5piPOngZfZ1fBwfHHAe1QdDGIAgX wBXEAAAZNHkB6ZdKBSIYgihQcripEAhMAZgR6lgAnJKEEElKEAE0RLMhD1wBEhCA YAFAWAOABRFALkpBgNCBYDEREeQEAAwVIwhBEgHFTmhAaQQ2pDQAYgRQolDQgxBR FACYAaAAM1z5hNF7KxAAJCQEABgUIQhARTCR9EBxWCB5UiCBgKE4DQEHLoSDaCAE 8jCWwxMYguBQMaQg12CeKKkNl(YKjAjygTtp76GyAQ3MQAQAvALjLrDtPNDuIAUm dzwwhAA5G4IUQTdLocQBpEYBwgXDEsjQAcMoZREA3QIYtmxSEVAFeCYB9o0RVVdN TyYMg1Ghl(OEYBPM30oiDglxGmDhQP6KttXX48LgS0Yn(IHhF2(Ct7gp1r9pFAAA eDRIIDV(deLbTt9rAQSuj3GBb1KV9D8)4RMMW0(2G1ySeUJjgaQEUB65ThXRB0yj KpKE9XGCG(Foz4HAghhTXFIewFsbYBAbFjDbLMYAVAQkYBGRNaZ4qDy)mjmWDSQw QzhM1EBogWoO6YTEQAYloAXCGJ4RgiB3AlgrANMMYgg)HEAygHySEdYQCCSioE9N oGIxDDQI3oQQQoLg(L6AKkAFaBdOZgagUOGAYQDAsJLhWAvBndBAeCQCBAZAf8JJ mleGHXJAtDECoG0nzimZ8Jha0TAohdWzIcBVQfNO3Ity8LgAxxdZkKOo7xICohhb SVAgGEGgor(MKJxIkGtLDAykZSUSZ6vZSQAICDIiykDjUUWAxqVVgdZxmHrpQL3m BcSuYpDCnkYQFhosuXHGACUCRq(BB85(e8qJGMnnewLUWk9AAsH)AlBoDPAfoBEG YsR7tHGQAGR6H3(XWBIEQsZ7tTFgglQDpHvqIAQIQ8lGgCgACkS8Z8IAAsxnxfJk AEQQfnRaABQE1HvlfBAAE8VGAKAbrmT85PgALhwxSAACECtnhyFKBccC17EAGjtR AwTMDAwAAAAA6AQAAMOAEAAAAAAAAAAAAIAARcCAKIhWAIAAaZhOAogEA8gASo1F CAgCAAAAAMAAAAAAAAAAAAgCAACAAAAAAAAAAAQAAAAAkBAAAAAADAgAAAAA5wiy AAwAAIQRNBFAlJlLuQWYAUWTAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAb7POCNYC iFjARiIvOU0422AGAAegc6YpAV2MTnCNc2o5GCCPSmAE2GOca8gFgyLdIgQMkX2O znEzI0gxbiRMDFJhL14JYnGJZHBsImAImH2OYRLvIwghSjmOS1JCZ2wxnjBMhHAv Zy0ksmWMzUqGLxUdPSDlYnooZEG8bPxFjAIgZ085UHWOrmmmDykN1NWODgggb6wB CPGN5xG1YqGddtBjBBAgIwSZOn2iDzA2Qfm5SL3nTFK0MVixYfEEhYAdR5ERcGmw aDlgYYOw0WnNMSt)EzmR(LXiRkmuKa8wmPXvjQBUi5oWMDiqqlGvIMDVJnKNTRBY l54h3y5NTVhTYEkp5Gh4z0h7wzkpnbd1rnqvROuBe(SKbnFTc3m9mO14dTj(b5k4 SbvzIm6CviokqDBMB6KEDGUAQ4zTDJHvAFtKzMCISZPs5kTTsAh2AS)Oxuw2QwFI KfSyuoEpKyTD6GpEK53MazoawukAhYQRNw8koAkyisoALMH6EXrLNq6k6omMzgqU JLrp6c5O0O0I4h9840w4LjFWh1RIOCHZiICux0o7Mgn1Mj(wxmETQwMJnn6SjKI( ymzsBNCVIphOioryighpsa(wnOyugbuyt4gCpL7HCOOjqOEYckBLrywKwjK5cPfD 6GMOoZcO386SzhGz6sLw0OWLIa9vbbCyMtsHKp8ROmI7aS4EgS1yGvNTMFQhl4Cx EA5NcOco2ABdA2ZKYNAgIKnOxUYwjjJ6SUf2fCuAFzabspt9W3duB32WbZR7pCwY AccP UUCP: bkj386!pnet91!mhill INET: mhill@pnet91.cts.com