blob: 595e1ff3037abba8b72bb67c0cbf6e3f28644143 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
|
%!PS-Adobe-2.0 EPSF-2.0
%%BoundingBox: 2098 2638 2175 2702
%%Creator: CorelDRAW!
%%Title: AQQ.EPS
%%CreationDate: Mon Apr 21 23:16:03 1997
%%DocumentProcessColors: Cyan Magenta Yellow Black
%%DocumentSuppliedResources: (atend)
%%DocumentNeededResources: (atend)
%%EndComments
%%BeginSetup
/AutoFlatness true def
%Color profile: _DEFAULT.CCS - Generic CMYK Color Printer
%%EndSetup
%%BeginProlog
%%BeginResource: procset wCorel5Dict
% Copyright (c)1992-94 Corel Corporation
% All rights reserved. v5.0 r0.6
/wCorel5Dict 300 dict def wCorel5Dict begin/bd{bind def}bind def/ld{load def}
bd/xd{exch def}bd/_ null def/rp{{pop}repeat}bd/@cp/closepath ld/@gs/gsave ld
/@gr/grestore ld/@np/newpath ld/Tl/translate ld/$sv 0 def/@sv{/$sv save def}bd
/@rs{$sv restore}bd/spg/showpage ld/showpage{}bd currentscreen/@dsp xd/$dsp
/@dsp def/$dsa xd/$dsf xd/$sdf false def/$SDF false def/$Scra 0 def/SetScr
/setscreen ld/setscreen{3 rp}bd/@ss{2 index 0 eq{$dsf 3 1 roll 4 -1 roll pop}
if exch $Scra add exch load SetScr}bd/SepMode where{pop}{/SepMode 0 def}ifelse
/CurrentInkName where{pop}{/CurrentInkName(Composite)def}ifelse/$ink where
{pop}{/$ink -1 def}ifelse/$c 0 def/$m 0 def/$y 0 def/$k 0 def/$t 1 def/$n _ def
/$o 0 def/$fil 0 def/$C 0 def/$M 0 def/$Y 0 def/$K 0 def/$T 1 def/$N _ def/$O 0
def/$PF false def/s1c 0 def/s1m 0 def/s1y 0 def/s1k 0 def/s1t 0 def/s1n _ def
/$bkg false def/SK 0 def/SM 0 def/SY 0 def/SC 0 def/$op false def matrix
currentmatrix/$ctm xd/$ptm matrix def/$ttm matrix def/$stm matrix def/$fst 128
def/$pad 0 def/$rox 0 def/$roy 0 def/$ffpnt true def/CorelDrawReencodeVect[
16#0/grave 16#5/breve 16#6/dotaccent 16#8/ring 16#A/hungarumlaut 16#B/ogonek
16#C/caron 16#D/dotlessi 16#27/quotesingle 16#60/grave 16#7C/bar
16#82/quotesinglbase/florin/quotedblbase/ellipsis/dagger/daggerdbl
16#88/circumflex/perthousand/Scaron/guilsinglleft/OE
16#91/quoteleft/quoteright/quotedblleft/quotedblright/bullet/endash/emdash
16#98/tilde/trademark/scaron/guilsinglright/oe 16#9F/Ydieresis
16#A1/exclamdown/cent/sterling/currency/yen/brokenbar/section
16#a8/dieresis/copyright/ordfeminine/guillemotleft/logicalnot/minus/registered/macron
16#b0/degree/plusminus/twosuperior/threesuperior/acute/mu/paragraph/periodcentered
16#b8/cedilla/onesuperior/ordmasculine/guillemotright/onequarter/onehalf/threequarters/questiondown
16#c0/Agrave/Aacute/Acircumflex/Atilde/Adieresis/Aring/AE/Ccedilla
16#c8/Egrave/Eacute/Ecircumflex/Edieresis/Igrave/Iacute/Icircumflex/Idieresis
16#d0/Eth/Ntilde/Ograve/Oacute/Ocircumflex/Otilde/Odieresis/multiply
16#d8/Oslash/Ugrave/Uacute/Ucircumflex/Udieresis/Yacute/Thorn/germandbls
16#e0/agrave/aacute/acircumflex/atilde/adieresis/aring/ae/ccedilla
16#e8/egrave/eacute/ecircumflex/edieresis/igrave/iacute/icircumflex/idieresis
16#f0/eth/ntilde/ograve/oacute/ocircumflex/otilde/odieresis/divide
16#f8/oslash/ugrave/uacute/ucircumflex/udieresis/yacute/thorn/ydieresis]def
/@BeginSysCorelDict{systemdict/Corel10Dict known{systemdict/Corel10Dict get
begin}if}bd/@EndSysCorelDict{systemdict/Corel10Dict known{end}if}bd
AutoFlatness{/@ifl{dup currentflat exch sub 10 gt{
([Error: PathTooComplex; OffendingCommand: AnyPaintingOperator]\n)print flush
@np exit}{currentflat 2 add setflat}ifelse}bd/@fill/fill ld/fill{currentflat{
{@fill}stopped{@ifl}{exit}ifelse}bind loop setflat}bd/@eofill/eofill ld/eofill
{currentflat{{@eofill}stopped{@ifl}{exit}ifelse}bind loop setflat}bd/@clip
/clip ld/clip{currentflat{{@clip}stopped{@ifl}{exit}ifelse}bind loop setflat}
bd/@eoclip/eoclip ld/eoclip{currentflat{{@eoclip}stopped{@ifl}{exit}ifelse}
bind loop setflat}bd/@stroke/stroke ld/stroke{currentflat{{@stroke}stopped
{@ifl}{exit}ifelse}bind loop setflat}bd}if/d/setdash ld/j/setlinejoin ld/J
/setlinecap ld/M/setmiterlimit ld/w/setlinewidth ld/O{/$o xd}bd/R{/$O xd}bd/W
/eoclip ld/c/curveto ld/C/c ld/l/lineto ld/L/l ld/rl/rlineto ld/m/moveto ld/n
/newpath ld/N/newpath ld/P{11 rp}bd/u{}bd/U{}bd/A{pop}bd/q/@gs ld/Q/@gr ld/`
{}bd/~{}bd/@{}bd/&{}bd/@j{@sv @np}bd/@J{@rs}bd/g{1 exch sub/$k xd/$c 0 def/$m 0
def/$y 0 def/$t 1 def/$n _ def/$fil 0 def}bd/G{1 sub neg/$K xd _ 1 0 0 0/$C xd
/$M xd/$Y xd/$T xd/$N xd}bd/k{1 index type/stringtype eq{/$t xd/$n xd}{/$t 0
def/$n _ def}ifelse/$k xd/$y xd/$m xd/$c xd/$fil 0 def}bd/K{1 index type
/stringtype eq{/$T xd/$N xd}{/$T 0 def/$N _ def}ifelse/$K xd/$Y xd/$M xd/$C xd
}bd/x/k ld/X/K ld/sf{1 index type/stringtype eq{/s1t xd/s1n xd}{/s1t 0 def/s1n
_ def}ifelse/s1k xd/s1y xd/s1m xd/s1c xd}bd/i{dup 0 ne{setflat}{pop}ifelse}bd
/v{4 -2 roll 2 copy 6 -2 roll c}bd/V/v ld/y{2 copy c}bd/Y/y ld/@w{matrix rotate
/$ptm xd matrix scale $ptm dup concatmatrix/$ptm xd 1 eq{$ptm exch dup
concatmatrix/$ptm xd}if 1 w}bd/@g{1 eq dup/$sdf xd{/$scp xd/$sca xd/$scf xd}if
}bd/@G{1 eq dup/$SDF xd{/$SCP xd/$SCA xd/$SCF xd}if}bd/@D{2 index 0 eq{$dsf 3 1
roll 4 -1 roll pop}if 3 copy exch $Scra add exch load SetScr/$dsp xd/$dsa xd
/$dsf xd}bd/$ngx{$SDF{$SCF SepMode 0 eq{$SCA}{$dsa}ifelse $SCP @ss}if}bd/p{
/$pm xd 7 rp/$pyf xd/$pxf xd/$pn xd/$fil 1 def}bd/@MN{2 copy le{pop}{exch pop}
ifelse}bd/@MX{2 copy ge{pop}{exch pop}ifelse}bd/InRange{3 -1 roll @MN @MX}bd
/wDstChck{2 1 roll dup 3 -1 roll eq{1 add}if}bd/@dot{dup mul exch dup mul add 1
exch sub}bd/@lin{exch pop abs 1 exch sub}bd/cmyk2rgb{3{dup 5 -1 roll add 1 exch
sub dup 0 lt{pop 0}if exch}repeat pop}bd/rgb2cmyk{3{1 exch sub 3 1 roll}repeat
3 copy @MN @MN 3{dup 5 -1 roll sub neg exch}repeat}bd/rgb2g{2 index .299 mul 2
index .587 mul add 1 index .114 mul add 4 1 roll 3 rp}bd/WaldoColor where{pop}
{/SetRgb/setrgbcolor ld/GetRgb/currentrgbcolor ld/SetGry/setgray ld/GetGry
/currentgray ld/SetRgb2 systemdict/setrgbcolor get def/GetRgb2 systemdict
/currentrgbcolor get def/SetHsb systemdict/sethsbcolor get def/GetHsb
systemdict/currenthsbcolor get def/rgb2hsb{SetRgb2 GetHsb}bd/hsb2rgb{3 -1 roll
dup floor sub 3 1 roll SetHsb GetRgb2}bd/setcmykcolor where{pop/SetCmyk
/setcmykcolor ld}{/SetCmyk{cmyk2rgb SetRgb}bd}ifelse/currentcmykcolor where{
pop/GetCmyk/currentcmykcolor ld}{/GetCmyk{GetRgb rgb2cmyk}bd}ifelse
/setoverprint where{pop}{/setoverprint{/$op xd}bd}ifelse/currentoverprint where
{pop}{/currentoverprint{$op}bd}ifelse/@tc{5 -1 roll dup 1 ge{pop}{4{dup 6 -1
roll mul exch}repeat pop}ifelse}bd/@trp{exch pop 5 1 roll @tc}bd
/setprocesscolor{SepMode 0 eq{SetCmyk}{0 4 $ink sub index exch pop 5 1 roll 4
rp SepsColor true eq{$ink 3 gt{1 sub neg SetGry}{0 0 0 4 $ink roll SetCmyk}
ifelse}{1 sub neg SetGry}ifelse}ifelse}bd/findcmykcustomcolor where{pop}{
/findcmykcustomcolor{5 array astore}bd}ifelse/setcustomcolor where{pop}{
/setcustomcolor{exch aload pop SepMode 0 eq{pop @tc setprocesscolor}{
CurrentInkName eq{4 index}{0}ifelse 6 1 roll 5 rp 1 sub neg SetGry}ifelse}bd}
ifelse/@scc{dup type/booleantype eq{setoverprint}{1 eq setoverprint}ifelse dup
_ eq{pop setprocesscolor pop}{findcmykcustomcolor exch setcustomcolor}ifelse
SepMode 0 eq{true}{GetGry 1 eq currentoverprint and not}ifelse}bd/colorimage
where{pop/ColorImage/colorimage ld}{/ColorImage{/ncolors xd pop/dataaq xd{
dataaq ncolors dup 3 eq{/$dat xd 0 1 $dat length 3 div 1 sub{dup 3 mul $dat 1
index get 255 div $dat 2 index 1 add get 255 div $dat 3 index 2 add get 255 div
rgb2g 255 mul cvi exch pop $dat 3 1 roll put}for $dat 0 $dat length 3 idiv
getinterval pop}{4 eq{/$dat xd 0 1 $dat length 4 div 1 sub{dup 4 mul $dat 1
index get 255 div $dat 2 index 1 add get 255 div $dat 3 index 2 add get 255 div
$dat 4 index 3 add get 255 div cmyk2rgb rgb2g 255 mul cvi exch pop $dat 3 1
roll put}for $dat 0 $dat length ncolors idiv getinterval}if}ifelse}image}bd
}ifelse/setcmykcolor{1 5 1 roll _ currentoverprint @scc/$ffpnt xd}bd
/currentcmykcolor{0 0 0 0}bd/setrgbcolor{rgb2cmyk setcmykcolor}bd
/currentrgbcolor{currentcmykcolor cmyk2rgb}bd/sethsbcolor{hsb2rgb setrgbcolor}
bd/currenthsbcolor{currentrgbcolor rgb2hsb}bd/setgray{dup dup setrgbcolor}bd
/currentgray{currentrgbcolor rgb2g}bd}ifelse/WaldoColor true def/@sft{$tllx
$pxf add dup $tllx gt{$pwid sub}if/$tx xd $tury $pyf sub dup $tury lt{$phei
add}if/$ty xd}bd/@stb{pathbbox/$ury xd/$urx xd/$lly xd/$llx xd}bd/@ep{{cvx exec
}forall}bd/@tp{@sv/$in true def 2 copy dup $lly le{/$in false def}if $phei sub
$ury ge{/$in false def}if dup $urx ge{/$in false def}if $pwid add $llx le{/$in
false def}if $in{@np 2 copy m $pwid 0 rl 0 $phei neg rl $pwid neg 0 rl 0 $phei
rl clip @np $pn cvlit load aload pop 7 -1 roll 5 index sub 7 -1 roll 3 index
sub Tl matrix currentmatrix/$ctm xd @ep 4 rp}{2 rp}ifelse @rs}bd/@th{@sft 0 1
$tly 1 sub{dup $psx mul $tx add{dup $llx gt{$pwid sub}{exit}ifelse}loop exch
$phei mul $ty exch sub 0 1 $tlx 1 sub{$pwid mul 3 copy 3 -1 roll add exch @tp
pop}for 2 rp}for}bd/@tv{@sft 0 1 $tlx 1 sub{dup $pwid mul $tx add exch $psy mul
$ty exch sub{dup $ury lt{$phei add}{exit}ifelse}loop 0 1 $tly 1 sub{$phei mul 3
copy sub @tp pop}for 2 rp}for}bd/@pf{@gs $ctm setmatrix $pm concat @stb eoclip
Bburx Bbury $pm itransform/$tury xd/$turx xd Bbllx Bblly $pm itransform/$tlly
xd/$tllx xd/$wid $turx $tllx sub def/$hei $tury $tlly sub def @gs $vectpat{1 0
0 0 0 _ $o @scc{eofill}if}{$t $c $m $y $k $n $o @scc{SepMode 0 eq $pfrg or{
$tllx $tlly Tl $wid $hei scale <00> 8 1 false[8 0 0 1 0 0]{}imagemask}{/$bkg
true def}ifelse}if}ifelse @gr $wid 0 gt $hei 0 gt and{$pn cvlit load aload pop
/$pd xd 3 -1 roll sub/$phei xd exch sub/$pwid xd $wid $pwid div ceiling 1 add
/$tlx xd $hei $phei div ceiling 1 add/$tly xd $psx 0 eq{@tv}{@th}ifelse}if @gr
@np/$bkg false def}bd/@dlt{$fse $fss sub/nff xd $frb dup 1 eq exch 2 eq or{
$frt dup $frc $frm $fry $frk @tc 4 copy cmyk2rgb rgb2hsb 3 copy/myb xd/mys xd
/myh xd $tot $toc $tom $toy $tok @tc cmyk2rgb rgb2hsb 3 1 roll 4 1 roll 5 1
roll sub neg nff div/kdb xd sub neg nff div/kds xd sub neg dup 0 eq{pop $frb 2
eq{.99}{-.99}ifelse}if dup $frb 2 eq exch 0 lt and{1 add}if dup $frb 1 eq exch
0 gt and{1 sub}if nff div/kdh xd}{$frt dup $frc $frm $fry $frk @tc 5 copy $tot
dup $toc $tom $toy $tok @tc 5 1 roll 6 1 roll 7 1 roll 8 1 roll 9 1 roll sub
neg nff dup 1 gt{1 sub}if div/$dk xd sub neg nff dup 1 gt{1 sub}if div/$dy xd
sub neg nff dup 1 gt{1 sub}if div/$dm xd sub neg nff dup 1 gt{1 sub}if div/$dc
xd sub neg nff dup 1 gt{1 sub}if div/$dt xd}ifelse}bd/ffcol{5 copy $fsit 0 eq{
setcmykcolor pop}{SepMode 0 ne{$frn findcmykcustomcolor exch setcustomcolor}{4
rp $frc $frm $fry $frk $frn findcmykcustomcolor exch setcustomcolor}ifelse}
ifelse}bd/@ftl{1 index 4 index sub dup $pad mul dup/$pdw xd 2 mul sub $fst div
/$wid xd 2 index sub/$hei xd pop Tl @dlt $fss 0 eq{ffcol n 0 0 m 0 $hei l $pdw
$hei l $pdw 0 l @cp $ffpnt{fill}{@np}ifelse}if $fss $wid mul $pdw add 0 Tl nff
{ffcol n 0 0 m 0 $hei l $wid $hei l $wid 0 l @cp $ffpnt{fill}{@np}ifelse $wid 0
Tl $frb dup 1 eq exch 2 eq or{4 rp myh mys myb kdb add 3 1 roll kds add 3 1
roll kdh add 3 1 roll 3 copy/myb xd/mys xd/myh xd hsb2rgb rgb2cmyk}{$dk add 5 1
roll $dy add 5 1 roll $dm add 5 1 roll $dc add 5 1 roll $dt add 5 1 roll}
ifelse}repeat 5 rp $tot dup $toc $tom $toy $tok @tc ffcol n 0 0 m 0 $hei l $pdw
$hei l $pdw 0 l @cp $ffpnt{fill}{@np}ifelse 5 rp}bd/@ftrs{1 index 4 index sub
dup $rox mul/$row xd 2 div 1 index 4 index sub dup $roy mul/$roh xd 2 div 2
copy dup mul exch dup mul add sqrt $row dup mul $roh dup mul add sqrt add dup
/$hei xd $fst div/$wid xd 4 index add $roh add exch 5 index add $row add exch
Tl $fan rotate 4 rp @dlt $fss 0 eq{ffcol $fty 3 eq{$hei dup neg dup m 2 mul
@sqr}{0 0 m 0 0 $hei 0 360 arc}ifelse $ffpnt{fill}{@np}ifelse}if 1.0 $pad 2 mul
sub dup scale $hei $fss $wid mul sub/$hei xd nff{ffcol $fty 3 eq{n $hei dup neg
dup m 2 mul @sqr}{n 0 0 m 0 0 $hei 0 360 arc}ifelse $ffpnt{fill}{@np}ifelse
/$hei $hei $wid sub def $frb dup 1 eq exch 2 eq or{4 rp myh mys myb kdb add 3 1
roll kds add 3 1 roll kdh add 3 1 roll 3 copy/myb xd/mys xd/myh xd hsb2rgb
rgb2cmyk}{$dk add 5 1 roll $dy add 5 1 roll $dm add 5 1 roll $dc add 5 1 roll
$dt add 5 1 roll}ifelse}repeat 5 rp}bd/@ftc{1 index 4 index sub dup $rox mul
/$row xd 2 div 1 index 4 index sub dup $roy mul/$roh xd 2 div 2 copy dup mul
exch dup mul add sqrt $row dup mul $roh dup mul add sqrt add dup/$hei xd $fst
div/$wid xd 4 index add $roh add exch 5 index add $row add exch Tl 4 rp @dlt
$fss 0 eq{ffcol $ffpnt{fill}{@np}ifelse}{n}ifelse/$dang 180 $fst 1 sub div def
/$sang $dang -2 div 180 add def/$eang $dang 2 div 180 add def/$sang $sang $dang
$fss mul add def/$eang $eang $dang $fss mul add def/$sang $eang $dang sub def
nff{ffcol n 0 0 m 0 0 $hei $sang $fan add $eang $fan add arc $ffpnt{fill}{@np}
ifelse 0 0 m 0 0 $hei $eang neg $fan add $sang neg $fan add arc $ffpnt{fill}
{@np}ifelse/$sang $eang def/$eang $eang $dang add def $frb dup 1 eq exch 2 eq
or{4 rp myh mys myb kdb add 3 1 roll kds add 3 1 roll kdh add 3 1 roll 3 copy
/myb xd/mys xd/myh xd hsb2rgb rgb2cmyk}{$dk add 5 1 roll $dy add 5 1 roll $dm
add 5 1 roll $dc add 5 1 roll $dt add 5 1 roll}ifelse}repeat 5 rp}bd/@ff{/$fss
0 def $o 1 eq setoverprint 1 1 $fsc 1 sub{dup 1 sub $fsit 0 eq{$fsa exch 5 mul
5 getinterval aload 2 rp/$frk xd/$fry xd/$frm xd/$frc xd/$frn _ def/$frt 1 def
$fsa exch 5 mul 5 getinterval aload pop $fss add/$fse xd/$tok xd/$toy xd/$tom
xd/$toc xd/$ton _ def/$tot 1 def}{$fsa exch 7 mul 7 getinterval aload 2 rp
/$frt xd/$frn xd/$frk xd/$fry xd/$frm xd/$frc xd $fsa exch 7 mul 7 getinterval
aload pop $fss add/$fse xd/$tot xd/$ton xd/$tok xd/$toy xd/$tom xd/$toc xd}
ifelse $fsit 0 eq SepMode 0 eq or dup not CurrentInkName $frn eq and or{@sv
$ctm setmatrix eoclip Bbllx Bblly Bburx Bbury $fty 2 eq{@ftc}{1 index 3 index m
2 copy l 3 index 1 index l 3 index 3 index l @cp $fty dup 1 eq exch 3 eq or{
@ftrs}{4 rp $fan rotate pathbbox @ftl}ifelse}ifelse @rs/$fss $fse def}{1 0 0 0
0 _ $o @scc{fill}if}ifelse}for @np}bd/@Pf{@sv SepMode 0 eq $ink 3 eq or{0 J 0 j
[]0 d $t $c $m $y $k $n $o @scc pop $ctm setmatrix 72 1000 div dup matrix scale
dup concat dup Bburx exch Bbury exch itransform ceiling cvi/Bbury xd ceiling
cvi/Bburx xd Bbllx exch Bblly exch itransform floor cvi/Bblly xd floor cvi
/Bbllx xd $Prm aload pop $Psn load exec}{1 SetGry eofill}ifelse @rs @np}bd/F{
matrix currentmatrix $sdf{$scf $sca $scp @ss}if $fil 1 eq{@pf}{$fil 2 eq{@ff}{
$fil 3 eq{@Pf}{$t $c $m $y $k $n $o @scc{eofill}{@np}ifelse}ifelse}ifelse}
ifelse $sdf{$dsf $dsa $dsp @ss}if setmatrix}bd/f{@cp F}bd/S{matrix
currentmatrix $ctm setmatrix $SDF{$SCF $SCA $SCP @ss}if $T $C $M $Y $K $N $O
@scc{matrix currentmatrix $ptm concat stroke setmatrix}{@np}ifelse $SDF{$dsf
$dsa $dsp @ss}if setmatrix}bd/s{@cp S}bd/B{@gs F @gr S}bd/b{@cp B}bd/E{5 array
astore exch cvlit xd}bd/@cc{currentfile $dat readhexstring pop}bd/@sm{/$ctm
$ctm currentmatrix def}bd/@E{/Bbury xd/Bburx xd/Bblly xd/Bbllx xd}bd/@c{@cp}bd
/@p{/$fil 1 def 1 eq dup/$vectpat xd{/$pfrg true def}{@gs $t $c $m $y $k $n $o
@scc/$pfrg xd @gr}ifelse/$pm xd/$psy xd/$psx xd/$pyf xd/$pxf xd/$pn xd}bd/@P{
/$fil 3 def/$Psn xd array astore/$Prm xd}bd/@k{/$fil 2 def/$roy xd/$rox xd
/$pad xd/$fty xd/$fan xd $fty 1 eq{/$fan 0 def}if/$frb xd/$fst xd/$fsc xd/$fsa
xd/$fsit 0 def}bd/@x{/$fil 2 def/$roy xd/$rox xd/$pad xd/$fty xd/$fan xd $fty 1
eq{/$fan 0 def}if/$frb xd/$fst xd/$fsc xd/$fsa xd/$fsit 1 def}bd/@ii{concat 3
index 3 index m 3 index 1 index l 2 copy l 1 index 3 index l 3 index 3 index l
clip 4 rp}bd/tcc{@cc}def/@i{@sm @gs @ii 6 index 1 ne{/$frg true def 2 rp}{1 eq
{s1t s1c s1m s1y s1k s1n $O @scc/$frg xd}{/$frg false def}ifelse 1 eq{@gs $ctm
setmatrix F @gr}if}ifelse @np/$ury xd/$urx xd/$lly xd/$llx xd/$bts xd/$hei xd
/$wid xd/$dat $wid $bts mul 8 div ceiling cvi string def $bkg $frg or{$SDF
{$SCF $SCA $SCP @ss}if $llx $lly Tl $urx $llx sub $ury $lly sub scale $bkg{$t
$c $m $y $k $n $o @scc pop}if $wid $hei abs $bts 1 eq{$bkg}{$bts}ifelse[$wid 0
0 $hei neg 0 $hei 0 gt{$hei}{0}ifelse]/tcc load $bts 1 eq{imagemask}{image}
ifelse $SDF{$dsf $dsa $dsp @ss}if}{$hei abs{tcc pop}repeat}ifelse @gr $ctm
setmatrix}bd/@M{@sv}bd/@N{/@cc{}def 1 eq{12 -1 roll neg 12 1 roll @I}{13 -1
roll neg 13 1 roll @i}ifelse @rs}bd/@I{@sm @gs @ii @np/$ury xd/$urx xd/$lly xd
/$llx xd/$ncl xd/$bts xd/$hei xd/$wid xd/$dat $wid $bts mul $ncl mul 8 div
ceiling cvi string def $ngx $llx $lly Tl $urx $llx sub $ury $lly sub scale $wid
$hei abs $bts[$wid 0 0 $hei neg 0 $hei 0 gt{$hei}{0}ifelse]/@cc load false $ncl
ColorImage $SDF{$dsf $dsa $dsp @ss}if @gr $ctm setmatrix}bd/z{exch findfont
exch scalefont setfont}bd/ZB{9 dict dup begin 4 1 roll/FontType 3 def
/FontMatrix xd/FontBBox xd/Encoding 256 array def 0 1 255{Encoding exch
/.notdef put}for/CharStrings 256 dict def CharStrings/.notdef{}put/Metrics 256
dict def Metrics/.notdef 3 -1 roll put/BuildChar{exch dup/$char exch/Encoding
get 3 index get def dup/Metrics get $char get aload pop setcachedevice begin
Encoding exch get CharStrings exch get end exec}def end definefont pop}bd
/ZBAddChar{findfont begin dup 4 1 roll dup 6 1 roll Encoding 3 1 roll put
CharStrings 3 1 roll put Metrics 3 1 roll put end}bd/Z{findfont dup maxlength 2
add dict exch dup{1 index/FID ne{3 index 3 1 roll put}{2 rp}ifelse}forall pop
dup dup/Encoding get 256 array copy dup/$fe xd/Encoding exch put dup/Fontname 3
index put 3 -1 roll dup length 0 ne{0 exch{dup type 0 type eq{exch pop}{$fe
exch 2 index exch put 1 add}ifelse}forall pop}if dup 256 dict dup/$met xd
/Metrics exch put dup/FontMatrix get 0 get 1000 mul 1 exch div 3 index length
256 eq{0 1 255{dup $fe exch get dup/.notdef eq{2 rp}{5 index 3 -1 roll get 2
index mul $met 3 1 roll put}ifelse}for}if pop definefont pop pop}bd/@ftx{{
currentpoint 3 -1 roll(0)dup 3 -1 roll 0 exch put dup @gs true charpath $ctm
setmatrix @@txt @gr @np stringwidth pop 3 -1 roll add exch moveto}forall}bd
/@ft{matrix currentmatrix exch $sdf{$scf $sca $scp @ss}if $fil 1 eq{/@@txt/@pf
ld @ftx}{$fil 2 eq{/@@txt/@ff ld @ftx}{$fil 3 eq{/@@txt/@Pf ld @ftx}{$t $c $m
$y $k $n $o @scc{show}{pop}ifelse}ifelse}ifelse}ifelse $sdf{$dsf $dsa $dsp @ss}
if setmatrix}bd/@st{matrix currentmatrix exch $SDF{$SCF $SCA $SCP @ss}if $T $C
$M $Y $K $N $O @scc{{currentpoint 3 -1 roll(0)dup 3 -1 roll 0 exch put dup @gs
true charpath $ctm setmatrix $ptm concat stroke @gr @np stringwidth pop 3 -1
roll add exch moveto}forall}{pop}ifelse $SDF{$dsf $dsa $dsp @ss}if setmatrix}
bd/@te{@ft}bd/@tr{@st}bd/@ta{dup @gs @ft @gr @st}bd/@t@a{dup @gs @st @gr @ft}
bd/@tm{@sm concat}bd/e{/t{@te}def}bd/r{/t{@tr}def}bd/o{/t{pop}def}bd/a{/t{@ta}
def}bd/@a{/t{@t@a}def}bd/t{@te}def/T{@np $ctm setmatrix/$ttm matrix def}bd/ddt
{t}def/@t{/$stm $stm currentmatrix def 3 1 roll moveto $ttm concat ddt $stm
setmatrix}bd/@n{/$ttm exch matrix rotate def}bd/@s{}bd/@l{}bd/@B{@gs S @gr F}
bd/@b{@cp @B}bd/@sep{CurrentInkName(Composite)eq{/$ink -1 def}{CurrentInkName
(Cyan)eq{/$ink 0 def}{CurrentInkName(Magenta)eq{/$ink 1 def}{CurrentInkName
(Yellow)eq{/$ink 2 def}{CurrentInkName(Black)eq{/$ink 3 def}{/$ink 4 def}
ifelse}ifelse}ifelse}ifelse}ifelse}bd/@whi{@gs -72000 dup moveto -72000 72000
lineto 72000 dup lineto 72000 -72000 lineto @cp 1 SetGry fill @gr}bd/@neg{[{1
exch sub}/exec cvx currenttransfer/exec cvx]cvx settransfer @whi}bd
/currentscale{1 0 dtransform matrix defaultmatrix idtransform dup mul exch dup
mul add sqrt 0 1 dtransform matrix defaultmatrix idtransform dup mul exch dup
mul add sqrt}bd/@unscale{currentscale 1 exch div exch 1 exch div exch scale}bd
/@sqr{dup 0 rlineto dup 0 exch rlineto neg 0 rlineto @cp}bd/corelsym{@gs @np Tl
-90 rotate 7{45 rotate -.75 2 moveto 1.5 @sqr fill}repeat @gr}bd/@reg_cor{@gs
@np Tl -6 -6 moveto 12 @sqr @gs 1 GetGry sub SetGry fill @gr 4{90 rotate 0 4 m
0 4 rl}repeat stroke 0 0 corelsym @gr}bd/@reg_std{@gs @np Tl .3 w 0 0 5 0 360
arc @cp @gs 1 GetGry sub SetGry fill @gr 4{90 rotate 0 0 m 0 8 rl}repeat stroke
@gr}bd/@reg_inv{@gs @np Tl .3 w 0 0 5 0 360 arc @cp @gs 1 GetGry sub SetGry
fill @gr 4{90 rotate 0 0 m 0 8 rl}repeat stroke 0 0 m 0 0 5 90 180 arc @cp 0 0
5 270 360 arc @cp GetGry fill @gr}bd/$corelmeter[1 .95 .75 .50 .25 .05 0]def
/@colormeter{@gs @np 0 SetGry 0.3 w/Courier findfont 5 scalefont setfont/yy xd
/xx xd 0 1 6{dup xx 20 sub yy m 20 @sqr @gs $corelmeter exch get dup SetGry
fill @gr stroke xx 18 sub yy 2 add m exch dup 3 ge{1 SetGry}{0 SetGry}ifelse 3
eq{pop}{100 mul 100 exch sub cvi 20 string cvs show}ifelse/yy yy 20 add def}
for @gr}bd/@calbar{@gs Tl @gs @np 0 0 m @gs 20 @sqr 1 1 0 0 0 _ 0 @scc pop fill
@gr 20 0 Tl 0 0 m @gs 20 @sqr 1 1 0 1 0 _ 0 @scc pop fill @gr 20 0 Tl 0 0 m @gs
20 @sqr 1 0 0 1 0 _ 0 @scc pop fill @gr 20 0 Tl 0 0 m @gs 20 @sqr 1 0 1 1 0 _ 0
@scc pop fill @gr 20 0 Tl 0 0 m @gs 20 @sqr 1 0 1 0 0 _ 0 @scc pop fill @gr 20
0 Tl 0 0 m @gs 20 @sqr 1 1 1 0 0 _ 0 @scc pop fill @gr 20 0 Tl 0 0 m @gs 20
@sqr 1 1 1 1 0 _ 0 @scc pop fill @gr @gr @np -84 0 Tl @gs 0 0 m 20 @sqr clip 1
1 0 0 0 _ 0 @scc pop @gain @gr 20 0 Tl @gs 0 0 m 20 @sqr clip 1 0 1 0 0 _ 0
@scc pop @gain @gr 20 0 Tl @gs 0 0 m 20 @sqr clip 1 0 0 1 0 _ 0 @scc pop @gain
@gr 20 0 Tl @gs 0 0 m 20 @sqr clip 1 0 0 0 1 _ 0 @scc pop @gain @gr @gr}bd
/@gain{10 10 Tl @np 0 0 m 0 10 360{0 0 15 4 -1 roll dup 5 add arc @cp}for fill
}bd/@crop{@gs 10 div/$croplen xd .3 w 0 SetGry Tl rotate 0 0 m 0 $croplen neg
rl stroke @gr}bd/@colorbox{@gs @np Tl 100 exch sub 100 div SetGry -8 -8 moveto
16 @sqr fill 0 SetGry 10 -2 moveto show @gr}bd/deflevel 0 def/@sax{/deflevel
deflevel 1 add def}bd/@eax{/deflevel deflevel dup 0 gt{1 sub}if def deflevel 0
gt{/eax load}{eax}ifelse}bd/eax{{exec}forall}bd/@rax{deflevel 0 eq{@rs @sv}if}
bd/@daq{dup type/arraytype eq{{}forall}if}bd/@BMP{/@cc xd 11 index 1 eq{12 -1
roll pop @i}{7 -2 roll 2 rp @I}ifelse}bd systemdict/pdfmark known not{/pdfmark
/cleartomark ld}if end
%%EndResource
%%EndProlog
%%BeginSetup
wCorel5Dict begin
@BeginSysCorelDict
2.6131 setmiterlimit
1.00 setflat
/$fst 20 def
%%EndSetup
%StartPage
@sv
@sm
@sv
%StartColorLayer (COMPOSITE)
@sm @sv @sv
@rax %Note: Object
2109.10 2639.59 2168.35 2701.37 @E
0 O 0 @g
0.20 0.00 0.00 0.20 k
0 J 0 j [] 0 d 0 R 0 @G
0.00 0.00 0.00 1.00 K
0 0.216 0.216 0.000 @w
2138.76 2701.37 m
2155.03 2701.37 2168.35 2687.47 2168.35 2670.48 c
2168.35 2653.49 2155.03 2639.59 2138.76 2639.59 c
2122.42 2639.59 2109.10 2653.49 2109.10 2670.48 c
2109.10 2687.47 2122.42 2701.37 2138.76 2701.37 c
@c
B
@rax %Note: Object
2099.16 2640.38 2142.72 2692.08 @E
0 O 0 @g
0.00 1.00 1.00 0.00 k
0 J 0 j [] 0 d 0 R 0 @G
0.00 0.00 0.00 1.00 K
0 0.216 0.216 0.000 @w
2099.16 2692.08 m
2142.72 2692.08 L
2142.72 2640.38 L
2099.16 2640.38 L
2099.16 2692.08 L
@c
B
@rax %Note: Object
2118.17 2643.48 2174.90 2663.14 @E
0 O 0 @g
0.00 0.00 0.00 0.40 k
0 J 0 j [] 0 d 0 R 0 @G
0.00 0.00 0.00 1.00 K
0 0.216 0.216 0.000 @w
2146.54 2663.14 m
2130.91 2663.14 2118.17 2658.74 2118.17 2653.27 c
2118.17 2647.87 2130.91 2643.48 2146.54 2643.48 c
2162.16 2643.48 2174.90 2647.87 2174.90 2653.27 c
2174.90 2658.74 2162.16 2663.14 2146.54 2663.14 c
@c
B
@rs @rs @sm
%EndColorLayer
@rs
@rs
%EndPage
%%Trailer
@EndSysCorelDict
end
%%DocumentSuppliedResources: procset wCorel5Dict
|