📄 lbg_delaunay.ps
字号:
%!PS-Adobe-2.0 EPSF-2.0%%Title: /home/loos/DemoGNG-1.3/tex/eps/LBG_Delaunay.ps%%Creator: XV Version 3.10a Rev: 12/29/94 - by John Bradley%%BoundingBox: 37 290 559 553%%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 715 string def % space for gray scale line/npixls 0 def/rgbindx 0 def% lower left corner37 290 translate% size of image (on paper, in 1/72inch coords)521.92800 262.80000 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 ffb610 656565 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 def715 360 8 % dimensions of data[715 0 0 -360 0 360] % mapping matrixrlecmapimage7f027f027f027f027f024a027f027f027f027f027f024a027f027f027f027f027f024a027f027f027f027f027f024a027f027f027f027f027f024a027f027f0226027f0772077f0230027f027f0226027f0771078104027f022f027f027f02260201077f026e0201047f0230027f027f02260201077f026e0201047f0230027f027f02260201077f026e0201047f0230027f026c028100021e0281000208028100020b0201077f026e0201047f0230027f024002810002020281000208028100021902810002080281000203028100020d0281000208028100020b0201077f026e0201047f0230027f024002010002028100020802810002190281000208020100020201000e0281000208028100020b0201077f026e0201047f0230027f02400201000202810002010202000202030082020002050281000202020100020282000200810002820200020102810002040201000202010004020100040203000202020003028100028202000208020107610201000502040004020300760201047f0230027f024002830002000282020002820200020102810002010281000201028100020102810002010281000201028100028202000281020081000202028100028202000205028700020002000200020202810002820200020102810002010281000282020002010281000201028100028202000208020107610201000502010001020100020201000102010062020b07060201047f0230027f0240028200020083000200028202000201028100020102810002020281000282020002820200020102810002020283000200020302830002000206028700020002000200020102810002020281000282020002010281000282020002010281000201028100020b0201076102010005020100010201000102010067020a07810402050201047f0230027f024002810002840200020002810200030002028100020202870002000200020002010281000202028300020002030202000702810002820200028202000201028100020202810002820200020102810002810200030002028100020b02010761020100050201000102810002010201006702010707020104060201047f0230027f0240028100020102010001028100020502810002020287000200020002000201028100020202830002000203028100028202000205028100028202000282020002010281000202028100028202000201028100028202000205028100020b0201076102010005020300030201006702010707020104060201047f0230027f0240028100020102010001028100020102810002010281000203028100020102810002030281000282020002820200020302810002810200810002040281000203028100020202810002820200020102810002810200810002820200020102810002010281000282020002080201076102010005020100010281000201020100020201006202010707020104060201047f0230027f0240028100020202810002010202000402010002028100020102810002040201000202810002030281000201028100020402810002030281000203020100040201008202000201020200030281000282020002080201076102010005020100010201000102010002020100620201070904060201047f0230027f027f0226020107610201000502010001020100020201000102010062028107040904060201047f0230027f027f0226020107610205000102040004020400750201047f0230027f027f02260201077f026e0201047f0230027f027f02260201077f026e0201047f0230027f027f02260201077f026e0201047f0230027f027f02260201077f026e0201047f0230027f027f02260201077f026e0201047f0230027f027f02260201077f026e0201047f0230027f027f02260201077f0470047f0230027f027f0226028107047f0470047f0230027f027f027f027f027f024a027f027f027f027f027f024a027f027f027f027f027f024a027f027f027f027f027f024a027f027f027f027f027f024a027f017f017f017f017f014a0108010300030103007f017f017f017f017f011a01810001060103000d01070181000102018100018201000102018100017f017f017f017f017f0116010200060181000102018100010b010c0181000105018100017f017f017f017f017f010e01810001010181000103018100010a018100010b010c0181000105018100017f017f017f017f017f010e01810001010181000103018100010a018100010b010b01810001030102007f017f017f017f017f01100181000101018100010301810001070102000d010a0181000107018100017f017f017f017f017f010f01830001000104018100010a018100010b01090181000108018100017f017f017f017f017f010f01830001000104018100010a018100010b010801810001040181000102018100017f017f017f017f017f011001810001050181000102018100018201000102018100010b0107010500020103007f017f017f017f017f01120181000105018100010201810001010103000d017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f011c0102007f017f012a017f017f017f011c0183000600017f017f0129017f017f017f011c0102007f017f012a017f017f017f017f017f014a017f017f017f017f017f014a017f017f017f01190102007f017f012d017f017f017f01190183000600017f017f012c017f017f017f01190102007f017f012d017f017f017f017f017f014a017f017f017f010f010200060107007f017f0128017f017f017f010f0183000600010401810005030583000600017f017f0127017f017f017f010f0102000401810005040505007f017f0125017f017f017f01160181000507050100820600017f017f0124017f017f017f0116010200050504007f017f0125017f017f017f01160182000600010003058200060001007f017f0125017f017f017f011101040302008206000502050200820600017f017f0124017f017f017f010a010603030183030005000200010505007f017f0125017f017f017f010301060308010103010185000500060005810500010082060001050102007f017f011c017f017f017c0106030c010203020182030100020001050400060183000600017f017f011b017f017f017501060311010103040181030101010900060102007f017f011c017f017f016e01060315010203040101030601020003058100017f017f0124017f017f01670106031a01010306018103010701830006000503058100017f017f0123017f017f01600106031e01020307018103010701030001050200820500017f017f0122017f017f01590106032301010309018103010801810005010502008406000500017f017f0122017f017f0152010603270102030901010305010200010104008106000100820500017f017f0122017f017f014b0106032c0101030b018103010601830006000185010006000600010002058100017f017f0122017f017f0144010603310101030c01810301070102000101040004058100017f017f0122017f017f013d010603350102030c0101030e018203000505058100017f017f0123017f017d010200350106033a0101030e018103010d010103010181000503058100017f017f0124017f017d0183000600012d0106033e0102030f018103010d01810301030104007f017f0126017f017d010200270106034301010311018103010c01010308018103017f017f0126017f017f012101060347010203110101030d018103010901810301040102007f017f011e01
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -