git.saurik.com Git - wxWidgets.git/blame_incremental

... / ...

Commit	Line	Data
	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