:R
:<Creating New Font Directory
>
:S
LOG CRT:
SVDIR FONTS.DAT=*.CTR
LOG $:[$P]
:R
RUN JETSET