.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