📄 ngwchl.ps
字号:
%!PS-Adobe-2.0 EPSF-2.0%%Title: /home/loos/DemoGNG-1.3/tex/eps/NGwCHL.ps%%Creator: XV Version 3.10a Rev: 12/29/94 - by John Bradley%%BoundingBox: 36 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 717 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)523.44000 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 21 string def% load up the colormapcurrentfile cmap readhexstring000000 ffffff bebebe 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 def717 360 8 % dimensions of data[717 0 0 -360 0 360] % mapping matrixrlecmapimage7f027f027f027f027f024c027f027f027f027f027f024c027f027f027f027f027f024c027f027f027f027f027f024c027f027f0227027f0672067f0231027f027f0227027f0671068103027f0230027f027f02270201067f026e0201037f0231027f027f02270201067f026e0201037f0231027f027f02270201067f026e0201037f0231027f026d028100021e0281000208028100020b0201067f026e0201037f0231027f024102810002020281000208028100021902810002080281000203028100020d0281000208028100020b0201067f026e0201037f0231027f024102010002028100020802810002190281000208020100020201000e0281000208028100020b020106510201002e020100070201005f0201037f0231027f024102010002028100020102020002020300820200020502810002020201000202820002008100028202000201028100020402010002020100040201000402030002020200030281000282020002080201062802020002028100022002010007020300220201000202810002020201000c0203000202010002020100020201003f0201037f0231027f02410283000200028202000282020002010281000201028100020102810002010281000201028100020102810002820200028102008100020202810002820200020502870002000200020002020281000282020002010281000201028100028202000201028100020102810002820200020802010628020200020281000220020100060201000102010025020100030201000b020100010201000102010002020100020201002c020b06060201037f0231027f0241028200020083000200028202000201028100020102810002020281000282020002820200020102810002020283000200020302830002000206028700020002000200020102810002020281000282020002010281000282020002010281000201028100020b0201062802820002008100028202000201020300030201000102010001020100810200810002810200020003020100050201000702030003020400050201000502010001020100810200030001020100810200810002060201000602010002020100020201002c020a06810302050201037f0231027f024102810002840200020002810200030002028100020202870002000200020002010281000202028300020002030202000702810002820200028202000201028100020202810002820200020102810002810200030002028100020b02010628028200020081000282020002810200810002810200810002010201000102010001020100810200820002008100028102008100020102010005020100060201000102010001020100090201000102010001020100010201000102010003020200810200810002050201000602010002020100020201002c02010607020103060201037f0231027f0241028100020102010001028100020502810002020287000200020002000201028100020202830002000203028100028202000205028100028202000282020002010281000202028100028202000201028100028202000205028100020b0201062802820002000100820200028102008100028102008100020102010001020100010202000602010002020100050201000a020100010202000902010081020082000200810002010201000102010003020100010201000602010006020600020201002c02010607020103060201037f0231027f024102810002010201000102810002010281000201028100020302810002010281000203028100028202000282020002030281000281020081000204028100020302810002020281000282020002010281000281020081000282020002010281000201028100028202000208020106280281000281020083000200028102000400020201000102010001020100040204000202010005020100020201000202040002020300070201008102008200020081000201020100010201000302010001020100060201000602010002020100020201002c02010607020103060201037f0231027f0241028100020202810002010202000402010002028100020102810002040201000202810002030281000201028100020402810002030281000203020100040201008202000201020200030281000282020002080201062802810002010202000102010006020100010201000102010003020100010201000202010005020100020201000102010001020100040202000602070002020100010201000302010001020100060201000602010002020100020201002c0201060903060201037f0231027f027f022702010628028100020102020001020100020281000201020100810200010001020100030201000102010002020100060201000102010001020100010201000502010007020100010201000302010001020100030201000102010007020100020281000281020081000201020100020201002c028106030903060201037f0231027f027f02270201062802810002020201000202030004020100810200810002810200810002030202008102008100028102008100020602040002020200810200820002000300080201000102010003020100020202000102010001020100080203000202010002020100020205003b0201037f0231027f027f02270201067f026e0201037f0231027f027f02270201067f026e0201037f0231027f027f02270201067f026e0201037f0231027f027f02270201067f026e0201037f0231027f027f02270201067f026e0201037f0231027f027f02270201067f026e0201037f0231027f027f02270201067f0370037f0231027f027f0227028106037f0370037f0231027f027f027f027f027f024c027f027f027f027f027f024c027f027f027f027f027f024c027f027f027f027f027f024c027f027f027f027f027f024c027f017f0165018105017f017f016401080105000401010004010100050101007f017f012e0124057f017f013701810001060103000e010801810001070183000100010201810001820100010201810001820100017f017f01250132057f017f012e010200060181000102018100010c010801810001060181000182010001010181000102018100018201000102018100017f017f011e013e057f017f012001810001010181000103018100010a018100010c010801040002018100010101810001010181000102018100018201000102018100017f017f011a0146057f017f011c01810001010181000103018100010a018100010c010d0183000100010201810001010181000102018100018201000102018100017f017f01150150057f017f01170181000101018100010301810001070102000e010d01820001000500010181000102018100018201000102018100017f017f011201340504001c057f017f011501830001000104018100010a018100010c010d018100010401810001010181000102018100018201000102018100017f017f010e0120050400110581000403048100051e057f017f011101830001000104018100010a018100010c010801810001020181000104018100010201810001820100010201810001820100017f017f010c01220581000403048100050e05810004050481000520057f017f010f01810001050181000102018100018201000102018100010c0109010300060181000103010100050101007f017f010b01240581000405048100050c05810004070481000522057f017f010c0181000105018100010201810001010103000e017f017f012d01260581000407048100050b05810004070481000525057f017f012d017f017f012b012805810004070481000504050700080481000527057f017f012b017f017f0128012b0581000407040600060581000407048100052a057f017f0128017f017f0126012d0581000407048100050b0581000407048100052c057f017f0126017f017f012301300581000407048100050c0581000405048100051305040017057f017f0123017f017f0121010f0504001e0581000405048100050e0581000403048100051305810004030481000517057f017f0121017f017f011f01100581000403048100051a050100820500040304810005100504001405810004050481000518057f017f011f017f017f011d01110581000405048100050f05040003058100050205040012058300050005820500051105810004070481000519057f017f011d017f017f011b01120581000407048100050d058100040304820005008100050505810005820500051005830005000582050005110581000407048100051b057f017f011b017f017f011901140581000407048100050c0581000405048100050705810005820500050f0581000582050005010504000d0581000407048100050c0504000b057f017f0119017f017f011701160581000407048100050b058100040704810005060581000501058100050e05810005820500058205000403048100050a050100080401000b0581000403048100050b057f017f0117017f017f011501180581000407040c00820500040704810005060581000501058100050e05810005840500050004050481000504050400820500040704820005000200060581000405048100050c057f017f0115017f017f01140119058100040704810005040504008105008100040704810005060581000502058100050d0585000500050004070482000500020006058100040504810005040504008205000407048100050c057f017f0114017f017f0112011b050100060402000305810004030483000500040704810005060581000502058100050c05810005840500050004070401000b05810004030401000a05010008048100050e057f017f011201⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -