📄 gng_teach.ps
字号:
%!PS-Adobe-2.0 EPSF-2.0%%Title: /home/loos/DemoGNG-1.3/tex/eps/GNG_Teach.ps%%Creator: XV Version 3.10a Rev: 12/29/94 - by John Bradley%%BoundingBox: 35 289 561 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 720 string def % space for gray scale line/npixls 0 def/rgbindx 0 def% lower left corner35 289 translate% size of image (on paper, in 1/72inch coords)525.60000 263.52000 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 33 string def% load up the colormapcurrentfile cmap readhexstring000000 ffffff bebebe ffb610 656565 ffff00 ff0000 00ff00 0000ff 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 def720 361 8 % dimensions of data[720 0 0 -361 0 361] % mapping matrixrlecmapimage7f027f027f027f027f024f027f027f027f027f027f024f027f027f027f027f027f024f027f027f027f027f027f024f027f027f027f027f027f024f027f027f027f027f027f024f027f027f0229027f0a720a7f0232027f027f0229027f0a710a8104027f0231027f027f022902010a7f026e0201047f0232027f027f022902010a7f026e0201047f0232027f027f022902010a7f026e0201047f0232027f026f028100021e0281000208028100020b02010a7f026e0201047f0232027f024302810002020281000208028100021902810002080281000203028100020d0281000208028100020b02010a7f026e0201047f0232027f024302010002028100020802810002190281000208020100020201000e0281000208028100020b02010a4c020100400201005c0201047f0232027f0243020100020281000201020200020203008202000205028100020202010002028200020081000282020002010281000204020100020201000402010004020300020202000302810002820200020802010a2b0203001c0201001702020002028100022002010007020300500201047f0232027f02430283000200028202000282020002010281000201028100020102810002010281000201028100020102810002820200028102008100020202810002820200020502870002000200020002020281000282020002010281000201028100028202000201028100020102810002820200020802010a2a020100010201003502020002028100022002010006020100010201003c020b0a060201047f0232027f0243028200020083000200028202000201028100020102810002020281000282020002820200020102810002020283000200020302830002000206028700020002000200020102810002020281000282020002010281000282020002010281000201028100020b02010a29020100060201008102008100028102000200020201000502010001020100020201008102008100020202040006028200020081000282020002010203000302010001020100010201008102008100028102000200030201000502010007020300030204002c020a0a810402050201047f0232027f024302810002840200020002810200030002028100020202870002000200020002010281000202028300020002030202000702810002820200028202000201028100020202810002820200020102810002810200030002028100020b02010a29020100060201008102008200020081000281020081000281020081000281020081000281020081000281020081000201020200810200810002810200810002810200810002050282000200810002820200028102008100028102008100020102010001020100010201008102008200020081000281020081000201020100050201000602010001020100010201003002010a07020104060201047f0232027f0243028100020102010001028100020502810002020287000200020002000201028100020202830002000203028100028202000205028100028202000282020002010281000202028100028202000201028100028202000205028100020b02010a29020100060202000202010001020100020201008102008200020081000201020100020201000102010001020100010201000602820002000100820200028102008100028102008100020102010001020100010202000602010002020100050201000a020100010202002f02010a07020104060201047f0232027f02430281000201020100010281000201028100020102810002030281000201028100020302810002820200028202000203028100028102008100020402810002030281000202028100028202000201028100028102008100028202000201028100020102810002820200020802010a2902010002020100010201000302010001020100020201008102008200020081000201020100020201000102010001020100010201000602810002810200830002000281020004000202010001020100010201000402040002020100050201000202010002020400020203002d02010a07020104060201047f0232027f02430281000202028100020102020004020100020281000201028100020402010002028100020302810002010281000204028100020302810002030201000402010082020002010202000302810002820200020802010a2902010002020100010201000302010001020100020207000202010002020100010201000102010081020001000602810002010202000102010006020100010201000102010003020100010201000202010005020100020201000102010001020100040202002c02010a0904060201047f0232027f027f022902010a2a020100010201000102010003020100010201000302010001020100030201000202010001020100020201008102008100020502810002010202000102010002028100020102010081020001000102010003020100010201000202010006020100010201000102010001020100050201002c02810a040904060201047f0232027f027f022902010a2b02040001020100040203000402010001020100030201000202010001020100050201000602810002020201000202030004020100810200810002810200810002030202008102008100028102008100020602040002020200810200820002000300400201047f0232027f027f022902010a59020100010201007f020e0201047f0232027f027f022902010a5a0203007f020f0201047f0232027f027f022902010a7f026e0201047f0232027f027f022902010a7f026e0201047f0232027f027f022902010a7f026e0201047f0232027f027f022902010a7f026e0201047f0232027f027f022902010a7f0470047f0232027f027f022902810a047f0470047f0232027f027f027f027f027f024f027f027f027f027f027f024f027f027f027f027f027f024f027f027f027f027f027f024f027f027f027f027f027f024f027f017f017f017f017f014f010b010300030103000501010004010100050101007f017f017f017f017f010301810001060103000f010a018100010201810001820100010201810001020183000100010201810001820100010201810001820100017f017f017f017f017f010200060181000102018100010d010f018100010501810001010181000182010001010181000102018100018201000102018100017f017f017f017f017601810001010181000103018100010a018100010d010f018100010501810001820100010101810001010181000102018100018201000102018100017f017f017f017f017601810001010181000103018100010a018100010d010e018100010301020001018100010201810001010181000102018100018201000102018100017f017f017f017f01760181000101018100010301810001070102000f010d018100010701820001000500010181000102018100018201000102018100017f017f017f017f017701830001000104018100010a018100010d010c0181000108018100010401810001010181000102018100018201000102018100017f017f017f017f017701830001000104018100010a018100010d010b018100010401810001020181000104018100010201810001820100010201810001820100017f017f017f017f017901810001050181000102018100018201000102018100010d010a01050002010300060181000103010100050101007f017f017f017f017b0181000105018100010201810001010103000f017f017f017f017f017f014f017f017f017f017f017f014f017f017f017f017f017f014f017f017f017f017f017f014f017f017f017f017f017f014f017f017f017f017f017f014f01⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -