rom/intuition/drawborder.c

   1 /*
   2     Copyright © 1995-2013, 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 *****************************************************************************/
  80 {
  81     AROS_LIBFUNC_INIT
  82
  83     struct GfxBase *GfxBase = GetPrivIBase(IntuitionBase)->GfxBase;
  84     struct LayersBase *LayersBase = GetPrivIBase(IntuitionBase)->LayersBase;
  85     IPTR   apen;
  86     IPTR   bpen;
  87     IPTR   drmd;
  88 #ifdef __MORPHOS__
  89     IPTR   penmode;
  90 #endif
  91     WORD  *ptr;
  92     WORD   x, y;
  93     WORD   xoff, yoff;
  94     int    t;
  95
  96     EXTENDWORD(leftOffset);EXTENDWORD(topOffset);
  97
  98     DEBUG_DRAWBORDER(dprintf("DrawBorder: rp %p border %p Left %ld Top %ld\n",
  99                              rp, border, leftOffset, topOffset));
 100
 101     SANITY_CHECK(rp)
 102     SANITY_CHECK(border)
 103
 104     if (rp->Layer) LockLayer(0,rp->Layer);
 105
 106     /* Store important variables of the RastPort */
 107 #ifdef __MORPHOS__
 108     GetRPAttrs(rp, RPTAG_PenMode, &penmode, RPTAG_APen, &apen,
 109                RPTAG_BPen, &bpen, RPTAG_DrMd, &drmd, TAG_DONE);
 110 #else
 111     GetRPAttrs(rp, RPTAG_APen, &apen,
 112                RPTAG_BPen, &bpen, RPTAG_DrMd, &drmd, TAG_DONE);
 113 #endif
 114
 115     /* For all borders... */
 116     for ( ; border; border = border->NextBorder)
 117     {
 118         /* Change RastPort to the colors/mode specified */
 119         SetAPen (rp, border->FrontPen);
 120         SetBPen (rp, border->BackPen);
 121         SetDrMd (rp, border->DrawMode);
 122
 123         /* Get base coords */
 124
 125         x = border->LeftEdge + leftOffset;
 126         y = border->TopEdge + topOffset;
 127
 128         /* Start of vector offsets */
 129         ptr = border->XY;
 130
 131         for (t = 0; t < border->Count; t++)
 132         {
 133             /* Add vector offset to current position */
 134             xoff = *ptr ++;
 135             yoff = *ptr ++;
 136
 137             if (t == 0)
 138             {
 139                 Move (rp, x + xoff, y + yoff);
 140             }
 141             else
 142             {
 143                 /* Stroke */
 144                 Draw (rp, x + xoff, y + yoff);
 145             }
 146         }
 147
 148     } /* for ( ; border; border = border->NextBorder) */
 149
 150     /* Restore RastPort */
 151 #ifdef __MORPHOS__
 152     SetRPAttrs(rp,RPTAG_APen,apen,RPTAG_BPen,bpen,RPTAG_DrMd,drmd,RPTAG_PenMode,penmode,TAG_DONE);
 153 #else
 154     SetRPAttrs(rp,RPTAG_APen,apen,RPTAG_BPen,bpen,RPTAG_DrMd,drmd,TAG_DONE);
 155 #endif
 156
 157     if (rp->Layer) UnlockLayer(rp->Layer);
 158
 159     AROS_LIBFUNC_EXIT
 160 } /* DrawBorder */