]> git.saurik.com Git - wxWidgets.git/blob - utils/dialoged/docs/mtext.eps
This is how wxPlotWindow would look like with the
[wxWidgets.git] / utils / dialoged / docs / mtext.eps
1 %!PS-Adobe-2.0 EPSF-2.0
2 %%Title: mtext.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 820003018201000105018100010601010382000102810200
140 82000301820100010101010001018100010601010382000102810200
141 8200030182010001020181000181010002000401010282000102810200
142 820003018201000181010001000101810001820100010301010282000102810200
143 820003018201000184010001000182010001820100010301010282000102810200
144 8200030182010001810100010081010003000401010282000102810200
145 82000301820100010e01010282000102810200
146 820003018201000108018100010301010282000102810200
147 820003018201000108018100010301010282000102810200
148 82000301820100018101000100010103000401010282000102810200
149 8200030182010001820100010201810001820100010301010282000102810200
150 8200030182010001820100010201810001820100010301010282000102810200
151 82000301820100018101000100010104000301010382000102810200
152 82000301820100010e01010382000102810200
153 820003018101001200810102810200
154 82000301150101020000
155 82000301150101020000
156 82000301150101020000
157 8200030217020000
158 81000218020000
159 81020018000002
160
161 %
162 % Compression made this file 22.07% of the uncompressed size.
163 %
164
165
166 showpage
167
168 % stop using temporary dictionary
169 end
170
171 % restore original state
172 origstate restore
173
174 %%Trailer