%!IBM Personal Pageprinter (4216) Adapter Program V1.0 %%DocumentFonts: Times-Roman %%Creator: Axiom %%CreationDate: today %%Pages: 1 %%processing (hard) limit: 250 pts or 500 values for the operand stack. %%EndComments %------------------------------- prologue -------------------------------% %-------------------------- support procedures --------------------------% %--------- first create user dictionary with 100 entries max ------------% % (number can be changed to accomodate definitions) % 100 dict begin %% using 100 entries in top level dictionary /FontHeight 12 def /inch { 72 mul } def % yVal and hVal are necessary because the Xwindow display origin % is at the upper left corner, while the postscript display % origin is at the lower left hand corner. /yVal %% get Y value -- make upper left corner origin { maxY sub abs } %% maxY is viewWindow height def /hVal %% get H value -- used for displaying title text { maxH sub abs } %% maxH is viewWindow height+titleWindow height def % loads in the font /loadFont { /Times-Roman findfont FontHeight scalefont setfont } def % draws a rectangle with input operand: % height % width % notice that this function does not "draw" or ink the rectangle. /drawRect { 1 index 1 add 0 rlineto %% draw first side 0 exch 1 add neg rlineto %% draw second side 1 add neg 0 rlineto %% draw third side closepath } %% draw fourth side def % create a rectangle with input operand in the view window: % y % x % height % width % notice that this function does not "draw" or ink the rectangle. /rectangle { yVal moveto %% set currentpoint for line drawRect } %% draws the rectangle def % These are global variables that every draw procedure uses % THe operand should be as follows: % viewWindow width % viewWindow height % title height /setDim { /maxX exch def %% width of display /maxY exch def %% height of display /titleH exch def %% height of title /maxH maxY titleH add def %% height of display + title } def %-------------------------- major procedures --------------------------% /title %% draws a rectangle around the title of picture { gsave newpath moveto %% lower left of title titleH 1 add 0 exch rlineto %% draw first side 1 add 0 rlineto %% draw second side 1 add neg 0 exch rlineto begin installGC stroke end %% draw third side grestore } def /drawFrame %% draw display frame { gsave newpath maxX maxY 0 0 rectangle begin installGC stroke end grestore } def % updates the foreground color of existing graphics-context dictionary: % foreground color % dictionary name /setForeground { /FGcolor exch put } def % updates the background color of existing graphics-context dictionary: % background color % dictionary name /setBackground { /BGcolor exch put } def % updates the line width, line style, cap style, join style of % existing graphics-context dictionary: % dictionary name % join style % cap style % line width /setLineAttributes { begin /JoinStyle exch def /CapStyle exch def /LineWidth exch def end } def % creates a graphics context dictionary with the following information: % /dictionary name % foreground color % background color % line width % cap style % join style % this creates different graphical contexts for different drawing functions. /makeDict { 5 dict 2 copy def begin pop %% with dict name on top of stack /FGcolor exch def %% define drawing attributes /BGcolor exch def %% not heavily used /LineWidth exch def /CapStyle exch def /JoinStyle exch def end } def % makes the current dictionary attributes effective % this function takes the values in the current dictionary to set the context % these are the values currently being used: foreground, cap, join, and width /installGC { FGcolor currentgray ne {FGcolor setgray} if %% foreground color CapStyle currentlinecap ne {CapStyle setlinecap} if %% cap style JoinStyle currentlinejoin ne {JoinStyle setlinejoin} if %% join style LineWidth currentlinewidth ne {LineWidth setlinewidth} if } %% line width def % operand stack configuration in order to use psDrawLine: % psDrawLine % y0 % x0 % y1 % x1 % graphics-context dictionary % this draws a line from (x0, y0) to (x1, y1). /psDrawLine { gsave newpath yVal moveto yVal lineto begin installGC stroke end grestore } def % operand stack configuration in order to use psDrawIStr: % psDrawIStr % window type: title or window % string % y % x % graphics-context dictionary % it draws a text string in foreground color on top of bounding box of % string, which is in background color. /psDrawIStr { gsave newpath %% for rectangle loadFont /window exch def %% get window type %% draw bounding box with background color /str exch def %% get text string str stringwidth pop 1 sub %% width FontHeight 1 sub %% height currentfont begin %% get font height FontBBox end /ypos exch def pop %% define ypos neg ypos add /offset exch def pop /offset ypos offset div FontHeight mul def %% define offset /h exch def /w exch def %% define h /y0 exch def %% define y0 /x0 exch def %% define x0 w h x0 y0 offset sub window (title) eq {hVal moveto drawRect} %% draws in title window {rectangle} ifelse %% draws in view window begin BGcolor setgray fill %% set background box color x0 y0 window (title) eq {hVal} %% print title text {yVal} ifelse %% print window text moveto str FGcolor setgray show %% set text color end grestore } def % operand stack configuration in order to use psFillArc: % psFillArc % y center of rectangle % x center of rectangle % angle2 % angle1 % width % height % y % x % graphics-context dictionary % this draws and fills an arc whose origin is at x, y, and whose width % and height specifies the rectangle which encases the arc. % Origin is at upper left corner of rectangle. % This function uses "scale" to make cricles and ellipses. /psFillArc { gsave newpath yVal moveto /sfactor 4 index 4 index div def 1 sfactor scale 6 5 roll %% x on top of stack 3 index 2 div add %% define x origin 6 5 roll %% y on top of stack 6 5 roll %% h on top of stack 2 div add yVal sfactor div %% define y origin 5 4 roll %% w on top of stack 2 div %% define radius 5 3 roll %% a1 a2 now on top 1 index add arcn %% draw clockwise arc begin installGC fill end %% fills with foreground color grestore } def %-------------------------- script --------------------------% % 1 inch 1 inch translate mark %% mark bottom of our stack 0 0 1 1072693248 0 /globalGC1 makeDict 0 0 1 1072693248 0 /globalGC2 makeDict 0 0 1 1072693248 0 /trashGC makeDict 0 0 1 1072693248 0 /globGC makeDict 0 0 1 1072693248 0 /anotherGC makeDict 0 0 1 1072693248 0 /graphGC makeDict 0 0 1 1072693248 0 /unitGC makeDict gsave % save graphics state for clipping path 24 259 256 setDim maxX maxY 0 0 rectangle clip % set clip path globalGC1 256 129 0 129 psDrawLine globalGC1 128 259 128 0 psDrawLine unitGC 128 131 128 127 psDrawLine unitGC 116 144 (0.00) (window) psDrawIStr unitGC 178 131 178 127 psDrawLine unitGC 166 144 (4.00) (window) psDrawIStr unitGC 228 131 228 127 psDrawLine unitGC 216 144 (8.00) (window) psDrawIStr unitGC 76 131 76 127 psDrawLine unitGC 61 144 (-4.00) (window) psDrawIStr unitGC 24 131 24 127 psDrawLine unitGC 9 144 (-8.00) (window) psDrawIStr unitGC 130 99 126 99 psDrawLine unitGC 92 104 (2.00) (window) psDrawIStr unitGC 130 69 126 69 psDrawLine unitGC 92 74 (4.00) (window) psDrawIStr unitGC 130 39 126 39 psDrawLine unitGC 92 44 (6.00) (window) psDrawIStr unitGC 130 9 126 9 psDrawLine unitGC 92 14 (8.00) (window) psDrawIStr unitGC 130 157 126 157 psDrawLine unitGC 83 162 (-2.00) (window) psDrawIStr unitGC 130 185 126 185 psDrawLine unitGC 83 190 (-4.00) (window) psDrawIStr unitGC 130 213 126 213 psDrawLine unitGC 83 218 (-6.00) (window) psDrawIStr unitGC 130 241 126 241 psDrawLine unitGC 83 246 (-8.00) (window) psDrawIStr globalGC1 127 128 3 3 0 360 128 129 psFillArc globalGC1 128 129 128 129 psDrawLine globalGC1 127 128 3 3 0 360 128 129 psFillArc globalGC1 105 99 128 129 psDrawLine globalGC1 104 98 3 3 0 360 105 99 psFillArc globalGC1 83 71 105 99 psDrawLine globalGC1 82 70 3 3 0 360 83 71 psFillArc globalGC1 63 48 83 71 psDrawLine globalGC1 62 47 3 3 0 360 63 48 psFillArc globalGC1 46 29 63 48 psDrawLine globalGC1 45 28 3 3 0 360 46 29 psFillArc globalGC1 38 23 46 29 psDrawLine globalGC1 37 22 3 3 0 360 38 23 psFillArc globalGC1 32 18 38 23 psDrawLine globalGC1 31 17 3 3 0 360 32 18 psFillArc globalGC1 29 16 32 18 psDrawLine globalGC1 28 15 3 3 0 360 29 16 psFillArc globalGC1 26 15 29 16 psDrawLine globalGC1 25 14 3 3 0 360 26 15 psFillArc globalGC1 23 14 26 15 psDrawLine globalGC1 22 13 3 3 0 360 23 14 psFillArc globalGC1 21 14 23 14 psDrawLine globalGC1 20 13 3 3 0 360 21 14 psFillArc globalGC1 20 14 21 14 psDrawLine globalGC1 19 13 3 3 0 360 20 14 psFillArc globalGC1 19 14 20 14 psDrawLine globalGC1 18 13 3 3 0 360 19 14 psFillArc globalGC1 18 14 19 14 psDrawLine globalGC1 17 13 3 3 0 360 18 14 psFillArc globalGC1 17 15 18 14 psDrawLine globalGC1 16 14 3 3 0 360 17 15 psFillArc globalGC1 16 15 17 15 psDrawLine globalGC1 15 14 3 3 0 360 16 15 psFillArc globalGC1 16 16 16 15 psDrawLine globalGC1 15 15 3 3 0 360 16 16 psFillArc globalGC1 15 17 16 16 psDrawLine globalGC1 14 16 3 3 0 360 15 17 psFillArc globalGC1 15 18 15 17 psDrawLine globalGC1 14 17 3 3 0 360 15 18 psFillArc globalGC1 13 23 15 18 psDrawLine globalGC1 12 22 3 3 0 360 13 23 psFillArc globalGC1 12 29 13 23 psDrawLine globalGC1 11 28 3 3 0 360 12 29 psFillArc globalGC1 15 48 12 29 psDrawLine globalGC1 14 47 3 3 0 360 15 48 psFillArc globalGC1 21 71 15 48 psDrawLine globalGC1 20 70 3 3 0 360 21 71 psFillArc globalGC1 32 99 21 71 psDrawLine globalGC1 31 98 3 3 0 360 32 99 psFillArc globalGC1 46 129 32 99 psDrawLine globalGC1 45 128 3 3 0 360 46 129 psFillArc globalGC1 63 159 46 129 psDrawLine globalGC1 62 158 3 3 0 360 63 159 psFillArc globalGC1 83 187 63 159 psDrawLine globalGC1 82 186 3 3 0 360 83 187 psFillArc globalGC1 105 210 83 187 psDrawLine globalGC1 104 209 3 3 0 360 105 210 psFillArc globalGC1 128 229 105 210 psDrawLine globalGC1 127 228 3 3 0 360 128 229 psFillArc globalGC1 139 235 128 229 psDrawLine globalGC1 138 234 3 3 0 360 139 235 psFillArc globalGC1 150 240 139 235 psDrawLine globalGC1 149 239 3 3 0 360 150 240 psFillArc globalGC1 161 243 150 240 psDrawLine globalGC1 160 242 3 3 0 360 161 243 psFillArc globalGC1 172 244 161 243 psDrawLine globalGC1 171 243 3 3 0 360 172 244 psFillArc globalGC1 182 243 172 244 psDrawLine globalGC1 181 242 3 3 0 360 182 243 psFillArc globalGC1 192 240 182 243 psDrawLine globalGC1 191 239 3 3 0 360 192 240 psFillArc globalGC1 201 235 192 240 psDrawLine globalGC1 200 234 3 3 0 360 201 235 psFillArc globalGC1 209 229 201 235 psDrawLine globalGC1 208 228 3 3 0 360 209 229 psFillArc globalGC1 223 210 209 229 psDrawLine globalGC1 222 209 3 3 0 360 223 210 psFillArc globalGC1 234 187 223 210 psDrawLine globalGC1 233 186 3 3 0 360 234 187 psFillArc globalGC1 240 159 234 187 psDrawLine globalGC1 239 158 3 3 0 360 240 159 psFillArc globalGC1 243 129 240 159 psDrawLine globalGC1 242 128 3 3 0 360 243 129 psFillArc globalGC1 240 99 243 129 psDrawLine globalGC1 239 98 3 3 0 360 240 99 psFillArc globalGC1 234 71 240 99 psDrawLine globalGC1 233 70 3 3 0 360 234 71 psFillArc globalGC1 223 48 234 71 psDrawLine globalGC1 222 47 3 3 0 360 223 48 psFillArc globalGC1 217 38 223 48 psDrawLine globalGC1 216 37 3 3 0 360 217 38 psFillArc globalGC1 209 29 217 38 psDrawLine globalGC1 208 28 3 3 0 360 209 29 psFillArc globalGC1 201 23 209 29 psDrawLine globalGC1 200 22 3 3 0 360 201 23 psFillArc globalGC1 192 18 201 23 psDrawLine globalGC1 191 17 3 3 0 360 192 18 psFillArc globalGC1 182 15 192 18 psDrawLine globalGC1 181 14 3 3 0 360 182 15 psFillArc globalGC1 172 14 182 15 psDrawLine globalGC1 171 13 3 3 0 360 172 14 psFillArc globalGC1 161 15 172 14 psDrawLine globalGC1 160 14 3 3 0 360 161 15 psFillArc globalGC1 150 18 161 15 psDrawLine globalGC1 149 17 3 3 0 360 150 18 psFillArc globalGC1 128 29 150 18 psDrawLine globalGC1 127 28 3 3 0 360 128 29 psFillArc globalGC1 105 48 128 29 psDrawLine globalGC1 104 47 3 3 0 360 105 48 psFillArc globalGC1 83 71 105 48 psDrawLine globalGC1 82 70 3 3 0 360 83 71 psFillArc globalGC1 63 99 83 71 psDrawLine globalGC1 62 98 3 3 0 360 63 99 psFillArc globalGC1 46 129 63 99 psDrawLine globalGC1 45 128 3 3 0 360 46 129 psFillArc globalGC1 32 159 46 129 psDrawLine globalGC1 31 158 3 3 0 360 32 159 psFillArc globalGC1 21 187 32 159 psDrawLine globalGC1 20 186 3 3 0 360 21 187 psFillArc globalGC1 15 210 21 187 psDrawLine globalGC1 14 209 3 3 0 360 15 210 psFillArc globalGC1 13 220 15 210 psDrawLine globalGC1 12 219 3 3 0 360 13 220 psFillArc globalGC1 12 229 13 220 psDrawLine globalGC1 11 228 3 3 0 360 12 229 psFillArc globalGC1 13 235 12 229 psDrawLine globalGC1 12 234 3 3 0 360 13 235 psFillArc globalGC1 14 238 13 235 psDrawLine globalGC1 13 237 3 3 0 360 14 238 psFillArc globalGC1 15 240 14 238 psDrawLine globalGC1 14 239 3 3 0 360 15 240 psFillArc globalGC1 15 241 15 240 psDrawLine globalGC1 14 240 3 3 0 360 15 241 psFillArc globalGC1 16 242 15 241 psDrawLine globalGC1 15 241 3 3 0 360 16 242 psFillArc globalGC1 16 243 16 242 psDrawLine globalGC1 15 242 3 3 0 360 16 243 psFillArc globalGC1 17 243 16 243 psDrawLine globalGC1 16 242 3 3 0 360 17 243 psFillArc globalGC1 18 244 17 243 psDrawLine globalGC1 17 243 3 3 0 360 18 244 psFillArc globalGC1 19 244 18 244 psDrawLine globalGC1 18 243 3 3 0 360 19 244 psFillArc globalGC1 20 244 19 244 psDrawLine globalGC1 19 243 3 3 0 360 20 244 psFillArc globalGC1 21 244 20 244 psDrawLine globalGC1 20 243 3 3 0 360 21 244 psFillArc globalGC1 23 244 21 244 psDrawLine globalGC1 22 243 3 3 0 360 23 244 psFillArc globalGC1 26 243 23 244 psDrawLine globalGC1 25 242 3 3 0 360 26 243 psFillArc globalGC1 32 240 26 243 psDrawLine globalGC1 31 239 3 3 0 360 32 240 psFillArc globalGC1 46 229 32 240 psDrawLine globalGC1 45 228 3 3 0 360 46 229 psFillArc globalGC1 63 210 46 229 psDrawLine globalGC1 62 209 3 3 0 360 63 210 psFillArc globalGC1 83 187 63 210 psDrawLine globalGC1 82 186 3 3 0 360 83 187 psFillArc globalGC1 105 159 83 187 psDrawLine globalGC1 104 158 3 3 0 360 105 159 psFillArc globalGC1 128 129 105 159 psDrawLine globalGC1 127 128 3 3 0 360 128 129 psFillArc globalGC1 150 99 128 129 psDrawLine globalGC1 149 98 3 3 0 360 150 99 psFillArc globalGC1 172 71 150 99 psDrawLine globalGC1 171 70 3 3 0 360 172 71 psFillArc globalGC1 192 48 172 71 psDrawLine globalGC1 191 47 3 3 0 360 192 48 psFillArc globalGC1 209 29 192 48 psDrawLine globalGC1 208 28 3 3 0 360 209 29 psFillArc globalGC1 217 23 209 29 psDrawLine globalGC1 216 22 3 3 0 360 217 23 psFillArc globalGC1 223 18 217 23 psDrawLine globalGC1 222 17 3 3 0 360 223 18 psFillArc globalGC1 226 16 223 18 psDrawLine globalGC1 225 15 3 3 0 360 226 16 psFillArc globalGC1 229 15 226 16 psDrawLine globalGC1 228 14 3 3 0 360 229 15 psFillArc globalGC1 232 14 229 15 psDrawLine globalGC1 231 13 3 3 0 360 232 14 psFillArc globalGC1 234 14 232 14 psDrawLine globalGC1 233 13 3 3 0 360 234 14 psFillArc globalGC1 235 14 234 14 psDrawLine globalGC1 234 13 3 3 0 360 235 14 psFillArc globalGC1 236 14 235 14 psDrawLine globalGC1 235 13 3 3 0 360 236 14 psFillArc globalGC1 237 14 236 14 psDrawLine globalGC1 236 13 3 3 0 360 237 14 psFillArc globalGC1 238 15 237 14 psDrawLine globalGC1 237 14 3 3 0 360 238 15 psFillArc globalGC1 239 15 238 15 psDrawLine globalGC1 238 14 3 3 0 360 239 15 psFillArc globalGC1 239 16 239 15 psDrawLine globalGC1 238 15 3 3 0 360 239 16 psFillArc globalGC1 240 17 239 16 psDrawLine globalGC1 239 16 3 3 0 360 240 17 psFillArc globalGC1 240 18 240 17 psDrawLine globalGC1 239 17 3 3 0 360 240 18 psFillArc globalGC1 242 23 240 18 psDrawLine globalGC1 241 22 3 3 0 360 242 23 psFillArc globalGC1 243 29 242 23 psDrawLine globalGC1 242 28 3 3 0 360 243 29 psFillArc globalGC1 240 48 243 29 psDrawLine globalGC1 239 47 3 3 0 360 240 48 psFillArc globalGC1 234 71 240 48 psDrawLine globalGC1 233 70 3 3 0 360 234 71 psFillArc globalGC1 223 99 234 71 psDrawLine globalGC1 222 98 3 3 0 360 223 99 psFillArc globalGC1 209 129 223 99 psDrawLine globalGC1 208 128 3 3 0 360 209 129 psFillArc globalGC1 192 159 209 129 psDrawLine globalGC1 191 158 3 3 0 360 192 159 psFillArc globalGC1 172 187 192 159 psDrawLine globalGC1 171 186 3 3 0 360 172 187 psFillArc globalGC1 150 210 172 187 psDrawLine globalGC1 149 209 3 3 0 360 150 210 psFillArc globalGC1 128 229 150 210 psDrawLine globalGC1 127 228 3 3 0 360 128 229 psFillArc globalGC1 116 235 128 229 psDrawLine globalGC1 115 234 3 3 0 360 116 235 psFillArc globalGC1 105 240 116 235 psDrawLine globalGC1 104 239 3 3 0 360 105 240 psFillArc globalGC1 94 243 105 240 psDrawLine globalGC1 93 242 3 3 0 360 94 243 psFillArc globalGC1 83 244 94 243 psDrawLine globalGC1 82 243 3 3 0 360 83 244 psFillArc globalGC1 73 243 83 244 psDrawLine globalGC1 72 242 3 3 0 360 73 243 psFillArc globalGC1 63 240 73 243 psDrawLine globalGC1 62 239 3 3 0 360 63 240 psFillArc globalGC1 54 235 63 240 psDrawLine globalGC1 53 234 3 3 0 360 54 235 psFillArc globalGC1 46 229 54 235 psDrawLine globalGC1 45 228 3 3 0 360 46 229 psFillArc globalGC1 32 210 46 229 psDrawLine globalGC1 31 209 3 3 0 360 32 210 psFillArc globalGC1 21 187 32 210 psDrawLine globalGC1 20 186 3 3 0 360 21 187 psFillArc globalGC1 15 159 21 187 psDrawLine globalGC1 14 158 3 3 0 360 15 159 psFillArc globalGC1 12 129 15 159 psDrawLine globalGC1 11 128 3 3 0 360 12 129 psFillArc globalGC1 15 99 12 129 psDrawLine globalGC1 14 98 3 3 0 360 15 99 psFillArc globalGC1 21 71 15 99 psDrawLine globalGC1 20 70 3 3 0 360 21 71 psFillArc globalGC1 32 48 21 71 psDrawLine globalGC1 31 47 3 3 0 360 32 48 psFillArc globalGC1 38 38 32 48 psDrawLine globalGC1 37 37 3 3 0 360 38 38 psFillArc globalGC1 46 29 38 38 psDrawLine globalGC1 45 28 3 3 0 360 46 29 psFillArc globalGC1 54 23 46 29 psDrawLine globalGC1 53 22 3 3 0 360 54 23 psFillArc globalGC1 63 18 54 23 psDrawLine globalGC1 62 17 3 3 0 360 63 18 psFillArc globalGC1 73 15 63 18 psDrawLine globalGC1 72 14 3 3 0 360 73 15 psFillArc globalGC1 83 14 73 15 psDrawLine globalGC1 82 13 3 3 0 360 83 14 psFillArc globalGC1 94 15 83 14 psDrawLine globalGC1 93 14 3 3 0 360 94 15 psFillArc globalGC1 105 18 94 15 psDrawLine globalGC1 104 17 3 3 0 360 105 18 psFillArc globalGC1 128 29 105 18 psDrawLine globalGC1 127 28 3 3 0 360 128 29 psFillArc globalGC1 150 48 128 29 psDrawLine globalGC1 149 47 3 3 0 360 150 48 psFillArc globalGC1 172 71 150 48 psDrawLine globalGC1 171 70 3 3 0 360 172 71 psFillArc globalGC1 192 99 172 71 psDrawLine globalGC1 191 98 3 3 0 360 192 99 psFillArc globalGC1 209 129 192 99 psDrawLine globalGC1 208 128 3 3 0 360 209 129 psFillArc globalGC1 223 159 209 129 psDrawLine globalGC1 222 158 3 3 0 360 223 159 psFillArc globalGC1 234 187 223 159 psDrawLine globalGC1 233 186 3 3 0 360 234 187 psFillArc globalGC1 240 210 234 187 psDrawLine globalGC1 239 209 3 3 0 360 240 210 psFillArc globalGC1 242 220 240 210 psDrawLine globalGC1 241 219 3 3 0 360 242 220 psFillArc globalGC1 243 229 242 220 psDrawLine globalGC1 242 228 3 3 0 360 243 229 psFillArc globalGC1 242 235 243 229 psDrawLine globalGC1 241 234 3 3 0 360 242 235 psFillArc globalGC1 241 238 242 235 psDrawLine globalGC1 240 237 3 3 0 360 241 238 psFillArc globalGC1 240 240 241 238 psDrawLine globalGC1 239 239 3 3 0 360 240 240 psFillArc globalGC1 240 241 240 240 psDrawLine globalGC1 239 240 3 3 0 360 240 241 psFillArc globalGC1 239 242 240 241 psDrawLine globalGC1 238 241 3 3 0 360 239 242 psFillArc globalGC1 239 243 239 242 psDrawLine globalGC1 238 242 3 3 0 360 239 243 psFillArc globalGC1 238 243 239 243 psDrawLine globalGC1 237 242 3 3 0 360 238 243 psFillArc globalGC1 237 244 238 243 psDrawLine globalGC1 236 243 3 3 0 360 237 244 psFillArc globalGC1 236 244 237 244 psDrawLine globalGC1 235 243 3 3 0 360 236 244 psFillArc globalGC1 235 244 236 244 psDrawLine globalGC1 234 243 3 3 0 360 235 244 psFillArc globalGC1 234 244 235 244 psDrawLine globalGC1 233 243 3 3 0 360 234 244 psFillArc globalGC1 232 244 234 244 psDrawLine globalGC1 231 243 3 3 0 360 232 244 psFillArc globalGC1 229 243 232 244 psDrawLine globalGC1 228 242 3 3 0 360 229 243 psFillArc globalGC1 223 240 229 243 psDrawLine globalGC1 222 239 3 3 0 360 223 240 psFillArc globalGC1 209 229 223 240 psDrawLine globalGC1 208 228 3 3 0 360 209 229 psFillArc globalGC1 192 210 209 229 psDrawLine globalGC1 191 209 3 3 0 360 192 210 psFillArc globalGC1 172 187 192 210 psDrawLine globalGC1 171 186 3 3 0 360 172 187 psFillArc globalGC1 150 159 172 187 psDrawLine globalGC1 149 158 3 3 0 360 150 159 psFillArc globalGC1 128 129 150 159 psDrawLine globalGC1 127 128 3 3 0 360 128 129 psFillArc grestore % restore graphics state cleartomark %% clearing operand stack end %% pops mainDict from dictionary stack showpage %-------------------------- end --------------------------%