|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T n
Length: 1224 (0x4c8)
Types: TextFile
Names: »nosve.com«
└─⟦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«
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