📄 hcl_voronoi.ps
字号:
%!PS-Adobe-2.0 EPSF-2.0%%Title: /home/loos/DemoGNG-1.3/tex/eps/HCL_Voronoi.ps%%Creator: XV Version 3.10a Rev: 12/29/94 - by John Bradley%%BoundingBox: 36 290 560 551%%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 718 string def % space for gray scale line/npixls 0 def/rgbindx 0 def% lower left corner36 290 translate% size of image (on paper, in 1/72inch coords)524.16000 261.36000 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 24 string def% load up the colormapcurrentfile cmap readhexstring000000 ffffff bebebe 656565 ff0000 00ff00 cbcbff e7e7e7 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 def718 358 8 % dimensions of data[718 0 0 -358 0 358] % mapping matrixrlecmapimage7f027f027f027f027f024d027f027f027f027f027f024d027f027f027f027f027f024d027f027f027f027f027f024d027f027f027f027f027f024d027f027f0228027f0772077f0231027f027f0228027f0771078103027f0230027f027f02280201077f026e0201037f0231027f027f02280201077f026e0201037f0231027f027f02280201077f026e0201037f0231027f026e028100021e0281000208028100020b0201077f026e0201037f0231027f024202810002020281000208028100021902810002080281000203028100020d0281000208028100020b0201077f026e0201037f0231027f024202010002028100020802810002190281000208020100020201000e0281000208028100020b0201072d0201003a020100070201003d020100370201037f0231027f02420201000202810002010202000202030082020002050281000202020100020282000200810002820200020102810002040201000202010004020100040203000202020003028100028202000208020107120201000202010013020100080203002802810002020201000202810002020201001602010024020100370201037f0231027f024202830002000282020002820200020102810002010281000201028100020102810002010281000201028100028202000281020081000202028100028202000205028700020002000200020202810002820200020102810002010281000282020002010281000201028100028202000208020107120201000202010013020100070201000102010026020100070201001c0201004b020b07060201037f0231027f0242028200020083000200028202000201028100020102810002020281000282020002820200020102810002020283000200020302830002000206028700020002000200020102810002020281000282020002010281000282020002010281000201028100020b02010712020100020201000202030002020100810200810002810200030006020100060203000302010081020081000281020081000202020100810200810002020203000102040001020100810200030001020100010201000102010002020300070201000502030003020300020201008102008100028102008200020081000202020100020201008102008100020202040013020a07810302050201037f0231027f024202810002840200020002810200030002028100020202870002000200020002010281000202028300020002030202000702810002820200028202000201028100020202810002820200020102810002810200030002028100020b0201071202010002020100010201000102010001020100810200820002008100028102008100020502010005020100010201000202020081020001008102008100020102020081020081000281020081000281020081000281020081000202020100010201000302010001020100010201000102010001020100060201000402010001020100010201000102010001020100810200810002810200010081020081000201020100020202008102008100028102008100028102008100021202010707020103060201037f0231027f0242028100020102010001028100020502810002020287000200020002000201028100020202830002000203028100028202000205028100028202000282020002010281000202028100028202000201028100028202000205028100020b02010712020600050201000102020002020100010201000602010005020100010201000202010001020100010201000202010001020100010201000102010001020100030201000102010003020100010201000102010001020100010201000602010004020100010201000502010001020200030201000102010002020100020201000102010001020100010201001302010707020103060201037f0231027f0242028100020102010001028100020102810002010281000203028100020102810002030281000282020002820200020302810002810200810002040281000203028100020202810002820200020102810002810200810002820200020102810002010281000282020002080201071202010002020100020204000102010003020100010201000602010005020100010201000202010001020100010201000202010001020100010205000102010003020100010201000302010002020100820200020102050006020100040205000202040001020100040201000102010002020100020201000102010001020100010201001302010707020103060201037f0231027f02420281000202028100020102020004020100020281000201028100020402010002028100020302810002010281000204028100020302810002030201000402010082020002010202000302810002820200020802010712020100020201000102010001020100010201000302010001020100060201000502010001020100020201000102010001020100020201000102010001020100050201000302010001020100030201000202010082020002010201000a020100040201000502010001020100010201000402010001020100020201000202010001020100010201008102000100130201070903060201037f0231027f027f02280201071202010002020100010201000102010001020100030201008102000100070201000202820002008100028102008100020102010001020100010201000202010001020100010201000202810002810200810002020201000102010003020100030201000302010002028100020502010004020100020281000281020081000281020081000281020081000203020100010201000202010002020100010201000202010081020081000212028107030903060201037f0231027f027f022802010712020100020201000202020081020082000200810002030201008102008100020702030002020300030201000102010001020100020204000302030003020200010201000202020001020100030201000402030007020500010203000302020081020082000200810002030201000102010002020100020201000102010005020100260201037f0231027f027f0228020107540201006a02010001020100260201037f0231027f027f0228020107540201006b020300270201037f0231027f027f02280201077f026e0201037f0231027f027f02280201077f026e0201037f0231027f027f02280201077f026e0201037f0231027f027f02280201077f026e0201037f0231027f027f02280201077f0370037f0231027f027f0228028107037f0370037f0231027f027f027f027f027f024d027f027f027f027f027f024d027f027f027f027f027f024d027f027f027f027f027f024d027f027f027f027f027f024d02460181040124018104012401810401050181040110018104013701810401080181040123⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -