Gecko [ c.stage.kornherr.net ]

Name	Size	Permission	Date
PDFA_def.ps	2.98 KB	-rw-r--r--	2025-09-25 16:37
PDFX_def.ps	3.77 KB	-rw-r--r--	2025-09-25 16:37
PM760p.upp	1.13 KB	-rw-r--r--	2025-09-25 16:37
PM760pl.upp	1.1 KB	-rw-r--r--	2025-09-25 16:37
PM820p.upp	1.12 KB	-rw-r--r--	2025-09-25 16:37
PM820pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
Stc670p.upp	1.13 KB	-rw-r--r--	2025-09-25 16:37
Stc670pl.upp	1.1 KB	-rw-r--r--	2025-09-25 16:37
Stc680p.upp	1.11 KB	-rw-r--r--	2025-09-25 16:37
Stc680pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
Stc740p.upp	1.01 KB	-rw-r--r--	2025-09-25 16:37
Stc740pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
Stc760p.upp	1.11 KB	-rw-r--r--	2025-09-25 16:37
Stc760pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
Stc777p.upp	1.11 KB	-rw-r--r--	2025-09-25 16:37
Stc777pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
Stp720p.upp	1.13 KB	-rw-r--r--	2025-09-25 16:37
Stp720pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
Stp870p.upp	1.11 KB	-rw-r--r--	2025-09-25 16:37
Stp870pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
acctest.ps	4.17 KB	-rw-r--r--	2025-09-25 16:37
align.ps	2.09 KB	-rw-r--r--	2025-09-25 16:37
bj8.rpd	639 B	-rw-r--r--	2025-09-25 16:37
bj8gc12f.upp	1.5 KB	-rw-r--r--	2025-09-25 16:37
bj8hg12f.upp	1.5 KB	-rw-r--r--	2025-09-25 16:37
bj8oh06n.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bj8pa06n.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bj8pp12f.upp	1.51 KB	-rw-r--r--	2025-09-25 16:37
bj8ts06n.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc6000a1.upp	1.62 KB	-rw-r--r--	2025-09-25 16:37
bjc6000b1.upp	1.62 KB	-rw-r--r--	2025-09-25 16:37
bjc610a0.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc610a1.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610a2.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610a3.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc610a4.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc610a5.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610a6.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610a7.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610a8.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc610b1.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610b2.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610b3.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc610b4.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc610b6.upp	1.48 KB	-rw-r--r--	2025-09-25 16:37
bjc610b7.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
bjc610b8.upp	1.49 KB	-rw-r--r--	2025-09-25 16:37
caption.ps	1.7 KB	-rw-r--r--	2025-09-25 16:37
cbjc600.ppd	10.89 KB	-rw-r--r--	2025-09-25 16:37
cbjc800.ppd	11.22 KB	-rw-r--r--	2025-09-25 16:37
cdj550.upp	1.65 KB	-rw-r--r--	2025-09-25 16:37
cdj690.upp	1.95 KB	-rw-r--r--	2025-09-25 16:37
cdj690ec.upp	2.01 KB	-rw-r--r--	2025-09-25 16:37
cid2code.ps	4.37 KB	-rw-r--r--	2025-09-25 16:37
dnj750c.upp	2.74 KB	-rw-r--r--	2025-09-25 16:37
dnj750m.upp	1.93 KB	-rw-r--r--	2025-09-25 16:37
docie.ps	7.31 KB	-rw-r--r--	2025-09-25 16:37
font2pcl.ps	18.1 KB	-rw-r--r--	2025-09-25 16:37
ghostpdf.ppd	25.04 KB	-rw-r--r--	2025-09-25 16:37
gs_ce_e.ps	2.15 KB	-rw-r--r--	2025-09-25 16:37
gs_css_e.ps	4.81 KB	-rw-r--r--	2025-09-25 16:37
gs_il2_e.ps	2.55 KB	-rw-r--r--	2025-09-25 16:37
gs_kanji.ps	3.9 KB	-rw-r--r--	2025-09-25 16:37
gs_ksb_e.ps	3.06 KB	-rw-r--r--	2025-09-25 16:37
gs_l.xbm	1.9 KB	-rw-r--r--	2025-09-25 16:37
gs_l.xpm	2.69 KB	-rw-r--r--	2025-09-25 16:37
gs_l_m.xbm	1.91 KB	-rw-r--r--	2025-09-25 16:37
gs_lgo_e.ps	2.65 KB	-rw-r--r--	2025-09-25 16:37
gs_lgx_e.ps	1.71 KB	-rw-r--r--	2025-09-25 16:37
gs_m.xbm	945 B	-rw-r--r--	2025-09-25 16:37
gs_m.xpm	1.4 KB	-rw-r--r--	2025-09-25 16:37
gs_m_m.xbm	955 B	-rw-r--r--	2025-09-25 16:37
gs_s.xbm	594 B	-rw-r--r--	2025-09-25 16:37
gs_s.xpm	957 B	-rw-r--r--	2025-09-25 16:37
gs_s_m.xbm	604 B	-rw-r--r--	2025-09-25 16:37
gs_t.xbm	345 B	-rw-r--r--	2025-09-25 16:37
gs_t.xpm	605 B	-rw-r--r--	2025-09-25 16:37
gs_t_m.xbm	355 B	-rw-r--r--	2025-09-25 16:37
gs_wl1_e.ps	2.42 KB	-rw-r--r--	2025-09-25 16:37
gs_wl2_e.ps	2.42 KB	-rw-r--r--	2025-09-25 16:37
gs_wl5_e.ps	2.44 KB	-rw-r--r--	2025-09-25 16:37
gslp.ps	21.78 KB	-rw-r--r--	2025-09-25 16:37
gsnup.ps	2.56 KB	-rw-r--r--	2025-09-25 16:37
ht_ccsto.ps	222.8 KB	-rw-r--r--	2025-09-25 16:37
image-qa.ps	71.32 KB	-rw-r--r--	2025-09-25 16:37
jispaper.ps	768 B	-rw-r--r--	2025-09-25 16:37
landscap.ps	1.43 KB	-rw-r--r--	2025-09-25 16:37
lines.ps	3.63 KB	-rw-r--r--	2025-09-25 16:37
mkcidfm.ps	21.78 KB	-rw-r--r--	2025-09-25 16:37
necp2x.upp	1.02 KB	-rw-r--r--	2025-09-25 16:37
necp2x6.upp	1.04 KB	-rw-r--r--	2025-09-25 16:37
pdf2dsc.ps	7.86 KB	-rw-r--r--	2025-09-25 16:37
pdf_info.ps	19.78 KB	-rw-r--r--	2025-09-25 16:37
pf2afm.ps	14.94 KB	-rw-r--r--	2025-09-25 16:37
pfbtopfa.ps	980 B	-rw-r--r--	2025-09-25 16:37
ppath.ps	1.76 KB	-rw-r--r--	2025-09-25 16:37
pphs.ps	6.67 KB	-rw-r--r--	2025-09-25 16:37
prfont.ps	7.03 KB	-rw-r--r--	2025-09-25 16:37
printafm.ps	4.78 KB	-rw-r--r--	2025-09-25 16:37
ps2ai.ps	21.77 KB	-rw-r--r--	2025-09-25 16:37
ps2epsi.ps	5.89 KB	-rw-r--r--	2025-09-25 16:37
ras1.upp	215 B	-rw-r--r--	2025-09-25 16:37
ras24.upp	219 B	-rw-r--r--	2025-09-25 16:37
ras3.upp	214 B	-rw-r--r--	2025-09-25 16:37
ras32.upp	196 B	-rw-r--r--	2025-09-25 16:37
ras4.upp	220 B	-rw-r--r--	2025-09-25 16:37
ras8m.upp	209 B	-rw-r--r--	2025-09-25 16:37
rollconv.ps	12.22 KB	-rw-r--r--	2025-09-25 16:37
s400a1.upp	1.42 KB	-rw-r--r--	2025-09-25 16:37
s400b1.upp	1.57 KB	-rw-r--r--	2025-09-25 16:37
sharp.upp	1.89 KB	-rw-r--r--	2025-09-25 16:37
sipixa6.upp	529 B	-rw-r--r--	2025-09-25 16:37
st640ih.upp	2.23 KB	-rw-r--r--	2025-09-25 16:37
st640ihg.upp	1.47 KB	-rw-r--r--	2025-09-25 16:37
st640p.upp	1.87 KB	-rw-r--r--	2025-09-25 16:37
st640pg.upp	1.11 KB	-rw-r--r--	2025-09-25 16:37
st640pl.upp	1.83 KB	-rw-r--r--	2025-09-25 16:37
st640plg.upp	1.08 KB	-rw-r--r--	2025-09-25 16:37
stc.upp	1.88 KB	-rw-r--r--	2025-09-25 16:37
stc1520h.upp	2.1 KB	-rw-r--r--	2025-09-25 16:37
stc2.upp	1.86 KB	-rw-r--r--	2025-09-25 16:37
stc200_h.upp	1.8 KB	-rw-r--r--	2025-09-25 16:37
stc2_h.upp	1.83 KB	-rw-r--r--	2025-09-25 16:37
stc2s_h.upp	2.22 KB	-rw-r--r--	2025-09-25 16:37
stc300.upp	2.09 KB	-rw-r--r--	2025-09-25 16:37
stc300bl.upp	1.31 KB	-rw-r--r--	2025-09-25 16:37
stc300bm.upp	1.4 KB	-rw-r--r--	2025-09-25 16:37
stc500p.upp	1.86 KB	-rw-r--r--	2025-09-25 16:37
stc500ph.upp	1.86 KB	-rw-r--r--	2025-09-25 16:37
stc600ih.upp	2.23 KB	-rw-r--r--	2025-09-25 16:37
stc600p.upp	1.12 KB	-rw-r--r--	2025-09-25 16:37
stc600pl.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
stc640p.upp	1.07 KB	-rw-r--r--	2025-09-25 16:37
stc740ih.upp	2.07 KB	-rw-r--r--	2025-09-25 16:37
stc800ih.upp	2.11 KB	-rw-r--r--	2025-09-25 16:37
stc800p.upp	1.09 KB	-rw-r--r--	2025-09-25 16:37
stc800pl.upp	1.07 KB	-rw-r--r--	2025-09-25 16:37
stc_h.upp	1.87 KB	-rw-r--r--	2025-09-25 16:37
stc_l.upp	734 B	-rw-r--r--	2025-09-25 16:37
stcany.upp	673 B	-rw-r--r--	2025-09-25 16:37
stcany_h.upp	681 B	-rw-r--r--	2025-09-25 16:37
stcinfo.ps	24.87 KB	-rw-r--r--	2025-09-25 16:37
stcolor.ps	4.9 KB	-rw-r--r--	2025-09-25 16:37
stocht.ps	2.42 KB	-rw-r--r--	2025-09-25 16:37
traceimg.ps	1.33 KB	-rw-r--r--	2025-09-25 16:37
traceop.ps	2.5 KB	-rw-r--r--	2025-09-25 16:37
uninfo.ps	5.83 KB	-rw-r--r--	2025-09-25 16:37
viewcmyk.ps	2.11 KB	-rw-r--r--	2025-09-25 16:37
viewgif.ps	5.3 KB	-rw-r--r--	2025-09-25 16:37
viewjpeg.ps	5.73 KB	-rw-r--r--	2025-09-25 16:37
viewmiff.ps	4.14 KB	-rw-r--r--	2025-09-25 16:37
viewpbm.ps	10.22 KB	-rw-r--r--	2025-09-25 16:37
viewpcx.ps	5.29 KB	-rw-r--r--	2025-09-25 16:37
viewps2a.ps	1.09 KB	-rw-r--r--	2025-09-25 16:37
winmaps.ps	3.5 KB	-rw-r--r--	2025-09-25 16:37
zeroline.ps	2.25 KB	-rw-r--r--	2025-09-25 16:37

