%!PS-Adobe-2.0
%%Pages: 0 1
%%BoundingBox: 0 0 612 792
%%EndComments
% bushno.ps: red "prohibit" circle over "BUSH"
/Black{0 0 0 1 setcmykcolor}def % text color
/Red{0 1 1 0 setcmykcolor}def % circle color
/White{0 0 0 0 setcmykcolor}def % background color
/thick 15 def   % thickness of circl
/inch { 72 mul } def % convert: inches to points

/outercircle { % outer boundary of main circle
  newpath % 360 degree circle: center, radius, degree range
  0 0 100 0 360 arc  closepath % 360 degree circle
  fill
} def

/innercircle { % inner boundary of main circle
  newpath
  0 0 100 thick sub 0 360 arc  closepath
  1 setgray
  fill
  0 setgray
} def

% diagonal rectangle -- sloppy, but doesn't matter
/s1 2 sqrt 92 2 div mul def
/s2 2 sqrt 85 2 div mul def
/inter 2 sqrt thick 2 div mul def
/rect {
  newpath
  s1 s1 inter sub moveto
  s2 s2 inter add lineto
  s1 neg s1 neg inter add lineto
  s2 neg s2 neg inter sub lineto
  closepath
  fill
} def

/bush { % print "BUSH" in the middle
  % special tall font: 50 is horizontal size, 120 is vertical
  /Helvetica-Bold findfont [50 0 0 120 0 0] makefont setfont
  0 0 moveto
  % center horizontally by using its width
  % height determined by hand
  (BUSH) stringwidth pop
  neg 2 div -43 rmoveto
  (BUSH) show
} def

/clip1 { % clipping path for lower left overlap
  newpath -15 20 moveto % sloppy rectangle, but doesn't matter
  -35 20 lineto
  -35 -50 lineto
  -15 -50 lineto
  closepath
} def

/clip2 { % clipping path for upper right overlap
  newpath 17 13 moveto % sloppy rectangle, but doesn't matter
  17 50 lineto
  35 50 lineto
  35 13 lineto
  closepath
} def

/everything { % do everything
  0 0 moveto
  Red   outercircle % filled red circle
  White innercircle % filled white circle inside
  Black bush % inner black "BUSH"
  Red   rect % red diagonal on top
  Black % clip and show to put pieces over diagonal
  gsave % one part of "BUSH" on top of diagonal
    clip1 clip
    bush % just small portion of "BUSH" printed
  grestore
  gsave % other part of "BUSH" on top of diagonal
    clip2 clip
    bush % just small portion of "BUSH" printed
  grestore
} def

% move picture from (0, 0) to page center
8.5 inch 2 div 11 inch 2 div translate
2 2 scale % make twice as large
everything
showpage