mdavis@pro-sol.cts.COM.UUCP (08/27/87)
I've received a number of requests for three of the utility programs I mentioned in an earlier info-apple posting. They were: APW2TXT, EXPAND, and UNEXPAND. Recall that I said these files are external CoMmanD (CMD) files for use under the ECP 8 shell environment (by Don Elton, Carolina Systems Software). They will not run under anything else. Each of these files will take a list of filenames as input arguments. When a file is processed the output is directed to the standard output setting (whether that be the screen, printer, or disk file, as regulated by ECP's "output" command). NOTE: These three files are stacked EXEC files created with The Executive (the very first ProDOS exec file maker which retains ProDOS file info). I used Mr. Bredon's Executioner with 6-bit packing, but because his exec files contain a large amount of overhead, it wasn't worth using for these 1-block CMD files. Just in case you're wondering why they look like normal hex dumps... ----------------------------- slice, chop, cut, etc. 0?CHR$(4)"PREFIX":INPUTP$ 1?CHR$(4)"PREFIX"P$:CALL-151 RUN 0800:AD 00 03 D0 03 4C 27 60 20 58 60 08 48 20 00 BF CC 90 61 68 28 B0 0B A2 0818:10 20 08 20 AE 00 03 D0 E7 60 20 DA FD A9 02 0A AA BD FF 60 8D 38 60 BD 0830:00 61 8D 39 60 A2 00 BD FF FF F0 1A C9 A5 D0 10 A0 00 B9 01 03 20 ED FD 0848:C8 CC 00 03 90 F4 B0 03 20 ED FD E8 D0 E1 18 60 20 00 BF C4 6B 61 90 01 0860:60 AD 6F 61 C9 1A F0 05 A9 01 4C 27 60 20 00 BF C8 7D 61 90 01 60 AD 82 0878:61 8D 84 61 8D 89 61 8D 91 61 20 00 BF CE 83 61 90 01 60 20 F3 60 90 01 0890:60 AD 01 66 C9 FF D0 07 CD 00 66 D0 02 18 60 A8 F0 06 C9 D0 F0 47 D0 E3 08A8:20 F3 60 90 01 60 AE 00 66 F0 03 20 4A F9 AD 01 66 8D EA 60 29 7F AA 20 08C0:F5 60 90 01 60 A0 00 B9 00 66 C9 0B D0 02 A9 A0 C9 20 90 05 09 80 20 ED 08D8:FD AD 00 C0 C9 9B D0 05 20 8E FD 18 60 C8 CA D0 DE A9 00 10 9E 20 8E FD 08F0:4C 8B 60 A9 02 8D 8C 61 20 00 BF CA 88 61 60 05 61 43 61 5B 61 C1 D7 D0 0908:B2 D4 D8 D4 A0 B1 AE B0 A0 A8 E3 A9 A0 B1 B9 B8 B7 A0 CD EF F2 E7 E1 EE 0920:A0 C4 E1 F6 E9 F3 8D D5 F3 E1 E7 E5 BA A0 E1 F7 F0 B2 F4 F8 F4 A0 BC E6 0938:E9 EC E5 A0 EC E9 F3 F4 BE 8D 00 A2 A5 A2 A0 E9 F3 A0 EE EF F4 A0 E1 EE 0950:A0 C1 D7 D0 A0 E6 E9 EC E5 8D 00 BD CD CC C9 A0 E5 F2 F2 EF F2 A0 A8 A5 0968:A9 8D 00 0A 00 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 03 00 03 0980:00 62 00 02 00 2C 01 00 04 00 00 66 02 00 00 00 01 00 BSAVE AWP2TXT,A$800,E$0991 0800:00 00 07 10 08 C3 F0 00 60 01 01 00 E7 AE 00 00 07 C1 D7 D0 B2 D4 D8 D4 0818:07 08 09 0A 0B 0C 0D 0E 20 00 BF C3 02 08 90 06 20 DA FD 4C 2D FF A9 CF 0830:20 ED FD A9 CB 20 ED FD 20 8E FD 4C 00 BE 820G CALL-151 0800:AD 00 03 D0 03 4C 27 60 20 5A 60 08 48 20 00 BF CC 1C 61 68 28 B0 0B A2 0818:10 20 08 20 AE 00 03 D0 E7 60 20 DA FD A9 01 0A AA BD C0 60 8D 38 60 BD 0830:C1 60 8D 39 60 A2 00 BD FF FF F0 1C C9 A5 D0 12 A0 00 B9 01 03 09 80 20 0848:ED FD C8 CC 00 03 90 F2 B0 03 20 ED FD E8 D0 DF 18 60 20 00 BF C8 0E 61 0860:90 01 60 AD 13 61 8D 15 61 8D 1D 61 A9 00 8D BF 60 20 00 BF CA 14 61 90 0878:08 C9 4C 90 02 18 60 38 60 A2 00 BD 00 66 09 80 C9 89 F0 22 EE BF 60 C9 0890:8D D0 05 A0 00 8C BF 60 20 ED FD E8 AD 1A 61 D0 03 CE 1B 61 CE 1A 61 AD 08A8:1A 61 D0 D7 F0 C3 A9 A0 20 ED FD EE BF 60 AD BF 60 29 07 D0 F1 F0 DC 00 08C0:C4 60 FD 60 C5 D8 D0 C1 CE C4 A0 B1 AE B0 A0 A8 E3 A9 A0 B1 B9 B8 B7 A0 08D8:CD EF F2 E7 E1 EE A0 C4 E1 F6 E9 F3 8D D5 F3 E1 E7 E5 BA A0 E5 F8 F0 E1 08F0:EE E4 A0 E6 E9 EC E5 A0 AE AE AE 8D 00 BD CD CC C9 A0 E5 F2 F2 EF F2 A0 0908:EF EE A0 A5 8D 00 03 00 03 00 62 00 04 00 00 66 00 01 00 00 01 00 BSAVE EXPAND,A$800,E$091D 0800:00 00 07 10 08 C3 F0 00 60 01 01 00 FA AE 2B 10 06 C5 D8 D0 C1 CE C4 CE 0818:C4 08 09 0A 0B 0C 0D 0E 20 00 BF C3 02 08 90 06 20 DA FD 4C 2D FF A9 CF 0830:20 ED FD A9 CB 20 ED FD 20 8E FD 4C 00 BE 820G CALL-151 0800:AD 00 03 D0 03 4C 27 60 20 5A 60 08 48 20 00 BF CC 6B 61 68 28 B0 0B A2 0818:10 20 08 20 AE 00 03 D0 E7 60 20 DA FD A9 01 0A AA BD 07 61 8D 38 60 BD 0830:08 61 8D 39 60 A2 00 BD FF FF F0 1C C9 A5 D0 12 A0 00 B9 01 03 09 80 20 0848:ED FD C8 CC 00 03 90 F2 B0 03 20 ED FD E8 D0 DF 18 60 20 00 BF C8 59 61 0860:90 01 60 AD 5E 61 8D 64 61 8D 6C 61 8D 60 61 20 00 BF C9 5F 61 20 00 BF 0878:CA 63 61 8D 04 61 90 08 C9 4C 90 02 18 60 38 60 20 9B 60 A0 00 B9 00 66 0890:20 ED FD C8 CE 04 61 D0 F4 F0 DA A2 00 8E 05 61 8E 06 61 8E 04 61 BD 00 08A8:66 09 80 AC 04 61 99 00 66 A0 00 C9 A0 D0 04 AC 06 61 C8 8C 06 61 EE 04 08C0:61 A8 EE 05 61 C0 89 D0 07 AD 05 61 29 07 D0 F2 AD 06 61 F0 1D AD 05 61 08D8:29 07 D0 16 38 AD 04 61 ED 06 61 A8 A9 89 99 00 66 C8 8C 04 61 A9 00 8D 08F0:06 61 E8 AD 69 61 D0 03 CE 6A 61 CE 69 61 AD 69 61 D0 A3 60 00 00 00 0B 0908:61 48 61 D5 CE C5 D8 D0 C1 CE C4 A0 B1 AE B0 A0 A8 E3 A9 A0 B1 B9 B8 B7 0920:A0 CD EF F2 E7 E1 EE A0 C4 E1 F6 E9 F3 8D D5 F3 E1 E7 E5 BA A0 F5 EE E5 0938:F8 F0 E1 EE E4 A0 E6 E9 EC E5 A0 AE AE AE 8D 00 BD CD CC C9 A0 E5 F2 F2 0950:EF F2 A0 EF EE A0 A5 8D 00 03 00 03 00 62 00 03 00 7F 0D 04 00 00 66 00 0968:01 00 00 01 00 BSAVE UNEXPAND,A$800,E$096C 0800:00 00 07 10 08 C3 F0 00 60 01 01 00 F8 AE 22 02 08 D5 CE C5 D8 D0 C1 CE 0818:C4 08 09 0A 0B 0C 0D 0E 20 00 BF C3 02 08 90 06 20 DA FD 4C 2D FF A9 CF 0830:20 ED FD A9 CB 20 ED FD 20 8E FD 4C 00 BE 820G ----------------------------- incise, knife, cleave, etc. UUCP: [ ihnp4 cbosgd hplabs!hp-sdd sdcsvax nosc ] !crash!pnet01!pro-sol!mdavis ARPA: crash!pnet01!pro-sol!mdavis@nosc.mil INET: mdavis@pro-sol.CTS.COM BITNET: mdavis%pro-sol.cts.com@ucbvax.berkeley.edu