home *** CD-ROM | disk | FTP | other *** search
/ PC World 1999 August / PCWorld_1999-08_cd.bin / Novinky / adobe / Instal / archive.z / AIRes.dll / TEXT / 1026 < prev    next >
Text File  |  1998-10-05  |  13KB  |  634 lines
  1. %%BeginProcSet: Adobe_ColorImage_AI6 1.3 0
  2. userdict /Adobe_ColorImage_AI6 known not
  3. {
  4.     userdict /Adobe_ColorImage_AI6 53 dict put 
  5. } if
  6. userdict /Adobe_ColorImage_AI6 get begin
  7. /initialize { 
  8.     Adobe_ColorImage_AI6 begin
  9.     Adobe_ColorImage_AI6 {
  10.         dup type /arraytype eq {
  11.             dup xcheck {
  12.                 bind
  13.             } if
  14.         } if
  15.         pop pop
  16.     } forall
  17. } def
  18. /terminate { end } def
  19. currentdict /Adobe_ColorImage_AI6_Vars known not {
  20.     /Adobe_ColorImage_AI6_Vars 41 dict def
  21. } if
  22. Adobe_ColorImage_AI6_Vars begin
  23.     /plateindex -1 def
  24.     /_newproc null def
  25.     /_proc1 null def
  26.     /_proc2 null def
  27.     /sourcearray 4 array def
  28.     /_ptispace null def
  29.     /_ptiname null def
  30.     /_pti0 0 def
  31.     /_pti1 0 def
  32.     /_ptiproc null def
  33.     /_ptiscale 0 def
  34.     /_pticomps 0 def
  35.     /_ptibuf 0 string def
  36.     /_gtigray 0 def
  37.     /_cticmyk null def
  38.     /_rtirgb null def
  39.     /XIEnable true def
  40.     /XIType 0 def
  41.     /XIEncoding 0 def
  42.     /XICompression 0 def
  43.     /XIChannelCount 0 def
  44.     /XIBitsPerPixel 0 def
  45.     /XIImageHeight 0 def
  46.     /XIImageWidth 0 def
  47.     /XIImageMatrix null def
  48.     /XIRowBytes 0 def
  49.     /XIFile null def
  50.     /XIBuffer1 null def
  51.     /XIBuffer2 null def
  52.     /XIBuffer3 null def
  53.     /XIDataProc null def
  54.     /XIColorSpace /DeviceGray def
  55.     /XIColorValues 0 def
  56.     /XIPlateList false def
  57. end
  58. /ci6colorimage /colorimage where {/colorimage get}{null} ifelse def
  59. /ci6image systemdict /image get def
  60. /ci6curtransfer systemdict /currenttransfer get def
  61. /ci6curoverprint /currentoverprint where {/currentoverprint get}{{_of}} ifelse def
  62. /ci6foureq {
  63.     4 index ne {
  64.         pop pop pop false
  65.     }{
  66.         4 index ne {
  67.             pop pop false
  68.         }{
  69.             4 index ne {
  70.                 pop false
  71.             }{
  72.                 4 index eq
  73.             } ifelse
  74.         } ifelse
  75.     } ifelse
  76. } def
  77. /ci6testplate {
  78.     Adobe_ColorImage_AI6_Vars begin
  79.         /plateindex -1 def
  80.         /setcmykcolor where {
  81.             pop
  82.             gsave
  83.             1 0 0 0 setcmykcolor systemdict /currentgray get exec 1 exch sub
  84.             0 1 0 0 setcmykcolor systemdict /currentgray get exec 1 exch sub
  85.             0 0 1 0 setcmykcolor systemdict /currentgray get exec 1 exch sub
  86.             0 0 0 1 setcmykcolor systemdict /currentgray get exec 1 exch sub
  87.             grestore
  88.             1 0 0 0 ci6foureq { 
  89.                 /plateindex 0 def
  90.             }{
  91.                 0 1 0 0 ci6foureq { 
  92.                     /plateindex 1 def
  93.                 }{
  94.                     0 0 1 0 ci6foureq {
  95.                         /plateindex 2 def
  96.                     }{
  97.                         0 0 0 1 ci6foureq { 
  98.                             /plateindex 3 def
  99.                         }{
  100.                             0 0 0 0 ci6foureq {
  101.                                 /plateindex 5 def
  102.                             } if
  103.                         } ifelse
  104.                     } ifelse
  105.                 } ifelse
  106.             } ifelse
  107.             pop pop pop pop
  108.         } if
  109.         plateindex
  110.  end
  111. } def
  112. /ci6concatprocs {
  113.     /packedarray where {
  114.         pop dup type /packedarraytype eq 2 index type
  115.         /packedarraytype eq or
  116.     }{
  117.         false
  118.     } ifelse
  119.     {
  120.         /_proc2 exch cvlit def
  121.         /_proc1 exch cvlit def
  122.         _proc1 aload pop
  123.         _proc2 aload pop
  124.         _proc1 length
  125.         _proc2 length add
  126.         packedarray cvx
  127.     }{
  128.         /_proc2 exch cvlit def
  129.         /_proc1 exch cvlit def
  130.         /_newproc _proc1 length _proc2 length add array def
  131.         _newproc 0 _proc1 putinterval
  132.         _newproc _proc1 length _proc2 putinterval
  133.         _newproc cvx
  134.     } ifelse
  135. } def
  136. /ci6istint {
  137.     type /arraytype eq 
  138. } def
  139. /ci6isspot {
  140.     dup type /arraytype eq {
  141.         dup length 1 sub get /Separation eq
  142.     }{
  143.         pop false
  144.     } ifelse
  145. } def
  146. /ci6spotname {
  147.     dup ci6isspot {dup length 2 sub get}{pop ()} ifelse
  148. } def
  149. /ci6altspace {
  150.     aload pop pop pop ci6colormake
  151. } def
  152. /ci6numcomps {
  153.     dup /DeviceGray eq {
  154.         pop 1
  155.     }{
  156.         dup /DeviceRGB eq {
  157.             pop 3
  158.         }{
  159.             /DeviceCMYK eq {
  160.                 4
  161.             }{
  162.                 1
  163.             } ifelse
  164.         } ifelse
  165.     } ifelse
  166. } def
  167. /ci6marksplate {
  168.     dup /DeviceGray eq {
  169.         pop plateindex 3 eq
  170.     }{
  171.         dup /DeviceRGB eq {
  172.             pop plateindex 5 ne
  173.         }{
  174.             dup /DeviceCMYK eq {
  175.                 pop plateindex 5 ne
  176.             }{
  177.                 dup ci6isspot {
  178.                     /findcmykcustomcolor where {
  179.                         pop
  180.                         dup length 2 sub get
  181.                         0.1 0.1 0.1 0.1 5 -1 roll
  182.                         findcmykcustomcolor 1 setcustomcolor
  183.                         systemdict /currentgray get exec
  184.                         1 ne
  185.                     }{
  186.                         pop plateindex 5 ne
  187.                     } ifelse
  188.                 }{
  189.                     pop plateindex 5 ne
  190.                 } ifelse
  191.             } ifelse
  192.         } ifelse
  193.     } ifelse
  194. } def
  195. /ci6colormake {
  196.     dup ci6numcomps
  197.     exch 1 index 2 add 1 roll
  198.     dup 1 eq {pop}{array astore} ifelse
  199.     exch
  200. } def
  201. /ci6colorexpand {
  202.     dup ci6spotname exch
  203.     dup ci6istint {
  204.         ci6altspace
  205.         exch 4 1 roll
  206.     }{
  207.         1 3 1 roll
  208.     } ifelse
  209. } def
  210. /ci6colortint {
  211.     dup /DeviceGray eq {
  212.         3 1 roll 1 exch sub mul 1 exch sub exch
  213.     }{
  214.         dup /DeviceRGB eq {
  215.             3 1 roll {1 exch sub 1 index mul 1 exch sub exch} forall pop 3 array astore exch
  216.         }{
  217.             dup /DeviceCMYK eq {
  218.                 3 1 roll {1 index mul exch} forall pop 4 array astore exch
  219.             }{
  220.                 3 1 roll mul exch
  221.             } ifelse
  222.         } ifelse
  223.     } ifelse
  224. } def
  225. /ci6colortocmyk {
  226.     dup /DeviceGray eq {
  227.         pop 1 exch sub 0 0 0 4 -1 roll 4 array astore
  228.     }{
  229.         dup /DeviceRGB eq {
  230.             pop aload pop _rgbtocmyk 4 array astore
  231.         }{
  232.             dup /DeviceCMYK eq {
  233.                 pop
  234.             }{
  235.                 ci6altspace ci6colortint ci6colortocmyk
  236.             } ifelse
  237.         } ifelse
  238.     } ifelse
  239. } def
  240. /ci6makeimagedict {
  241.     7 dict begin
  242.         /ImageType 1 def
  243.         /Decode exch def
  244.         /DataSource exch def
  245.         /ImageMatrix exch def
  246.         /BitsPerComponent exch def
  247.         /Height exch def
  248.         /Width exch def
  249.     currentdict end
  250. } def
  251. /ci6stringinvert {
  252.     0 1 2 index length 1 sub {
  253.         dup 2 index exch get 255 exch sub 2 index 3 1 roll put
  254.     } for
  255. } def
  256. /ci6stringknockout {
  257.     0 1 2 index length 1 sub {
  258.         255 2 index 3 1 roll put
  259.     } for
  260. } def
  261. /ci6stringapply {
  262.     0 1 4 index length 1 sub {
  263.         dup
  264.         4 index exch get
  265.         3 index 3 1 roll
  266.         3 index exec
  267.     } for
  268.     pop exch pop
  269. } def
  270. /ci6walkrgbstring {
  271.     0 3 index
  272.     dup length 1 sub 0 3 3 -1 roll {
  273.         3 getinterval {} forall
  274.         5 index exec
  275.         3 index
  276.     } for
  277.     
  278.      5 {pop} repeat
  279. } def
  280. /ci6walkcmykstring
  281. {
  282.     0 3 index
  283.     dup length 1 sub 0 4 3 -1 roll {
  284.         4 getinterval {} forall
  285.         
  286.         6 index exec
  287.         
  288.         3 index
  289.         
  290.     } for
  291.     
  292.     5 { pop } repeat
  293.     
  294. } def
  295. /ci6putrgbtograystr
  296. {
  297.     .11 mul exch
  298.     
  299.     .59 mul add exch
  300.     
  301.     .3 mul add
  302.     
  303.     cvi 3 copy put
  304.     
  305.     pop 1 add
  306. } def
  307. /ci6putcmyktograystr
  308. {
  309.     exch .11 mul add
  310.     
  311.     exch .59 mul add
  312.     
  313.     exch .3 mul add
  314.     
  315.     dup 255 gt { pop 255 } if
  316.     
  317.     255 exch sub cvi 3 copy put
  318.     
  319.     pop 1 add
  320. } def
  321. /ci6rgbtograyproc {    
  322.     Adobe_ColorImage_AI6_Vars begin 
  323.         sourcearray 0 get exec
  324.         XIBuffer3
  325.         dup 3 1 roll 
  326.         
  327.         /ci6putrgbtograystr load exch
  328.         ci6walkrgbstring
  329.  end
  330. } def
  331. /ci6cmyktograyproc {    
  332.     Adobe_ColorImage_AI6_Vars begin
  333.         sourcearray 0 get exec
  334.         XIBuffer3
  335.         dup 3 1 roll 
  336.         
  337.         /ci6putcmyktograystr load exch
  338.         ci6walkcmykstring
  339.  end
  340. } def
  341. /ci6separatecmykproc {    
  342.     Adobe_ColorImage_AI6_Vars begin
  343.         sourcearray 0 get exec
  344.         
  345.         XIBuffer3
  346.         
  347.         0 2 index
  348.         
  349.         plateindex 4 2 index length 1 sub {
  350.             get 255 exch sub
  351.             
  352.             3 copy put pop 1 add
  353.             
  354.             2 index
  355.         } for
  356.         pop pop exch pop
  357.  end
  358. } def
  359.     
  360. /ci6compositeimage {
  361.     dup 1 eq {
  362.         pop pop image
  363.     }{
  364.         /ci6colorimage load null ne {
  365.             ci6colorimage
  366.         }{
  367.             3 1 roll pop
  368.             sourcearray 0 3 -1 roll put
  369.             3 eq {/ci6rgbtograyproc}{/ci6cmyktograyproc} ifelse load
  370.             image
  371.         } ifelse
  372.     } ifelse
  373. } def
  374. /ci6knockoutimage {
  375.     gsave
  376.     0 ci6curtransfer exec 1 ci6curtransfer exec
  377.     eq {
  378.         0 ci6curtransfer exec 0.5 lt
  379.     }{
  380.         0 ci6curtransfer exec 1 ci6curtransfer exec gt
  381.     } ifelse
  382.     {{pop 0}}{{pop 1}} ifelse
  383.     systemdict /settransfer get exec
  384.     ci6compositeimage
  385.     grestore
  386. } def
  387. /ci6drawimage {
  388.     ci6testplate -1 eq {
  389.         pop ci6compositeimage
  390.     }{
  391.         dup type /arraytype eq {
  392.             dup length plateindex gt {plateindex get}{pop false} ifelse
  393.         }{
  394.             {
  395.                 true
  396.             }{
  397.                 dup 1 eq {plateindex 3 eq}{plateindex 3 le} ifelse
  398.             } ifelse
  399.         } ifelse
  400.         {
  401.             dup 1 eq {
  402.                 pop pop ci6image
  403.             }{
  404.                 dup 3 eq {
  405.                     ci6compositeimage
  406.                 }{
  407.                     pop pop
  408.                     sourcearray 0 3 -1 roll put
  409.                     /ci6separatecmykproc load
  410.                     ci6image
  411.                 } ifelse
  412.             } ifelse
  413.         }{
  414.             ci6curoverprint {
  415.                 7 {pop} repeat
  416.             }{
  417.                 ci6knockoutimage
  418.             } ifelse
  419.         } ifelse
  420.     } ifelse
  421. } def
  422. /ci6proctintimage {
  423.     /_ptispace exch store /_ptiname exch store /_pti1 exch store /_pti0 exch store /_ptiproc exch store
  424.     /_pticomps _ptispace ci6numcomps store
  425.     /_ptiscale _pti1 _pti0 sub store
  426.     level2? {
  427.         _ptiname length 0 gt version cvr 2012 ge and {
  428.             [/Separation _ptiname _ptispace {_ptiproc}] setcolorspace
  429.             [_pti0 _pti1] ci6makeimagedict ci6image
  430.         }{
  431.             [/Indexed _ptispace 255 {255 div _ptiscale mul _pti0 add _ptiproc}] setcolorspace
  432.             [0 255] ci6makeimagedict ci6image
  433.         } ifelse
  434.     }{
  435.         _pticomps 1 eq {
  436.             {
  437.                 dup
  438.                 {
  439.                     255 div _ptiscale mul _pti0 add _ptiproc 255 mul cvi put
  440.                 } ci6stringapply
  441.             } ci6concatprocs ci6image
  442.         }{
  443.             {
  444.                 dup length _pticomps mul dup _ptibuf length ne {/_ptibuf exch string store}{pop} ifelse
  445.                 _ptibuf {
  446.                     exch _pticomps mul exch 255 div _ptiscale mul _pti0 add _ptiproc
  447.                     _pticomps 2 add -2 roll
  448.                     _pticomps 1 sub -1 0 {
  449.                         1 index add 2 index exch
  450.                         5 -1 roll
  451.                         255 mul cvi put
  452.                     } for
  453.                     pop pop
  454.                 } ci6stringapply
  455.             } ci6concatprocs false _pticomps
  456.             /ci6colorimage load null eq {7 {pop} repeat}{ci6colorimage} ifelse
  457.         } ifelse
  458.     } ifelse
  459. } def
  460. /ci6graytintimage {
  461.     /_gtigray 5 -1 roll store
  462.     {1 _gtigray sub mul 1 exch sub} 4 1 roll
  463.     /DeviceGray ci6proctintimage
  464. } def
  465. /ci6cmyktintimage {
  466.     /_cticmyk 5 -1 roll store
  467.     {_cticmyk {1 index mul exch} forall pop} 4 1 roll
  468.     /DeviceCMYK ci6proctintimage
  469. } def
  470. /ci6rgbtintimage {
  471.     /_rtirgb 5 -1 roll store
  472.     {_rtirgb {1 exch sub 1 index mul 1 exch sub exch} forall pop} 4 1 roll
  473.     /DeviceRGB ci6proctintimage
  474. } def
  475. /ci6tintimage {
  476.     ci6testplate -1 eq {
  477.         ci6colorexpand
  478.         3 -1 roll 5 -1 roll {0}{0 exch} ifelse 4 2 roll
  479.         dup /DeviceGray eq {
  480.             pop ci6graytintimage
  481.         }{
  482.             dup /DeviceRGB eq {
  483.                 pop ci6rgbtintimage
  484.             }{
  485.                 pop ci6cmyktintimage
  486.             } ifelse
  487.         } ifelse
  488.     }{
  489.         dup ci6marksplate {
  490.             plateindex 5 lt {
  491.                 ci6colortocmyk plateindex get
  492.                 dup 0 eq ci6curoverprint and {
  493.                     7 {pop} repeat
  494.                 }{
  495.                     1 exch sub
  496.                     exch {1 0}{0 1} ifelse () ci6graytintimage
  497.                 } ifelse
  498.             }{
  499.                 pop exch {0}{0 exch} ifelse 0 3 1 roll () ci6graytintimage
  500.             } ifelse
  501.         }{
  502.             ci6curoverprint {
  503.                 8 {pop} repeat
  504.             }{
  505.                 pop pop pop
  506.                 {pop 1} 0 1 () /DeviceGray ci6proctintimage
  507.             } ifelse
  508.         } ifelse
  509.     } ifelse
  510. } def
  511. /XINullImage {
  512. } def
  513. /XIImageMask {
  514.     XIImageWidth XIImageHeight false
  515.     [XIImageWidth 0 0 XIImageHeight neg 0 0]
  516.     /XIDataProc load
  517.     imagemask
  518. } def
  519. /XIImageTint {
  520.     XIImageWidth XIImageHeight XIBitsPerPixel
  521.     [XIImageWidth 0 0 XIImageHeight neg 0 0]
  522.     /XIDataProc load
  523.     XIType 3 eq XIColorValues XIColorSpace ci6tintimage
  524. } def
  525. /XIImage {
  526.     XIImageWidth XIImageHeight XIBitsPerPixel
  527.     [XIImageWidth 0 0 XIImageHeight neg 0 0]
  528.     /XIDataProc load
  529.     false XIChannelCount XIPlateList ci6drawimage
  530. } def
  531. /XG {
  532.     pop pop
  533. } def
  534. /XF {
  535.     13 {pop} repeat
  536. } def
  537. /Xh {
  538.     Adobe_ColorImage_AI6_Vars begin
  539.         gsave
  540.         /XIType exch def
  541.         /XIImageHeight exch def
  542.         /XIImageWidth exch def
  543.         /XIImageMatrix exch def
  544.         0 0 moveto
  545.         XIImageMatrix concat
  546.         XIImageWidth XIImageHeight scale
  547.         
  548.         /_lp /null ddef
  549.         _fc
  550.         /_lp /imagemask ddef
  551.  end
  552. } def
  553. /XH {
  554.     Adobe_ColorImage_AI6_Vars begin
  555.         grestore
  556.  end
  557. } def
  558. /XIEnable {
  559.     Adobe_ColorImage_AI6_Vars /XIEnable 3 -1 roll put
  560. } def
  561. /XC {
  562.     Adobe_ColorImage_AI6_Vars begin
  563.         ci6colormake
  564.         /XIColorSpace exch def
  565.         /XIColorValues exch def
  566.  end
  567. } def
  568. /XIPlates {
  569.     Adobe_ColorImage_AI6_Vars begin
  570.         /XIPlateList exch def
  571.  end
  572. } def
  573. /XI
  574. {
  575.     Adobe_ColorImage_AI6_Vars begin
  576.         gsave
  577.         /XIType exch def
  578.         cvi dup
  579.         256 idiv /XICompression exch store
  580.         256 mod /XIEncoding exch store
  581.         pop pop
  582.         /XIChannelCount exch def
  583.         /XIBitsPerPixel exch def
  584.         /XIImageHeight exch def
  585.         /XIImageWidth exch def
  586.         pop pop pop pop
  587.         /XIImageMatrix exch def
  588.         XIBitsPerPixel 1 eq {
  589.             XIImageWidth 8 div ceiling cvi
  590.         }{
  591.             XIImageWidth XIChannelCount mul
  592.         } ifelse
  593.         /XIRowBytes exch def
  594.         XIEnable {
  595.             /XIBuffer3 XIImageWidth string def
  596.             XICompression 0 eq {
  597.                 /XIBuffer1 XIRowBytes string def
  598.                 XIEncoding 0 eq {
  599.                     {currentfile XIBuffer1 readhexstring pop}
  600.                 }{
  601.                     {currentfile XIBuffer1 readstring pop}
  602.                 } ifelse
  603.             }{
  604.                 /XIBuffer1 256 string def
  605.                 /XIBuffer2 XIRowBytes string def
  606.                 {currentfile XIBuffer1 readline pop (%) anchorsearch {pop} if}
  607.                 /ASCII85Decode filter /DCTDecode filter
  608.                 /XIFile exch def
  609.                 {XIFile XIBuffer2 readstring pop}
  610.             } ifelse
  611.             /XIDataProc exch def
  612.             
  613.             XIType 1 ne {
  614.                 0 setgray
  615.             } if
  616.             XIType 1 eq {
  617.                 XIImageMask
  618.             }{
  619.                 XIType 2 eq XIType 3 eq or {
  620.                     XIImageTint
  621.                 }{
  622.                     XIImage
  623.                 } ifelse
  624.             } ifelse
  625.         }{
  626.             XINullImage
  627.         } ifelse
  628.         /XIPlateList false def
  629.         grestore
  630.  end
  631. } def
  632. end
  633. %%EndProcSet
  634.