DataMuseum.dk

top - metrics - download

    Length: 1152 (0x480)
    Types: TextFile
    Names: »vms.com«

└─⟦060c9c824⟧ Bits:30007080 DKUUG TeX 2/12/89
    └─⟦this⟧ »./DVIware/lpr-viewers/crudetype/VMS/vms.com« 
└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
    └─⟦af5ba6c8e⟧ »unix3.0/DVIWARE.tar.Z« 
        └─⟦ca79c7339⟧ 
            └─⟦this⟧ »DVIware/lpr-viewers/crudetype/VMS/vms.com« 

TextFile

$!   VMS.COM.  Skeleton of command file to compile versions of
$!   Crudetype on VMS.  Needs TANGLE  and PASCAL compiler.
$!   Adapted to Crudetype v2, will probably need to be modified
$!   at other sites. Extra stuff also needed for any other version.
$!
$!
$ set verify
$ on error then exit
$!
$!
$!
$!
$ask:
$ if p1 .nes "" then goto try
$ inquire p1 "What version do you want?"
$goto ask
$!
$!
$try:
on warning then goto bad
$ goto 'p1'
$!
$! 
$bad: write sys$output "UNKNOWN version, ", 'p1'
$exit
$!
$!
$crudetype:
$mytangle
crudetype.web
vms.ch
crudetype.pas
crudetype.pool

$pascal crudetype
$link crudetype
$exit
$!
$!
$hpgf:
$!
$!
$!HPGF. Typical example for a printer changefile. It must be 
$! appended after the system changefile.
$!
$!
$copy vms.ch hpgf.vch
$append hpgf.ch hpgf.vch
$mytangle
crudetype.web
hpgf.vch
hpgf.pas
hpgf.pool

$pascal hpgf
$link hpgf
$exit
$!
$!
$noscheme:
$! 
$! this is a weirdo. Use it if your TFM files done have coding schemes
$!
$!
$copy crudetype.web noscheme.web
$append noscheme.add noscheme.web
$mytangle
noscheme.web
vms.ch
crudetype.pas
crudetype.pool

$pascal crudetype
$link crudetype
$exit
$!
$!