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