Hi
I have been trying to build a ps file with masked image. After hours of tries,
reading and try
again, the masked part of my image is still opaque. (I open it with illustrator
10 on mac).
Could someone help me on that topic ?
Thanks
(my code below)
--
Riccardo Cohen
Articque
Les Roches
37230 Fondettes
France
web = http://www.articque.com
tel: +33 02 47 49 90 49
fax: +33 02 47 49 91 49
*******************************************************************
%!PS-Adobe-3.0
%%Creator: (Cartes et Donnees)
%%CreationDate: (26/09/2002)
%%BoundingBox: 0 0 500 500
%%DocumentData: Clean7Bit
%%EndComments
%%BeginDefaults
%%PageBoundingBox: 0 0 500 500
%%EndDefaults
%%BeginProlog
/col {255 div 3 1 roll 255 div 3 1 roll 255 div 3 1 roll setrgbcolor} bind def
/lt /lineto load def
/mt /moveto load def
/rmt /rmoveto load def
/tr /translate load def
/sc /scale load def
/rt /rotate load def
/st /stroke load def
/fl /fill load def
/gs /gsave load def
/gr /grestore load def
/lw /setlinewidth load def
/lj /setlinejoin load def
/re {4 -2 roll moveto 1 index 0 rlineto 0 exch rlineto neg 0 rlineto closepath}
bind def
/sf {findfont exch scalefont setfont} bind def
%%EndProlog
%%Page 1 1
save
/DeviceRGB setcolorspace
% -------- BEGIN OF DRAWING
currentfile /ASCIIHexDecode filter
/ReusableStreamDecode filter
ff0000 00ff00 6f6f6f 6f6f6f
ff0000 00ff00 6f6f6f 6f6f6f
0000ff 0000ff 0000ff 0000ff
ff0000 00ff00 6f6f6f 6f6f6f
>
/datastream exch def
% --------
currentfile /ASCIIHexDecode filter
/ReusableStreamDecode filter
0F0F0F0F
>
/maskstream exch def
%---------------DataDict
/ImageDataDictionary 8 dict def
ImageDataDictionary begin
/ImageType 1 def
/Width 4 def
/Height 4 def
/BitsPerComponent 8 def
/DataSource datastream def
/MultipleDataSources false def
/ImageMatrix [1 0 0 1 0 0] def
/Decode [0 1 0 1 0 1] def
end
%---------------MaskDict
/ImageMaskDictionary 8 dict def
ImageMaskDictionary begin
/ImageType 1 def
/Width 4 def
/Height 4 def
/BitsPerComponent 1 def
/DataSource maskstream def
/MultipleDataSources false def
/ImageMatrix [1 0 0 1 0 0] def
/Decode [0 1] def
end
%---------------ImageDict
/MaskedImageDictionary 7 dict def
MaskedImageDictionary begin
/ImageType 3 def
/InterleaveType 3 def
/MaskDict ImageMaskDictionary def
/DataDict ImageDataDictionary def
end
%---------------
80 80 scale
0 0 0 col
-1 -1 6 6 re fill
MaskedImageDictionary image
% -------- END OF DRAWING
restore
showpage
%%EOF