test/graphics/gfx.c

   1 /*
   2     Copyright © 1995-2014, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <proto/exec.h>
   7 #include <proto/graphics.h>
   8 #include <proto/layers.h>
   9 #include <exec/types.h>
  10 #include <intuition/intuition.h>
  11 #include <aros/oldprograms.h>
  12 #include <graphics/gfxbase.h>
  13 #include <graphics/rastport.h>
  14 #include <graphics/regions.h>
  15 #include <stdio.h>
  16
  17 struct NewWindow MyWin =
  18   {
  19     20,20,300,200,-1,-1,IDCMP_CLOSEWINDOW|/*IDCMP_DELTAMOVE|*/IDCMP_MOUSEMOVE,
  20     WINDOWCLOSE|WINDOWDRAG|WINDOWDEPTH|WINDOWSIZING|WFLG_SMART_REFRESH|WFLG_REPORTMOUSE,
  21     NULL,NULL,(char *)"Testwindow",
  22     NULL,NULL,0,0,0,0,WBENCHSCREEN
  23   };
  24
  25 struct GfxBase * GfxBase;
  26 struct Library * LayersBase;
  27
  28 void installClipRegion(struct Window * w)
  29 {
  30   int width, height;
  31   struct Rectangle Rect;
  32   ULONG x,y,line;
  33   struct Region * R = NewRegion();
  34   printf("Width of ClipRegion Rectangles: ");
  35   scanf("%i",&width);
  36   printf("Height of ClipRegion Rectangles: ");
  37   scanf("%i",&height);
  38
  39   if (height == 0 || width == 0)
  40     return;
  41   y = 0;
  42   line = 0;
  43   while (y < w->Height)
  44   {
  45     x = (line & 1) * width;
  46     while (x < w->Width)
  47     {
  48       Rect.MinX = x;
  49       Rect.MinY = y;
  50       Rect.MaxX = x+width-1;
  51       Rect.MaxY = y+height-1;
  52       OrRectRegion(R,&Rect);
  53
  54       x += (2*width);
  55     }
  56     y += height;
  57     line ++;
  58   }
  59
  60   InstallClipRegion(w->WLayer, R);
  61
  62 }
  63
  64 void uninstallClipRegion(struct Window * w)
  65 {
  66   struct Region * R = InstallClipRegion(w->WLayer, NULL);
  67   if (NULL != R)
  68     DisposeRegion(R);
  69 }
  70
  71 int main(void)
  72 {
  73   LayersBase = OpenLibrary("layers.library",0);
  74   GfxBase = (struct GfxBase *)OpenLibrary("graphics.library",0);
  75   if (NULL != GfxBase)
  76   {
  77     struct IntuitionBase * IntuitionBase =
  78        (struct IntuitionBase *)OpenLibrary("intuition.library",0);
  79     if (NULL != IntuitionBase)
  80     {
  81       struct Window * TheDude = OpenWindow(&MyWin);
  82       if (NULL != TheDude)
  83       {
  84         struct RastPort * rp = TheDude->RPort;
  85         struct TmpRas tmpras;
  86         struct IntuiMessage * Msg;
  87         UWORD areabuffer[250];
  88         char c;
  89         struct AreaInfo myAreaInfo;
  90         installClipRegion(TheDude);
  91         InitArea(&myAreaInfo, &areabuffer[0], 50);
  92         rp->AreaInfo = &myAreaInfo;
  93         InitTmpRas(&tmpras, AllocRaster(320,200),RASSIZE(320,200));
  94         rp->TmpRas = &tmpras;
  95
  96         /* Let's draw something */
  97         SetAPen(rp,1);
  98         SetOutlinePen(rp,3);
  99
 100 /*
 101         AreaMove(rp,10,20);
 102         AreaDraw(rp,110,30);
 103         AreaDraw(rp,110,100);
 104         AreaDraw(rp,10,110);
 105         AreaEnd(rp);
 106 */
 107
 108 /**/
 109         AreaMove(rp,10,20);
 110         AreaDraw(rp,110,30);
 111         AreaDraw(rp,110,100);
 112         AreaDraw(rp,10,50);
 113         AreaEnd(rp);
 114 /**/
 115 /*
 116         AreaEllipse(rp, 110, 30, 50, 20);
 117         AreaEnd(rp);
 118 */
 119 /*
 120         Move(rp,0,0);
 121         Draw(rp,0,100);
 122         Draw(rp,100,110);
 123         Draw(rp,100,0);
 124         Draw(rp,0,0);
 125         SetAPen(rp, 1);
 126         Flood(rp,0,50,50);
 127 */
 128 /*
 129         ScrollRaster(&IntuitionBase->ActiveScreen->RastPort,
 130                      -1,
 131                      -1,
 132                      10,
 133                      10,
 134                      100,
 135                      100);
 136 */
 137         printf("press a key and hit return!");
 138         scanf("%c",&c);
 139         ScrollRaster(rp,
 140                      -10,
 141                      -10,
 142                      10,
 143                      10,
 144                      100,
 145                      100);
 146
 147
 148         while (TRUE)
 149         {
 150           WaitPort(TheDude->UserPort);
 151           Msg = (struct IntuiMessage *)GetMsg(TheDude->UserPort);
 152           if (IDCMP_CLOSEWINDOW == Msg->Class)
 153             break;
 154           if (IDCMP_MOUSEMOVE == Msg->Class)
 155           {
 156             printf("Received a delta move message! (%i,%i)\n",Msg->MouseX,Msg->MouseY);
 157           }
 158           ReplyMsg((struct Message *)Msg);
 159         }
 160         uninstallClipRegion(TheDude);
 161         CloseWindow(TheDude);
 162       }
 163       CloseLibrary((struct Library *)IntuitionBase);
 164     }
 165     CloseLibrary((struct Library *)GfxBase);
 166   }
 167
 168     return 0;
 169 }