home *** CD-ROM | disk | FTP | other *** search
- .key textfile
-
- IF "<textfile>" EQ ""
- echo "Usage> swab textfile"
- SKIP endscript
- ELSE
-
- echo
- echo "Execute swab <textfile> --) Start"
-
- copy <textfile> RAD:<textfile><$$>
- bytex RAD:<textfile><$$> -o -h 0a0d -h 0a
- bytex RAD:<textfile><$$> -o -h 0d0a -h 0a
- trimlines RAD:<textfile><$$> -o
- sift RAD:<textfile><$$> -o os1:helps/filter.ed
- copy RAD:<textfile><$$> <textfile>
-
- delete rad:<textfile><$$>
-
- echo "Execute swab <textfile> --) End"
- echo
- LAB endscript
-