[wxWidgets.git] / utils / dialoged / docs / text.eps

%!PS-Adobe-2.0 EPSF-2.0
%%Title: text.eps
%%Creator: XV Version 2.20  Rev: 4/24/92  -  by John Bradley
%%BoundingBox: 254 375 282 403
%%Pages: 1
%%DocumentFonts:
%%EndComments
%%EndProlog

%%Page: 1 1

% remember original state
/origstate save def

% build a temporary dictionary
20 dict begin

% lower left corner
254 375 translate

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


% load up the colormap
currentfile cmap readhexstring
000000 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


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

81020018000002
8100031703810200
82000301150101020000
82000301150101020000
82000301150101020000
82000301150101020000
820003018101001200810102810200
8200030182010001100182000102810200
82000301820100010e01840001000102810200
8200030182010001060101000501840001000102810200
8200030182010001060101000501840001000102810200
8200030182010001060101000501840001000102810200
82000301820100018101000200010104000201840001000102810200
820003018301000100810001810100820001008100018101008100018501000100010281
0200
82000301820100010101030081010081000181010081000185010001000102810200
820003018201000181010082000100820001008100018101008100018501000100010281
0200
820003018301000100810001810100820001008100018101008100018501000100010281
0200
820003018301000100810001810100820001008100018101008100018501000100010281
0200
8200030182010001810100030081010003000201840001000102810200
82000301820100010e01840001000102810200
8200030182010001100182000102810200
820003018101001200810102810200
82000301150101020000
82000301150101020000
82000301150101020000
8200030217020000
81000218020000
81020018000002

%
% Compression made this file 22.15% of the uncompressed size.
%


showpage

% stop using temporary dictionary
end

% restore original state
origstate restore

%%Trailer
Commit	Line	Data
a660d684 KB	1	%!PS-Adobe-2.0 EPSF-2.0
	2	%%Title: text.eps
	3	%%Creator: XV Version 2.20 Rev: 4/24/92 - by John Bradley
	4	%%BoundingBox: 254 375 282 403
	5	%%Pages: 1
	6	%%DocumentFonts:
	7	%%EndComments
	8	%%EndProlog
	9
	10	%%Page: 1 1
	11
	12	% remember original state
	13	/origstate save def
	14
	15	% build a temporary dictionary
	16	20 dict begin
	17
	18	% lower left corner
	19	254 375 translate
	20
	21	% size of image (on paper, in 1/72inch coords)
	22	28 28 scale
	23
	24	% define 'colorimage' if it isn't defined
	25	% ('colortogray' and 'mergeprocs' come from xwd2ps
	26	% via xgrab)
	27	/colorimage where % do we know about 'colorimage'?
	28	{ pop } % yes: pop off the 'dict' returned
	29	{ % no: define one
	30	/colortogray { % define an RGB->I function
	31	/rgbdata exch store % call input 'rgbdata'
	32	rgbdata length 3 idiv
	33	/npixls exch store
	34	/rgbindx 0 store
	35	/grays npixls string store % str to hold the result
	36	0 1 npixls 1 sub {
	37	grays exch
	38	rgbdata rgbindx get 20 mul % Red
	39	rgbdata rgbindx 1 add get 32 mul % Green
	40	rgbdata rgbindx 2 add get 12 mul % Blue
	41	add add 64 idiv % I = .5G + .31R + .18B
	42	put
	43	/rgbindx rgbindx 3 add store
	44	} for
	45	grays
	46	} bind def
	47
	48	% Utility procedure for colorimage operator.
	49	% This procedure takes two procedures off the
	50	% stack and merges them into a single procedure.
	51
	52	/mergeprocs { % def
	53	dup length
	54	3 -1 roll
	55	dup
	56	length
	57	dup
	58	5 1 roll
	59	3 -1 roll
	60	add
	61	array cvx
	62	dup
	63	3 -1 roll
	64	0 exch
65	putinterval
66	dup
67	4 2 roll
68	putinterval
69	} bind def
70
71	/colorimage { % def
72	pop pop % remove 'false 3' operands
73	{colortogray} mergeprocs
74	image
75	} bind def
76	} ifelse % end of 'false' case
77
78
79
80	% define the colormap
81	/cmap 12 string def
82
83
84	% load up the colormap
85	currentfile cmap readhexstring
86	000000 c0c0c0 808080 ffffff
87	pop pop % lose return values from readhexstring
88
89
90	% rlecmapimage expects to have 'w h bits matrix' on stack
91	/rlecmapimage {
92	/buffer 1 string def
93	/rgbval 3 string def
94	/block 384 string def
95
96	% proc to read a block from file, and return RGB data
97	{ currentfile buffer readhexstring pop
98	/bcount exch 0 get store
99	bcount 128 ge
100	{ % it's a non-run block
101	0 1 bcount 128 sub
102	{ currentfile buffer readhexstring pop pop
103
104	% look up value in color map
105	/rgbval cmap buffer 0 get 3 mul 3 getinterval store
106
107	% and put it in position i*3 in block
108	block exch 3 mul rgbval putinterval
109	} for
110	block 0 bcount 127 sub 3 mul getinterval
111	}
112
113	{ % else it's a run block
114	currentfile buffer readhexstring pop pop
115
116	% look up value in colormap
117	/rgbval cmap buffer 0 get 3 mul 3 getinterval store
118
119	0 1 bcount { block exch 3 mul rgbval putinterval } for
120
121	block 0 bcount 1 add 3 mul getinterval
122	} ifelse
123	} % end of proc
124	false 3 colorimage
125	} bind def
126
127
128	28 28 8 % dimensions of data
129	[28 0 0 -28 0 28] % mapping matrix
130	rlecmapimage
131
132	81020018000002
133	8100031703810200
134	82000301150101020000
135	82000301150101020000
136	82000301150101020000
137	82000301150101020000
138	820003018101001200810102810200
139	8200030182010001100182000102810200
140	82000301820100010e01840001000102810200
141	8200030182010001060101000501840001000102810200
142	8200030182010001060101000501840001000102810200
143	8200030182010001060101000501840001000102810200
144	82000301820100018101000200010104000201840001000102810200
145	820003018301000100810001810100820001008100018101008100018501000100010281
146	0200
147	82000301820100010101030081010081000181010081000185010001000102810200
148	820003018201000181010082000100820001008100018101008100018501000100010281
149	0200
150	820003018301000100810001810100820001008100018101008100018501000100010281
151	0200
152	820003018301000100810001810100820001008100018101008100018501000100010281
153	0200
154	8200030182010001810100030081010003000201840001000102810200
155	82000301820100010e01840001000102810200
156	8200030182010001100182000102810200
157	820003018101001200810102810200
158	82000301150101020000
159	82000301150101020000
160	82000301150101020000
161	8200030217020000
162	81000218020000
163	81020018000002
164
165	%
166	% Compression made this file 22.15% of the uncompressed size.
167	%
168
169
170	showpage
171
172	% stop using temporary dictionary
173	end
174
175	% restore original state
176	origstate restore
177
178	%%Trailer