837
%!PS-Adobe-2.0 EPSF-1.2
%%BoundingBox: 0 0 64 146
%%Creator: Paul Koning
%%Title: DARC diamond logo
%%CreationDate: 89.08.08
%%EndComments
%
% The DARC "diamond" logo
%
% The code below defines a PostScript function "diamond" which, when
% invoked, paints the DARC diamond at the current x/y.  The resulting
% image is 146 points high, in other words a hair over 2 inches.
%
%	paul koning, 89.01.09
%                    89.01.10 - fixed a few angles
%		     89.08.08 - modified from ARRL to DARC logo
%		     89.09.20 - converted to EPSF file
%

/darc-diamond
{ gsave currentpoint translate
  0 setlinejoin 2 setlinewidth newpath
  1 73 moveto 32 2.5 lineto 63 73 lineto 32 143.5 lineto
  closepath stroke				% border for diamond
  2 setlinewidth 
  4.5 73 moveto 32 10 lineto 59.5 73 lineto
  32 136 lineto closepath fill			% diamond body
  1 setgray
  29 108 moveto 29 123 lineto 32.5 123 lineto 32.5 119.5 3.5 90 0 arcn
  36 111.5 lineto 32.5 111.5 3.5 0 -90 arcn
  closepath stroke				% letter D
  gsave 0 67 moveto 64 67 lineto 64 90 lineto 0 90 lineto clip newpath
  1 setlinejoin
  8 60 moveto 17 81 lineto 26 60 lineto
  13 71 moveto 21 71 lineto stroke 		% letter A
  0 setlinejoin
  44 67 moveto 44 82 lineto 48.5 82 lineto 48.5 78.5 3.5 90 -90 arcn
  44 75 lineto 48 75 moveto 54 59 lineto stroke	% right letter R
  grestore
  35.5 27.5 moveto 32 27.5 3.5 0.5 -180 arcn 28.5 35.5 lineto
  32 35.5 3.5 180 0 arcn stroke		% letter C
  1.5 setlinewidth
  31 43 moveto 33 43 lineto
  29.375 45.75 moveto 34.625 45.75 lineto
  27.75 48.5 moveto 36.25 48.5 lineto
  26.125 51.25 moveto 37.875 51.25 lineto
  24.5 54 moveto 39.5 54 lineto			% ground symbol
  32 54 moveto 32 62 lineto
  25 62 25 70 33 70 curveto 39 70 39 66 33 66 curveto
  25 66 25 78 33 78 curveto 39 78 39 74 33 74 curveto
  25 74 25 86 33 86 curveto 39 86 39 82 33 82 curveto
  25 82 25 90 32 90 curveto			% coil
  32 102 lineto 25 97 moveto 32 102 lineto
  39 97 lineto stroke				% antenna
  grestore
} def

% display the diamond
0 0 moveto darc-diamond showpage

.

0