home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 14 / MUNDO14.iso / aplicat / pm65 / ARCHIVE.Z / EPSPARSE.DLL / PROC / ADOBE_ILLUSTRATOR_AI3 < prev    next >
Encoding:
Text File  |  1996-10-29  |  12.1 KB  |  1,013 lines
  1. %%BeginResource: procset Adobe_Illustrator_AI3 1.1 0
  2. %%Title: (Adobe Illustrator (R) Version 3.0 Full Prolog)
  3. %%Version: 1.1 
  4. %%CreationDate: (3/7/1994) ()
  5. %%Copyright: ((C) 1987-1994 Adobe Systems Incorporated All Rights Reserved)
  6. currentpacking true setpacking
  7. userdict /Adobe_Illustrator_AI3 71 dict dup begin put
  8. userdict /Adobe_IllustratorA_AI3 Adobe_Illustrator_AI3 put
  9. /initialize
  10. {
  11. userdict /Adobe_Illustrator_AI3_vars 67 dict dup begin put
  12. userdict /Adobe_IllustratorA_AI3_vars Adobe_Illustrator_AI3_vars put
  13. /_lp /none def
  14. /_pf {} def
  15. /_ps {} def
  16. /_psf {} def
  17. /_pss {} def
  18. /_pjsf {} def
  19. /_pjss {} def
  20. /_pola 0 def
  21. /_doClip 0 def
  22. /cf    currentflat def
  23. /_tm matrix def
  24. /_renderStart [/e0 /r0 /a0 /o0 /e1 /r1 /a1 /i0] def 
  25. /_renderEnd [null null null null /i1 /i1 /i1 /i1] def
  26. /_render -1 def
  27. /_rise 0 def
  28. /_ax 0 def
  29. /_ay 0 def
  30. /_cx 0 def
  31. /_cy 0 def
  32. /_leading [0 0] def
  33. /_ctm matrix def
  34. /_mtx matrix def
  35. /_sp 16#020 def
  36. /_hyphen (-) def
  37. /_fScl 0 def
  38. /_cnt 0 def
  39. /_hs 1 def
  40. /_nativeEncoding 0 def
  41. /_useNativeEncoding 0 def
  42. /_tempEncode 0 def
  43. /_pntr 0 def
  44. /_tDict 2 dict def
  45. /_wv 0 def
  46. /Tx {} def
  47. /Tj {} def
  48. /CRender {} def
  49. /_AI3_savepage {} def
  50. /_gf null def
  51. /_cf 4 array def
  52. /_if null def
  53. /_of false def
  54. /_fc {} def
  55. /_gs null def
  56. /_cs 4 array def
  57. /_is null def
  58. /_os false def
  59. /_sc {} def
  60. /_pd 1 dict def
  61. /_ed 15 dict def
  62. /_pm matrix def
  63. /_fm null def
  64. /_fd null def
  65. /_fdd null def
  66. /_sm null def
  67. /_sd null def
  68. /_sdd null def
  69. /_i null def
  70. Adobe_Illustrator_AI3 begin
  71. Adobe_Illustrator_AI3 dup /nc get begin
  72.     {
  73.     dup xcheck
  74.         {
  75.         bind
  76.         } if
  77.     pop pop
  78.     } forall
  79. end
  80. end
  81. end
  82. Adobe_Illustrator_AI3 begin
  83. Adobe_Illustrator_AI3_vars begin
  84. newpath
  85. } def
  86. /terminate
  87. {
  88. end
  89. end
  90. } def
  91. /_
  92. null def
  93. /ddef
  94. {
  95. Adobe_Illustrator_AI3_vars 3 1 roll put
  96. } def
  97. /xput
  98. {
  99. dup load dup length exch maxlength eq
  100.     {
  101.     dup dup load dup
  102.     length 2 mul dict copy def
  103.     } if
  104. load begin def end
  105. } def
  106. /npop
  107. {
  108.     {
  109.     pop
  110.     } repeat
  111. } def
  112. /sw
  113. {
  114. dup length exch stringwidth
  115. exch 5 -1 roll 3 index mul add
  116. 4 1 roll 3 1 roll mul add
  117. } def
  118. /swj
  119. {
  120. dup 4 1 roll
  121. dup length exch stringwidth 
  122. exch 5 -1 roll 3 index mul add
  123. 4 1 roll 3 1 roll mul add 
  124. 6 2 roll /_cnt 0 ddef
  125. {1 index eq {/_cnt _cnt 1 add ddef} if} forall pop
  126. exch _cnt mul exch _cnt mul 2 index add 4 1 roll 2 index add 4 1 roll pop pop
  127. } def
  128. /ss
  129. {
  130. 4 1 roll
  131.     {
  132.     2 npop 
  133.     (0) exch 2 copy 0 exch put pop
  134.     gsave
  135.     false charpath currentpoint
  136.     4 index setmatrix
  137.     stroke
  138.     grestore
  139.     moveto
  140.     2 copy rmoveto
  141.     } exch cshow
  142. 3 npop
  143. } def
  144. /jss
  145. {
  146. 4 1 roll
  147.     {
  148.     2 npop 
  149.     (0) exch 2 copy 0 exch put 
  150.     gsave
  151.     _sp eq 
  152.         {
  153.         exch 6 index 6 index 6 index 5 -1 roll widthshow  
  154.         currentpoint
  155.         }
  156.         {
  157.         false charpath currentpoint
  158.         4 index setmatrix stroke
  159.         }ifelse
  160.     grestore
  161.     moveto
  162.     2 copy rmoveto
  163.     } exch cshow
  164. 6 npop
  165. } def
  166. /sp
  167. {
  168.     {
  169.     2 npop (0) exch
  170.     2 copy 0 exch put pop
  171.     false charpath
  172.     2 copy rmoveto
  173.     } exch cshow
  174. 2 npop
  175. } def
  176. /jsp
  177. {
  178.     {
  179.     2 npop 
  180.     (0) exch 2 copy 0 exch put 
  181.     _sp eq 
  182.         {
  183.         exch 5 index 5 index 5 index 5 -1 roll widthshow  
  184.         }
  185.         {
  186.         false charpath
  187.         }ifelse
  188.     2 copy rmoveto
  189.     } exch cshow
  190. 5 npop
  191. } def
  192. /pl
  193. {
  194. transform
  195. 0.25 sub round 0.25 add exch
  196. 0.25 sub round 0.25 add exch
  197. itransform
  198. } def
  199. /setstrokeadjust where
  200.     {
  201.     pop true setstrokeadjust
  202.     /c
  203.     {
  204.     curveto
  205.     } def
  206.     /C
  207.     /c load def
  208.     /v
  209.     {
  210.     currentpoint 6 2 roll curveto
  211.     } def
  212.     /V
  213.     /v load def
  214.     /y
  215.     {
  216.     2 copy curveto
  217.     } def
  218.     /Y
  219.     /y load def
  220.     /l
  221.     {
  222.     lineto
  223.     } def
  224.     /L
  225.     /l load def
  226.     /m
  227.     {
  228.     moveto
  229.     } def
  230.     }
  231.     {
  232.     /c
  233.     {
  234.     pl curveto
  235.     } def
  236.     /C
  237.     /c load def
  238.     /v
  239.     {
  240.     currentpoint 6 2 roll pl curveto
  241.     } def
  242.     /V
  243.     /v load def
  244.     /y
  245.     {
  246.     pl 2 copy curveto
  247.     } def
  248.     /Y
  249.     /y load def
  250.     /l
  251.     {
  252.     pl lineto
  253.     } def
  254.     /L
  255.     /l load def
  256.     /m
  257.     {
  258.     pl moveto
  259.     } def
  260.     } ifelse
  261. /d
  262. {
  263. setdash
  264. } def
  265. /cf    {} def
  266. /i
  267. {
  268. dup 0 eq
  269.     {
  270.     pop cf
  271.     } if
  272. setflat
  273. } def
  274. /j
  275. {
  276. setlinejoin
  277. } def
  278. /J
  279. {
  280. setlinecap
  281. } def
  282. /M
  283. {
  284. setmiterlimit
  285. } def
  286. /w
  287. {
  288. setlinewidth
  289. } def
  290. /H
  291. {} def
  292. /h
  293. {
  294. closepath
  295. } def
  296. /N
  297. {
  298. _pola 0 eq 
  299.     {
  300.     _doClip 1 eq {clip /_doClip 0 ddef} if 
  301.     newpath
  302.     } 
  303.     {
  304.     /CRender {N} ddef
  305.     }ifelse
  306. } def
  307. /n
  308. {N} def
  309. /F
  310. {
  311. _pola 0 eq 
  312.     {
  313.     _doClip 1 eq 
  314.         {
  315.         gsave _pf grestore clip newpath /_lp /none ddef _fc 
  316.         /_doClip 0 ddef
  317.         }
  318.         {
  319.         _pf
  320.         }ifelse
  321.     } 
  322.     {
  323.     /CRender {F} ddef
  324.     }ifelse
  325. } def
  326. /f
  327. {
  328. closepath
  329. F
  330. } def
  331. /S
  332. {
  333. _pola 0 eq 
  334.     {
  335.     _doClip 1 eq 
  336.         {
  337.         gsave _ps grestore clip newpath /_lp /none ddef _sc 
  338.         /_doClip 0 ddef
  339.         }
  340.         {
  341.         _ps
  342.         }ifelse
  343.     } 
  344.     {
  345.     /CRender {S} ddef
  346.     }ifelse
  347. } def
  348. /s
  349. {
  350. closepath
  351. S
  352. } def
  353. /B
  354. {
  355. _pola 0 eq 
  356.     {
  357.     _doClip 1 eq
  358.     gsave F grestore 
  359.         {
  360.         gsave S grestore clip newpath /_lp /none ddef _sc
  361.         /_doClip 0 ddef
  362.         } 
  363.         {
  364.         S
  365.         }ifelse
  366.     }
  367.     {
  368.     /CRender {B} ddef
  369.     }ifelse
  370. } def
  371. /b
  372. {
  373. closepath
  374. B
  375. } def
  376. /W
  377. {
  378. /_doClip 1 ddef
  379. } def
  380. /*
  381. {
  382. count 0 ne 
  383.     {
  384.     dup type (stringtype) eq {pop} if
  385.     } if 
  386. _pola 0 eq {newpath} if
  387. } def
  388. /u
  389. {} def
  390. /U
  391. {} def
  392. /q
  393. {
  394. _pola 0 eq {gsave} if
  395. } def
  396. /Q
  397. {
  398. _pola 0 eq {grestore} if
  399. } def
  400. /*u
  401. {
  402. _pola 1 add /_pola exch ddef
  403. } def
  404. /*U
  405. {
  406. _pola 1 sub /_pola exch ddef 
  407. _pola 0 eq {CRender} if
  408. } def
  409. /D
  410. {pop} def
  411. /*w
  412. {} def
  413. /*W
  414. {} def
  415. /`
  416. {
  417. /_i save ddef
  418. 6 1 roll 4 npop
  419. concat pop
  420. userdict begin
  421. /showpage {} def
  422. 0 setgray
  423. 0 setlinecap
  424. 1 setlinewidth
  425. 0 setlinejoin
  426. 10 setmiterlimit
  427. [] 0 setdash
  428. /setstrokeadjust where {pop false setstrokeadjust} if
  429. newpath
  430. 0 setgray
  431. false setoverprint
  432. } def
  433. /~
  434. {
  435. end
  436. _i restore
  437. } def
  438. /@
  439. {} def
  440. /&
  441. {} def
  442. /O
  443. {
  444. 0 ne
  445. /_of exch ddef
  446. /_lp /none ddef
  447. } def
  448. /R
  449. {
  450. 0 ne
  451. /_os exch ddef
  452. /_lp /none ddef
  453. } def
  454. /g
  455. {
  456. /_gf exch ddef
  457. /_fc
  458. {
  459. _lp /fill ne
  460.     {
  461.     _of setoverprint
  462.     _gf setgray
  463.     /_lp /fill ddef
  464.     } if
  465. } ddef
  466. /_pf
  467. {
  468. _fc
  469. fill
  470. } ddef
  471. /_psf
  472. {
  473. _fc
  474. ashow
  475. } ddef
  476. /_pjsf
  477. {
  478. _fc
  479. awidthshow
  480. } ddef
  481. /_lp /none ddef
  482. } def
  483. /G
  484. {
  485. /_gs exch ddef
  486. /_sc
  487. {
  488. _lp /stroke ne
  489.     {
  490.     _os setoverprint
  491.     _gs setgray
  492.     /_lp /stroke ddef
  493.     } if
  494. } ddef
  495. /_ps
  496. {
  497. _sc
  498. stroke
  499. } ddef
  500. /_pss
  501. {
  502. _sc
  503. ss
  504. } ddef
  505. /_pjss
  506. {
  507. _sc
  508. jss
  509. } ddef
  510. /_lp /none ddef
  511. } def
  512. /k
  513. {
  514. _cf astore pop
  515. /_fc
  516. {
  517. _lp /fill ne
  518.     {
  519.     _of setoverprint
  520.     _cf aload pop setcmykcolor
  521.     /_lp /fill ddef
  522.     } if
  523. } ddef
  524. /_pf
  525. {
  526. _fc
  527. fill
  528. } ddef
  529. /_psf
  530. {
  531. _fc
  532. ashow
  533. } ddef
  534. /_pjsf
  535. {
  536. _fc
  537. awidthshow
  538. } ddef
  539. /_lp /none ddef
  540. } def
  541. /K
  542. {
  543. _cs astore pop
  544. /_sc
  545. {
  546. _lp /stroke ne
  547.     {
  548.     _os setoverprint
  549.     _cs aload pop setcmykcolor
  550.     /_lp /stroke ddef
  551.     } if
  552. } ddef
  553. /_ps
  554. {
  555. _sc
  556. stroke
  557. } ddef
  558. /_pss
  559. {
  560. _sc
  561. ss
  562. } ddef
  563. /_pjss
  564. {
  565. _sc
  566. jss
  567. } ddef
  568. /_lp /none ddef
  569. } def
  570. /x
  571. {
  572. /_gf exch ddef
  573. findcmykcustomcolor
  574. /_if exch ddef
  575. /_fc
  576. {
  577. _lp /fill ne
  578.     {
  579.     _of setoverprint
  580.     _if _gf 1 exch sub setcustomcolor
  581.     /_lp /fill ddef
  582.     } if
  583. } ddef
  584. /_pf
  585. {
  586. _fc
  587. fill
  588. } ddef
  589. /_psf
  590. {
  591. _fc
  592. ashow
  593. } ddef
  594. /_pjsf
  595. {
  596. _fc
  597. awidthshow
  598. } ddef
  599. /_lp /none ddef
  600. } def
  601. /X
  602. {
  603. /_gs exch ddef
  604. findcmykcustomcolor
  605. /_is exch ddef
  606. /_sc
  607. {
  608. _lp /stroke ne
  609.     {
  610.     _os setoverprint
  611.     _is _gs 1 exch sub setcustomcolor
  612.     /_lp /stroke ddef
  613.     } if
  614. } ddef
  615. /_ps
  616. {
  617. _sc
  618. stroke
  619. } ddef
  620. /_pss
  621. {
  622. _sc
  623. ss
  624. } ddef
  625. /_pjss
  626. {
  627. _sc
  628. jss
  629. } ddef
  630. /_lp /none ddef
  631. } def
  632. /dp
  633. {
  634. dup null eq
  635. {
  636. pop
  637. _dp 0 ne
  638.     {
  639.     0 1 _dp 1 sub _dl mod
  640.         {
  641.         _da exch get 3 get
  642.         } for
  643.     _dp 1 sub _dl mod 1 add packedarray
  644.     _da 0 get aload pop 8 -1 roll 5 -1 roll pop 4 1 roll
  645.     definepattern pop
  646.     } if
  647. }
  648. {
  649. _dp 0 ne _dp _dl mod 0 eq and
  650.     {
  651.     null dp
  652.     } if
  653. 7 packedarray _da exch _dp _dl mod exch put
  654. _dp _dl mod _da 0 get 4 get 2 packedarray
  655. /_dp _dp 1 add def
  656. } ifelse
  657. } def
  658. /E
  659. {
  660. _ed begin
  661. dup 0 get type /arraytype ne
  662.     {
  663.     0
  664.         {
  665.         dup 1 add index type /arraytype eq
  666.             {
  667.             1 add
  668.             }
  669.             {
  670.             exit
  671.             } ifelse
  672.         } loop
  673.     array astore
  674.     } if
  675. /_dd exch def
  676. /_ury exch def
  677. /_urx exch def
  678. /_lly exch def
  679. /_llx exch def
  680. /_n exch def
  681. /_y 0 def
  682. /_dl 4 def
  683. /_dp 0 def
  684. /_da _dl array def
  685. 0 1 _dd length 1 sub
  686.     {
  687.     /_d exch _dd exch get def
  688.     0 2 _d length 2 sub
  689.         {
  690.         /_x exch def
  691.         /_c _d _x get _ ne def
  692.         /_r _d _x 1 add get cvlit def
  693.         _r _ ne
  694.             {
  695.             _urx _llx sub _ury _lly sub [1 0 0 1 0 0] 
  696.                 [
  697.                 /save cvx
  698.                 _llx neg _lly neg /translate cvx
  699.                 _c
  700.                     {
  701.                     nc /begin cvx
  702.                     } if
  703.                 _r dup type /stringtype eq
  704.                     {
  705.                     cvx
  706.                     }
  707.                     {
  708.                     {exec} /forall cvx
  709.                     } ifelse
  710.                 _c
  711.                     {
  712.                     /end cvx
  713.                     } if
  714.                 /restore cvx
  715.                 ] cvx
  716.             /_fn 12 _n length add string def
  717.             _y _fn cvs pop
  718.             /_y _y 1 add def
  719.             _fn 12 _n putinterval
  720.             _fn _c false dp
  721.             _d exch _x 1 add exch put
  722.             } if
  723.         } for
  724.     } for
  725. null dp
  726. _n _dd /_pd
  727. end xput
  728. } def
  729. /fc
  730. {
  731. _fm dup concatmatrix pop
  732. } def
  733. /p
  734. {
  735. /_fm exch ddef
  736. 9 -2 roll _pm translate fc
  737. 7 -2 roll _pm scale fc
  738. 5 -1 roll _pm rotate fc
  739. 4 -2 roll exch 0 ne
  740.     {
  741.     dup _pm rotate fc
  742.     1 -1 _pm scale fc
  743.     neg _pm rotate fc
  744.     }
  745.     {
  746.     pop
  747.     } ifelse
  748. dup _pm rotate fc
  749. exch dup sin exch cos div 1 0 0 1 0 6 2 roll
  750. _pm astore fc
  751. neg _pm rotate fc
  752. _pd exch get /_fdd exch ddef
  753. /_pf
  754. {
  755. save
  756. /_doClip 0 ddef
  757. 0 1 _fdd length 1 sub
  758.     {
  759.     /_fd exch _fdd exch get ddef
  760.     _fd
  761.     0 2 _fd length 2 sub
  762.         {
  763.         gsave
  764.         2 copy get dup _ ne
  765.             {
  766.             cvx exec _fc
  767.             }
  768.             {
  769.             pop
  770.             } ifelse
  771.         2 copy 1 add get dup _ ne
  772.             {
  773.             aload pop findfont _fm
  774.             patternfill
  775.             }
  776.             {
  777.             pop
  778.             fill
  779.             } ifelse
  780.         grestore
  781.         pop
  782.         } for
  783.     pop
  784.     } for
  785. restore
  786. newpath
  787. } ddef
  788. /_psf
  789. {
  790. save
  791. /_doClip 0 ddef
  792. 0 1 _fdd length 1 sub
  793.     {
  794.     /_fd exch _fdd exch get ddef
  795.     _fd
  796.     0 2 _fd length 2 sub
  797.         {
  798.         gsave
  799.         2 copy get dup _ ne
  800.             {
  801.             cvx exec _fc
  802.             }
  803.             {
  804.             pop
  805.             } ifelse
  806.         2 copy 1 add get dup _ ne
  807.             {
  808.             aload pop findfont _fm
  809.             9 copy 6 npop patternashow
  810.             }
  811.             {
  812.             pop
  813.             6 copy 3 npop ashow
  814.             } ifelse
  815.         grestore
  816.         pop
  817.         } for
  818.     pop
  819.     } for
  820. restore
  821. %3 npop newpath
  822. sw rmoveto
  823. } ddef
  824. /_pjsf
  825. {
  826. save
  827. /_doClip 0 ddef
  828. 0 1 _fdd length 1 sub
  829.     {
  830.     /_fd exch _fdd exch get ddef
  831.     _fd
  832.     0 2 _fd length 2 sub
  833.         {
  834.         gsave
  835.         2 copy get dup _ ne
  836.             {
  837.             cvx exec _fc
  838.             }
  839.             {
  840.             pop
  841.             } ifelse
  842.         2 copy 1 add get dup _ ne
  843.             {
  844.             aload pop findfont _fm
  845.             12 copy 6 npop patternawidthshow
  846.             }
  847.             {
  848.             pop 9 copy 3 npop awidthshow
  849.             } ifelse
  850.         grestore
  851.         pop
  852.         } for
  853.     pop
  854.     } for
  855. restore
  856. swj rmoveto
  857. } ddef
  858. /_lp /none ddef
  859. } def
  860. /sc
  861. {
  862. _sm dup concatmatrix pop
  863. } def
  864. /P
  865. {
  866. /_sm exch ddef
  867. 9 -2 roll _pm translate sc
  868. 7 -2 roll _pm scale sc
  869. 5 -1 roll _pm rotate sc
  870. 4 -2 roll exch 0 ne
  871.     {
  872.     dup _pm rotate sc
  873.     1 -1 _pm scale sc
  874.     neg _pm rotate sc
  875.     }
  876.     {
  877.     pop
  878.     } ifelse
  879. dup _pm rotate sc
  880. exch dup sin exch cos div 1 0 0 1 0 6 2 roll
  881. _pm astore sc
  882. neg _pm rotate sc
  883. _pd exch get /_sdd exch ddef
  884. /_ps
  885. {
  886. save
  887. /_doClip 0 ddef
  888. 0 1 _sdd length 1 sub
  889.     {
  890.     /_sd exch _sdd exch get ddef
  891.     _sd
  892.     0 2 _sd length 2 sub
  893.         {
  894.         gsave
  895.         2 copy get dup _ ne
  896.             {
  897.             cvx exec _sc
  898.             }
  899.             {
  900.             pop
  901.             } ifelse
  902.         2 copy 1 add get dup _ ne
  903.             {
  904.             aload pop findfont _sm
  905.             patternstroke
  906.             }
  907.             {
  908.             pop stroke
  909.             } ifelse
  910.         grestore
  911.         pop
  912.         } for
  913.     pop
  914.     } for
  915. restore
  916. newpath
  917. } ddef
  918. /_pss
  919. {
  920. save
  921. /_doClip 0 ddef
  922. 0 1 _sdd length 1 sub
  923.     {
  924.     /_sd exch _sdd exch get ddef
  925.     _sd
  926.     0 2 _sd length 2 sub
  927.         {
  928.         gsave
  929.         2 copy get dup _ ne
  930.             {
  931.             cvx exec _sc
  932.             }
  933.             {
  934.             pop
  935.             } ifelse
  936.         2 copy 1 add get dup _ ne
  937.             {
  938.             aload pop findfont _sm
  939.             10 copy 6 npop patternashowstroke
  940.             }
  941.             {
  942.             pop 7 copy 3 npop ss
  943.             } ifelse
  944.         grestore
  945.         pop
  946.         } for
  947.     pop
  948.     } for
  949. restore
  950. pop sw rmoveto
  951. } ddef
  952. /_pjss
  953. {
  954. save
  955. /_doClip 0 ddef
  956. 0 1 _sdd length 1 sub
  957.     {
  958.     /_sd exch _sdd exch get ddef
  959.     _sd
  960.     0 2 _sd length 2 sub
  961.         {
  962.         gsave
  963.         2 copy get dup _ ne
  964.             {
  965.             cvx exec _sc
  966.             }
  967.             {
  968.             pop
  969.             } ifelse
  970.         2 copy 1 add get dup _ ne
  971.             {
  972.             aload pop findfont _sm
  973.             13 copy 6 npop patternawidthshowstroke
  974.             }
  975.             {
  976.             pop 10 copy 3 npop jss
  977.             } ifelse
  978.         grestore
  979.         pop
  980.         } for
  981.     pop
  982.     } for
  983. restore
  984. pop swj rmoveto
  985. } ddef
  986. /_lp /none ddef
  987. } def
  988. /A
  989. {
  990. pop
  991. } def
  992. /nc 3 dict def
  993. nc begin
  994. /setgray
  995. {
  996. pop
  997. } bind def
  998. /setcmykcolor
  999. {
  1000. 4 npop
  1001. } bind def
  1002. /setcustomcolor
  1003. {
  1004. 2 npop
  1005. } bind def
  1006. currentdict readonly pop end
  1007. currentdict readonly pop end
  1008. setpacking
  1009. /annotatepage
  1010. {
  1011. } def
  1012. %%EndResource
  1013.