!*************************************************************************
! CLD file to set up DCL interface for DVItoLN03 command.
!
! For DVItoLN03 V4.0... BHK     11-FEB-1991
!               V4.1... BHK     20-SEP-1991
! (Not all qualifiers are yet supported by the code...)
!*************************************************************************
!
! Types used for certain qualifiers
!
define type ORIENTS
    keyword PORTRAIT, 
        default
    keyword LANDSCAPE
!
! Mark one of these as default, as appropriate to your site
!
define type PRINTERS
    keyword LN03,               ! Traditional LN03 or LN03-plus
        default
    keyword LN05                ! DEClaser~2100
    keyword LN06                ! DEClaser~2200
!
define type PRINT_MODE
    keyword DUPLEX,
    keyword SIMPLEX,
    keyword NORMAL,
    keyword TUMBLED,
    keyword MASTER
!
define type FEED_TRAY_LIST
    keyword ALL,value(required,type=TRAY_TYPES)
    keyword FIRST,value(required,type=TRAY_TYPES)
    keyword REST,value(required,type=TRAY_TYPES)
!
define type TRAY_TYPES
    keyword DEFAULT_TRAY
    keyword TOP_TRAY
    keyword BOTTOM_TRAY
    keyword ENVELOPE_TRAY
    keyword MANUAL_FEED
!
! Mark one of these as default, as appropriate to your site
!
define type PAPER_TYPES
    keyword A4,                 ! ISO A4 paper, 297mm x 210mm
            default
    keyword US                  ! US Letter size, 11in x 8-1/2in
!
define verb DVILN03
    image "TEX_EXE:DVITOLN03"
    parameter P1,
        label=FILESPEC,
        prompt="DVI file",
        value(required,type=$file)
    qualifier STARTING_PAGE,
        default,
        nonnegatable,
        value(default="*")
    qualifier NUMBER_OF_PAGES,
        default,
        nonnegatable,
        value(default=10000000,type=$number)
    qualifier LEFT_MARGIN,
        default,
        nonnegatable,
        value(default=300px)
    qualifier TOP_MARGIN,
        default,
        nonnegatable,
        value(default=300px)
    qualifier HFUZZ,            ! Program default is 100sp
        nonnegatable,
        value(required)
    qualifier VFUZZ,
        nonnegatable,
        value(required)
    qualifier ORIENTATION,
        default,
        nonnegatable,
        value(type=orients)
    qualifier TFM_DIRECTORY,
        nonnegatable,
        default,
        value(default="TEX_FONTS:",type=$file)
    qualifier VIRTUAL_DIRECTORY,
        negatable,
        default,
        value(default="TEX_FONTS:",type=$file)
    qualifier PK_FONT_DIRECTORY,
        negatable,
        default,
        value(default="TEX_PK:",type=$file)
    qualifier PXL_FONT_DIRECTORY,
        negatable,
        default,
        value(default="TEX_PXL_ROOT:",type=$file)
    qualifier LOG,
        negatable,
        value(type=$file)
    qualifier OUTPUT,
        nonnegatable,
        value(required,type=$file)
    qualifier VERBOSE,
        negatable,
        default
    qualifier PRINT_MODE
        value(list,type=PRINT_MODE)
    qualifier DUPLEX_BY_PAGE_NUMBERS
        default,
        negatable
    qualifier FEED_TRAY
        value(required,list,type=feed_tray_list)
    qualifier PAPER_SIZE
        default,
        nonnegatable,
        value(type=paper_types)
    qualifier DEVICE_TYPE               ! Never used by program
        default,
        value(type=printers)
!
! That last qualifier is present just to control these disallow clauses
!
    disallow DEVICE_TYPE.LN05 and (PRINT_MODE.TUMBLED or
                   (PRINT_MODE.MASTER and PRINT_MODE.SIMPLEX))  ! DEClaser 2100
    disallow DEVICE_TYPE.LN03 and (PRINT_MODE.TUMBLED or FEED_TRAY)! Plain LN03
    disallow DUPLEX_BY_PAGE_NUMBERS and PRINT_MODE.SIMPLEX
    disallow PRINT_MODE.MASTER and not PRINT_MODE.DUPLEX
    disallow PRINT_MODE.SIMPLEX and (PRINT_MODE.DUPLEX or PRINT_MODE.MASTER)
    disallow FEED_TRAY.ALL and (FEED_TRAY.FIRST or FEED_TRAY.REST)
