rom/graphics/loadrgb4.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include <aros/debug.h>
   9 #include "graphics_intern.h"
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14         #include <proto/graphics.h>
  15
  16         AROS_LH3(void, LoadRGB4,
  17
  18 /*  SYNOPSIS */
  19         AROS_LHA(struct ViewPort *, vp, A0),
  20         AROS_LHA(UWORD           *, colors, A1),
  21         AROS_LHA(WORD             , count, D0),
  22
  23 /*  LOCATION */
  24         struct GfxBase *, GfxBase, 32, Graphics)
  25
  26 /*  FUNCTION
  27         Load RGB color values from table.
  28
  29     INPUTS
  30         vp     - ViewPort
  31         colors - pointer to table of RGB values (0...15)
  32                         background--  0x0RGB
  33                         color1    --  0x0RGB
  34                         color2    --  0x0RGB
  35                         ...
  36         count   - number of UWORDs in the table
  37
  38     RESULT
  39
  40     NOTES
  41
  42     EXAMPLE
  43
  44     BUGS
  45
  46     SEE ALSO
  47         LoadRGB32()
  48
  49     INTERNALS
  50
  51     HISTORY
  52
  53 *****************************************************************************/
  54 {
  55     AROS_LIBFUNC_INIT
  56
  57     WORD t;
  58
  59     if (!vp)
  60         return;
  61
  62     ASSERT_VALID_PTR(vp);
  63     ASSERT_VALID_PTR(colors);
  64
  65     /* TODO: Optimization */
  66
  67     for (t = 0; t < count; t ++ )
  68     {
  69         ULONG red   = (colors[t] & 0xF00) >> 8;
  70         ULONG green = (colors[t] & 0x0F0) >> 4;
  71         ULONG blue  = (colors[t] & 0x00F);
  72
  73         SetRGB32(vp, t, red   * 0x11111111,
  74                         green * 0x11111111,
  75                         blue  * 0x11111111);
  76     }
  77
  78     AROS_LIBFUNC_EXIT
  79
  80 } /* LoadRGB4 */