.; SPOOLER.CLI

.;Written by Simon Harrison (1207) January 1989. 

.;This routine produces a PipeDream `NEWFILE' which contains the 
.;columns of the original suspended  PipeDream activity  combined   
.;into a single wide column without highlights.

.;Introductory Notes:-

.;The NEWFILE  is suitable for transfer to other word processors and
.;only the construct on the first line will need to be deleted after
.;transfer.

.;NB There must be only ONE PipeDream suspended activity otherwise
.;the next in line will be converted!

.;To use:- Start with the PipeDeam file to be converted as the only
.;suspended PipeDream activity.  Enter the Filer and EXecute the file 
.;which you are reading now.

.;It may appear to stop at times, but be patient.  It will ask for a
.;new name for NEWFILE when it has finished.

.;Notes are included below as a guide to how the program operates.

.;THE CLI PROGRAM:-

#P
.;Re-enter the PipeDream activity to be converted.

|FS~C~XSP1~E
.;Save the original PipeDream file as SP1.

|~U|CFC|Z|~D|CLC|Z
.;Mark the whole text.

.;Remove all printer highlights:-
|PHR1~E
|PHR2~E
|PHR3~E
|PHR4~E
|PHR5~E
|PHR6~E
|PHR7~E
|PHR8~E

|Q
.;Remove marks.

.=SP2
.;Redirect Printer output to file SP2.

|PO~E
.;Print out file to SP2

|FL~C~XSP2~EY
.;Load converted file into PipeDream.

|BRP~C~X^?1S~D~C~X~DN~DN~DN~DN~DN~E
.;Remove TAB codes `E'1S

~C~D~CY~C~U~CY~CY
.;Remove top and bottom lines of constructs.

|W80~E
.;Set width to 80

|FS|XNEWFILE~DN~DN~DN~DN~E
.;Save converted data as NEWFILE.

|FL~C~XSP1~DN~DN~DN~E
.;Reload original file, now called SP1.

.;Enter Filer to rename NEWFILE.
#F|RENEWFILE~E

.;To reduce the size of this file the lines starting .; may be deleted.