Gecko [ primetaxinc.net ]

Name	Size	Permission
PDFA_def.ps	1.25 KB	-rw-r--r--
PDFX_def.ps	1.77 KB	-rw-r--r--
PM760p.upp	1.13 KB	-rw-r--r--
PM760pl.upp	1.1 KB	-rw-r--r--
PM820p.upp	1.12 KB	-rw-r--r--
PM820pl.upp	1.09 KB	-rw-r--r--
Stc670p.upp	1.13 KB	-rw-r--r--
Stc670pl.upp	1.1 KB	-rw-r--r--
Stc680p.upp	1.11 KB	-rw-r--r--
Stc680pl.upp	1.09 KB	-rw-r--r--
Stc740p.upp	1.01 KB	-rw-r--r--
Stc740pl.upp	1.09 KB	-rw-r--r--
Stc760p.upp	1.11 KB	-rw-r--r--
Stc760pl.upp	1.09 KB	-rw-r--r--
Stc777p.upp	1.11 KB	-rw-r--r--
Stc777pl.upp	1.09 KB	-rw-r--r--
Stp720p.upp	1.13 KB	-rw-r--r--
Stp720pl.upp	1.09 KB	-rw-r--r--
Stp870p.upp	1.11 KB	-rw-r--r--
Stp870pl.upp	1.09 KB	-rw-r--r--
acctest.ps	4.17 KB	-rw-r--r--
align.ps	2.11 KB	-rw-r--r--
bj8.rpd	639 B	-rw-r--r--
bj8gc12f.upp	1.5 KB	-rw-r--r--
bj8hg12f.upp	1.5 KB	-rw-r--r--
bj8oh06n.upp	1.48 KB	-rw-r--r--
bj8pa06n.upp	1.49 KB	-rw-r--r--
bj8pp12f.upp	1.51 KB	-rw-r--r--
bj8ts06n.upp	1.49 KB	-rw-r--r--
bjc6000a1.upp	1.62 KB	-rw-r--r--
bjc6000b1.upp	1.62 KB	-rw-r--r--
bjc610a0.upp	1.49 KB	-rw-r--r--
bjc610a1.upp	1.48 KB	-rw-r--r--
bjc610a2.upp	1.48 KB	-rw-r--r--
bjc610a3.upp	1.49 KB	-rw-r--r--
bjc610a4.upp	1.49 KB	-rw-r--r--
bjc610a5.upp	1.48 KB	-rw-r--r--
bjc610a6.upp	1.48 KB	-rw-r--r--
bjc610a7.upp	1.48 KB	-rw-r--r--
bjc610a8.upp	1.49 KB	-rw-r--r--
bjc610b1.upp	1.48 KB	-rw-r--r--
bjc610b2.upp	1.48 KB	-rw-r--r--
bjc610b3.upp	1.49 KB	-rw-r--r--
bjc610b4.upp	1.49 KB	-rw-r--r--
bjc610b6.upp	1.48 KB	-rw-r--r--
bjc610b7.upp	1.49 KB	-rw-r--r--
bjc610b8.upp	1.49 KB	-rw-r--r--
caption.ps	1.72 KB	-rw-r--r--
cbjc600.ppd	10.89 KB	-rw-r--r--
cbjc800.ppd	11.22 KB	-rw-r--r--
cdj550.upp	1.65 KB	-rw-r--r--
cdj690.upp	1.95 KB	-rw-r--r--
cdj690ec.upp	2.01 KB	-rw-r--r--
cid2code.ps	4.39 KB	-rw-r--r--
dmp_init.ps	7.08 KB	-rw-r--r--
dmp_site.ps	459 B	-rw-r--r--
dnj750c.upp	2.74 KB	-rw-r--r--
dnj750m.upp	1.93 KB	-rw-r--r--
docie.ps	7.32 KB	-rw-r--r--
escp_24.src	350 B	-rw-r--r--
font2pcl.ps	18.01 KB	-rw-r--r--
ghostpdf.ppd	25.04 KB	-rw-r--r--
gs_ce_e.ps	2.17 KB	-rw-r--r--
gs_il2_e.ps	2.57 KB	-rw-r--r--
gs_kanji.ps	3.91 KB	-rw-r--r--
gs_ksb_e.ps	3.07 KB	-rw-r--r--
gs_l.xbm	1.9 KB	-rw-r--r--
gs_l.xpm	2.69 KB	-rw-r--r--
gs_l_m.xbm	1.91 KB	-rw-r--r--
gs_lgo_e.ps	2.67 KB	-rw-r--r--
gs_lgx_e.ps	1.72 KB	-rw-r--r--
gs_m.xbm	945 B	-rw-r--r--
gs_m.xpm	1.4 KB	-rw-r--r--
gs_m_m.xbm	955 B	-rw-r--r--
gs_s.xbm	594 B	-rw-r--r--
gs_s.xpm	957 B	-rw-r--r--
gs_s_m.xbm	604 B	-rw-r--r--
gs_t.xbm	345 B	-rw-r--r--
gs_t.xpm	605 B	-rw-r--r--
gs_t_m.xbm	355 B	-rw-r--r--
gs_wl1_e.ps	2.44 KB	-rw-r--r--
gs_wl2_e.ps	2.44 KB	-rw-r--r--
gs_wl5_e.ps	2.45 KB	-rw-r--r--
gslp.ps	20.24 KB	-rw-r--r--
gsnup.ps	2.57 KB	-rw-r--r--
ht_ccsto.ps	222.8 KB	-rw-r--r--
image-qa.ps	71.34 KB	-rw-r--r--
jispaper.ps	784 B	-rw-r--r--
landscap.ps	1.43 KB	-rw-r--r--
lines.ps	3.65 KB	-rw-r--r--
mkcidfm.ps	21.8 KB	-rw-r--r--
necp2x.upp	1.02 KB	-rw-r--r--
necp2x6.upp	1.04 KB	-rw-r--r--
pdf2dsc.ps	7.87 KB	-rw-r--r--
pf2afm.ps	14.94 KB	-rw-r--r--
pfbtopfa.ps	996 B	-rw-r--r--
ppath.ps	1.78 KB	-rw-r--r--
pphs.ps	6.68 KB	-rw-r--r--
prfont.ps	7.04 KB	-rw-r--r--
printafm.ps	4.78 KB	-rw-r--r--
ps2ai.ps	21.78 KB	-rw-r--r--
ps2epsi.ps	8.34 KB	-rw-r--r--
ras1.upp	215 B	-rw-r--r--
ras24.upp	219 B	-rw-r--r--
ras3.upp	214 B	-rw-r--r--
ras32.upp	196 B	-rw-r--r--
ras4.upp	220 B	-rw-r--r--
ras8m.upp	209 B	-rw-r--r--
rollconv.ps	12.23 KB	-rw-r--r--
s400a1.upp	1.42 KB	-rw-r--r--
s400b1.upp	1.57 KB	-rw-r--r--
sharp.upp	1.89 KB	-rw-r--r--
sipixa6.upp	529 B	-rw-r--r--
st640ih.upp	2.23 KB	-rw-r--r--
st640ihg.upp	1.47 KB	-rw-r--r--
st640p.upp	1.87 KB	-rw-r--r--
st640pg.upp	1.11 KB	-rw-r--r--
st640pl.upp	1.83 KB	-rw-r--r--
st640plg.upp	1.08 KB	-rw-r--r--
stc.upp	1.88 KB	-rw-r--r--
stc1520h.upp	2.1 KB	-rw-r--r--
stc2.upp	1.86 KB	-rw-r--r--
stc200_h.upp	1.8 KB	-rw-r--r--
stc2_h.upp	1.83 KB	-rw-r--r--
stc2s_h.upp	2.22 KB	-rw-r--r--
stc300.upp	2.09 KB	-rw-r--r--
stc300bl.upp	1.31 KB	-rw-r--r--
stc300bm.upp	1.4 KB	-rw-r--r--
stc500p.upp	1.86 KB	-rw-r--r--
stc500ph.upp	1.86 KB	-rw-r--r--
stc600ih.upp	2.23 KB	-rw-r--r--
stc600p.upp	1.12 KB	-rw-r--r--
stc600pl.upp	1.09 KB	-rw-r--r--
stc640p.upp	1.07 KB	-rw-r--r--
stc740ih.upp	2.07 KB	-rw-r--r--
stc800ih.upp	2.11 KB	-rw-r--r--
stc800p.upp	1.09 KB	-rw-r--r--
stc800pl.upp	1.07 KB	-rw-r--r--
stc_h.upp	1.87 KB	-rw-r--r--
stc_l.upp	734 B	-rw-r--r--
stcany.upp	673 B	-rw-r--r--
stcany_h.upp	681 B	-rw-r--r--
stcinfo.ps	24.92 KB	-rw-r--r--
stcolor.ps	4.95 KB	-rw-r--r--
stocht.ps	2.44 KB	-rw-r--r--
traceimg.ps	1.35 KB	-rw-r--r--
traceop.ps	2.51 KB	-rw-r--r--
uninfo.ps	5.85 KB	-rw-r--r--
viewcmyk.ps	1.94 KB	-rw-r--r--
viewgif.ps	5.27 KB	-rw-r--r--
viewjpeg.ps	5.56 KB	-rw-r--r--
viewmiff.ps	4.15 KB	-rw-r--r--
viewpbm.ps	10.04 KB	-rw-r--r--
viewpcx.ps	5.11 KB	-rw-r--r--
viewps2a.ps	1.11 KB	-rw-r--r--
winmaps.ps	3.52 KB	-rw-r--r--
zeroline.ps	2.26 KB	-rw-r--r--

