! MACTOCCL.TEC -- Covert a CCL TABLE.MAC source into a TABLE.CCL format. !
0J7K ! Kill heading lines !
36UD ! Value of dollar sign, command line indicator !
59US ! Value of semicolon !
<0L0AUC ! Get value of 1st char into REG C; this repeats for each line !
(QS-QC)"E1KF<' ! If char is semicolon, kill comment line, flow to start !
2K  ! Kill two .EVEN and .WORD lines !
.UX@S/&/;.UY QX,QYK ! Delete up through first "&", exit iter if search fails !
0AUC(QD-QC)"E@I/
/' ! If this is start of command line, insert a CR/LF !
L-2C-1DL>  ! Delete trailing "&" and repeat loop. !
ZJ-KBJ ! Delete last line and go to top !
EI