%!PS-Adobe-2.0 EPSF-2.0 %%Title: /clearcase/otp/system/doc/efficiency_guide/digger.ps %%Creator: XV Version 3.10a Rev: 12/29/94 - by John Bradley %%BoundingBox: 290 380 322 412 %%Pages: 1 %%DocumentFonts: %%EndComments %%EndProlog %%Page: 1 1 % remember original state /origstate save def % build a temporary dictionary 20 dict begin % define string to hold a scanline's worth of data /pix 96 string def % define space for color conversions /grays 32 string def % space for gray scale line /npixls 0 def /rgbindx 0 def % lower left corner 290 380 translate % size of image (on paper, in 1/72inch coords) 31.96800 31.96800 scale % define 'colorimage' if it isn't defined % ('colortogray' and 'mergeprocs' come from xwd2ps % via xgrab) /colorimage where % do we know about 'colorimage'? { pop } % yes: pop off the 'dict' returned { % no: define one /colortogray { % define an RGB->I function /rgbdata exch store % call input 'rgbdata' rgbdata length 3 idiv /npixls exch store /rgbindx 0 store 0 1 npixls 1 sub { grays exch rgbdata rgbindx get 20 mul % Red rgbdata rgbindx 1 add get 32 mul % Green rgbdata rgbindx 2 add get 12 mul % Blue add add 64 idiv % I = .5G + .31R + .18B put /rgbindx rgbindx 3 add store } for grays 0 npixls getinterval } bind def % Utility procedure for colorimage operator. % This procedure takes two procedures off the % stack and merges them into a single procedure. /mergeprocs { % def dup length 3 -1 roll dup length dup 5 1 roll 3 -1 roll add array cvx dup 3 -1 roll 0 exch putinterval dup 4 2 roll putinterval } bind def /colorimage { % def pop pop % remove 'false 3' operands {colortogray} mergeprocs image } bind def } ifelse % end of 'false' case 32 32 8 % dimensions of data [32 0 0 -32 0 32] % mapping matrix {currentfile pix readhexstring pop} false 3 colorimage 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00000000000000000000000000ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00000000000000000000000000000000000000ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00000000000000000000000000000000000000ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00000000000000000000000000000000000000ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00000000000000000000000000000000000000ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00000000000000000000000000000000000000 000000000000ffff00000000000000000000000000ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00000000ffff00ffff00ffff00ffff00000000 000000000000000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00000000ffff00ffff00ffff00000000000000 000000000000000000000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00000000ffff00000000000000000000000000 000000000000ffff00000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00000000ffff00000000000000000000000000 000000ffff00ffff00000000ffff00ffff00ffff00ffff00ffff00000000000000000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00000000000000000000000000000000000000 ffff00ffff00ffff00000000ffff00ffff00ffff00ffff00ffff00000000000000000000 000000000000ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00000000000000ffff00000000000000000000000000000000 ffff00ffff00ffff00000000ffff00ffff00ffff00ffff00ffff00000000000000000000 000000000000ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000000000000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000000000000000 000000000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00000000000000ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000ffff00000000 000000000000000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00000000000000ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000ffff00ffff00 000000000000000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 000000ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000ffff00ffff00 000000000000000000ffff00ffff00ffff00ffff00ffff00000000000000ffff00ffff00 000000ffff00000000ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000ffff00ffff00 000000000000000000ffff00ffff00ffff00ffff00000000000000000000000000ffff00 ffff00ffff00000000ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000ffff00ffff00ffff00 000000000000ffff00ffff00ffff00ffff00000000000000000000000000000000000000 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000ffff00ffff00 000000000000000000ffff00ffff00000000000000000000000000000000000000000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000000000000000ffff00ffff00 000000000000000000ffff00ffff00000000000000000000000000000000000000000000 000000ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00ffff00 ffff00ffff00ffff00ffff00ffff00ffff00ffff00000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000000000 showpage % stop using temporary dictionary end % restore original state origstate restore %%Trailer