grid1.eps

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

%!PS-Adobe-2.0 EPSF-2.0
%%Title: /home/jacs/wx/utils/wxgrid/docs/grid1.eps
%%Creator: XV Version 3.10a  Rev: 12/29/94  -  by John Bradley
%%BoundingBox: 36 216 576 576
%%Pages: 1
%%DocumentFonts:
%%EndComments
%%EndProlog

%%Page: 1 1

% remember original state
/origstate save def

% build a temporary dictionary
20 dict begin

% define space for color conversions
/grays 450 string def  % space for gray scale line
/npixls 0 def
/rgbindx 0 def

% lower left corner
36 216 translate

% size of image (on paper, in 1/72inch coords)
540.00000 360.00000 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 39 string def


% load up the colormap
currentfile cmap readhexstring
000000 bf0000 00bf00 bfbf00 0000bf 00bfbf c0c0c0 808080 ff0000 00ff00 
ffff00 00ffff 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


450 300 8			% dimensions of data
[450 0 0 -300 0 300]		% mapping matrix
rlecmapimage

7f067f067f0640060000
81060c7f0c7f0c7f0c3d0c810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c068106047f047f047f0438040106810700
82060c068106048204060c820c060783070c0702010203098102047f047f047f04260401
06810700
82060c068106048104060106830001020781070283020702098109028102047f047f0472
040e0c81000c0d0c81000481040c0d0c81000481040682060700
82060c06810604810406010601008102078507020902070201028109047f047f04720481
0c060b068307000c060b068207000482040c060b068207000481040682060700
82060c0681060481040601068300040307820702098409020702098109041104040c0604
010c0404010c0504030c1904010c7f047f042504810c060b068307000c06810600070001
068207000482040c060b068207000481040682060700
82060c0681060481040601068304000a0789070209020002070209041004010c0204010c
0c04010c0404010c0104010c1804010c7f047f042504810c060b068307000c0681060007
0001068207000482040c06010601000306010001068207000481040682060700
82060c068106048204070681060001000107010286000209020702041004010c1104010c
0404010c1c04010c7f047f042504810c060b068307000c06820600060506810006830607
000482040c06020601000106010002068207000481040682060700
82060c0681060485040c0607060c010c8407020002090109820200040104010c81040c82
0c040c820c040c820c040c820c040c810c040504020c81040c810c0481040c030c040401
0c0604030c0104060c0104040c0104010c0104030c7f047f041f04810c060b068307000c
06820600060506810006830607000482040c060306030003068207000481040682060700

82060c068106048104070507010006020204010c81040c820c040c820c040c820c040c82
0c040c820c040c020c0104010c0104010c81040c810c0481040c810c040404030c060401
0c81040c820c040c820c040c820c040c810c0481040c820c040c820c040c810c0481040c
810c047f047f041d04810c060b068307000c06820600060506810006830607000482040c
060406010004068207000481040682060700
82060c068106048104050505010006030204070c0104020c0104010c0204010c0104010c
0104010c81040c810c0481040c810c040704010c0204040c81040c820c040c820c040c82
0c040c810c0481040c820c040c820c040c040c7f047f041e04810c060b068307000c0682
0600060506810006830607000482040c060306030003068207000481040682060700
82060c0681060481040b010b8205010b830b05030a020a81030a810a040104070c010402
0c0104010c0204010c0104010c0104010c81040c810c0481040c810c040704010c010401
0c0104010c81040c820c040c820c040c820c040c810c0481040c820c040c820c040c810c
047f047f042104810c060b068307000c06820600060506810006830607000482040c0602
0601000106010002068207000481040682060700
82060c068106048c040b05070507050b05030a030a840a03000a040204010c0104010c01
04010c81040c820c040c810c0481040c010c0104010c0104010c81040c810c0481040c81
0c040304010c0104010c0104010c0104010c81040c820c040c820c040c820c040c810c04
81040c820c040c820c040c810c0481040c810c047f047f041d04810c0601060500030683
07000c06820600060506810006830607000482040c060106010003060100010682070004
81040682060700
82060c0681060482040b08020886070b05030a030a010a82030a040204010c0104010c01
04010c81040c810c0481040c040c0104010c0104010c0104040c0504030c0304040c8104
0c820c040c820c040c820c040c030c0104010c0104030c7f047f041f04810c0601060500
03068307000c06810600070001068207000482040c060b068207000481040682060700
82060c0681060482040b080208010b8205030a810a0384030a030a044304010c7f047f04
2c04810c060b068307000c060b068207000482040c060b068207000481040682060700
82060c0681060482040b080308850b05030a030a010a82000a044304010c7f047f042c04
810c070c0782000c070c0781000482040c070c0781000481040682060700
82060c068106048c040b05080108010b05030a030a810a0382030a047f047f0472041f00
01040f0001040106810700
82060c0681060481040b050b8205030a050a7f047f047f0427040106810700
82060c068106047f047f047f0438040106810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c0607060400840600060006120602000e068100067f067f067f060306810700
82060c0607068100060506810006110681000601068100060606810006820600067f067f
067f060606810700
82060c060706810006050681000611068100060a06810006820600067f067f067f060606
810700
82060c0607068100060306830006000681060001000d0681000605060200010601008106
00860006000600060081000601060300010601007f067f067406810700
82060c060706030001068500060006000601068100060c06020002068100060106830006
000682060006830600060081000684060006000601068300060006820600067f067f0672
06810700
82060c060706810006030684000600060003001006810006810600030082060006820600
06840600060006010683000600060106810006820600067f067f067406810700
82060c060706810006030685000600060006130681000682060006030681000682060006
84060006000601068300060006010681000601068100067f067f067306810700
82060c06070681000603068500060006000601068100060b068100060106810006820600
060106830006000682060006840600060006010683000600060106830006000682060006
7f067f067206810700
82060c0607068100060306830006000681060001000e0602000306020002068100068606
00060006000601068100068106000200010601007f067f067406810700
82060c0642068100067f067f067706810700
82060c060606050015060600140603007f067f067906810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c061b067f077f077f071e070106810700
82060c061b068107007f007f007f001b000206810700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068207000c810c000200820c000c0a0c81000c0f0c81000c820c000c7f0c7f
0c700c0206810700
82060c060806810006040681000609068207000c820c000c0f0c81000c0f0c81000c820c
000c7f0c7f0c700c0206810700
82060c0607068300060006020601000a068207000c820c000c020c81000c810c00010001
0c0600040c0200020c0200010c81000c820c000c7f0c7f0c700c0206810700
82060c06070683000600060106830006000609068207000c810c000200820c000c820c00
0c010c81000c030c81000c030c81000c010c83000c000c010c83000c000c820c000c7f0c
7f0c700c0206810700
82060c0606068100060106810006020681000609068207000c820c000c020c81000c820c
000c020c0200010c81000c030c81000c030c0400820c000c820c000c7f0c7f0c700c0206
810700
82060c0606060400030681000609068207000c820c000c020c81000c820c000c050c8300
0c000c030c81000c010c83000c000c030c81000c820c000c7f0c7f0c700c0206810700
82060c0606068100060106810006020681000609068207000c820c000c020c81000c820c
000c010c0300010c0100040c0200020c0300820c000c820c000c7f0c7f0c700c02068107
00
82060c0605068100060306810006010681000609068207000c7f0c7f0c7f0c1a0c020681
0700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068207000c7f0c7f0c7f0c1a0c0206810700
82060c061b068107067f067f067f061e06810700
82060c061b067f0c7f0c7f0c1e0c0106810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700
82060c067f067f067f063c06810700