?? toolkit.eps
字號:
%!PS-Adobe-2.0 EPSF-1.2
%%Title: toolkit.eps
%%Creator: CLARIS EPSF Export Filter V1.0
%%CreationDate:10/14/95 11:32:12 a.m.
%%BoundingBox: 44.382 404.625 297.617 618.515
%%QDBoundingBox: 44.382 173.484 297.617 387.374
%%DocumentFonts: Times-Bold
%%+
%%DocumentProcessColors: Cyan Magenta Yellow Black
%%ObjectsIncluded: tText=T tLine=T tRect=T tRRect=T tOval=T tArc=T tFree=F tPoly=F tBMap=F tNote=F tBez=T tPMap=F
%%AttributesIncluded: kBaWPattType=T kPixPattType=T kGradientType=T
%%EndComments
/MAV 300 dict def
MAV begin
/useClip true def
/top 0 def
/left 1 def
/bottom 2 def
/right 3 def
/CM 6 array def
/CTM 6 array def
/CTMR 6 array def
/MTC 6 array def
/blimit 1500 def
/bcnt 0 def
/rbox 8 array def
/segbox 8 array def
/bbox1 4 array def
/c1 3 array def
/c2 3 array def
/d 3 array def
/delta 3 array def
/mycurrentrgbcolor 3 array def
/ulx 0 def
/uly 1 def
/llx 2 def
/lly 3 def
/urx 4 def
/ury 5 def
/lrx 6 def
/lry 7 def
/sp [0 0] def
/ep [0 0] def
/bbox 4 array def
/pbox 4 array def
/scrnProc currentscreen 3 1 roll pop pop def
/currentcolorscreen where {
begin
currentcolorscreen
end
3 1 roll pop pop
4 2 roll pop pop
5 -2 roll pop pop
6 -2 roll pop pop
/kProc exch def
/bProc exch def
/gProc exch def
/rProc exch def
} if
/Max {2 copy gt {pop}{exch pop} ifelse} bind def
/cellPenW 72.0 /currentcolorscreen where
{begin currentcolorscreen end pop pop
10 1 roll pop pop 8 1 roll pop pop
6 1 roll pop pop Max Max Max }
{currentscreen pop pop} ifelse div 2.0 div def
%%BeginProcSet : rect
/rect {
/saveobj save def
R PC PF LC SS
saveobj restore
} bind def
%%EndProcSet
%%BeginProcSet : R
/R {
newpath
pbox astore pop
0 792 translate 1 -1 scale CTMR currentmatrix pop exch translate
/objectCord mstore def
pbox right get 2 div
dup pbox left get exch sub
pbox left 3 -1 roll put
dup pbox right 3 -1 roll put
pbox bottom get 2 div
dup pbox top get exch sub
pbox top 3 -1 roll put
dup pbox bottom 3 -1 roll put
translate
CTM currentmatrix pop
57.3 mul rotate
RT
} bind def
%%EndProcSet
%%BeginProcSet : SaveScreenBW
/SaveScreenBW {
currentscreen
/scrnProc exch def
/scrnAngle exch def
/scrnFreq exch def
} bind def
%%EndProcSet
%%BeginProcSet : RestoreScreenBW
/RestoreScreenBW {
scrnFreq scrnAngle MAV /scrnProc get setscreen
} bind def
%%EndProcSet
%%BeginProcSet : SetFreqAngleBW
/SetFreqAngleBW {
currentscreen
3 1 roll
pop pop
setscreen
} bind def
%%EndProcSet
%%BeginProcSet : SaveScreenColor
/SaveScreenColor {
currentcolorscreen
/grayProc exch def
/grayAngle exch def
/grayFreq exch def
/bProc exch def
/bAngle exch def
/bFreq exch def
/gProc exch def
/gAngle exch def
/gFreq exch def
/rProc exch def
/rAngle exch def
/rFreq exch def
} bind def
%%EndProcSet
%%BeginProcSet : RestoreColorScreen
/RestoreColorScreen {
rFreq rAngle MAV /rProc get gFreq gAngle MAV /gProc get bFreq bAngle MAV /bProc get grayFreq grayAngle MAV /grayProc get setcolorscreen
} bind def
%%EndProcSet
%%BeginProcSet : SetFreqAngleColor
/SetFreqAngleColor {
currentcolorscreen
3 1 roll pop pop
4 2 roll pop pop
5 -2 roll pop pop
6 -2 roll pop pop
4 1 roll
6 1 roll
8 1 roll
10 1 roll
setcolorscreen
} bind def
%%EndProcSet
/initmsaverestore {
userdict begin
/mdict 10 dict def
mdict begin
/mindex -1 def
/mstacksize 25 def
/mstack mstacksize array def
/incmindex {
/mindex mindex 1 add def
} bind def
/decmindex {
/mindex mindex 1 sub def
} bind def
/checkmindex {
mindex 0 lt {
(%ERROR: msave/mrestore stack underflow: Offending command 'mrestore'
) print flush
stop
}
{
mindex mstacksize ge {
(%ERROR: msave/mrestore stack overflow: Offending command 'msave'
) print flush
stop
} if
} ifelse
} bind def
/mpush {
incmindex
checkmindex
mstack mindex
3 -1 roll put
} bind def
/mpop {
checkmindex
mstack mindex get
decmindex
} bind def
end
end
} bind def
/msave {
mdict begin
matrix currentmatrix mpush
end
} bind def
/mrestore {
mdict begin
mpop setmatrix
end
} bind def
/msavelevel {
mdict begin
mindex 1 add
end
} bind def
/mstore {
matrix currentmatrix
} bind def
/AutoSizeY {
0 0 pl
dup 3 1 roll
4 -1 roll
add
pl exch pop
exch sub
} bind def
/pl {
transform
0.25 sub round 0.25 add exch
0.25 sub round 0.25 add exch
itransform
} bind def
/pll {
transform
round exch
round exch
itransform
} bind def
/pr {
dtransform
round exch
round exch
idtransform
} bind def
/m {
pl moveto
} bind def
/l {
pl lineto
} bind def
/c {
pl curveto
} bind def
/rm {
pr rmoveto
} bind def
/rl {
pr rlineto
} bind def
/ar {
5 -2 roll pl
5 2 roll
arc
} bind def
/an {
5 -2 roll pl
5 2 roll
arcn
} bind def
/MakePatternFont {
/FontDict 20 dict def
FontDict begin
/FontName exch def
/Encoding exch def
/FontMatrix [1 0 0 1 0 0 ] def
/FontType 3 def
/FontBBox [ 0 0 1 1 ] def
/PatternDict exch def
/RenderPattern {
patternDict exch get
exec
} bind def
/BuildChar {
exch begin
1 0 0 0 1 1 setcachedevice
Encoding exch get RenderPattern
end
} bind def
FontName FontDict definefont pop
end
} bind def
/SnapToPattenGrid
{
exch
dup 0 lt {
1 index sub
} if
1 index
div truncate
mul
} bind def
/FillPatternString {
dup length
1 sub
0 1 3 -1 roll {
2 index
2 index
3 -2 roll
put
} for
pop pop
} bind def
/AutoSizeY {
0.0 exch dtransform
round
idtransform exch pop
} bind def
/AutoSizeX {
0.0 dtransform
exch
round
exch
idtransform pop
} bind def
/AutoCellSize {
AutoSizeY
exch
AutoSizeX
exch
} bind def
/CheckPath {
false
{ pop pop pop true exit}
{ pop pop pop true exit}
{ pop pop pop pop pop pop pop true exit}
{ pop true exit}
pathforall
} bind def
/PatternFill { % patternCharacter
/patternString 1 string def
/cm mstore def
patternMatrix setmatrix
1 1 AutoCellSize
dup 0 eq { pop 1} if
exch
dup 0 eq { pop 1} if
exch
/patternSize exch 24.0 mul def
/PatternSizeX exch 24.0 mul patternString length mul def
/flaterror 0 def
patternString FillPatternString
gsave
flaterror 1 add setflat
flattenpath
pathbbox
grestore
psy add flaterror add psy SnapToPattenGrid
exch psx add flaterror add psx SnapToPattenGrid
3 -1 roll flaterror sub psy SnapToPattenGrid
4 -1 roll flaterror sub psx SnapToPattenGrid
4 2 roll pll
4 2 roll pll
/llxsnap exch def
/llysnap exch def
/urxsnap exch def
/urysnap exch def
gsave
useClip true eq {clip}{eoclip} ifelse newpath
/PatternFont findfont [psx 0.0 0.0 psy 0.0 0.0] makefont setfont
llysnap patternSize urysnap {
llxsnap exch moveto
llxsnap PatternSizeX urxsnap {
pop
patternString show
%currentpoint am
} for
} bind for
grestore
cm setmatrix
} bind def % End 'PatternFill'
/DefaultPatternFont {
/cm mstore def
patternMatrix setmatrix
1 1 AutoCellSize
dup 0 eq { pop 1} if
exch
dup 0 eq { pop 1} if
exch
/psy exch iSizeY mul def
/psx exch iSizeX mul def
/patternDict 64 dict def
patternDict begin
/NotDef {} def
/LiteDiagLines {
iSizeX iSizeY false [iSizeX 0.0 0.0 iSizeY -1.0 mul 0.0 iSizeY]
{pat}
imagemask
} bind def
end
/CustEncoding 256 array def
0 255 1 {
CustEncoding exch /NotDef put
} bind for
CustEncoding 65 /LiteDiagLines put
patternDict CustEncoding /PatternFont MakePatternFont
/pathSegProc {
strokepath
CheckPath {
65 PatternFill newpath
} if
} bind def
cm setmatrix
} bind def
/XRound {
dup
3 -1 roll
exch mul round
exch div
} bind def
/RoundMatrix {
/i 0 def
dup {
100000.0 XRound
1 index
exch i exch put
/i i 1 add def
} forall
} bind def
/GetBoxesRatio {
3 -1 roll sub
7 1 roll
exch sub
6 1 roll
3 -1 roll sub
5 1 roll
exch sub
4 1 roll
3 -1 roll div
3 1 roll
exch div
exch
} bind def
%%BeginProcSet : Text Attributes Procs
/T {792 exch sub} bind def
/sx 0 def
/sy 0 def
/ex 0 def
/ey 0 def
/lw 0 def
/siz 0 def
/U {gsave 0 setlinecap
/lw siz 0.078125 mul def /ey exch neg def /ex exch def /sy exch neg def /sx exch def
fontkind plain eq
{
lw siz 0.0119444 mul sub setlinewidth sx sy moveto ex ey lineto stroke
}
{
currentdict /outlineFontSize known outlineFontSize 0 gt and
{
fontkind outline eq
{
/sy sy 0.0119444 siz mul sub def
/ey ey 0.0119444 siz mul sub def
gsave
1 1 1 setrgbcolor lw siz 0.0119444 mul sub setlinewidth sx sy moveto ex ey lineto stroke
grestore
lw siz 0.0119444 mul sub setlinewidth sx sy moveto ex ey lineto
strokepath 0.0119444 siz mul setlinewidth stroke
} if
fontkind shadow eq fontkind outlineshadow eq or
{
/sy sy 0.0358332 siz mul sub def
/ey ey 0.0358332 siz mul sub def
lw setlinewidth
lw 2 div sx add sy
lw 2 div sub moveto
lw 2 div ex add ey
lw 2 div sub lineto stroke
gsave
1 1 1 setrgbcolor lw siz 0.0119444 mul sub setlinewidth sx sy moveto ex ey lineto stroke
grestore
lw siz 0.0119444 mul sub setlinewidth sx sy moveto ex ey lineto
strokepath 0.0119444 siz mul setlinewidth stroke
} if
} if
} ifelse
grestore} bind def
/plain 1 def
/outline 2 def
/shadow 3 def
/outlineshadow 4 def
/fess {
currentdict /outlineFontSize known {
/outlineFontSize 2 index def
} if
findfont exch dup /siz exch def scalefont setfont
} bind def
/SHDW {gsave siz oldfontname fess siz 0.055 mul x add y siz 0.05 mul sub moveto c show grestore} def
/NRML {gsave 1 1 1 setrgbcolor siz oldfontname fess x y moveto c show grestore siz /Outline fess x y moveto c show} def
/S {
fontkind plain eq {neg moveto show} if
fontkind outline eq {neg /y exch def /x exch def /c exch def NRML} if
fontkind shadow eq {neg /y exch def /x exch def /c exch def SHDW NRML} if
fontkind outlineshadow eq {neg /y exch def /x exch def /c exch def SHDW NRML} if
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -