ST6934@SIUCVMB.BITNET (01/01/91)
This message was originally submitted by ST6934@SIUCVMB to the APPLE2-L list at BROWNVM. If you simply forward it back to the list, it will be distributed with the paragraph you are now reading being automatically removed. If you edit the contributions you receive into a digest, you will need to remove this paragraph before mailing the result to the list. Finally, if you need more information from the author of this message, you should be able to do so by simply replying to this note. ----------------- Message requiring your approval (163 lines) ----------------- This is something I got from America On-Line some time ago and thought those without GS's could find use for it. Those with GS's may use it or keep as a collector's item. A location for source code is included. I haven't checked it out yet. FiLeStArTfIlEsTaRt ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789() LDHR.AMPS.ACU Awh5AAAABA(4QIAg0yJAS5gLWIisAwh5AMLe BAABaZGAr5WaAYTAAAAAAAAAA0NAAAwAA4PHAAAAAAgDAAAAdDAAAAwDEAw4AAAA AAAAAIAAAAAAZIGAiDAARIjrW4a9AYwBElT(ExkQUN0TAIAAEAQAAMAAF8)3AcAA JAgBAgAAKAwC)rJAOAADA0AAPAAE)vIAS8PkAEBAT8vnAQBAM(fjAUx)WCgF)f5) T(fkAcx)YAQG)vJAcAgGAsBAd8Pn)rIAgAgHA8BAhAgI))IAk8vkAMCAICQJAYy) d(fmAcy)o8vh)jJAR)v8Aky)qAwK)7LAtAAL)vKAuAwLAADA2(vuAEz)wCgMAQz) JCwM)36)1AgN)HLA38Pr))GA4AQO)7MA68vqAsDAP))uAwz)T)fv)f4)3CQPA4z) A9vyA8DABBgQ)PLAD9fy)TJAy(Pv)z))ZDAR)f8)N)fxAY0)4(vxAU0)Q)fu)X5) n)v1)f9)IBwR)LNAo()r)b6)J9fh)3NAY))y)T7)LBATA0EAMDgSA40)QBwTAEFA IDgUAM1)1(P8)f6)t)vw)v9)p(v3)X))g)v7()))j)v9Oyw)cf5ZoJHlL(nz53U4 sXcuMY)tATjaXHxn75VUbdsBrTZrxCCDZMmsfPLrpn)qa35IUm)j0Y3Yelnq)TbO NKfayivRmp7kXZ8P)bi(DVYRPqxtavv9rcuWKzQ55f)iNTED7(E7mZ7ztHx3X7L0 tm6q1x6juLlvQz7o5eJlqDnz)ucYBvfEaPkOdPtqt9lff64t(x8WHm)Co9pnz38R WFqyPHW74SFagu(dPXTFad4KV8YtdT2Y9K8pTK)WT5e0yx787VFq7lOPpMlEnB7t crCNwV3uP8NtnvNm6OOrbNYOs45VNIPPCar)H9mJVPEt3vn5F2XmGKHl8IBa9sf2 mBfsV09R1ZQ6nIVdbHl2ZeGrM8l8SxwlRp9Jyx783wCW7omgX5pa1dqDndDXKvOc HV4kJFuv2bx)0aEjmX9Q5d)e7dvsVwo48qpF1JUHqSnheS79zfXJnPkFPYdxbUeJ QnkotHBZ5XLU82n3KfR27QkF(2GV5(5dMnB6KJkvCOTO8miWJPqcJGx2CbeShIu) eOPesX3I5)Q(DVXusPCtVsMxEV5iaDykuMW)m2Fhenc4Zm471SQfqLpsEnODn1aP 82dyL1Th30VYjIHvqFq27378WSBqwX6LRkOl9JQTfLixtPh7xvDCq(lZd8f00Mfq jtb(yxr6bn8oI1fk3gWn894P4Y0s)7pnGWOeQ2rsHnlzGMXd8z))57xLYVuBi(z2 tDRSXEj)NrqgT6(9jmRndCW)2Cp28luqbh0ZbrbdMfw7zPV7YJHv)eILJDar8Hy2 rt5eRcsZdP6P(K1VtJZIOEdHSt5k)bjjfZXLfaDvqJYNY6usc)qOkLs)SvSLM48u p)gN5Iph)0DEP5Q03AtfPl7X7Qk62xI)lXyHkR6GtHx3ZQOUdnJyMMcjtusVDTJG XvXrdxVc8o2xIMujvqDL95D37X58LeDXoGd2vGhpyjG3)jgdaau3hma2DxHpelAN IFfubn8pr8c8Bxp8ke3)kPtzl7w73uSxz38TOFmyR0vyhrE1NtRlI5o3XIDTOSyK 8KBaJPqc0Hy2eO4OHh2nlsxPrsR5faD78ouR11fuDLHvnPFJ2uRlSAC9cj5koJHl L(nzveR3NeWzEA7Pf586gMJRxGm2M0EHJ6vU9EXeB)p72m2(2Z2JzPNlPXzHZe4K 3m86Ie2(LFoJ5okb)eONL0Shae9LrkjSSLrVnI1PyHn2Py7y4LXxZTr8kH9b2hY7 oEDZM(dKOoNovvZVJfe3J(u3DRbR6)teyXyMwn4Es9Pzmg4M)7Zg0WUune5wk7Xz ORqF2PGtO9Fufbm35ca4NJhV7(ngnicrL(XzveR3hcWzyB))UmarR75w4aHiJXed fPiwvvNE(g8Zurto9b)HE4w6s(l0lNI1aj3zprcLf6ZgxOHanrpkbNWl2h4Z6)NS yXyMJl4EF3soiSx22oaHPt73dIqdf1xZP)M8RK()7b0b1CQ)LHy93ZAkHiGuShKH kyeOzSoNOrq7neRId52Cdcaqa37QDswuaqKWdWDVl9GjdGX)Gi171uqhcOWMHimL uHPqW(PH2tYYOqBi7qt2DUxifviateaql52POnf1hoNAMo6B31HoasIEWRtBdIq4 rfQ7WHNjtU1q3Fi2123((pT37Hjb7zeL1x6hOLlv4HMI6seHVeAWtemmGkuGB29k )4MwdtLE3(8x9y2MEpF3yfxuj)3jnrFyMU(K9jgE(oEb7PjEUqGC2LWuTkaH1CZ7 KflzZRffWslDSd1mikBzgXW8u0WErxFvQVuKo6eub(0LjgR)JfbfuCl761KpmPAB dOixYEcdn1XbxJSf25zrRuCr2lP(7LHv39Deez3XR9E5E1iyjcbyzFv2vl9iulcE v2hvKDB3HiCj4))no5fmHh1PAszUV2SV350w103(RYd2biV7LOn8x(W2I2O5ziud JmNHKdhNMfjyDRrT7X)wpBjUiJ59EfPWj4MzBzZpyPdRewh7GqVOLMC3dlZQ9tg) 6Okl1pdIEVnt8S9OPu(aD1CHBcftj)YyioEmnob2mB0zSAMjUML2S8nnPD6hSxjc clhyv3CNRHuzjXKc5lNMxYf5c0wc7NegRDR5fKk5)Bd5Kjj(R(gm88PekcU(iqz2 3YSHtxRp8sl)Svf6iIbzTVxvbU55t9o8j4bzzFv2vl9i0)folxREvfQzL6(5TW0b VO(t7f82ivfueh)40SUOnBduUFRuRRc7wzn1(6ufotI(rzmErbHiFnL(QeL72gob fYyFOkF9Ca5eoUJlPN)xoxs4K9xvQu)GTw)fSKy827YXqW3gHqiW1QVnrxbnWu6K wceI16taqla9QHnOjCaOubvtdavgjjr2OEnjUV9a33e3IuelZhudzqtSfDx7k(7u uV5GkOPV3s07fT7awx4VBK64TFfwxMXbpw4(1ZdZHi2ip0Uy)v5RuYmFrh8r7(Nt mF(HQcOX1O(giZu2iySX2XWHm45wUFpGnfOo7TrZeWEKHTeguNjbKA6zeW889cYf (E6oTWh1)scQeo863ivUxwmsw(4syxL6r5)IKC6zXwMS5l9mnRusNLqdm)ZhGXOe lJg7)Xi1rf6HaQ891df7GH(Gy1b8BPJW2ma8XgVuHh2iMPKtTjtfSMCRzHdjWGzU (t0J7dBzo1t94d9vNvBh1diSgP8zmrtvQ0lYfBT73lN7ynFP7f7YcN8xz3HCovfl 233PwpKDKIZJ55fd1b9)H1HmiNKtyPGLPZR)rxvl(2IR9pc(z8tUCLKqyvVvns)s 19Zc3jfsd8nd9so5062(Pu63oPOchYIoHbwFmr9ps0lYX3hoD5)YgfWkWfu7YHZD eLeTnNr7TWMUN9TJdpsF521Zg68J2hIvsGNu9YNd(q)TaPDdOe87iOOcrKVr13mY 8CnYctNV2)CmZAjQ06Ep(n9484xvjIfWmBV3px(PxGioFB1ZaPMtXWo6Mb8au3tj Mb9HhJXhcV33Q5WkIe3VLOMdMYfuuAlqOuL7NI9Kr4QF9vvRwxIeyY8MqSK5qrdx 4Bex5arqs)FMmBVhfS)PjejPafS3FQWUvOgJZQMZZ8u8tHBVI5GuHhWnUWRkz)Q2 E5exw2uEhrntxoZ5Z8(s3GGV1c4(v0g02)B57YDjy4Y0LkR)Mr3)QcG7u9dJs(Bt c4(8p6o10qFr27(QZp3(h(p8L4Hz8cY(pkUscT)LjZiPz9UYaTCr)(czLWWl52Zm unM69R8nnlkodIqdbZ3)b(Uk(Zx)CNrmXJY25RjbGryOJTm8kj4vrnZa6)H00fDS 4aPZ)(9rnyh)Ef)6p)vQr)048cX2vKfWbTVEcZW4PBx505r(Yl7QDLHvxGLfiTzZ 6f4brfFWufoCyeb(zGDbKtzMgcWkbHb(BtBjdldNQ1OEnWgbEf)6bUp4MT3jcv5F (xsoRl9iDwjid)YySzhZuGdDS98o87IkZw(ELdSjOQlftHx3ncOMd)s3p(3FH0uH OQ16HiTu18eLOFzxUrGnVtOOt39hyW)9D(D5IhVyZT5NIF)bMnzRjs7FXQfg3Y(T cs0stPxsr)BUh3laf1D0Q5u(qDmtDLHvRELf5zinyA2zFQG8mHr0mxfyjkodVTdd SJ6xf4WTQH7kEp)fc7)O1BStr3hoddX(wOTNknyZi0)2EFpH648OHlv)I1TOHjWn d5veRvzJ(Xijp7RsvlNl2UNBhO3FbPC3s4pOg9c(ybhMil3DeJ1kJzIaTjNWNINH 9so5P5w(uCqVTahPZg(tbbO732TcnNeX5ju(obXiM1XuSIixfBT594I7WU(o8(F2 IfX2b06z2loI7TLZOmGr2lI1ffOrUFR9Yy12PXEvn9JItj9(autObcYfOUnxg0dI ynFPuqzkCdK5OWZHB6ZRudM5170MY9Da(n)xf0nrffrdOLy1RI29ilfisu1ko5Ya Yp)hKs(V57(hndn0dzRxUuGCuu)C0p446q7gbQ6QXgiXH3l9GmeFVcoCzitVZ7BF sGi1x(wVP7v5DS3j5xNoajqVmDlVeOMw3if08p423yv2cCjRUML2u(HBp0V5I9(s HhWnuffzGm(Lf13JWlluWmISR462I7V7)x7Pi8SEp33ysoeQb55T2fBKOfcXpaxb l824zHrx075GmlefDafj9Zcd4p21fU9rYLnpBQqMl22Fngx43Zpm7C75C5d)Dd7k 2okyYS6rdS4MTMPmuf(7I(7i9FoJyC5)pmtk54Vep9PtI0s8Y2PtKd0iLOYOdXup qyTOon(VhoLRRHp2iOu73lXaq)oDodcaHd43huNVC(7zWBRuQODybnK184COLI3m uX88U6IzEpuQGryOJTm8QZ0v6ecbht7JCZuLkLLe352xSgWh2bJrhqkQPxiYLyvl 2mV2uNNx5vTMs3Xzo1YG)E5hLdCksXs)ytDR8v)iWdX28vDRzP3MkLbeOx8XfOMt jTpxD57zbRbZjw)hvFv25XxtvlPtJTW8jQ1vtDR3XPHKLdigsXs)euDRfG36ut)P s(BtW97UyM9TMRG5DhUbD2UZ(1905F9b9YY5SOyVR3Rb)0hb9j5tPpvFrn1H8WKf 3JNKOy(muH9mQ4(seRvn06Epde5w7XD1m)TI874UDlNP)AsntPhs3oKGNnEXRp88 v4euczPNdwBPpH1hhLMshPOOj7mttSHONWFcFMIdCa5exTjcReBvGuOrI42Vg4aZ dIad)O(12LH85jOWakXOfat(HlNmyjGWZhkdVaeyGMHFvnU4EpeRtS2OyV58rjzn VwMoG9(sH1GUbmr)(qQXuSK7y8Y2(y8Vnt1YUbHic8KPafpTU2HcQDbLQ3O5retv P3aq4ziSo5oYn)7R)Lp1Snm4Gd7dH2GUe1r991WTxwly564(EsJsdG5cSeIaV0o8 YZhyFiCHw3ddh3gyF9eS7Qk616CnUqf42LWunPVH2uRlGAG9nFb(rQbKc)qH)KLe m9Q3sUHMHJNPOE)(AAw)HBAAAAQIDAAAAAAAAAAADADAjDAAAwPAAgQAAAAAAAgA AAAAAMAMuGOA1DAAHYhrtDQDIRkMFJVSD5yUPx0TnMlUAUACxAisDBiNPx0TEBiU CV1TgUETTVkUPNEIS9ETIdFIMVURIEDArCgCxATMJBAMA8ACDBisDJVSgUETCV1U V9kUOlEVgBQRAQBCwglqwgF0Y1EywklOwkF0Z1EyI4GABCQGQj1QSFMMAETyegwg DpKAaDdWKLFKDlsUDpMWAkCWjgQkQpKADBNWDhMWmCAWAgCCPR0rYVMVQlMMZxCW DlMM8CQWA0CCJx0rBXkTJDDWsgFUIDTWAk1QygQ0E9KAFT1TIDDWsgFUJDTWAk1Q 3gw5M9KAF5USwgVwYBFywkFLZNEyI0OACCAPIMPAxCQQJwAAyOA6B1EIg4USPJFU BJ1RTBSTSFEVpAAVDIfCocuu7kCNSJkIg4UVJhERTVkUVNlLiMlQJgDAvOA)6cER SJ0rINVVJcEAqSgBQDDWZpDMwANMJoFAqSAEQj1QQn1QQjFUQjVUqBAMEoRCDBis T50TOFEVAMFVkkAfYNFB3ID0ZNlOzED0AUjLukAkYREBKPD06g1UQnFRTp8MiCQW EgTCQjVT1cjMYZkO1UD0zCQNEIUCQnVT6YTOQnlRxkTMJYMAyeA0SREIgcVQSl0Q Fx0QVDwUHodCwglq6AD0QDTWhDAMHQeCVh0rxAdRrDAMH4eCQLlqAgFR4nw8yA7B CAAMIIgCwglq6AD0QDTWOAAMIwgCVh0rxAdRYAQNIYhCQLlqAkFRgoAIyALC3AAM LgrCEBisXFkUPNEIS9ETINEITBVSKMEABugwxAdSyETwKAFAHuAzOxyQOxCWeBQW LYtCwglqY5E0YRkyKwGAquA4QDTWKnlTAkFRqrgdSp6CZNF0KEIAvuA9FVFSAME0 (rQiyA7CPCAMMggCoCggnAhCEBisBRVQPNEIS9ETOBCLgwCWAklT8oAygMIKwwSM y0CLsgDLsITLywCMsIDL0wCMsADLDAgMoA6C5Aygx0CL3AjLx0CL3AjLsMDLw4SM twyNw4SMxwyNtwiMw4SMxwyN3AjLsYDLw4SMxwyN3AjLL4CADmCBxEDIsADL54SL xwSNtwyM1kjLsADLuwyNsUTOxwCMwwCN54CLAAQNAoAAAAAAAQW7AAAAAAABAAAA 8AAAAAABGAw4gBAAAAAAAIAAAAAAEwDAhDAAAAgrW4a9AswBE1taSlESuMVRCV1U 4k6UDYfjNCWqgNw9dfGInLFImGFpCAMUQbAkwAuGGaBs7To(gwSqg4NwgbO(GALw 6bqigtPp2bOTOCgogCWcy1LAbAPYw)fy4GNCIfA0vDN6enMTy1L66DNYx5O6eDNY ZjJIgFnDgFnrg1Zvc2LSghEYHREANdEAFR0TVhEAAAdRU9ERMBQxF5USQBQwA4UR VJlQAg0UHtkQAQkTgt6)aA2qhlcYCJG9hdUYpC2ymXIIAfVrALVrADVrALQrATQr AHQjA3QjA7VrwDQqkXqAlyRh7Xo5ECAocUq(iyfhppQA8XJAEAO6taPklCcV6H5) 9XKyIrfkmTP07X6(Q)RKmXK7tufhlCMV6HJ)(XKyIrfkmTP07X6(Q)RKgAG7laO( )my6KuehleAEAlw6KuehF(QKKoA5FogCkXI5KkRpq4RphdLTFCQqpCW7tXIgiXIY ECuhnUY4FCcKKpkJFaSBnUqJKogCKciJKciJlaiZfkyJFaeBAr4JWAPAwHAwIBqB QCQajAqCQOQaHBKB4MQaHkOyEuPseYkHqmhZ3CCmtTSY9qAMFOmLAkq7g9ehjVTv 96ehFOGPYA27pMQali6AcUI5FADiAkmCgZPkgtAIh1EIJ7RpBAJKZQCYNWAMQAcV U14AeQKwk4epGA36RxRpuXiJRaSUtTiJgFAMwkBJU1YBKABwAXVjoAMygKAkvXKA wtOJcUaCAkmClYSUmE17gZSknUKGkVCLGQC0cArJkNCLpVA8wizHjkGFleShwmmJ pJAsmUI8weSpfkmApZiZnUI)liBYEk2JkVCLGAC0YApJYAeakRCLlKB8QlmJwDfS wnkAlaShCAp5mBeanUoJeQKYQ0OJuX6DkZCLK0A8q9uRuXoSuXKY4DtSQkBJZYEB 4gAEImhZgKAEHk6Jp(ehuXIQl6BhQqEHAmgAgxRhl6BpKog7K9uJFOA8FCm7tTy7 pSAECA9DkEQqFATGZYGOGlAMAjcGCAJKFCAoeQo7KwRpFCQagAGHFC2C4oo(FCe5 ljJ)9XY4wyehpiTD8XOApyfh9XOAl2fhljj((Xo4FCQqGA7)(XOOY4fhlyuZiXo( ECuh9Xa4lyH0FAN)Q7fxFDWAvBr)AkKOq6f5pDQq5XIAmwvBliT)(XO)lqfhAke) 4sfhlrfp(Xo)pvfp)XIAwwOJhASBDAtYiJFIQsPJliBE8Xm(lqfh9X2(MtfhYMGq lpfp6Xo)ltfp7X4)QxOJ)BiBoykY9CyYXDiYQjeY5bOwgxL0AkKOqyf5lDQq5XY) m4vBliz)8Xu)lqfh9X()4sfhlrfp8XI)lvfp9XY)QxOJ)BiBqzkY9CyY7TiYYABE lpfp6Xo)ltfp7X4)khBT6XKGFyfZ7Xq(F2fZsTy(gYAMMJWIgQGGgImUoH21m)L0 7Cd(EMAYBAPHIQgAABCE84xDgBHeAAAQBAAAAcwAAAAAA4XtAAAAAAwAAAAA4AAA AAwA8Dw4IEAAAAAAAIAAAAAADgDA1DAACYhrW4a9AwwBEZ8JSlESuMVRCV1QVMVR AoACzAisgQULCV1QEBSRP1URIIDA6Cgb0gy5isTKVJlQEBiTSlESuMVRCV1UAIyU 4hgTgILABJFRCByVLNUQPJ1RE5UVJxEITVkTIMGAvCgg6cERVh0rxAdRvqTNOVEU IMHABCAjxANW2UTw0cMMACAMAYJCPR0rYVMVAADLgiAkM9KAF5USsgVwxkTMIYJA CCgqIEKAvCAtVJlQAg0U(igtgILABJFRGByVFZVSPJFIAM1VIjgwYFIAwAtWAQTw SjA3gILAV9kRDBiUFJUVJByUBBiTPJFIoDwVAwNCalVgBDD0)DwMAYOCQBisJN1T PlEVPBiTDBiRFJUVJMBAqCA8QDDWKrFWIDDOKrVWAADN6nAJZpKAyANMZhMM0osW 4AAMBQQCsM0hFxCRgIrOM90QTJ1TJYEAtGgD5E9QzQcOAADMYkwU64aAsM0hFxCR JsGAyGgIFxEIgQlRSFEUPBCVDBiRFJUVJYHABGALwAdSAkTw2kwhKpaAInE0LpTS IrE0aCgSBAUCQjlqIDDWZpzSwkF0AkUyKlQpI9aAQXUVyCwQBQVCPR0rYVMVAkFL elgwM9aAF5USsgVwKhcWJ0MAvGAaFVFSAQE0ylA4M9aAF5USsgVwKhcWwMDyJYOA CGAfJQPAqGghQDDWIDDWAADNQqQDgIbAHlkUgQFSSFEUPBCVDBiRFJUVKgBABGgm wAdSAkTwkqQKKpaAInE0LpTSIrE00AgSB4qCyAtSKlMMKAEAqGAuYBNWLhMMK8EA qGgwZBdWxkMMJhMMKoFAvGAzFVFSAME0WrwZE9aAFT1TZxCWKcHAvGA4OlETYFcR InFLCCgSBouCVh0rFBdRKEJAvGA9U9ERsgVxKhcWKQKAvGg)OlETYFcRInFLzgsS qCAMCggCDDggCIhCFBisgQkTgY0TUV1TgIVRP9ETAMFUcowy6IoARDggCYiCkDAg nAhCDBisPx0TWBiUVxUQAMVRasgBgM4J2wyNsIDLsMTM4wSOxEDLsMDLxwSMxwCN 0wiMLgCADeCJxEDIsMDLxwSMxwCN0wiMscDLywiNzEDLskDL3AAOn4yC5Ayg5wSO 5wSOAAQOvwLAInjl3Y0bYtg1EDg4WpU)f7Zwu3F9ea)nqxHZnm)pgotNcqup9n3u oM)oqgZsq(Nk(rR3J9ea(ej1)I92S8oOCk6iCDUO20eLbVc9l3k3kwRBJAkD0VwN ()KP1ujhq9St3odNv)RvRpLanZIcYnhcAbE7I7Vm8eQJ5Y5LB(Eyuw3c(E8CwF7v g9iUQMQiOH4nkhqXfzeFZjPA(rC4J9ea2crxfCOZDim2brKm37IEj68jqKGxF5HQ )JLuSun2Eaa6T1)yQ02GyXwU3kwmO)o8iR8oOAkqCAHkLeBLc2zt9HFe)qaKz2X6 5n6aiEjuEay6W4yKbV8(edrBMMHHDQe4N(o6)opbvXqrtpbyccNXusPcFwENKHhe eHIa6BxloXV6yBZLn11c9jbDEWy9VonXkugeNsAkeF4UaJDhXfBOuNQkos8PLjyy (Gnz)DQeAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AIw9