Code Editor : dmp_init.ps

%!
%    Copyright (C) 1989, 1992, 1993 Aladdin Enterprises.  All rights reserved.
%
% This file is part of Ghostscript.
%
% Ghostscript is distributed in the hope that it will be useful, but
% WITHOUT ANY WARRANTY.  No author or distributor accepts responsibility
% to anyone for the consequences of using it or for whether it serves any
% particular purpose or works at all, unless he says so in writing.  Refer
% to the Ghostscript General Public License for full details.
%
% Everyone is granted permission to copy, modify and redistribute
% Ghostscript, but only under the conditions described in the Ghostscript
% General Public License.  A copy of this license is supposed to have been
% given to you along with Ghostscript so you can know your rights and
% responsibilities.  It should be in a file named COPYING.  Among other
% things, the copyright notice and this notice must be preserved on all
% copies.

% dmp_init.ps
%   Initialization file for `dmprt' device driver.
%
%   Written initial version by...         ASAYAMA Kazunori  1993 Nov.
%   Modified for Ghostscript 4.03 by ...  ASAYAMA Kazunori  1997 May.

%%%%%                        check version                         %%%%%

201 % version of this initialization file.

/dmprt finddevice { /DmprtParams gsgetdeviceprop /Version get }
  stopped { pop pop 0 } if
2 copy ne {
  (\ndmprt: driver version\() print
  dup 0 eq {pop (unknown) print }{==only}ifelse
  (\) does not match dmp_init.ps version\() print
  ==only (\).\n) print
  flush 1 .quit
} { pop pop } ifelse

%%%%%                            BODY                              %%%%%

40 dict begin         % .WorkDict .UserParams
                      % .DmprtDevice
                      % .GetDmprtParam .SetDmprtParam
                      % .DmprtParams .Xdpi .Ydpi .Xdot .Ydot
                      %
                      % in cm mm pt bp dot
                      % BeginMode EndMode
                      % .ModeDataBase .CurrentMode
                      % BeginConfig EndConfig
                      % BeginPrinterProps EndPrinterProps

/.WorkDict currentdict def
/.ModeDataBase 10 dict def
/.dicttomark {
  counttomark 2 idiv dup dict begin { def } repeat pop currentdict end
} bind def

%%%%%                utilities for user customization.             %%%%%

/in { } bind def
/cm { 2.54 div } bind def
/mm { 25.4 div } bind def
/pt { 72.27 div } bind def
/bp { 72.0 div } bind def
/dot { [ exch truncate cvi ] } bind def

% the database of user customizations. (not implemented yet.)
/BeginMode { % <name> -> <name> mark
  mark
} bind def
/EndMode { % <name> mark <item1> <value1> ... <itemN> <valueN> -> --
  .dicttomark .ModeDataBase
  dup dup maxlength exch length eq {
    % Expand capacity of database dictionaly.
    dup maxlength 10 add dict copy dup /.ModeDataBase exch def
  } if
  3 1 roll put
} bind def

% these procedures are undocumented in the user's manual.
% these are used in order to specify the propaties directly.
/BeginPrinterProps { [ } bind def
/EndPrinterProps { ] /printer exch } bind def

%%%%%                run the user customization file.              %%%%%

/BeginConfig mark def
/EndConfig { .dicttomark /.UserParams exch def } bind def
systemdict /DMPCONFIG 2 copy known
{ get run }    % -sDMPCONFIG=<filename>
{ pop pop (dmp_site.ps) findlibfile { closefile run } if } ifelse

%%%%%                        refer database                        %%%%%

/.UsedMode .ModeDataBase length dict def
/.ExpandUserParams { % <dict> -> <param1> <value1> ... <paramN> <valueN>
  /.InheritMode null def
  { 1 index /inherit eq {
      exch pop dup .UsedMode exch known { % check recursive reference.
        /.ExpandUserParams /rangecheck signalerror
      } if
      /.InheritMode exch def
    } if } forall
  .InheritMode type /nametype eq {
    .UsedMode .InheritMode true put
    .ModeDataBase .InheritMode get .ExpandUserParams
  } if
} bind def

systemdict /DMPMODE 2 copy known
  {get .ModeDataBase exch get} {pop pop .UserParams} ifelse
mark exch .ExpandUserParams .dicttomark /.UserParams exch def

%%%%%                Local variables and procedures.               %%%%%
/.DmprtDevice /dmprt finddevice def
/.SetDmprtParam {   % <key> <value> -> --
  .DmprtParams 3 1 roll put
} bind def
/.SetLocalParam { .LocalParams 3 1 roll put } bind def
/.GetDmprtParam {   % <key> -> <value>
  .DmprtParams exch get
} bind def
/.GetUserParam {       % <key> <default-value> -> <value>
  .UserParams 3 -1 roll 2 copy known {get exch pop}{pop pop} ifelse
} bind def
/.SetUserParam { % <prop-name> <key> <default-value> -> --
  .GetUserParam .SetDmprtParam
} bind def

%%%%%                     dviprt proparties                        %%%%%

mark
.UserParams /printer 2 copy known {
  get dup type /dicttype ne { mark /FileName 3 -1 roll .dicttomark } if
}
{ pop pop % Default printer is `ESC/P 24 pins'.
    mark
    /Name          (ESC/P 24 pins)
    /Transpose     true
    /Reverse       false
    /NonMoving     false
    /Encoding      (Null)
    /HDpi           180
    /VDpi           180
    /Pins          24
    /MinimalUnit   1
    /MaximalUnit   180
    /Constant      1
    /BitImageMode  (\007\0333\030\033?Z\047)
    /NormalMode    (\004\015\014\0332)
    /SendBitImage  (\002\033Z\002\001\200)
    /SkipSpaces    (\002\033\\\002\001\200)
    /LineFeed      (\002\015\012)
    /FormFeed      (\002\015\014)
    /AfterBitImage ()
    /BitRowHeader  ()
    .dicttomark
} ifelse
/DviprtParams exch .DmprtDevice putdeviceprops

