DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T n

⟦2c0301cee⟧ TextFile

    Length: 1224 (0x4c8)
    Types: TextFile
    Names: »nosve.com«

Derivation

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

TextFile

proc crudetype (
   file,f                   : file      = $required
   starting_page,sp         : integer   = $optional
   maximum_pages,mp         : integer   = $optional
   page_numbers,pn          : boolean   = true
   extra_magnification,em   : integer   = 100
   status)

filename= $path($fname($string($value(file))),catalog)//..
          '.'//$path($fname($string($value(file))),last)
if $strlen(filename) >=4 and ..
   $substr(filename,$strlen(filename)-3,4)='_DVI' then
else
   filename=filename//'_DVI'
ifend
filename2=$substr(filename,1,$strlen(filename)-3)//'LST'
copy_file $fname(filename) $null " checks if file exists "

if $specified(starting_page) then; starting_variable=$value(starting_page)
else; starting_variable=0; ifend

if $specified(maximum_pages) then; max_pages_variable=$value(maximum_pages)
else; max_pages_variable=1000000; ifend

exet     f=:$lib.public.tex.bin.tex_library ..
         m=crudetype_module ..
         l=:$lib.public.tex.bin.tex_library ..
         pv=zero ..
         p= ..
',,,printfile=$fname(filename2),dvifile=$fname(filename),tfm_file,pxlfile,'//..
'PAGENUMBERS=$value(pn),FIRSTPAGE=starting_variable,'//..
'MAXPAGES=max_pages_variable,VAREXTRAMAG=$value(em)'
procend