rom/intuition/drawborder.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5 */
   6
   7 #include <proto/graphics.h>
   8 #include <proto/layers.h>
   9 #include <graphics/rpattr.h>
  10 #include "intuition_intern.h"
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <graphics/rastport.h>
  16 #include <intuition/intuition.h>
  17 #include <proto/intuition.h>
  18
  19     AROS_LH4(void, DrawBorder,
  20
  21 /*  SYNOPSIS */
  22          AROS_LHA(struct RastPort *, rp, A0),
  23          AROS_LHA(struct Border   *, border, A1),
  24          AROS_LHA(LONG             , leftOffset, D0),
  25          AROS_LHA(LONG             , topOffset, D1),
  26
  27 /*  LOCATION */
  28          struct IntuitionBase *, IntuitionBase, 18, Intuition)
  29
  30 /*  FUNCTION
  31     Draws one or more borders in the specified RastPort. Rendering
  32     will start at the position which you get when you add the offsets
  33     leftOffset and topOffset to the LeftEdge and TopEdge specified
  34     in the Border structure. All coordinates are relative to that point.
  35
  36     INPUTS
  37     rp - The RastPort to render into
  38     border - Information what and how to render
  39     leftOffset, topOffset - Initial starting position
  40
  41     RESULT
  42     None.
  43
  44     NOTES
  45
  46     EXAMPLE
  47     // Draw a house with one stroke
  48     // The drawing starts at the lower left edge
  49     WORD XY[] =
  50     {
  51         10, -10,
  52         10,   0,
  53          0, -10,
  54         10, -10,
  55          5, -15,
  56          0, -10,
  57          0,   0,
  58         10,   0,
  59     };
  60     struct Border demo =
  61     {
  62         100, 100,   // Position
  63         1, 2,   // Pens
  64         JAM1,   // Drawmode
  65         8,      // Number of pairs in XY
  66         XY,     // Vector offsets
  67         NULL    // No next border
  68     };
  69
  70     // Render the house with the bottom left edge at 150, 50
  71     DrawBorder (rp, &demo, 50, -50);
  72
  73     BUGS
  74
  75     SEE ALSO
  76
  77     INTERNALS
  78
  79     HISTORY
  80     29-10-95    digulla automatically created from
  81                 intuition_lib.fd and clib/intuition_protos.h
  82
  83 *****************************************************************************/
  84 {
  85     AROS_LIBFUNC_INIT
  86
  87     IPTR   apen;
  88     IPTR   bpen;
  89     IPTR   drmd;
  90 #ifdef __MORPHOS__
  91     IPTR   penmode;
  92 #endif
  93     WORD  *ptr;
  94     WORD   x, y;
  95     WORD   xoff, yoff;
  96     int    t;
  97
  98     EXTENDWORD(leftOffset);EXTENDWORD(topOffset);
  99
 100     DEBUG_DRAWBORDER(dprintf("DrawBorder: rp %p border %p Left %ld Top %ld\n",
 101                              rp, border, leftOffset, topOffset));
 102
 103     SANITY_CHECK(rp)
 104     SANITY_CHECK(border)
 105
 106     if (rp->Layer) LockLayer(0,rp->Layer);
 107
 108     /* Store important variables of the RastPort */
 109 #ifdef __MORPHOS__
 110     GetRPAttrs(rp,RPTAG_PenMode,(ULONG)&penmode,RPTAG_APen,(ULONG)&apen,
 111                RPTAG_BPen,(ULONG)&bpen,RPTAG_DrMd,(ULONG)&drmd,TAG_DONE);
 112 #else
 113     GetRPAttrs(rp,RPTAG_APen,(ULONG)&apen,
 114                RPTAG_BPen,(ULONG)&bpen,RPTAG_DrMd,(ULONG)&drmd,TAG_DONE);
 115 #endif
 116
 117     /* For all borders... */
 118     for ( ; border; border = border->NextBorder)
 119     {
 120         /* Change RastPort to the colors/mode specified */
 121         SetAPen (rp, border->FrontPen);
 122         SetBPen (rp, border->BackPen);
 123         SetDrMd (rp, border->DrawMode);
 124
 125         /* Get base coords */
 126
 127         x = border->LeftEdge + leftOffset;
 128         y = border->TopEdge + topOffset;
 129
 130         /* Start of vector offsets */
 131         ptr = border->XY;
 132
 133         for (t = 0; t < border->Count; t++)
 134         {
 135             /* Add vector offset to current position */
 136             xoff = *ptr ++;
 137             yoff = *ptr ++;
 138
 139             if (t == 0)
 140             {
 141                 Move (rp, x + xoff, y + yoff);
 142             }
 143             else
 144             {
 145                 /* Stroke */
 146                 Draw (rp, x + xoff, y + yoff);
 147             }
 148         }
 149
 150     } /* for ( ; border; border = border->NextBorder) */
 151
 152     /* Restore RastPort */
 153 #ifdef __MORPHOS__
 154     SetRPAttrs(rp,RPTAG_APen,apen,RPTAG_BPen,bpen,RPTAG_DrMd,drmd,RPTAG_PenMode,penmode,TAG_DONE);
 155 #else
 156     SetRPAttrs(rp,RPTAG_APen,apen,RPTAG_BPen,bpen,RPTAG_DrMd,drmd,TAG_DONE);
 157 #endif
 158
 159     if (rp->Layer) UnlockLayer(rp->Layer);
 160
 161     AROS_LIBFUNC_EXIT
 162 } /* DrawBorder */