getdeviceprops .dicttomark /.DmprtParams exch def
.DmprtParams /DviprtParams get /.DviprtParams exch def
.DmprtParams /DmprtParams get /.LocalParams exch def

% calcurate resolutions and define operators converting
% from user-coordination to device-coordination(count by dots).
/resolution [ .DviprtParams dup /HDpi get exch /VDpi get ]
  .GetUserParam {} forall /.Ydpi exch def /.Xdpi exch def
/.Xdot { dup type /arraytype eq { 0 get } { .Xdpi mul truncate cvi } ifelse
} bind def
/.Ydot { dup type /arraytype eq { 0 get } { .Ydpi mul truncate cvi } ifelse
} bind def

%%%%%           Standard Ghostscript device propaties.             %%%%%

/HWSize  % default is A4.
  /defaultsize [8.3 11.7] .GetUserParam
  [ exch dup 0 get .Xdot exch 1 get .Ydot ] .SetDmprtParam

%%%%%                   dmprt device propaties.                    %%%%%

/MaxSize
  /maxsize [0.0 0.0] .GetUserParam [ exch dup 0 get .Xdot exch 1 get .Ydot ]
  .SetLocalParam
/Margins /margin [0.0 0.0 0.0 0.0] .GetUserParam
  [ exch dup 0 get .Xdot exch dup 1 get .Ydot
    exch dup 2 get .Xdot exch     3 get .Ydot ] .SetLocalParam
/Verbose QUIET {false}
  {/verbose false .GetUserParam} ifelse .SetLocalParam
/Debug /debug false .GetUserParam .SetLocalParam

%%%%%                   Page device propaties.                     %%%%%
%%%%%         See PostScript Reference Manual 2nd edition.         %%%%%

/HWResolution [ .Xdpi .Ydpi ] .SetDmprtParam
/Offsets
  /offset [0.0 0.0] .GetUserParam [ exch dup 0 get .Xdot exch 1 get .Ydot ]
  .SetLocalParam

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

mark .DmprtParams {} forall .DmprtDevice putdeviceprops pop

end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%   End of file   %%%%%%%%%%%%%%%%%%%%%%%%%%%

${this.title}

Code Editor : dmp_init.ps