arch/.unmaintained/m68k-pp-native/boot-elf/gfx.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <registers.h>
   7
   8 void pause(LONG x)
   9 {
  10         LONG i = 0,a = 1;
  11         while (i < x) {
  12                 a *=a*a;
  13                 i++;
  14         }
  15 }
  16
  17 void drawlinehoriz(int y)
  18 {
  19         LONG lssa = RREG_L(LSSA);
  20         LONG height = RREG_W(LYMAX);
  21         LONG width = RREG_W(LXMAX)>>3;
  22         LONG x = 0;
  23
  24         if (y < 0 || y >= height)
  25                 return;
  26
  27         while (x <= width) {
  28                 *(BYTE *)(lssa+((width+1)*y)+x) = 0xff;
  29                 x++;
  30         }
  31
  32 }
  33
  34 void drawlinevert(int x)
  35 {
  36         LONG lssa = RREG_L(LSSA);
  37         LONG height = RREG_W(LYMAX);
  38         LONG width  = RREG_W(LXMAX);
  39         LONG y = 0;
  40
  41         if (x < 0 || x >= width)
  42                 return;
  43         width >>= 3;
  44         while (y < height) {
  45                 *(BYTE *)(lssa+((width+1)*y)+(x>>3)) |= 1<<(7-(x&7));
  46                 y++;
  47         }
  48
  49 }
  50
  51 void setpixel(int x, int y)
  52 {
  53         LONG lssa = RREG_L(LSSA);
  54         LONG height = RREG_W(LYMAX);
  55         LONG width  = RREG_W(LXMAX);
  56
  57         if (x < 0 || x >= width || y < 0 || y >= height)
  58                 return;
  59
  60         width>>=3;
  61
  62         *(BYTE *)(lssa+((width+1)*y)+(x>>3)) |= 1<<(7-(x&7));
  63
  64 }
  65
  66 void clearpixel(int x, int y)
  67 {
  68         LONG lssa = RREG_L(LSSA);
  69         LONG height = RREG_W(LYMAX);
  70         LONG width  = RREG_W(LXMAX);
  71
  72         if (x < 0 || x >= width || y < 0 || y >= height)
  73                 return;
  74
  75         width>>=3;
  76
  77         *(BYTE *)(lssa+((width+1)*y)+(x>>3)) &= ~(1<<(7-(x&7)));
  78
  79 }
  80
  81 void clearscreen(int value)
  82 {
  83         LONG lssa = RREG_L(LSSA);
  84         LONG height = RREG_W(LYMAX);
  85         LONG width = RREG_W(LXMAX)>>3;
  86         LONG y = 0,x;
  87
  88         while (y < height) {
  89                 x = 0;
  90                 while (x <= width) {
  91                         *(BYTE *)(lssa+((width+1)*y)+x) = value;
  92                         x++;
  93                 }
  94                 y++;
  95         }
  96 }
  97
  98 void flashscreen(int loop)
  99 {
 100         int i = 0, d;
 101         while (i < loop) {
 102                 clearscreen(0);
 103                 d = 0;
 104                 while (d < 10000)
 105                         d++;
 106                 clearscreen(255);
 107                 d = 0;
 108                 while (d < 10000)
 109                         d++;
 110                 i++;
 111         }
 112 }
 113
 114 void drawcross(void)
 115 {
 116         clearscreen(0);
 117         drawlinehoriz(80);
 118         drawlinevert(80);
 119         pause(100000);
 120 }
 121
 122 void showsuccess(void)
 123 {
 124         LONG height = RREG_W(LXMAX);
 125
 126         LONG c = 0;
 127         while (c < height) {
 128                 drawlinehoriz(c);
 129                 c++;
 130                 pause(10000);
 131         }
 132         clearscreen(0);
 133
 134 }