Path: news.uiowa.edu!hobbes.physics.uiowa.edu!math.ohio-state.edu!cs.utexas.edu!swrinde!elroy.jpl.nasa.gov!decwrl!amd!amdahl!amdahl!fadden From: fadden@uts.amdahl.com (Andy McFadden) Newsgroups: comp.binaries.apple2 Subject: HardPressed Inact/React part 01/01 Message-ID: Date: 29 Oct 93 03:23:36 GMT Organization: Amdahl Corporation, Sunnyvale CA Lines: 82 This is a short piece of Orca/M source code that will inactivate and later reactivate HardPressed from within your programs. This is mainly useful for people writing things like backup programs and file archivers, who want the files to be stored as compressed HP data instead of expanded first. (But, I figure somebody will want a shell command to turn HP off...) Anyway. Have at it. :-) BinSCII + ShrinkIt. FiLeStArTfIlEsTaRt ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789() OHPSTATE.SRC.BXYAsAgAAAAAA(4HIAg7yFAcRxCUswuAsAgAwJl MdkCCA(wGAAg7yFAcRxCUswuiCgAPAgCTBFSUFEVT5SRuMkULh0UAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgBAAAAAAAAOBQApbU9yXObAEwboAAAdRxC wkwGLkSBb0FFFEQCAAQAAAAAAAAAKIKAAAAAAAAAOBAAYbU988CqAMAAAAwAAEAA jDgOAAAAAAAsAMAACAAALAAAb0FFFAQCUsAAJsRXoUAAdRxCAkwGAAQBDAAAAAAA AAAAAsAAgAAAAAAAAAAAAEAAAAAAAAAAAAAyAIAAAAwA)yPAAcxXJ4BAoBAA0NHc lRXYzFmLAAQbAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHtt)HEwi4Y32DCba pgIIArdYGMVY3wJxMSedmjTaGmZDI7tZkEYAywBjUSOUnOTmDmBDAKvQGKOCmoMj Ey4YRPXIqEcjEiMcSNWoZgwB8oFOnOUGZ4YRS1ABmNZQzggDCiRaVrDa6gQDCrBa GOSqxoZT8iMImMRaXsRjuvQSUGLApSlKQ3dFGveK70ZKID0bHjUgdgE7IEUamIuT kEFDKwAUGLllE3BM7kQgixgRwoJDM6sbRgO5SiEpm)qJWHWF7oRcASUZyOKEzuEZ Sb6ZZEYAoIBR0C0QnkTG0aGjqd5ankWFnSUDyb(ccqInQbsjIGkZGOMekfJzDM1O 4h8N9ShMemYj06uzQe84y2Ev5wHqZz2McHkoTwcusbU9MP9ymNhv4EkjuODiYnjj 6kCUwINF(7zAwKAnOKOjqA7KbB105)zTjDn3ElNhNMoCoUcCRAywPThOIzuj9EGE YqeM5HS7htE6EW7urMAeyjfv0kzCupKI8oYNMgIZDRf(QYzgChJlEchCILyG7Qy9 7uL7ormv5Lij2gqMSi3s3UzAOtu3uAhSNq8cwoMvyw4wyLGiaTDojqMibctAMn84 zDBQu(esLrCxEYbtP8ysstSbBJDzEOBOsdNNl2yMwqh8GxaI6iiaaDCP3AMCjApz wUfohMcrwvuHP4c0uX)CEx4xUHiACLPs3AKzDjC4y470(oIvoKO8P34IyoJOnAxr MELNI)6NsqiyBKgd3tlVq6sMiRhi5cKioDDWIlT1IXTNbPMPh300xKsSJ3RR1OAD qMPRWnLLohr0ZXTU)OMptjbtzjUcvtEPnNDyNa5ISZ2N8G6zpXBKzPDBhAv6OCwq dJ1TDj2ycrDokgIYFq2hxkqzvDN53(wKgi2CajgBFQgBijjgAFcCLEOcYqoKkoog iiDnMLbAAktUQO4mGoogAZFVWmCCGkBgY)Sl7Uc4KSLgsozPjC1WehYN50YWMrhN V1D0HAmjwatsSbLda1Mj72agKXlTAfHsxqiiYOgNUzcqmthZDGRP(S8uOwlT1Lqs cziXQEkvn62WYZG6LyrbOMoluQtNikgwZCpGxtpZllh1AtxkdiIjZClwkiCAKIMS gKoIAjoI1huikbIPzqgcrFfIQSM6qh(wxY1MNOGl0o)90)lkjOCQQFIZgsuVVzz5 NmC7NPMbqrTI7MHU6benQcmoMCsBJXrVlPEmgRWA9eoe(rpxGUuPk4PD4Ps7Y(ig DeYxBPPfE(xTklopAmGDKrxQKfJIASOQJhCKTqFwUR(h7XALN8xO(eM1PgrNZaPB AR7gnJAMn8WvLNT8IYiRYjhvWUGQKEA2iCNzkSDiAiHD4Y2AXECmCCF4XhYDGKkc kH8Jjx3jS8FOCCnYQmBeI2CDOj4VdIIcJGqkAsiKIYYGcGivjoA4QMcoGIFLvzxP hUyMa(xg)cBQJGBPilZLy2AE4L5GN8i5TMEIZiJChaZKhI4Vg5QAVeE49BWTeCcZ CxKH21Qm11A0IOEaCIoNmwqGSe9DZ0BI4XAOPWSOBIgoY0)H6A0AgAZbAPMOoAEx PQM)6lRBUvRwLKI9iQOVCyGlwhuZmFRSc(oUMMC7IfB)y6oWEfKlGEEpIdodVeqL lO81ACE)8usAl3Q4jFqkhSJJAQqMwSGMoyhA2QwQRFXeBSiuwH2HEARSzggsz2Jv HapMTKXOw9kO0k)wyNTCXGt(ii(OIRsQAa5m00JQ8kAbGm8uJg6JcbvZnlzYooMA E5UAaz)OTTZdCrCkykALMEAOKBgTFxEGTCVQmZ2DIuxUGcirTRdGkxxAmp4hWxyJ GBIHRpeOA6OdblrMoMX102hJEEU0Zu1n3DT5BZeODEHFQrJAkOuAn07DC)lLA0VV BbxsKkEJXEgiCteIZvBpy5QS7kAUWMQDzZrBVLWUoCGSPYIUYdUlWK6P25bp1Mmm iISKpAaOGCb3J6wfx)NCEXKiHYt(5RXlanyAj4NgNItOwFQVYMIQZZD1tVBrVVZI CX3WgODAnQpwIMiKlIeG4Z4nuMEquWZgDIvmBnYtR0QDuGBDKITqPAC7DDYdzhve xCeIiAC1IPUoQQtHFoDVx(xLgNGbadsR7Jh3IMC)geMMOPwVEfqRzxGzLj89Sbwc yNUNLvjTVKCs3YGFsWPzIhHYwjNXoUQon9OXed)ys2KylzuVgZD5QBAM(poKJMr3 Ld)dO4vgC6LgfBTEfvj4XujArZPdJfWEYeAgEAYjDiRMGNfOWuHo(PZ4XsdhEBpp qRvxdA7iEM1goO5I)iHVR6GDwCiyOI9g5NTCFNIEZKPVkbrbLUUtgxRU2Im9HYH3 Po1ZwodZElNoEAGTJh8uhzhYlFv7USeBwqdgXOzAEZlhnOWRsKDYq(jJ7PST2EcH QpYDWQ0MEGqDdLgGTsUDJnILyZY01YtN1GA7Fs0iTK97vRBo55KflQk35zMR7Nbn GgXfAs9BG2I0PAaDcKGPZWqMO7kTgC0j9u1BXKbwGkdUwCjdFJlZEdstnBqLIdAT Cr1tapSWc5Sdz1gZeYAOIOgZfzfRg2OxWfCxHqIpjIGzyV4lLMjaLpNWhzd0lyS2 yNdtCaHoB3ZdFVuRl1WWgM76JEOOskcibpyGwGDtqxQY)x5ktzvj78IcuX(vWvpM K)abo6eXbE(AH7MF5EK1el67UNZwtuSsVgVOdnlZ6OmKiwtmjYcVsUwYwZcbmHlV 7ZlygNUkeSD9LWwaobmNd)j0IeqtNh8fug7QzHzXKY3VtajlIVp(iIHGWhSuF3Yb nP20OntEHwsw2UIowhBCOO9YNWLNY1aWHsjWM(aIrDDySmhdaZKfsYb9eEws8MOR Oo05DorMaNjwXz79H6H72DR1xBqryjmSSqjGvbFiidq2Df0XT6uuk9qxpz25ycwX do80DYq0PBp1KX87BEvgOlImJ(UXuQQAzBVFqPisgGo0ecK1SMHPVZYVRf3b1ZpM uI)iXvi(rY9bGWzqh1dc41nwGFyjNlIMUIB3YH612(TUNP5iCudbgDAwKfrFkBKN kUzGvbBC4fIvQA08rQDgynuI(IIXquIdq3dD9ytjuD(G)8A4oog3XZfy85mxoV5G HjPAfbtN7avfw7)P7)3ngEQQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA Actf -- fadden@uts.amdahl.com (Andy McFadden) "Our UNIX is bigger than your UNIX" [ These are my opinions, not Amdahl policies. ]