wxtab1.eps

来自「Wxpython Implemented on Windows CE, Sou」· EPS 代码 · 共 1,087 行 · 第 1/4 页

%!PS-Adobe-2.0 EPSF-2.0
%%Title: wxtab1.eps
%%Creator: XV Version 2.20  Rev: 4/24/92  -  by John Bradley
%%BoundingBox: 124 196 489 596
%%Pages: 1
%%DocumentFonts:
%%EndComments
%%EndProlog

%%Page: 1 1

% remember original state
/origstate save def

% build a temporary dictionary
20 dict begin

% lower left corner
124 196 translate

% size of image (on paper, in 1/72inch coords)
365 400 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
      /grays npixls string store  % str to hold the result
      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
    } 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 colormap
currentfile cmap readhexstring
000000 0000bf c0c0c0 808080 ffffff 
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 def


365 400 8			% dimensions of data
[365 0 0 -400 0 400]		% mapping matrix
rlecmapimage

7f037f036b030000
8103047f047f046804810300
83030402037f037f0364038304020300
8403040203017f017f0163018304020300
8403040203017f017f0163018304020300
8403040203017f017f0152010e0485000104020300
8403040203017f017f0152018104020b028603000104020300
840304020301810104040408010104040101040f01010404010404030101040701010412
0104047f0175018104020b028603000104020300
840304020301020101040a010104040101040f01010404010104010101040c0101041201
0104010101047f017401810402010201000302010001028603000104020300
840304020301020101040a010104040101040f01010404010104020101040b0101041201
0104010101047f017401810402020201000102010002028603000104020300
840304020301020101040401030401010404010104040201030402010404040101040201
010401010104010103040101010401010304020104040401010401010104020103040101
01048101048104017f0165018104020302030003028603000104020300
840304020301020101040701010481010481040181010482040104810401810104820401
048104018101048204010481040181010481040103010104020101040101010404010104
810104820401048104018101048204010481040181010481040103010404020101040101
0104810104820401048104017f0165018104020402010004028603000104020300
840304020301020101040401040481010481040181010482040104810401810104820401
040404810104810401810104810401030101040201010401010104010104048101048204
010481040181010482040104810401810104810401030101040101010401010104010101
04010102047f0167018104020302030003028603000104020300
840304020301020101040301010401010104810104810401810104820401048104018101
048204010481040103010104010101040401010402010104010101048101048104018101
048204010482040104810401810104820401048104018101048104010301010401010104
0101010401010104010102047f0167018104020202010001020100020286030001040203
00
840304020301020101040301010401010104810104810401810104820401048104018101
048204010481040181010482040104810401810104810401030101040101010402010104
810104810401810104820401048204010481040181010482040104810401810104810401
03010104010101040101010401010104810104820401048104017f016501810402010201
000302010001028603000104020300
840304020301020101040401040481010403040101040402010304020104040401040403
010104010104048101048104018101040204020104040401040403010304010101048101
048104017f0165018104020b028603000104020300
840304020301500101047f017f018104020b028603000104020300
8403040203014c0104047f017f01820104030c0385000104020300
8403040203017f017f0152010f00840104020300
8403040203017f017f0163018304020300
8403040203017f017f0163018304020300
83030402047f047f04650482020300
820304027f027f026702810300
820304027f027f026702810300
820304027f027f026702810300
820304027f027f026702810300
820304027f027f026702810300
8203040218024f04820302044e04820302044e04820302044e048103020602810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104021e0203000102810002260283030004021502020008028100020402
81000205028100021a028303000402110281000210028100020f02810002140283030004
020602810002020281000215028100020b02810002030281000207028100020902820300
020502810300
8203040218028104021e0281000201028100022802830300040214028100020102810002
06028100020c028100021a028303000402100283000200020f028100020f028100021402
83030004020602810002020281000223028100020d028100020902820300020502810300

8203040218028104021e0281000201028300020002810200830002000220028303000402
130281000203028100028102000100810200010086020002000200028102000100010282
000200810002170283030004021002830002000202020200010283000200028102008500
020002000201028100028102000100010285000200020002820200021102830300040206
028100020202830002000201028400020002000200010282000200020001028200020002
000202010085020002000200810002860200020002000281020083000200020902820300
020502810300
8203040218028104021e0281000201028500020002000281020081000220028303000402
130281000203028300020002010283000200028102008100028402000200020102820002
008100028202000216028303000402100283000200020102810002010282000200810002
820200028102008300020002010283000200020102820002008100028402000200021202
830300040206020500820200020102820002008300020002830200020083000200028602
000200020002010283000200028102008200020081000285020002000200810002820200
028102008100020902820300020502810300
8203040218028104021e0203000102830002000201028100022002830300040213028100
020302810002810200810002010281000282020002010283000200020302810002010281
0002160283030004020f0281000201028100020102030082020002010281000201028100
028402000200020102030082020002010201001402830300040206028100020202830002
000201028300020002820200028402000200028202000286020002000200020102830002
000201028300020002010285000200020002010281000201028100020902820300020502
810300
8203040218028104021e0281000203028300020002010281000220028303000402130281
000203028100020202810002820200028202000201028300020002030281000201028100
02160283030004020f020400010281000201028300020002010281000201028100028402
000200028202000201028300020002010283000200021202830300040206028100020202
830002000201028300020002820200028402000200028202000286020002000200020102
830002000201028300020002010285000200020002010281000201028100020902820300
020502810300
8203040218028104021e0281000203028300020002810200810002200283030004021402
810002010281000282020002010283000200028202000201028300020002010283000200
020102810002160283030004020e02810002030283000200028102008300020002010281
000281020081000201028100020102810002810200830002000201028300020002120283
030004020602810002020283000200028102008300020002820200028402000200028202
000286020002000200020102830002000281020082000200810002860200020002000201
028100028102008100020902820300020502810300
8203040218028104021e0281000203028100028102008300020002200283030004021502
020003020200010201008202000201028100028102000100010281000201028100021602
83030004020e028100020302810002810200850002000200020202010082020002010281
000202020100840200020002010281000282020002110283030004020602810002020281
000281020085000200020002820200028402000200028202000286020002000200020102
810002810200860002000200020081000284020002000202020100820200020902820300
020502810300
8203040218028104022a02810002200283030004024d0283030004024d0283030004022f
028100021b02820300020502810300
82030402180281040226020300220283030004024d0283030004024d0283030004022b02
03001d02820300020502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
8203040218028104024d0283030004024d0283030004024d0283030004024d0282030002
0502810300
820304020e024f04820302044e04820302044e04820302044e0481030207028203000205
02810300
820304020e028104024d0283030004024d0283030004024d0283030004024d0282030002
0602820300020502810300
820304020e028104024d0283030004024d0283030004024d0283030004024d0282030002
0602820300020502810300
820304020e028104024d0283030004024d0283030004024d0283030004024d0282030002
0602820300020502810300
820304020e028104024d0283030004024d0283030004024d0283030004024d0282030002
0602820300020502810300
820304020e028104024d0283030004024d0283030004024d0283030004024d0282030002
0602820300020502810300
820304020e028104021102810002080281000210028100021b0283030004021602030001
028100022e0283030004021b0202002e028303000402160281000202028100022f028203
00020602820300020502810300
820304020e0281040210028300020002070281000210028100021b028303000402150281
0002020283000200022e0283030004021a0281000201028100022c028303000402160281
000202028100022f02820300020602820300020502810300
820304020e02810402100283000200020102030081020001000502020002020200810200
010001020200010283000200021002830300040215028100020402820002008100020102