Gecko [ edgpens.lpkmn.gov.my ]

Name	Size	Permission
.mad-root	0 B	-rw-rw-rw-
Courier-Bold.afm	15.31 KB	-rw-rw-rw-
Courier-BoldOblique.afm	15.37 KB	-rw-rw-rw-
Courier-Oblique.afm	15.41 KB	-rw-rw-rw-
Courier.afm	15.31 KB	-rw-rw-rw-
Helvetica-Bold.afm	70.41 KB	-rw-rw-rw-
Helvetica-BoldOblique.afm	70.5 KB	-rw-rw-rw-
Helvetica-Oblique.afm	75.63 KB	-rw-rw-rw-
Helvetica.afm	75.53 KB	-rw-rw-rw-
Symbol.afm	9.72 KB	-rw-rw-rw-
Times-Bold.afm	65.27 KB	-rw-rw-rw-
Times-BoldItalic.afm	60.57 KB	-rw-rw-rw-
Times-Italic.afm	67.38 KB	-rw-rw-rw-
Times-Roman.afm	61.41 KB	-rw-rw-rw-
ZapfDingbats.afm	9.52 KB	-rw-rw-rw-
cp1250.cpg	4.7 KB	-rw-rw-rw-
cp1250.enc	4.37 KB	-rw-rw-rw-
cp1251.cpg	2.88 KB	-rw-rw-rw-
cp1252.cpg	4.13 KB	-rw-rw-rw-
cp1253.cpg	2.9 KB	-rw-rw-rw-
cp1254.cpg	2.89 KB	-rw-rw-rw-
cp1255.cpg	2.95 KB	-rw-rw-rw-
cp1256.cpg	3.01 KB	-rw-rw-rw-
cp1257.cpg	2.9 KB	-rw-rw-rw-
cp1258.cpg	2.9 KB	-rw-rw-rw-
iso8859-10.cpg	2.97 KB	-rw-rw-rw-
iso8859-13.cpg	2.52 KB	-rw-rw-rw-
iso8859-14.cpg	3.1 KB	-rw-rw-rw-
iso8859-15.cpg	4.88 KB	-rw-rw-rw-
iso8859-15.enc	3.92 KB	-rw-rw-rw-
iso8859-16.cpg	2.55 KB	-rw-rw-rw-
iso8859-2.cpg	4.82 KB	-rw-rw-rw-
iso8859-2.enc	3.94 KB	-rw-rw-rw-
iso8859-3.cpg	2.43 KB	-rw-rw-rw-
iso8859-4.cpg	2.56 KB	-rw-rw-rw-
iso8859-5.cpg	2.54 KB	-rw-rw-rw-
iso8859-6.cpg	1.97 KB	-rw-rw-rw-
iso8859-7.cpg	2.44 KB	-rw-rw-rw-
iso8859-8.cpg	2.12 KB	-rw-rw-rw-
iso8859-9.cpg	5.04 KB	-rw-rw-rw-
iso8859-9.enc	3.06 KB	-rw-rw-rw-
lcdxsr.afm	22.7 KB	-rw-rw-rw-
lcdxsr.pfa	70.57 KB	-rw-rw-rw-
pdflib.upr	4.5 KB	-rw-rw-rw-
print_glyphs.ps	3.28 KB	-rw-rw-rw-

Code Editor : print_glyphs.ps

%!PS-Adobe
% print_glyphs.ps
% Copyright (C) Thomas Merz 1994-2002
%
% This PostScript program prints all glyphs in a font along
% with their names in alphabetical ordering.
% It requires a PostScript Level 2 or PostScript 3 interpreter.
% It also works with Acrobat Distiller.
%
% Usage:
% - The font must either be resident in the printer, or be
%   downloaded ahead of this program (as a single job).
%   Alternatively, the font can be configure in Distiller.
% - At the end of this file, enter a line with the font name, e.g.:
%   /Times-Roman ShowGlyphs
%   (Omit the percent character, but leave the leading slash '/')

/$sort 20 dict def

/Insert { % node string ==> -
    exch dup 0 get type (nulltype) eq { % ifelse
        exch [ exch 1 array 1 array ] 0 exch put
    }{ % else
        aload pop aload pop 4 2 roll 2 copy gt { % ifelse
            pop 3 -1 roll pop Insert
        }{ %else
            pop exch pop Insert
        } ifelse
    } ifelse
} def

/PrefixWalk {
    $sort begin
	cvx /!bt exch def bpwalk 
    end
} def

$sort begin
/bpwalk {
    dup 0 get type /nulltype eq { pop }{ % ifelse
	aload pop aload pop exch bpwalk exch !bt bpwalk
    } ifelse
} bind def
    
end % $sort

/DictSort {	% dict ==> array
    dup length array /a exch def
    $sort begin
    /tree 1 array def
    { pop 50 string cvs tree exch Insert } forall
    /ndx 0 def
    tree { a ndx 3 -1 roll put /ndx ndx 1 add def } PrefixWalk
    a
} bind def

/ShowGlyphs {		             % font name ==> -
    /buffer 100 string def
    /FontName 100 string def
    /fs 20 def		             % font size
    /ts 7 def		             % font size of caption
    /ls fs 1.75 mul def	         % line spacing

dup FontName cvs pop
    findfont fs scalefont /F exch def

clippath pathbbox
    20 sub /top exch def
    20 sub /right exch def
    20 add /bottom exch def
    40 add /left exch def

/textfont /Helvetica-Narrow findfont ts scalefont def
    /x left def
    /y top fs sub def

/Helvetica-Bold findfont fs scalefont setfont
    x y moveto
    /y y ls sub def

% Check the interpreter's language level...
    /languagelevel where { pop languagelevel }{ 1 } ifelse

% ...and quit if Level 1
    2 lt {
	(Error: this program doesn't work on PostScript Level 1 printers!)show
	showpage
	stop
} if

FontName show		% print font name

% Try to find the dictionary with the character names
    F /CharStrings known {
	    F /CharStrings get
    }{
	(: Couldn't find character names (CharStrings dictionary)!) show
	showpage
	quit
    } ifelse

DictSort				% sort the character names

{ % forall
	/GlyphName exch def		% remember the character name

x y moveto F setfont	% the actual character...
	GlyphName cvn glyphshow

x y ts 2 mul sub moveto	% ...and its glyph name
	textfont setfont GlyphName buffer cvs show

/x x fs 2 mul add def
	x right gt { /x left def /y y fs 2 mul sub def } if 
	y bottom lt {
	    /y top fs sub def /x left def
	    showpage
	    x y moveto
	    /y y ls sub def 
	    /Helvetica-Bold findfont fs scalefont setfont
	    FontName show		% print font name
	} if
    } forall
    y top ls sub ne x left ne or { showpage } if

} bind def

% Example:
%/Times-Roman ShowGlyphs

${this.title}

Code Editor : print_glyphs.ps