Rename

%!
% written by James Clark <jjc@jclark.uucp>
% print an afm file on the standard output
% usage is `fontname printafm' eg `/Times-Roman printafm'

% From the `dvitops' distribution, which included this notice:
% dvitops is not copyrighted; you can do with it exactly as you please.
% I would, however, ask that if you make improvements or modifications,
% you ask me before distributing them to others.

% Altered by d.love@dl.ac.uk to produce input for Rokicki's afm2tfm,
% which groks the format of the Adobe AFMs.

% Modified by L. Peter Deutsch 9/14/93:
%   uses Ghostscript's =only procedure to replace 'buf cvs print'.
% Modified by L. Peter Deutsch 9/6/95:
%   uses Ghostscript's .shellarguments facility to accept the font name
%     on the command line.

% Altered my master@iaas.msu.ru to work with fonts of more than 256 glyphs
% and avoid FSType output. Also print a comment with UniqueID of the font.

/onechar 1 string def

% c toupper - c
/toupper {
        dup dup 8#141 ge exch 8#172 le and {
                8#40 sub
        } if
} bind def

% print unencoded character metric data lines for glyphs in `v' array
% and reset `v' -
/printv {
        % define a new font with v as its encoding vector
        currentfont maxlength dict /f exch def
        currentfont {
                exch dup dup /FID ne exch /Encoding ne and {
                        exch f 3 1 roll put
                } {
                        pop pop
                } ifelse
        } forall
        f /Encoding v put
        f /FontName /temp put
        % make this new font the current font
        /temp f definefont setfont
        % print a entry for each character not in old vector
        /e currentfont /Encoding get def
        0 1 255 {
                dup e exch get
                dup dup /.notdef ne exch s exch known not and {
                        exch -1 printmetric
                } {
                        pop pop
                } ifelse
        } for
        0 1 255 {
                v exch /.notdef put
        } for
} bind def

% printcharmetrics -

/printcharmetrics {
        (StartCharMetrics ) print
        currentfont /CharStrings get dup length exch /.notdef known { 1 sub } if =
        currentfont 1000 scalefont setfont 0 0 moveto
        /e currentfont /Encoding get def
        0 1 255 {
                dup e exch get
                dup /.notdef ne {
                        exch dup printmetric
                } {
                        pop pop
                } ifelse
        } for
        % s contains an entry for each name in the original encoding vector
        /s 256 dict def
        e {
                s exch true put
        } forall
        % v is the new encoding vector
        /v 256 array def
        0 1 255 {
                v exch /.notdef put
        } for
        % fill up v with names in CharStrings
        /i 0 def
        currentfont /CharStrings get {
                pop
                i 255 le {
                        v i 3 -1 roll put
                        /i i 1 add def
                } {
                        printv
                        v 0 3 -1 roll put
                        /i 1 def
                } ifelse
        } forall
        printv
        (EndCharMetrics) =
} bind def

% name actual_code normal_code printmetric -

/printmetric {
        /saved save def
        (C ) print =only
        ( ; WX ) print
        onechar 0 3 -1 roll put
        onechar stringwidth pop round cvi =only
        ( ; N ) print =only
        ( ; B ) print
        onechar false charpath flattenpath mark pathbbox counttomark {
                counttomark -1 roll
                round cvi =only
                ( ) print
        } repeat pop
        (;) =
        saved restore
} bind def

% fontname printafm -

/printafm {
        findfont gsave setfont
        (StartFontMetrics 2.0) =

% Print the UniqueID

currentfont /UniqueID known {
                (Comment UniqueID ) print
                currentfont /UniqueID get =only
                (\n) print
        } if

(FontName ) print currentfont /FontName get =

% Print the FontInfo

currentfont /FontInfo get {
                exch
                dup /FSType ne {
                        =string cvs dup dup 0 get 0 exch toupper put print
                        ( ) print =
                } {
                        pop pop
                } ifelse
        } forall

% Print the FontBBox

(FontBBox) print
        currentfont /FontBBox get {
                ( ) print round cvi =only
        } forall
        (\n) print

printcharmetrics
        (EndFontMetrics) =
        grestore
} bind def

% Check for command line arguments.
[ .shellarguments
 { ] dup length 1 eq
    { 0 get printafm }
    { (Usage: printafm fontname\n) print flush }
   ifelse
 }
 { pop }
ifelse