workbench/demos/test_text.c

   1 /*
   2     Copyright © 1998, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Demo showing x11gfx.hidd
   6     Lang: English.
   7 */
   8
   9 #include <stdio.h>
  10 #include <string.h>
  11 #include <exec/types.h>
  12 #include <graphics/rastport.h>
  13 #include <graphics/gfxmacros.h>
  14 #include <intuition/intuition.h>
  15 #include <proto/dos.h>
  16 #include <proto/exec.h>
  17 #include <proto/graphics.h>
  18 #include <proto/intuition.h>
  19
  20 #define SDEBUG 1
  21 #define DEBUG 1
  22
  23 #include <aros/debug.h>
  24
  25 #define WIN_WIDTH       400
  26 #define WIN_HEIGHT      300
  27
  28 struct IntuitionBase *IntuitionBase;
  29 struct GfxBase *GfxBase;
  30 struct Library *LayersBase;
  31 struct DosLibrary *DOSBase;
  32
  33 struct Window *openwindow(STRPTR title, LONG x, LONG y, LONG w, LONG h);
  34
  35 void test_text(struct Window *w);
  36
  37 int handleevents(struct Window *win);
  38
  39 enum { EV_KEY_PRESSED, EV_QUIT };
  40
  41 int main(int argc, char **argv)
  42 {
  43     /* Intialize debugging */
  44     SDInit();
  45
  46     if ((IntuitionBase = (struct IntuitionBase *) OpenLibrary("intuition.library", 0)))
  47     {
  48         if ((GfxBase = (struct GfxBase *)OpenLibrary("graphics.library", 0)))
  49         {
  50             if ((DOSBase = (struct DosLibrary *) OpenLibrary("dos.library",0)))
  51             {
  52               struct Window *w1;
  53
  54
  55                 w1 = openwindow("Text speed test. Press key to show JAM1"
  56                         ,0, 0
  57                         , WIN_WIDTH, WIN_HEIGHT
  58                 );
  59
  60                 if (w1)
  61                 {
  62                     struct TextAttr ta = { "topaz.font", 8, 0, 0 };
  63                     struct TextFont *tf;
  64
  65                     /* Get the default font */
  66
  67
  68                     tf = OpenFont(&ta);
  69
  70                     SetFont(w1->RPort, tf);
  71
  72                     if (handleevents(w1) == EV_QUIT)
  73                         goto quit;
  74
  75                     SetDrMd(w1->RPort, JAM1);
  76                     test_text(w1);
  77
  78                     SetWindowTitles(w1, "Press any key to test JAM2", NULL);
  79
  80
  81                     if (handleevents(w1) == EV_QUIT)
  82                         goto quit;
  83
  84                     SetDrMd(w1->RPort, JAM2);
  85                     SetAPen(w1->RPort, DETAILPEN);
  86                     SetBPen(w1->RPort, BLOCKPEN);
  87                     test_text(w1);
  88
  89                     SetWindowTitles(w1, "Press a key to quit", NULL);
  90
  91                     handleevents(w1);
  92
  93
  94 quit:
  95
  96                     CloseWindow(w1);
  97               }
  98               CloseLibrary((struct Library *)DOSBase);
  99           }
 100           CloseLibrary((struct Library *)GfxBase);
 101         }
 102         CloseLibrary((struct Library *) IntuitionBase);
 103     }
 104     return 0;
 105 } /* main */
 106
 107 #define TEST_TEXT "Blah"
 108
 109 void test_text(struct Window *w)
 110 {
 111     int len, pixlen, pixleft, iw;
 112     int x, y, bottom;
 113     struct TextFont *tf;
 114
 115     tf = w->RPort->Font;
 116
 117     bottom = WIN_HEIGHT - w->BorderBottom - 1 - (tf->tf_YSize - tf->tf_Baseline);
 118     printf("bottom: %d\n", bottom);
 119     y = w->BorderTop + tf->tf_Baseline;
 120
 121     iw = w->Width - w->BorderLeft - w->BorderRight;
 122
 123     len = sizeof (TEST_TEXT) - 1;
 124
 125     pixlen = TextLength(w->RPort, TEST_TEXT, len);
 126
 127     for (; y < bottom; y += tf->tf_YSize)
 128     {
 129         pixleft = iw;
 130         x = w->BorderLeft;
 131         do
 132         {
 133             pixleft -= pixlen;
 134             Move(w->RPort, x, y);
 135             Text(w->RPort, TEST_TEXT, len);
 136             x += pixlen;
 137         }
 138         while (pixleft > pixlen);
 139     }
 140     return;
 141 }
 142
 143
 144 struct Window *openwindow(STRPTR title, LONG x, LONG y, LONG w, LONG h)
 145 {
 146
 147   struct Window *window;
 148
 149   window = OpenWindowTags(NULL,
 150                           WA_IDCMP, IDCMP_RAWKEY,
 151                           WA_Left,              x,
 152                           WA_Top,               y,
 153                           WA_Width,             w,
 154                           WA_Height,            h,
 155                           WA_Activate,          TRUE,
 156                           WA_DepthGadget,       TRUE,
 157                           WA_CloseGadget,       TRUE,
 158                           WA_Title,             (IPTR)title,
 159                           TAG_END
 160   );
 161
 162
 163   return window;
 164 }
 165
 166 int handleevents(struct Window *win)
 167 {
 168     struct IntuiMessage *imsg;
 169     struct MsgPort *port = win->UserPort;
 170     BOOL done = FALSE;
 171     int event = 0;
 172
 173     EnterFunc(bug("HandleEvents(win=%p)\n", win));
 174
 175     while (!done)
 176     {
 177         if ((imsg = (struct IntuiMessage *)GetMsg(port)) != NULL)
 178         {
 179
 180             switch (imsg->Class)
 181             {
 182
 183
 184             case IDCMP_REFRESHWINDOW:
 185                 BeginRefresh(win);
 186                 EndRefresh(win, TRUE);
 187                 break;
 188
 189             case IDCMP_CLOSEWINDOW:
 190                 done = TRUE;
 191                 event = EV_QUIT;
 192                 break;
 193
 194             case IDCMP_RAWKEY:
 195                 if (imsg->Code & 0x80)
 196                 {
 197                         done = TRUE;
 198                         event = EV_KEY_PRESSED;
 199                 }
 200                 break;
 201
 202
 203
 204             } /* switch (imsg->Class) */
 205             ReplyMsg((struct Message *)imsg);
 206
 207
 208         } /* if ((imsg = GetMsg(port)) != NULL) */
 209         else
 210         {
 211             Wait(1L << port->mp_SigBit);
 212         }
 213     } /* while (!terminated) */
 214
 215     ReturnInt("HandleEvents", int, event);
 216 } /* HandleEvents() */
 217
 218