%%DocumentProcessColors: Cyan Magenta Yellow Black
%%DocumentSuppliedResource: procset WITS_procset 3.0 0
%%DocumentNeededResource: procset WITS_procset 3.0 0
%%LanguageLevel: 2
%%EndComments
%%BeginProlog
%%BeginResource: procset WITS_procset 3.0 0
300 dict begin /BD {bind def} bind def /ED {exch def} BD /LD {load def} BD /RP
{{dup}repeat} BD /M /moveto LD /IE /ifelse LD /NP /newpath LD /TR /translate LD
/SW /setlinewidth LD /SP /setpattern LD /SC /scale LD /SCC /setcmykcolor LD
/SHC /sethsbcolor LD /CCC /currentcmykcolor LD /CHC /currenthsbcolor LD /SG
/setgray LD /RT /rotate LD /L /lineto LD /C /curveto LD /SF /setfont LD /FF
/findfont LD /S /show LD /XS /xshow LD /YS /yshow LD /CP /closepath LD /SLJ
/setlinejoin LD /SLC /setlinecap LD /GS /gsave LD /GR /grestore LD /COOR {72
720 div dup SC 0 exch TR} BD /BOP {/initVM save def} BD /EOP {showpage initVM
restore} BD /SM /setmatrix LD /MX {/$mtrx $mtrx currentmatrix def}BD /SUBCMYK {
/k_c ED /y_c ED /m_c ED /c_c ED c_c 0 ne {1 c_c sub} {0}IE m_c 0 ne {1 m_c sub}
{0}IE y_c 0 ne {1 y_c sub} {0}IE k_c 0 ne {1 k_c sub} {0}IE } BD /FNTSIZE {
/high ED /wide ED FF wide high eq { wide scalefont } { [wide 0 0 high 0 0]
makefont } IE } BD /NEWVARFNT { /Thi ED /isThi ED /Rot ED /isRot ED /Sla ED
/isSla ED /hei ED /wid ED /Fnt ED isRot 0 eq { isSla 0 eq { Fnt wid hei FNTSIZE
SF } { /direction 1 def Sla 0 lt { /Sla Sla neg def /direction 0 def } if
/deltx Sla sin Sla cos div wid mul def direction 0 eq {/deltx deltx neg def} if
Fnt FF [wid 0 deltx hei 0 0] makefont isThi 0 ne { SF } if } IE } { isSla 0 eq
{ /a wid Rot cos mul def /b wid Rot sin mul def /c hei neg Rot sin mul def /d
hei Rot cos mul def Fnt FF [a b c d 0 0] makefont isThi 0 ne { SF } if } {
/direction 1 def Sla 0 lt { /Sla Sla neg def /direction 0 def } if /deltx Sla
sin Sla cos div wid mul def direction 0 eq {/deltx deltx neg def} if /a Rot cos
def /b Rot sin def /c Rot sin neg def /d Rot cos def Fnt FF [wid 0 deltx hei 0
0] makefont [a b c d 0 0] makefont isThi 0 ne { SF } if } IE } IE isThi 0 ne {
Thi 0 lt { /ptype 1 def /Thi Thi neg def } { /ptype 3 def } IE currentfont dup
length dict begin { 1 index /FID ne {def} {pop pop} IE } forall /PaintType
ptype def /StrokeWidth Thi 20 mul def currentdict end /Myfont exch definefont }
if } BD /VARFNT { /Thi ED /isThi ED /isRev ED /Rot ED /isRot ED /Sla ED /isSla
ED /hei ED /wid ED /Fnt ED isRot 0 eq { isSla 0 eq { Fnt wid hei FNTSIZE SF } {
/direction 1 def Sla 0 lt { /Sla Sla neg def /direction 0 def } if /deltx Sla
sin Sla cos div wid mul def direction 0 eq {/deltx deltx neg def} if Fnt FF
[wid 0 deltx hei 0 0] makefont SF } IE } { isSla 0 eq { /a wid Rot cos mul def
/b wid Rot sin mul def /c hei neg Rot sin mul def /d hei Rot cos mul def Fnt FF
[a b c d 0 0] makefont SF } { /direction 1 def Sla 0 lt { /Sla Sla neg def
/direction 0 def } if /deltx Sla sin Sla cos div wid mul def direction 0 eq
{/deltx deltx neg def} if /a Rot cos def /b Rot sin def /c Rot sin neg def /d
Rot cos def Fnt FF [wid 0 deltx hei 0 0] makefont [a b c d 0 0] makefont SF }
IE } IE isThi 0 ne { Thi 0 lt { /ptype 1 def /Thi Thi neg def } { /ptype 3 def
} IE currentfont dup length dict begin { 1 index /FID ne {def} {pop pop} IE }
forall /PaintType ptype def /StrokeWidth Thi 20 mul def currentdict end /Myfont
exch definefont SF } if isRev 0 ne { 1 SG } if } BD /CREATEPAT { /pattern ED
/str ED /hei ED /wid ED MX orgmx SM << /PaintType 2 /PatternType 1 /TilingType
1 /XStep wid /YStep hei /BBox [0 0 wid hei] /PaintProc { pop 0 0 TR wid hei SC
wid hei true [wid 0 0 hei neg 0 hei] {str} imagemask } >> matrix makepattern
pattern ED $mtrx SM } BD /HOLLOW { /bVert ED /bHolBrd ED /HolShd ED HolShd 0 ne
{ /kc ED /yc ED /mc ED /cc ED } if /str ED /gap ED HolShd 0 ne { /bPAT ED bPAT
1 eq { /pattern ED } if } if currentpoint /y ED /x ED /SVF currentfont def
currentfont dup length dict begin { 1 index /FID ne {def} {pop pop} IE } forall
/PaintType 2 def currentdict end /Myfont exch definefont /HolFnt ED HolShd 0 eq
{ bHolBrd 0 ne { HolFnt SF x y M bVert 0 eq { str gap XS } { str gap YS } IE }
if } { GS cc mc yc kc SCC bPAT 1 eq { CCC pattern SP } if x y M bVert 0 eq {
str gap XS } { str gap YS } IE GR bHolBrd 0 ne { HolFnt SF x y M bVert 0 eq {
str gap XS } { str gap YS }IE } if } IE SVF SF } BD /OUTLINE { /bVert ED
/bOldOutline ED /isOutBrd ED isOutBrd 0 ne { /k2 ED /y2 ED /m2 ED /c2 ED
/BrdThi ED } if /k1 ED /y1 ED /m1 ED /c1 ED /OutThi ED /str ED /gap ED
currentpoint /ys ED /xs ED isOutBrd 0 ne { GS currentfont dup length dict begin
{ 1 index /FID ne {def} {pop pop} IE } forall bOldOutline 0 ne { /PaintType 4
def } { /PaintType 3 def } IE /StrokeWidth BrdThi def currentdict end /Myfont
exch definefont /newfont ED newfont SF c2 m2 y2 k2 SCC xs ys M bVert 0 eq{str
gap XS}{str gap YS}IE GR } if GS currentfont dup length dict begin { 1 index
/FID ne {def} {pop pop} IE } forall bOldOutline 0 ne { /PaintType 4 def } {
/PaintType 3 def } IE /StrokeWidth OutThi def currentdict end /Myfont exch
definefont /newfont ED newfont SF c1 m1 y1 k1 SCC xs ys M bVert 0 eq{str gap
XS}{str gap YS}IE GR xs ys M bVert 0 eq{str gap XS}{str gap YS}IE } BD /DIM_3 {
/bVert ED /isGrad ED /isOver ED isGrad 0 ne { /k2 ED /y2 ED /m2 ED /c2 ED } if
/k1 ED /y1 ED /m1 ED /c1 ED /isBrd ED isBrd 0 ne { /k_c ED /y_c ED /m_c ED /c_c
ED } if /Dim ED /DimY ED /DimX ED /str ED /gap ED currentpoint /ys ED /xs ED
/tmpxs xs def /tmpys ys def isOver 0 ne { GS c1 m1 y1 k1 SCC Dim DimX mul xs
add Dim DimY mul ys add M bVert 0 eq {str gap XS}{str gap YS}IE GR } { isBrd 0
ne { Dim DimX mul xs add Dim DimY mul ys add M bVert 0 eq {str gap XS}{str gap
YS}IE /Dim Dim 2 sub def Dim 1 le { /Dim 1 def } if } if GS isGrad 0 eq { c1 m1
y1 k1 SCC } if Dim -1 1 { /i ED isGrad 0 ne { /cc c2 c1 sub i mul Dim div c1
add def /mm m2 m1 sub i mul Dim div m1 add def /yy y2 y1 sub i mul Dim div y1
add def /kk k2 k1 sub i mul Dim div k1 add def cc mm yy kk SCC } if /tmpxs i
DimX mul xs add def /tmpys i DimY mul ys add def tmpxs tmpys M bVert 0 eq {str
gap XS} {str gap YS} IE } for GR } IE xs ys M bVert 0 eq {str gap XS}{str gap
YS} IE isBrd 0 ne { currentgray /g ED g 1 eq { GS currentfont dup length dict
begin { 1 index /FID ne {def} {pop pop} IE } forall /PaintType 2 def
currentdict end /Myfont exch definefont /newfont ED newfont SF c_c m_c y_c k_c
SCC xs ys M bVert 0 eq {str gap XS}{str gap YS} IE GR } if } if } BD /canopen {
reportnopic false eq { errordict /undefinedfilename {pop pop pop /fileopen
false def} put errordict /ioerror {pop pop pop /fileopen false def} put } if
/fileopen true def (r) file fileopen } BD /bw_pic { /filename ED /filepos ED
/picmtrx ED /code ED /height ED /width ED filename canopen true eq { /picfile
ED picfile filepos setfileposition << /ImageType 1 /Width width /Height height
/BitsPerComponent 1 /Decode code /ImageMatrix picmtrx /DataSource picfile
/Interpolate false >> imagemask picfile closefile } if } BD /gray_pic {
/filename ED /filepos ED /picmtrx ED /code ED /bits ED /height ED /width ED
filename canopen true eq { /picfile ED picfile filepos setfileposition
/DeviceGray setcolorspace << /ImageType 1 /Width width /Height height
/BitsPerComponent bits /Decode code /ImageMatrix picmtrx /DataSource picfile
/Interpolate true >> image picfile closefile } if } BD /pal_pic { /filename ED
/filepos ED /picmtrx ED /code ED /table ED /N ED /bits ED /height ED /width ED
filename canopen true eq { /picfile ED picfile filepos setfileposition
[/Indexed /DeviceRGB N table] setcolorspace << /ImageType 1 /Width width
/Height height /BitsPerComponent bits /Decode code /ImageMatrix picmtrx
/DataSource picfile /Interpolate true >> image picfile closefile } if } BD
/rgb_pic { /filename ED /filepos ED /picmtrx ED /code ED /height ED /width ED
filename canopen true eq { /picfile ED picfile filepos set
- 1
- 2
- 3
前往页