NAME
       SetOutlinePen -- Set the Outline Pen value for a  RastPort (V39).


   SYNOPSIS
       old_pen=SetOutlinePen  ( rp, pen )
	  d0	                 a0   d0

	 ULONG SetOutlinePen(struct  RastPort *, ULONG)

   FUNCTION
	Set the current value of the O pen for the rastport and turn on area outline
	mode. This function should be used instead of poking the structure directly,
	because future graphics devices may store it differently, for instance,
	using more bits.

   INPUTS
       rp  =  a pointer to a valid  RastPort structure.
	pen =  a longword pen number

	returns the previous outline pen
   BUGS

   NOTES

   SEE ALSO
	 GetOPen()  sc:include/graphics/gfxmacros.h