!
! The value that DVItoLN03 will use if a qualifier is not specified (and
! no default is given) can be seen in DVITOLN03.WEB/.CH
!
!
!-----------------------------------------------------------------------
!
! DVItoLN03 can handle any font scheme that obeys the following rules:
!
!   1.  If the PK_FONT_DIRECTORY value ends in ".]" then all PK font
!       files reside in various subdirectories of PK_FONT_DIRECTORY.
!       Each subdirectory name is a different font size.
!       e.g.
!           /PK_FONT_DIRECTORY=TEX_DISK:[TEX.PK.]
!           Font names: TEX_DISK:[TEX.PK.][300]cmr10.pxl
!                       TEX_DISK:[TEX.PK.][622]cmr10.pxl
!               
!   2.  If the PK_FONT_DIRECTORY value does NOT end in ".]" then all PK
!       font files reside in PK_FONT_DIRECTORY.  Each file type begins
!       with a font size, followed by "PK".
!       e.g.
!           /PK_FONT_DIRECTORY=TEX_DISK:[TEX.PK]
!           Font names: TEX_DISK:[TEX.PK]cmr10.300pk
!                       TEX_DISK:[TEX.PK]cmr10.622pk
!               
!   3.  If the PXL_FONT_DIRECTORY value ends in ".]" then all PXL font
!       files reside in various subdirectories of PXL_FONT_DIRECTORY.
!       Each subdirectory name is a different font size.
!       e.g.
!           /PXL_FONT_DIRECTORY=TEX_DISK:[TEX.PXL.]
!           Font names: TEX_DISK:[TEX.PXL.][1500]cmr10.pxl
!                       TEX_DISK:[TEX.PXL.][3732]cmr10.pxl
!               
!   4.  If the PXL_FONT_DIRECTORY value does NOT end in ".]" then all PXL
!       font files reside in PXL_FONT_DIRECTORY.  Each file type begins
!       with a font size, followed by "PXL".
!       e.g.
!       e.g.
!           /PXL_FONT_DIRECTORY=TEX_DISK:[TEX.PXL]
!           Font names: TEX_DISK:[TEX.PXL]cmr10.1500pxl
!                       TEX_DISK:[TEX.PXL]cmr10.3732pxl
!               
! The above hackery is an attempt to cope with the various font schemes
! used by VAX/VMS TeX sites.  Note that GF files are not handled; I
! figured any sites using GF files would convert them to PK files sooner
! or later.
!
! NB In the examples above, the values given for the font qualifiers
!    give a directory explicitly, but they may be passed logical names
!    instead: for example, one could have performed the following:
!
! $ DEFINE/TRANSLATION_ATTRIBUTES=CONCEALED TEX_PXL_ROOT TEX_DISK:[TEX.PXL.]
! $ DEFINE TEX_PK TEX_DISK:[TEX.PK]
!
!    and then the default specifications used in THIS file will access
!    a pixel file for cmr10 as TEX_DISK:[TEX.PXL.1500]CMR10.PXL, whilst
!    a packed file would be sought as TEX_DISK:[TEX.PK]CMR10.300PK
!
! Note that /TFM_DIRECTORY must be present by default, and must possess a
! default value, which indicates, either directly or via a logical name,
! the directory/ies in which the .TFM files are to be found.
!
! If virtual fonts are in use, /VIRTUAL_DIRECTORY should be present by
! default, and its default value should indicate where the .VF files are
! to be found; if no .VF files exist, processing can be speeded up by
! removing DEFAULT from this qualifier, or by specifying /NOVIRTUAL on
! the command line.
!-----------------------------------------------------------------------
