test/customscreen.c

   1 /*
   2     Example for custom screen
   3
   4     This time we are setting the colors directly.
   5 */
   6
   7 #include <proto/exec.h>
   8 #include <proto/dos.h>
   9 #include <proto/graphics.h>
  10 #include <proto/intuition.h>
  11
  12 #include <stdlib.h>
  13
  14 static struct Window *window;
  15 static struct Screen *screen;
  16 static struct RastPort *rp;
  17
  18 static void clean_exit(CONST_STRPTR s);
  19 static void draw_stuff(void);
  20 static void handle_events(void);
  21
  22 /*
  23     Initial color values for the screen.
  24     Must be an array with index, red, green, blue for each color.
  25     The range for each color component is between 0 and 255.
  26 */
  27 static struct ColorSpec colors[] =
  28 {
  29     {0, 240, 100, 0},  // Color 0 is background
  30     {1, 240, 0, 0},
  31     {2, 0, 0, 240},
  32     {-1}               // Array must be terminated with -1
  33 };
  34
  35
  36 int main(void)
  37 {
  38     screen = OpenScreenTags(NULL,
  39         SA_Width,  800,
  40         SA_Height, 600,
  41         SA_Depth,  16,
  42         SA_Colors, colors,
  43         TAG_END);
  44
  45     if (! screen) clean_exit("Can't open screen\n");
  46
  47     window = OpenWindowTags(NULL,
  48         WA_Activate,      TRUE,
  49         WA_Borderless,    TRUE,
  50         WA_Backdrop,      TRUE,
  51         WA_IDCMP,         IDCMP_VANILLAKEY,
  52         WA_RMBTrap,       TRUE,
  53         WA_NoCareRefresh, TRUE,   // We don't want to listen to refresh messages
  54         WA_CustomScreen,  screen, // Link to screen
  55         TAG_END);
  56
  57     if (! window) clean_exit("Can't open window\n");
  58
  59     rp = window->RPort;
  60
  61     draw_stuff();
  62
  63     handle_events();
  64
  65     clean_exit(NULL);
  66
  67     return 0;
  68 }
  69
  70 static void draw_stuff(void)
  71 {
  72     SetAPen(rp, 1);
  73     Move(rp, 100, 50);
  74     Text(rp, "Press any key to quit", 21);
  75
  76     Move(rp, 100, 100);
  77     Draw(rp, 500, 100);
  78
  79     SetAPen(rp, 2);
  80     Move(rp, 100, 200);
  81     Draw(rp, 500, 200);
  82
  83     /*
  84         We can change single colors with SetRGB32() or a range of
  85         colors with LoadRGB32(). In contrast to the color table above
  86         we need 32 bit values for the color components.
  87     */
  88     SetRGB32(&screen->ViewPort, 2, 0, 0xFFFFFFFF, 0);
  89
  90     /*
  91         Even when we use the same pen number as before we have to
  92         set it again.
  93     */
  94     SetAPen(rp, 2);
  95     Move(rp, 100, 300);
  96     Draw(rp, 500, 300);
  97 }
  98
  99
 100 static void handle_events(void)
 101 {
 102     struct IntuiMessage *imsg;
 103     struct MsgPort *port = window->UserPort;
 104
 105     ULONG signals;
 106
 107     BOOL terminated = FALSE;
 108
 109     while (! terminated)
 110     {
 111         signals = Wait(1L << port->mp_SigBit);
 112
 113         while ((imsg = (struct IntuiMessage *)GetMsg(port)) != NULL)
 114         {
 115             switch (imsg->Class)
 116             {
 117                 case IDCMP_VANILLAKEY:
 118                     terminated = TRUE;
 119                     break;
 120             }
 121             ReplyMsg((struct Message *)imsg);
 122         }
 123     }
 124 }
 125
 126
 127 static void clean_exit(CONST_STRPTR s)
 128 {
 129     if (s) PutStr(s);
 130
 131     // Give back allocated resourses
 132     if (window) CloseWindow(window);
 133     if (screen) CloseScreen(screen);
 134
 135     exit(0);
 136 }