cd3.ps

来自「xorp源码hg」· PS 代码 · 共 423 行 · 第 1/2 页

PS
423
字号
%!PS-Adobe-2.0 EPSF-2.0%%Title: /scratch/possum/u2/pavlin/work/xorp/tmp/xorp/docs/user_manual/figs/cd3.ps%%Creator: XV Version 3.10a Rev: 12/29/94 (jp-extension 5.3.3 + PNG patch 1.2d)  -  by John Bradley%%BoundingBox: 68 355 546 502%%Pages: 1%%DocumentFonts:%%EndComments%%EndProlog%%Page: 1 1% remember original state/origstate save def% build a temporary dictionary20 dict begin% define space for color conversions/grays 478 string def  % space for gray scale line/npixls 0 def/rgbindx 0 def% lower left corner68 355 translate% size of image (on paper, in 1/72inch coords)478.00800 147.02400 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% define the colormap/cmap 15 string def% load up the colormapcurrentfile cmap readhexstring000000 0000c8 e0e4e0 f8fc00 f8fcf8 pop pop   % lose return values from readhexstring% rlecmapimage expects to have 'w h bits matrix' on stack/rlecmapimage {  /buffer 1 string def  /rgbval 3 string def  /block  384 string def  % proc to read a block from file, and return RGB data  { currentfile buffer readhexstring pop    /bcount exch 0 get store    bcount 128 ge    {  % it's a non-run block      0 1 bcount 128 sub      { currentfile buffer readhexstring pop pop        % look up value in color map        /rgbval cmap buffer 0 get 3 mul 3 getinterval store        % and put it in position i*3 in block        block exch 3 mul rgbval putinterval      } for      block  0  bcount 127 sub 3 mul  getinterval    }    { % else it's a run block      currentfile buffer readhexstring pop pop      % look up value in colormap      /rgbval cmap buffer 0 get 3 mul 3 getinterval store      0 1 bcount { block exch 3 mul rgbval putinterval } for      block 0 bcount 1 add 3 mul getinterval    } ifelse  } % end of proc  false 3 colorimage} bind def478 147 8			% dimensions of data[478 0 0 -147 0 147]		% mapping matrixrlecmapimage7f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d017f017f017f015d011c017f027f027f0223021c011c017f027f027f0223021c011c017f022d0201030102010381020302038102030303810203030306020103050201030e02030381020303037f0234021c011c017f022d0201030102030301020303010203030102010305020103050201030d02010301020103810203820302038103027f0232021c011c017f022e020303810203810302810203020301020303010201030502010315020103040201038102038103027f0232021c011c017f022e02030381020381030281020302030102030301020103050201030402020301020103010201038102030203810203810302030201038102038103027f0232021c011c0101027f042504070201030102010301020603810203030306020103050201030102010301020303010203030402010381020381030204027f042704020002021c011c0101027f04250406020303810203810302810203040301020103090201030502010301020103010209030402010381020381030204027f042704010281000201021c011c01010201047f022a02030381020381030281020302038102038203020381030208020103050201030202030381020381030202020103040201038102038103027f022e0281000201021c011c01010201047f02290201030102030301020303010203030902010305020103020203038102038103020202010301020103810203820302038103027f022e0281000201021c011c01010201047f0229020103010201038102030203810203810302810203020309020503810203020302020103020203030102030381020303037f02300281000201021c011c01010201047f027f027f021b0281000201021c011c01010201047f027f027f021b0281000201021c011c01010201047f027f027f021b0281000201020b0010011c01010201047f027f027f021b0281000201020b0010011c01010201040702040082020002110201000202010024028100026b028100020102810002810200010001020300010203000902010008020100280201007f02070281000201020b0010011c0101020104090281000201028100021002810002820200020102810002230281000224028100021b028100020a02810002190281000201028300020002010283000200020102830002000201028100020602810002820200020102810002030281000221028100020202810002820200020c02810002760281000201020b0010011c01010201040902810002010281000210028100020402810002230281000224028100021b0281000227028300020002820200020102830002000201028300020002010281000206028100020a0281000226028100020f02810002760281000201020b0010011c0101020104090281000201028200020081000201020200080281000204028100020202020001020300010203000102810002010281000206020300010202000202020002020200070282000200810002010202000102030008020200020202000102820002008100028102000200020202000202010002028200020081000207020200080283000200028202000201028300020002010283000200020102810002060281000203020100040281000202020200070201008202000201020200010282000200810002010201000302810002030202000202020001020300750281000201020b0010011c01010201040902810002010201000102830002000201028100020502030003028100020102810002010283000200020102830002000201028300020002010281000205028100020102830002000201028300020002010283000200020102810002050201000102830002000201028100028202000208028100020102830002000201028200020081000282020002820200020602810002010281000201020100010281000209028100020702810002010281000201028200020002000102030007020300030281000203028100020102810002010281000205028500020002000203028200020081000282020002010281000201020300010281000201028300020002010281000282020002760281000201020b0010011c0101020104090281000201028100020102820002000300070281000204028100020102810002010283000200020102830002000201028300020002010281000205028100020102830002000201028200020003000102010008028100020102830002000201028100028202000208028100020302810002010283000200020102810002820200020302030002028100020102810002010281000206020300070283000200028202000201028500020002000201028100020a02810002040281000203028100020102040006028500020002000281020002008202000201028100020102810002020281000202020400010201000302810002760281000201020b0010011c010102010409028100020102810002010283000200020a028100020402810002010281

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?