e16
/
e16-epplets
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
e16-epplets/epplets/cloak.c

1481 lines
49 KiB
C
Raw Blame History

#include "epplet.h"
#include "cloak.h"
#define VARIANCE 40
#define VARTREND 16
#define HSPREAD 10
#define VSPREAD 160
#define RESIDUAL 75
#define MAXVAL 255
extern RGB_buf rgbbuf;
int load_val = 35;
static int *flame = NULL;
static int *vspread, *hspread, *residual;
static unsigned char rm[255], gm[255], bm[255];
static int g_rr, g_gg, g_bb;
/* static void set_pixel (int x, int y, unsigned char c); */
static void get_warpedcolor(unsigned char *rrr, unsigned char *ggg,
unsigned char *bbb);
/* Raster's flame colors */
/* Look, even US spelling of colours ;-) */
const int colors[] = {
120, 0, 169,
217, 152, 249,
255, 255, 255,
30, 90, 90,
50, 255, 255,
255, 255, 255,
255, 0, 0,
255, 255, 0,
255, 255, 255,
0, 255, 0,
255, 255, 0,
255, 255, 255,
0, 0, 255,
255, 0, 255,
255, 255, 255,
0, 0, 200,
40, 80, 255,
100, 200, 255,
80, 90, 140,
140, 150, 180,
255, 230, 200,
20, 40, 180,
255, 160, 0,
255, 255, 100
};
void
set_flame_col(int j)
{
flame_col(colors[j], colors[j + 1], colors[j + 2], colors[j + 3],
colors[j + 4], colors[j + 5], colors[j + 6], colors[j + 7],
colors[j + 8]);
g_rr = colors[j];
g_gg = colors[j + 1];
g_bb = colors[j + 2];
if (g_rr == 0)
g_rr = 1;
if (g_gg == 0)
g_gg = 1;
if (g_bb == 0)
g_bb = 1;
}
void
flame_col(int r1, int g1, int b1, int r2, int g2, int b2, int r3, int g3,
int b3)
{
int i;
for (i = 0; i < 25; i++)
{
rm[i] = (r1 * i) / 25;
gm[i] = (g1 * i) / 25;
bm[i] = (b1 * i) / 25;
}
for (i = 0; i < 25; i++)
{
rm[25 + i] = ((r2 * i) + (r1 * (25 - i))) / 25;
gm[25 + i] = ((g2 * i) + (g1 * (25 - i))) / 25;
bm[25 + i] = ((b2 * i) + (b1 * (25 - i))) / 25;
}
for (i = 0; i < 25; i++)
{
rm[50 + i] = ((r3 * i) + (r2 * (25 - i))) / 25;
gm[50 + i] = ((g3 * i) + (g2 * (25 - i))) / 25;
bm[50 + i] = ((b3 * i) + (b2 * (25 - i))) / 25;
}
for (i = 75; i < 255; i++)
{
rm[i] = rm[74];
gm[i] = gm[74];
bm[i] = bm[74];
}
}
/* I use this to black-out the rgb-buf */
/* There must be a faster way, but I'm not used to this stuff yet */
void
blank_buf(void)
{
int x, y;
unsigned char *rgb, *rptr;
for (y = 0; y < 40; y++)
{
rgb = Epplet_get_rgb_pointer(rgbbuf);
rptr = rgb + (y * 40 * 4);
for (x = 0; x < 40; x++)
{
rptr[0] = rptr[1] = rptr[2] = 0;
rptr += 4;
}
}
}
/* Same as blank_buf, but not black ;-) */
void
color_buf(unsigned char rr, unsigned char gg, unsigned char bb)
{
int x, y;
unsigned char *rgb, *rptr;
for (y = 0; y < 40; y++)
{
rgb = Epplet_get_rgb_pointer(rgbbuf);
rptr = rgb + (y * 40 * 4);
for (x = 0; x < 40; x++)
{
rptr[0] = rr;
rptr[1] = gg;
rptr[2] = bb;
rptr += 4;
}
}
}
/* Used to fade out the buf a bit before each draw */
/* Helps the radar look right */
void
fade_buf(int percentage)
{
int x, y;
unsigned char *rgb, *rptr;
for (y = 0; y < 40; y++)
{
rgb = Epplet_get_rgb_pointer(rgbbuf);
rptr = rgb + (y * 40 * 4);
for (x = 0; x < 40; x++)
{
rptr[0] = rptr[0] * percentage / 100;
rptr[1] = rptr[1] * percentage / 100;
rptr[2] = rptr[2] * percentage / 100;
rptr += 4;
}
}
}
/* Scrolls buf along one to the left */
void
scroll_buf(void)
{
int x, y;
unsigned char *rgb, *rptr;
for (y = 0; y < 40; y++)
{
rgb = Epplet_get_rgb_pointer(rgbbuf);
rptr = rgb + (y * 40 * 4);
for (x = 0; x < 39; x++)
{
rptr[0] = rptr[4];
rptr[1] = rptr[5];
rptr[2] = rptr[6];
rptr += 4;
}
rptr[0] = 0;
rptr[1] = 0;
rptr[2] = 0;
}
}
/* RasterFire :) */
void
draw_flame(void)
{
unsigned char *rgb, *rptr;
int x, y, *ptr, val1, val2, val3;
if (!flame)
{
vspread = malloc(40 * sizeof(int));
hspread = malloc(40 * sizeof(int));
residual = malloc(40 * sizeof(int));
flame = calloc(40 * 40, sizeof(int));
}
ptr = flame + (39 * 40);
for (x = 0; x < 40; x++)
{
vspread[x] = VSPREAD + (load_val / 50);
hspread[x] = HSPREAD + (load_val / 50);
residual[x] = RESIDUAL + (load_val / 50);
ptr[x] = (rand() % (load_val + 155));
if (ptr[x] > MAXVAL)
ptr[x] = 0;
else if (ptr[x] < 0)
ptr[x] = 0;
}
for (y = 39; y >= 2; y--)
{
ptr = flame + (y * 40);
for (x = 1; x < 39; x++)
{
val1 = (ptr[x] * vspread[x]) >> 8;
val2 = (ptr[x] * hspread[x]) >> 8;
val3 = (ptr[x] * residual[x]) >> 8;
ptr[x - 1] += val2;
if (ptr[x - 1] > MAXVAL)
ptr[x - 1] = MAXVAL;
ptr[x - 40] += val1;
if (ptr[x - 40] > MAXVAL)
ptr[x - 40] = MAXVAL;
ptr[x + 1] += val2;
if (ptr[x + 1] > MAXVAL)
ptr[x + 1] = MAXVAL;
ptr[x] = val3;
}
}
for (x = 0; x < 40; x++)
flame[x] = 0;
for (x = 0; x < 40; x++)
flame[40 + x] /= 2;
for (y = 0; y < 40; y++)
flame[y * 40] = 0;
for (y = 0; y < 40; y++)
flame[(y * 40) + 39] = 0;
for (y = 0; y < 40; y++)
flame[(y * 40) + 38] /= 2;
rgb = Epplet_get_rgb_pointer(rgbbuf);
for (y = 0; y < 40; y++)
{
ptr = flame + (y * 40) + 1;
rptr = rgb + (y * 40 * 4);
for (x = 0; x < 40; x++)
{
val1 = ptr[x] & 0xff;
rptr[0] = rm[val1];
rptr[1] = gm[val1];
rptr[2] = bm[val1];
rptr += 4;
}
}
}
/* Radar thing */
#define RADIUS 50
static double radar_x[RADIUS];
static double radar_r[RADIUS];
void
draw_radar(void)
{
int i;
unsigned int tempX = 0;
unsigned int tempY = 0;
static int setup = 0;
double d = 0.0;
if (!setup)
{
blank_buf();
d = rand() % 360;
for (i = 0; i < RADIUS; i++)
{
radar_x[i] = d;
radar_r[i] = i;
}
setup = 1;
}
fade_buf(92);
for (i = 0; i < RADIUS; i++)
{
radar_x[i] += 0.07;
tempX = 19 + radar_r[i] * cos(radar_x[i]) / 3;
tempY = 19 + radar_r[i] * sin(radar_x[i]) / 3;
set_col_pixel(tempX, tempY, 255, 55, 255, 75);
}
}
/* AA radar :) Fading doesn't look good for it though, so I disabled it */
void
draw_aa_radar(void)
{
int x2, y2;
static double x = 0.0;
x += 0.1;
x2 = 19 + RADIUS * cos(x) / 3;
y2 = 19 + RADIUS * sin(x) / 3;
blank_buf();
aa_line(19, 19, x2, y2, 255, 0, 255, 0);
}
/* Scanner type thing */
void
draw_scanner(void)
{
static int y = 0;
static int down = 1;
static int setup = 0;
if (!setup)
{
blank_buf();
setup = 1;
}
if (down)
y += 1;
else
y -= 1;
if (y == 39)
{
y = 38;
down = 0;
}
else if (y == 0)
{
y = 1;
down = 1;
}
fade_buf(85);
aa_line(0, y, 38, y, 255, 255, 0, 0);
}
/* Lame, but easy :) */
void
draw_aa_triangle(void)
{
int x1, y1;
int x2, y2;
int x3, y3;
static double x = 0.0;
x += 0.1;
x1 = 19 + RADIUS * cos(x) / 3;
y1 = 19 + RADIUS * sin(x) / 3;
x2 = 19 + RADIUS * cos(x + (2 * M_PI / 3)) / 3;
y2 = 19 + RADIUS * sin(x + (2 * M_PI / 3)) / 3;
x3 = 19 + RADIUS * cos(x + (4 * M_PI / 3)) / 3;
y3 = 19 + RADIUS * sin(x + (4 * M_PI / 3)) / 3;
blank_buf();
aa_line(x1, y1, x2, y2, 255, 0, 0, 255);
aa_line(x2, y2, x3, y3, 255, 0, 0, 255);
aa_line(x3, y3, x1, y1, 255, 0, 0, 255);
}
/* Two triangles. */
/* Probably even lamer than just one ;-) */
void
draw_aa_star(void)
{
int x1, y1;
int x2, y2;
int x3, y3;
int x4, y4;
int x5, y5;
int x6, y6;
static double x = 0.0;
x += 0.1;
x1 = 19 + RADIUS * cos(x) / 3;
y1 = 19 + RADIUS * sin(x) / 3;
x2 = 19 + RADIUS * cos(x + (2 * M_PI / 3)) / 3;
y2 = 19 + RADIUS * sin(x + (2 * M_PI / 3)) / 3;
x3 = 19 + RADIUS * cos(x + (4 * M_PI / 3)) / 3;
y3 = 19 + RADIUS * sin(x + (4 * M_PI / 3)) / 3;
x4 = 19 + RADIUS * cos(x + (M_PI / 3)) / 3;
y4 = 19 + RADIUS * sin(x + (M_PI / 3)) / 3;
x5 = 19 + RADIUS * cos(x + (3 * M_PI / 3)) / 3;
y5 = 19 + RADIUS * sin(x + (3 * M_PI / 3)) / 3;
x6 = 19 + RADIUS * cos(x + (5 * M_PI / 3)) / 3;
y6 = 19 + RADIUS * sin(x + (5 * M_PI / 3)) / 3;
blank_buf();
aa_line(x1, y1, x2, y2, 255, 255, 255, 0);
aa_line(x2, y2, x3, y3, 255, 255, 255, 0);
aa_line(x3, y3, x1, y1, 255, 255, 255, 0);
aa_line(x4, y4, x5, y5, 255, 255, 255, 0);
aa_line(x5, y5, x6, y6, 255, 255, 255, 0);
aa_line(x6, y6, x4, y4, 255, 255, 255, 0);
}
/* Ok, I'm getting a bit carried away now... */
/* This thing rotates a curved mesh around, very inefficiently ;-) */
/* If anyone wants to fix this... ;-) */
static double g_ox[49];
static double g_oy[49];
static double g_oz[49];
static double g_x[49];
static double g_y[49];
static double g_z[49];
void
draw_rotator(void)
{
int xx = 19;
int yy = 19;
static int setup = 0;
double theta1inc = 0.05;
double theta2inc = 0.10;
double theta3inc = 0.03;
static double theta1 = 0.00;
static double theta2 = 0.00;
static double theta3 = 0.00;
int i;
double tx, ty;
double xcopy, ycopy, zcopy;
int from[84] =
{ 0, 1, 2, 3, 4, 5, 7, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19, 21, 22,
23, 24, 25, 26, 28, 29, 30, 31, 32, 33, 35, 36, 37, 38, 39, 40, 42, 43,
44, 45, 46, 47, 0, 7, 14, 21, 28, 35, 1, 8, 15, 22, 29, 36, 2, 9, 16,
23, 30, 37, 3, 10, 17, 24, 31, 38, 4, 11, 18, 25, 32, 39, 5, 12, 19, 26,
33, 40, 6, 13, 20, 27, 34, 41
};
int to[84] =
{ 1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 19, 20, 22, 23,
24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 36, 37, 38, 39, 40, 41, 43, 44,
45, 46, 47, 48, 7, 14, 21, 28, 35, 42, 8, 15, 22, 29, 36, 43, 9, 16, 23,
30, 37, 44, 10, 17, 24, 31, 38, 45, 11, 18, 25, 32, 39, 46, 12, 19, 26,
33, 40, 47, 13, 20, 27, 34, 41, 48
};
if (!setup)
{
for (i = 0; i < 49; i++)
{
g_x[i] = 0;
g_y[i] = 0;
g_z[i] = 0;
g_ox[i] = ((i % 7) - 3) * 75;
g_oy[i] = ((i / 7) - 3) * 75;
tx = (i % 7) - 3;
ty = (i / 7) - 3;
g_oz[i] = 50 - (-9 * tx * tx + 9 * ty * ty);
}
setup = 1;
}
theta1 += theta1inc;
theta2 += theta2inc;
theta3 += theta3inc;
blank_buf();
for (i = 0; i < 49; i++)
{
g_x[i] = g_ox[i];
g_y[i] = g_oy[i];
g_z[i] = g_oz[i];
xcopy = g_x[i];
g_x[i] = (g_x[i] * cos(theta1) - g_y[i] * sin(theta1));
g_y[i] = (xcopy * sin(theta1) + g_y[i] * cos(theta1));
ycopy = g_y[i];
g_y[i] = (g_y[i] * cos(theta2) - g_z[i] * sin(theta2));
g_z[i] = (ycopy * sin(theta2) + g_z[i] * cos(theta2));
zcopy = g_z[i];
g_z[i] = (g_z[i] * cos(theta3) - g_x[i] * sin(theta3));
g_x[i] = (zcopy * sin(theta3) + g_x[i] * cos(theta3));
/* add perspective */
g_x[i] = (29 * g_x[i] / (550 - g_z[i]));
g_y[i] = (29 * g_y[i] / (550 - g_z[i]));
}
for (i = 0; i < 84; i++)
{
aa_line(xx + g_x[from[i]], yy + g_y[from[i]],
xx + g_x[to[i]], yy + g_y[to[i]], 255U, 0, 255, 255);
}
}
void
draw_funky_rotator(void)
{
int xx = 19;
int yy = 19;
static int setup = 0;
double theta1inc = 0.10;
double theta2inc = 0.12;
double theta3inc = 0.06;
static double theta1 = 0.00;
static double theta2 = 0.00;
static double theta3 = 0.00;
unsigned char r, g, b;
static double zoom = 29.0;
static double d_zoom = 0.4;
int i;
double tx, ty;
double xcopy, ycopy, zcopy;
int from[84] =
{ 0, 1, 2, 3, 4, 5, 7, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19, 21, 22,
23, 24, 25, 26, 28, 29, 30, 31, 32, 33, 35, 36, 37, 38, 39, 40, 42, 43,
44, 45, 46, 47, 0, 7, 14, 21, 28, 35, 1, 8, 15, 22, 29, 36, 2, 9, 16,
23, 30, 37, 3, 10, 17, 24, 31, 38, 4, 11, 18, 25, 32, 39, 5, 12, 19, 26,
33, 40, 6, 13, 20, 27, 34, 41
};
int to[84] =
{ 1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 19, 20, 22, 23,
24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 36, 37, 38, 39, 40, 41, 43, 44,
45, 46, 47, 48, 7, 14, 21, 28, 35, 42, 8, 15, 22, 29, 36, 43, 9, 16, 23,
30, 37, 44, 10, 17, 24, 31, 38, 45, 11, 18, 25, 32, 39, 46, 12, 19, 26,
33, 40, 47, 13, 20, 27, 34, 41, 48
};
if (!setup)
{
for (i = 0; i < 49; i++)
{
g_x[i] = 0;
g_y[i] = 0;
g_z[i] = 0;
g_ox[i] = ((i % 7) - 3) * 75;
g_oy[i] = ((i / 7) - 3) * 75;
tx = (i % 7) - 3;
ty = (i / 7) - 3;
g_oz[i] = 50 - (-9 * tx * tx + 9 * ty * ty);
}
setup = 1;
}
else
{
zoom += d_zoom;
if (zoom > 60)
d_zoom = 0 - d_zoom;
if (zoom < 15)
d_zoom = 0 - d_zoom;
}
theta1 += theta1inc;
theta2 += theta2inc;
theta3 += theta3inc;
get_warpedcolor(&r, &g, &b);
blank_buf();
for (i = 0; i < 49; i++)
{
g_x[i] = g_ox[i];
g_y[i] = g_oy[i];
g_z[i] = g_oz[i];
xcopy = g_x[i];
g_x[i] = (g_x[i] * cos(theta1) - g_y[i] * sin(theta1));
g_y[i] = (xcopy * sin(theta1) + g_y[i] * cos(theta1));
ycopy = g_y[i];
g_y[i] = (g_y[i] * cos(theta2) - g_z[i] * sin(theta2));
g_z[i] = (ycopy * sin(theta2) + g_z[i] * cos(theta2));
zcopy = g_z[i];
g_z[i] = (g_z[i] * cos(theta3) - g_x[i] * sin(theta3));
g_x[i] = (zcopy * sin(theta3) + g_x[i] * cos(theta3));
/* add perspective */
g_x[i] = (zoom * g_x[i] / (550 - g_z[i]));
g_y[i] = (zoom * g_y[i] / (550 - g_z[i]));
}
for (i = 0; i < 84; i++)
{
aa_line(xx + g_x[from[i]], yy + g_y[from[i]],
xx + g_x[to[i]], yy + g_y[to[i]], 255U, r, g, b);
}
}
/* Can I fit a starfield into a 40x40 window? */
/* Gotta be worth a try! */
#define NUM_STARS 100
double star_x[NUM_STARS];
double star_y[NUM_STARS];
double star_z[NUM_STARS];
double star_zv[NUM_STARS];
double star_screenx[NUM_STARS];
double star_screeny[NUM_STARS];
void
draw_starfield(void)
{
int i;
unsigned char b;
static int setup = 0;
if (!setup)
{
for (i = 1; i < NUM_STARS; i++)
{
/* Never got the hang of random numbers under unix... */
/* This can't be the way to do it... */
star_x[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_y[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_z[i] = ((double)rand() / RAND_MAX * 600) + 400.0;
star_zv[i] = (((double)rand() / RAND_MAX * 45) + 5) / 10;
}
setup = 1;
}
blank_buf();
for (i = 1; i < NUM_STARS; i++)
{
star_z[i] = star_z[i] - star_zv[i];
star_screenx[i] = star_x[i] / star_z[i] * 100 + 19;
star_screeny[i] = star_y[i] / star_z[i] * 100 + 19;
if ((star_screenx[i] > 39) || (star_screenx[i] < 0)
|| (star_screeny[i] > 39) || (star_screeny[i] < 0)
|| (star_z[i] < 1))
{
star_x[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_y[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_z[i] = ((double)rand() / RAND_MAX * 600) + 400.0;
star_zv[i] = (((double)rand() / RAND_MAX * 45) + 5) / 10;
}
else
{
b = ((255 / 5) * star_zv[i]) * (1 - (star_z[i] / 1000));
set_col_pixel(star_screenx[i], star_screeny[i], b, 255, 255, 255);
set_col_pixel(star_screenx[i] + 1, star_screeny[i], b, 255, 255,
255);
set_col_pixel(star_screenx[i], star_screeny[i] + 1, b, 255, 255,
255);
set_col_pixel(star_screenx[i] + 1, star_screeny[i] + 1, b, 255,
255, 255);
}
}
}
/* AA too? Why not? */
void
draw_aa_starfield(void)
{
int i;
unsigned char b;
static int setup = 0;
if (!setup)
{
for (i = 1; i < NUM_STARS; i++)
{
star_x[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_y[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_z[i] = ((double)rand() / RAND_MAX * 600) + 400.0;
star_zv[i] = (((double)rand() / RAND_MAX * 45) + 5) / 10;
}
blank_buf();
setup = 1;
}
fade_buf(80);
for (i = 1; i < NUM_STARS; i++)
{
star_z[i] = star_z[i] - star_zv[i];
star_screenx[i] = star_x[i] / star_z[i] * 100.0 + 19.0;
star_screeny[i] = star_y[i] / star_z[i] * 100.0 + 19.0;
if ((star_screenx[i] > 39) || (star_screenx[i] < 0)
|| (star_screeny[i] > 39) || (star_screeny[i] < 0)
|| (star_z[i] < 1))
{
star_x[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_y[i] = ((double)rand() / RAND_MAX * 2000) - 1000.0;
star_z[i] = ((double)rand() / RAND_MAX * 600) + 400.0;
star_zv[i] = (((double)rand() / RAND_MAX * 45) + 5) / 10;
}
else
{
b = ((255 / 5) * star_zv[i]) * (1 - (star_z[i] / 1000));
aa_pixel(star_screenx[i], star_screeny[i], b * 2, 255, 255, 255);
}
}
}
/* Cheesy, but easy */
void
draw_colorwarp(void)
{
static int setup = 0;
static int rr = 0;
static int gg = 0;
static int bb = 0;
static int d_rr = 2;
static int d_gg = -3;
static int d_bb = 1;
if (!setup)
{
/* setup */
rr = rand() % 255;
gg = rand() % 255;
bb = rand() % 255;
setup = 1;
}
rr += d_rr;
gg += d_gg;
bb += d_bb;
if (rr <= 0)
{
d_rr = -d_rr;
rr = 0;
}
if (rr >= 255)
{
d_rr = -d_rr;
rr = 255;
}
if (gg <= 0)
{
d_gg = -d_gg;
gg = 0;
}
if (gg >= 255)
{
d_gg = -d_gg;
gg = 255;
}
if (bb <= 0)
{
d_bb = -d_bb;
bb = 0;
}
if (bb >= 255)
{
d_bb = -d_bb;
bb = 255;
}
color_buf(rr, gg, bb);
}
void
get_warpedcolor(unsigned char *rrr, unsigned char *ggg, unsigned char *bbb)
{
static int setup = 0;
static int rr = 0;
static int gg = 0;
static int bb = 0;
static int d_rr = 2;
static int d_gg = -3;
static int d_bb = 1;
if (!setup)
{
/* setup */
rr = rand() % 255;
gg = rand() % 255;
bb = rand() % 255;
setup = 1;
}
rr += d_rr;
gg += d_gg;
bb += d_bb;
if (rr <= 0)
{
d_rr = -d_rr;
rr = 0;
}
if (rr >= 255)
{
d_rr = -d_rr;
rr = 255;
}
if (gg <= 0)
{
d_gg = -d_gg;
gg = 0;
}
if (gg >= 255)
{
d_gg = -d_gg;
gg = 255;
}
if (bb <= 0)
{
d_bb = -d_bb;
bb = 0;
}
if (bb >= 255)
{
d_bb = -d_bb;
bb = 255;
}
*rrr = rr;
*ggg = gg;
*bbb = bb;
}
/* Bouncing ball */
void
draw_ball(void)
{
static int setup = 0;
static double ball_x, ball_y;
static double d_x, d_y;
if (!setup)
{
ball_x = rand() % 39;
ball_y = rand() % 39;
while (fabs(d_x) < 0.5)
d_x = ((double)rand() / RAND_MAX * 4) - 2.0;
while (fabs(d_y) < 0.5)
d_y = ((double)rand() / RAND_MAX * 4) - 2.0;
blank_buf();
setup = 1;
}
ball_x += d_x;
ball_y += d_y;
if (ball_x < 1)
{
ball_x = 1;
d_x = -d_x;
}
else if (ball_x > 37)
{
ball_x = 37;
d_x = -d_x;
}
if (ball_y < 1)
{
ball_y = 1;
d_y = -d_y;
}
else if (ball_y > 37)
{
ball_y = 37;
d_y = -d_y;
}
fade_buf(92);
set_col_pixel(ball_x, ball_y, 255, 255, 0, 0);
set_col_pixel(ball_x + 1, ball_y, 255, 255, 0, 0);
set_col_pixel(ball_x, ball_y + 1, 255, 255, 0, 0);
set_col_pixel(ball_x + 1, ball_y + 1, 155, 255, 0, 0);
set_col_pixel(ball_x - 1, ball_y, 255, 255, 0, 0);
set_col_pixel(ball_x, ball_y - 1, 255, 255, 0, 0);
set_col_pixel(ball_x - 1, ball_y - 1, 155, 255, 0, 0);
set_col_pixel(ball_x - 1, ball_y + 1, 155, 255, 0, 0);
set_col_pixel(ball_x + 1, ball_y - 1, 155, 255, 0, 0);
}
#define NUM_ATOMS 8
static double atom_x[NUM_ATOMS];
static double atom_y[NUM_ATOMS];
static double atom_d_x[NUM_ATOMS];
static double atom_d_y[NUM_ATOMS];
/* Bouncing atoms */
void
draw_atoms(void)
{
static int setup = 0;
int i;
if (!setup)
{
for (i = 0; i < NUM_ATOMS; i++)
{
atom_x[i] = rand() % 39;
atom_y[i] = rand() % 39;
while (fabs(atom_d_x[i]) < 0.3)
atom_d_x[i] = ((double)rand() / RAND_MAX * 3) - 1.5;
while (fabs(atom_d_y[i]) < 0.3)
atom_d_y[i] = ((double)rand() / RAND_MAX * 3) - 1.5;
blank_buf();
setup = 1;
}
}
else
fade_buf(87);
for (i = 0; i < NUM_ATOMS; i++)
{
atom_x[i] += atom_d_x[i];
atom_y[i] += atom_d_y[i];
if (atom_x[i] < 0)
{
atom_x[i] = 0;
atom_d_x[i] = -atom_d_x[i];
}
else if (atom_x[i] > 38)
{
atom_x[i] = 38;
atom_d_x[i] = -atom_d_x[i];
}
if (atom_y[i] < 0)
{
atom_y[i] = 0;
atom_d_y[i] = -atom_d_y[i];
}
else if (atom_y[i] > 38)
{
atom_y[i] = 38;
atom_d_y[i] = -atom_d_y[i];
}
aa_pixel(atom_x[i], atom_y[i], 255, 255, 255, 0);
}
}
void
draw_sine(void)
{
static double x = 0;
static int setup = 0;
if (!setup)
{
blank_buf();
setup = 1;
}
else
scroll_buf();
set_col_pixel(39, 19 + 14 * sin(x), 255, 115, 255, 165);
x += 0.3;
}
/* ************************* */
/* Utility drawing functions */
/* ************************* */
/* Maybe I'll optimise this later ;-) */
void
aa_line(int x1, int y1, int x2, int y2, unsigned char b,
unsigned char rr, unsigned char gg, unsigned char bb)
{
double grad, line_width, line_height, xgap, ygap, xend, yend,
yf, xf, brightness1, brightness2, db, xm, ym;
int ix1, ix2, iy1, iy2, i;
int temp;
unsigned char c1, c2;
line_width = (x2 - x1);
line_height = (y2 - y1);
if (fabs(line_width) > fabs(line_height))
{
if (x1 > x2)
{
temp = x1;
x1 = x2;
x2 = temp;
temp = y1;
y1 = y2;
y2 = temp;
line_width = (x2 - x1);
line_height = (y2 - y1);
}
/* This is currently broken. It is supposed to account
* for lines that don't span more than one pixel */
if (fabs(line_width) < 0.1)
{
x2 = x1 + 0.5;
x1 -= 0.5;
grad = 0;
}
else
{
grad = line_height / line_width;
if (line_width < 1)
{
xm = (x1 + x2) / 2;
ym = (y1 + y2) / 2;
x1 = xm - 0.5;
x2 = xm + 0.5;
y1 = ym - (grad / 2);
y2 = ym + (grad / 2);
line_width = 1;
line_height = grad;
}
}
xend = (int)x1 + 0.5;
yend = y1 + grad * (xend - x1);
xgap = (1 - modf(x1 + 0.5, &db));
ix1 = (int)xend;
iy1 = (int)yend;
brightness1 = (1 - modf(yend, &db)) * xgap;
brightness2 = modf(yend, &db) * xgap;
c1 = (unsigned char)(brightness1 * b);
c2 = (unsigned char)(brightness2 * b);
set_col_pixel(ix1, iy1, c1, rr, gg, bb);
set_col_pixel(ix1, iy1 + 1, c2, rr, gg, bb);
yf = yend + grad;
xend = (int)(x2 + .5);
yend = y2 + grad * (xend - x2);
xgap = 1 - modf(x2 - .5, &db);
ix2 = (int)xend;
iy2 = (int)yend;
brightness1 = (1 - modf(yend, &db)) * xgap;
brightness2 = modf(yend, &db) * xgap;
c1 = (unsigned char)(brightness1 * b);
c2 = (unsigned char)(brightness2 * b);
set_col_pixel(ix2, iy2, c1, rr, gg, bb);
set_col_pixel(ix2, iy2 + 1, c2, rr, gg, bb);
for (i = ix1 + 1; i < ix2; i++)
{
brightness1 = (1 - modf(yf, &db));
brightness2 = modf(yf, &db);
c1 = (unsigned char)(brightness1 * b);
c2 = (unsigned char)(brightness2 * b);
set_col_pixel(i, (int)yf, c1, rr, gg, bb);
set_col_pixel(i, (int)yf + 1, c2, rr, gg, bb);
yf = yf + grad;
}
}
else
{
if (y2 < y1)
{
temp = x1;
x1 = x2;
x2 = temp;
temp = y1;
y1 = y2;
y2 = temp;
line_width = (x2 - x1);
line_height = (y2 - y1);
}
/* This is currently broken */
if (fabs(line_height) < 0.1)
{
y2 = y1 + 0.5;
y1 -= 0.5;
grad = 0;
}
else
{
grad = line_width / line_height;
if (line_height < 1)
{
xm = (x1 + x2) / 2;
ym = (y1 + y2) / 2;
x1 = xm - (grad / 2);
x2 = xm + (grad / 2);
y1 = ym - 0.5;
y2 = ym + 0.5;
line_height = 1;
line_width = grad;
}
}
yend = (int)(y1 + 0.5);
xend = x1 + grad * (yend - y1);
ygap = (1 - modf(y1 + 0.5, &db));
ix1 = (int)xend;
iy1 = (int)yend;
brightness1 = (1 - modf(xend, &db)) * ygap;
brightness2 = modf(xend, &db) * ygap;
c1 = (unsigned char)(brightness1 * b);
c2 = (unsigned char)(brightness2 * b);
set_col_pixel(ix1, iy1, c1, rr, gg, bb);
set_col_pixel(ix1 + 1, iy1, c2, rr, gg, bb);
xf = xend + grad;
yend = (int)(y2 + .5);
xend = x2 + grad * (yend - y2);
ygap = 1 - modf(y2 - .5, &db);
ix2 = (int)xend;
iy2 = (int)yend;
brightness1 = (1 - modf(xend, &db)) * ygap;
brightness2 = modf(xend, &db) * ygap;
c1 = (unsigned char)(brightness1 * b);
c2 = (unsigned char)(brightness2 * b);
set_col_pixel(ix2, iy2, c1, rr, gg, bb);
set_col_pixel(ix2 + 1, iy2, c2, rr, gg, bb);
for (i = iy1 + 1; i < iy2; i++)
{
brightness1 = (1 - modf(xf, &db));
brightness2 = modf(xf, &db);
c1 = (unsigned char)(brightness1 * b);
c2 = (unsigned char)(brightness2 * b);
set_col_pixel((int)xf, i, c1, rr, gg, bb);
set_col_pixel((int)(xf + 1), i, c2, rr, gg, bb);
xf += grad;
}
}
}
/* Draw an anti-aliased pixel */
void
aa_pixel(double wx, double wy, unsigned char c, unsigned char rrr,
unsigned char ggg, unsigned char bbb)
{
int x, y;
double fx, fy;
int btl, btr, bbl, bbr;
x = (int)wx;
y = (int)wy;
fx = (double)wx - x;
fy = (double)wy - y;
btl = ((1.0 - fx) * (1.0 - fy)) * c;
btr = ((fx) * (1.0 - fy)) * c;
bbl = ((1.0 - fx) * (fy)) * c;
bbr = (fx * fy) * c;
set_col_pixel(x, y, btl, rrr, ggg, bbb);
set_col_pixel(x + 1, y, btr, rrr, ggg, bbb);
set_col_pixel(x, y + 1, bbl, rrr, ggg, bbb);
set_col_pixel(x + 1, y + 1, bbr, rrr, ggg, bbb);
}
/* Set a pixel, takes a brightness and a colour value */
void
set_col_pixel(int x, int y, unsigned char c, unsigned char rrr,
unsigned char ggg, unsigned char bbb)
{
unsigned char *ptr;
if ((((int)c) == 0) || (x < 0) || (y < 0) || (x > 39) || (y > 39))
return;
ptr = Epplet_get_rgb_pointer(rgbbuf);
ptr += (imlib_image_get_width() * 4 * (y)) + (4 * x);
ptr[0] = ((double)rrr / 255 * (double)c);
ptr[1] = ((double)ggg / 255 * (double)c);
ptr[2] = ((double)bbb / 255 * (double)c);
}
/* Set a pixel, grayscale, takes a brightness value */
/*
static void
set_pixel (int x, int y, unsigned char c)
{
char *ptr;
if ((((int) c) == 0) || (x < 0) || (y < 0) || (x > 39) || (y > 39))
return;
ptr = (rgbbuf)->im->rgb_data + ((rgbbuf)->im->rgb_width * 3 * (y)) + (3 * x);
ptr[0] = ptr[1] = ptr[2] = c;
}
*/
/* Do *not* flame me for doing it this way... */
/* I know !!! */
/* ;-) */
void
draw_text(void)
{
char xpm1[19][172] = {
"............................................................................................................................................................................",
".........+@#............................................#@#.....................................+@..........................................................................",
".........$%@........................&@..................@%@...............................+*....$%..........................................................................",
".........$%@.......................@%@..................@%@...............................%$....$%..........................................................................",
".........$%@.......................@%@..................@%@...............................%$....$%..........................................................................",
".........$%@..+@.....@+...#*$$@...+*%*@.........&$$&#...@%@#*$*#.....#*$$@......#*$$@...#@%=@#..$%..........................................................................",
".........$%@..$%.....%$..@%%%%%-#.$%%%%.......#-%%%%%@..@%$%%%%%@...@%%%%%-#...@%%%%%-#.@%%%%@..$%..........................................................................",
".........$%@..$%.....%$..--+.#$%&.+*%*@.......*%&..&%=..@%%&..&%=..+%-+..&%-..+%-+..&%-.#@%=@#..$%..........................................................................",
".........$%@..$%.....%$..%=....$+..@%@........$%#...&&..@%$....=%..$%+....*%@.$%+....*%@..%$....$%..........................................................................",
".........$%@..$%.....%$..=%=*+.....@%@........&%-$@.....@%@....$%..%=.....#%$.%=.....#%$..%$....@$..........................................................................",
".........$%@..$%.....%$..#-%%%-*#..@%@.........$%%%%$+..@%@....$%..%$......%$.%$......%$..%$....@$..........................................................................",
"....++...$%@..$%.....%$....+*-%%-..@%@..........#&=%%%+.@%@....$%..%$......%$.%$......%$..%$....@$..........................................................................",
"...@%$...$%@..$%....#%$..+#...#$%@.@%@........#+....&%$.@%@....$%..--.....+%*.--.....+%*..%$....@$..........................................................................",
"...+%-...-%#..$%+...&%$.+%$....&%@.@%@........--#...#%$.@%@....$%..*%@....=%+.*%@....=%+..%$................................................................................",
"....-%$@$%=...@%-&@*-%$..=%=@@*%-..@%$@.......&%-&@&-%+.@%@....$%..#-%*@@=%$..#-%*@@=%$...%-@#..&$..........................................................................",
"....#-%%%-#....$%%%-#%$..#=%%%%=#...-%%+.......*%%%%-@..@%@....$%...#=%%%%*....#=%%%%*....*%%*..$%..........................................................................",
"......@@+.......#@@........#@@+......@@#.........@@@..................+@@........+@@.......+@+..............................................................................",
"............................................................................................................................................................................",
"............................................................................................................................................................................"
};
char xpm2[19][172] = {
"............................................................................................................................................................................",
"............................................................................................................................................................................",
"...#@@@@@@@@@@..........................@@#........@@#............................#@@......#@+...............................+@........#@+..................................",
"...@%%%%%%%%%%..........................&%-.......*%=.............................@%%@.....@%$...............................$%........@%$...+*.............................",
"...@%=@@@@@@@@...........................=%$.....@%%#.............................@%%-#....@%$...............................$%........@%$...%$.............................",
"...@%$...................................#-%@...#-%&..............................@%%%*....@%$...............................$%........@%$...%$.............................",
"...@%$....................................@%-#..$%$.....#*$$@....#@#....+@........@%=%%+...@%$....#&$$&......#&$$&......+*$&#$%........@%$.#@%=@#...........................",
"...@%$.....................................$%$.@%-#....@%%%%%-#..@%@....$%........@%$*%-...@%$...@%%%%%-#...@%%%%%-#...&%%%%-=%........@%$.@%%%%@...........................",
"...@%=@@@@@@@#.............................#-%&-%@....+%-+..&%-..@%@....$%........@%$.-%*..@%$..+%-+..&--..+%-+..&--..+%-+.+-%%........@%$.#@%=@#...........................",
"...@%%%%%%%%%@..............................@%%%$.....$%+....*%@.@%@....$%........@%$.+%%#.@%$..$%#....&%@.$%#....&%@.$%#...#%%........@%$...%$.............................",
"...@%=@@@@@@@#...............................$%-#.....%=.....#%$.@%@....$%........@%$..*%=.@%$..-=@@@@@@%*.-=@@@@@@%*.%=.....=%........@%$...%$.............................",
"...@%$................@%%%%%%%%%$............@%$......%$......%$.@%@....$%........@%$..#-%&@%$..%%%%%%%%%$.%%%%%%%%%$.%$.....$%........@%$...%$.............................",
"...@%$................+$$$$$$$$$&............@%$......%$......%$.@%@....$%........@%$...@%%&%$..%=@@@@@@@+.%=@@@@@@@+.%$.....$%........@%$...%$.............................",
"...@%$.......................................@%$......--.....+%*.@%@....=%........@%$....$%-%$..--......+..--......+..--.....-%........@%$...%$.............................",
"...@%$.......................................@%$......*%@....=%+.@%*...#%%........@%$....#-%%$..*%&....&%&.*%&....&%&.*%@...@%%........@%$...%$.............................",
"...@%-$$$$$$$$+..............................@%$......#-%*@@=%$...%%*@&--%........@%$.....&%%$..#-%=@@$%-..#-%=@@$%-..#-%*@*%%%........@%$...%-@#.+$+.......................",
"...@%%%%%%%%%%@..............................@%$.......#=%%%%*....@%%%%@$%........@%$......=%$...#=%%%%=#...#=%%%%=#...#-%%%$$%........@%$...*%%*.@%@.......................",
".........................................................+@@........@@#............................#@@#.......#@@#.......+@+..................+@+...........................",
"............................................................................................................................................................................"
};
char xpm3[19][172] = {
"............................................................................................................................................................................",
"............................................................................................................................................................................",
"...#@@@@@@@@@@............@$$$&#.........................................................@$$$&#....#@#......................................................................",
"...@%%%%%%%%%%..........#-%%%%%%*......................................................#-%%%%%%*...@%@...............................+*.....................................",
"...@%=@@@@@@@@..........-%$#..&-%@.....................................................-%$#..&-%@..@%@...............................%$.....................................",
"...@%$.................+%=.....@%=....................................................+%=.....@%=..@%@...............................%$.....................................",
"...@%$.................@%$......$$....#*$$@...#@.&$&...+*$$+......+*$$+....+@.+$$&#...@%$......$$..@%@#*$*#.....#*$$@......#*$$@...#@%=@#...................................",
"...@%$.................#%%@..........@%%%%%-#.@%$%%%#.$%%%%%$....$%%%%%$...$%*%%%%-#..#%%@.........@%$%%%%%@...@%%%%%-#...@%%%%%-#.@%%%%@...................................",
"...@%=@@@@@@@#..........*%%-*@......+%-+.#$%*.@%%+.@.*%$#.#*%*..*%$#.#*%*..$%-+.#$%&...*%%-*@......@%%&..&%=..+%-+..&%-..+%-+..&%-.#@%=@#...................................",
"...@%%%%%%%%%@...........@=%%%%$+...$%#....-=.@%$....%=.....=%..%=.....=%..$%@...#%$....@=%%%%$+...@%$....=%..$%+....*%@.$%+....*%@..%$.....................................",
"...@%=@@@@@@@#.............#&$%%%@..%=........@%@...+%*@@@@@*%++%*@@@@@*%+.$%.....%$......#&$%%%@..@%@....$%..%=.....#%$.%=.....#%$..%$.....................................",
"...@%$..........%%%%%@.........&%%..%$........@%@...@%%%%%%%%%@@%%%%%%%%%@.$%.....%$..........&%%..@%@....$%..%$......%$.%$......%$..%$.....................................",
"...@%$..........$$$$$+.$$.......=%@.%$........@%@...@%*@@@@@@@#@%*@@@@@@@#.$%.....%$..$$.......=%@.@%@....$%..%$......%$.%$......%$..%$.....................................",
"...@%$.................-%+......$%@.--.....+*#@%@...+%*.....##.+%*.....##..$%.....%$..-%+......$%@.@%@....$%..--.....+%*.--.....+%*..%$.....................................",
"...@%$.................*%-#....#%%..*%@....=%#@%@....-%#....=%#.-%#....=%#.$%.....%$..*%-#....#%%..@%@....$%..*%@....=%+.*%@....=%+..%$.....................................",
"...@%-$$$$$$$$+.........-%-*@@*%%@..#-%*@@=%$.@%@....@%%*@&=%*..@%%*@&=%*..$%.....%$...-%-*@@*%%@..@%@....$%..#-%*@@=%$..#-%*@@=%$...%-@#...................................",
"...@%%%%%%%%%%@.........#*%%%%%-@....#=%%%%*..@%@.....@-%%%%*....@-%%%%*...$%.....%$...#*%%%%%-@...@%@....$%...#=%%%%*....#=%%%%*....*%%*...................................",
"...........................+@@+........+@@#.............+@@........+@@....................+@@+...................+@@........+@@.......+@+...................................",
"............................................................................................................................................................................"
};
char xpm4[19][172] = {
"............................................................................................................................................................................",
"............................................................................................................................................................................",
"............................................................................................................................................................................",
"...&$$$$$$@........................&$...@.......&$$$$$$$$$&.$&........$&............$&.........................................$&........$$$$$$$$$+..+$+....................",
"...$%%%%%%%-#......................$%..*%.......$%%%%%%%%%$.%$........%$............%$.........................................%$........%%%%%%%%%@..@%@....................",
"...$%....#*%-......................$%..$%...........@%@.....%$......................%$.........................................%$........%$..........@%@....................",
"...$%......&%&....&$$&....@+#*$*#..*-.@=%@#.........@%@.....%$#*$*#...@+..@+#*$*#...%$...@@#...................................%$#*$&....%$..........@%@....................",
"...$%.......%$..#-%%%%-#..%=-%%%-#.@$.%%%%@.........@%@.....%=-%%%-#..%$..%=-%%%-#..%$..$%&....................................%=-%%%$...%$..........@%@....................",
"...$%.......$%..=%&..&%=..%%$#.$%*....@=%@#.........@%@.....%%$#.$%*..%$..%%$#.$%*..%$.$%@.....................................%%$##$%&..%=@@@@@@@...@%@....................",
"...$%.......$%.#%$....=%#.%-....%$.....$%...........@%@.....%-....%$..%$..%-....%$..%$$%@......................................%%....%=..%%%%%%%%%...+%@....................",
"...$%.......$%.@%@....@%@.%$....%$.....$%...........@%@.....%$....%$..%$..%$....%$..%%%=.......................................%$....$%..%=@@@@@@@....%.....................",
"...$%.......--.@%@....@%@.%$....%$.....$%...........@%@.....%$....%$..%$..%$....%$..%%$%&......................................%$....$%..%$...........%.....................",
"...$%......#%$.@%&....&%@.%$....%$.....$%...........@%@.....%$....%$..%$..%$....%$..%$.=%#.....................................%$....=%..%$...........%.....................",
"...$%......$%+..%=....-%..%$....%$.....$%...........@%@.....%$....%$..%$..%$....%$..%$.#%=.....................................%%#..#%$..%$...........@.....................",
"...$%@@@@&-%$...*%=@@=%*..%$....%$.....$%&#.........@%@.....%$....%$..%$..%$....%$..%$..&%&..+@...+@...+@...+@...+@...+@.......%%-@&-%+..%=@@@@@@@+..#@#....................",
"...$%%%%%%%*.....*%%%%*...%$....%$.....@%%*.........@%@.....%$....%$..%$..%$....%$..%$...=%#.$%...$%...$%...$%...$%...$%.......%$$%%%@...%%%%%%%%%$..@%@....................",
"...+@@@@@+........#@@#....@+....@+......+@+.........#@#.....@+....@+..@+..@+....@+..@+...#@+.+@...+@...+@...+@...+@...+@.......@+.+@#....@@@@@@@@@+..#@#....................",
"............................................................................................................................................................................",
"............................................................................................................................................................................"
};
char xpm5[19][172] = {
"...#@@@@@@@@@@.............#@#..@+.............+@...........................................................................................................................",
"...@%%%%%%%%%%.............@%@..%$.............$%..........&@................................................................&@.............................................",
"...@%=@@@@@@@@.............@%@..@+.............$%.........@%@...............................................................@%@.............................................",
"...@%$.....................@%@.................$%.........@%@...............................................................@%@.............................................",
"...@%$..........#@##*$*+...@%@..@+....&$$+.@+..$%.+$$&...+*%*@....@$$*#....@+.&$$@....@+.&$*#.#*$*#.....+*$$+....+@.+$$&#..+*%*@............................................",
"...@%$..........@%*%%%%%@..@%@..%$...=%%%%$%$..$%$%%%%-#.$%%%%..#-%%%%%@...%$-%%%%$...%$-%%%-+-%%%-#...$%%%%%$...$%*%%%%-#.$%%%%............................................",
"...@%=@@@@@@@#..@%%&..&%=..@%@..%$..*%$#.&%%$..$%-+.#$%&.+*%*@..-%&..+=%+..%%$#.+-%#..%%$#.$%%$#.$%*..*%$#.#*%*..$%-+.#$%&.+*%*@............................................",
"...@%%%%%%%%%@..@%$....=%..@%@..%$..%=....&%$..$%@...#%$..@%@..@%&....#%$..%%....&%@..%%....%-....%$..%=.....=%..$%@...#%$..@%@.............................................",
"...@%=@@@@@@@#..@%@....$%..@%@..%$.@%&....#%$..$%.....%$..@%@..*%@@@@@@=-..%$....@%@..%$....%$....%$.+%*@@@@@*%+.$%.....%$..@%@.............................................",
"...@%$..........@%@....$%..@%@..%$.@%@.....%$..$%.....%$..@%@..$%%%%%%%%%..%$....@%@..%$....%$....%$.@%%%%%%%%%@.$%.....%$..@%@.............................................",
"...@%$..........@%@....$%..@%@..%$.@%@.....%$..$%.....%$..@%@..$%@@@@@@@@..%$....@%@..%$....%$....%$.@%*@@@@@@@#.$%.....%$..@%@.............................................",
"...@%$..........@%@....$%..@%@..%$.#%*....@%$..$%.....%$..@%@..*%+.....+...%$....@%@..%$....%$....%$.+%*.....##..$%.....%$..@%@.............................................",
"...@%$..........@%@....$%..@%@..%$..=%@..#-%$..$%.....%$..@%@..+%=....#%=..%$....@%@..%$....%$....%$..-%#....=%#.$%.....%$..@%@.............................................",
"...@%-$$$$$$$$+.@%@....$%..@%@..%$..#%%=$%%%$..$%.....%$..@%$@..$%-&@*-%+..%$....@%@..%$....%$....%$..@%%*@&=%*..$%.....%$..@%$@............................................",
"...@%%%%%%%%%%@.@%@....$%..@%@..%$...#$%%=#%$..$%.....%$...-%%+..*%%%%-@...%$....@%@..%$....%$....%$...@-%%%%*...$%.....%$...-%%+...........................................",
"....................................@.....#%*...............@@#....@@+...................................+@@..................@@#...........................................",
"....................................%-....$%@...............................................................................................................................",
"....................................*%-$$-%$................................................................................................................................",
".....................................&=%%-*................................................................................................................................."
};
char xpm6[19][172] = {
"............................................................................................................................................................................",
"............................................................................................................................................................................",
"............................................................................................................................................................................",
"..@#..#.............#..@#........................#..............................#.++.....#@.........@#..........................................#.++.....#@.................",
"..%@.#-............#-..%@.......................@$.............................$@.$$.....@%.........%@.........................................$@.$$.....@%.................",
"..%@.@%............@%..@#.......................$$.............................%@.$$.....#@.........%@.........................................%@.$$.....#@.................",
"..%@#*%@#.#@+.....#*%@#@#.@##@..+@.....@@......+==@..+@#......++#@...@@.......@%*+$$.@+..#@.#@.+@...%@.#@.......+@#..@#...@#..+@#..++#@++...++@%*+$$.@+..#@.#@.+@....#@#++..",
"..%@@%%%@@%%%$....@%%%@%@.%$%%=@%%-..+-%%=.....$%%%.$%%%*.....$=%%++-%%=......%%%$$=-%%&.@%.@%$%%=..%@#-$......=%%-+.=*..+%#.=%%-+.$=%%$%...%&%%%$$=-%%&.@%.@%$%%=..@%%-=$..",
"..%@.@%..%*.@%+....@%..%@.%-#@%=#@%@.-$.#-*.....$$.+%@.@%+....$%+..-$.#-*......%@.$%@.$-.@%.@%$.@%+.%@=-......*-#.$-.*-..*-.*-#.$-.$%+.#%@.@%#.%@.$%@.$-.@%.@%$.@%+.-$.@%$..",
"..%@.@%..%$..+.....@%..%@.%&..%@..%@+%#..@-.....$$.*=...=*....$=..+%#..@-......%@.$=..@%.@%.@%#..%@.%-%#......-&...%+@%#.=$.-&...%+$=...=$.$=..%@.$=..@%.@%.@%#..%@+%#..=$..",
"..%@.@%..@%%$@.....@%..%@.%@..%@..%@@%%%%%%.....$$.$$...$$....$$..@%%%%%%.$$$&.%@.$$..@%.@%.@%...%@.%%%+......%%%%%%@.%&#%@.%%%%%%@$$...&%.%&..%@.$$..@%.@%.@%...%@@%...$$..",
"..%@.@%....@$%&....@%..%@.%@..%@..%@@%@@@@@.....$$.$$...$$....$$..@%@@@@@.$$$&.%@.$$..@%.@%.@%...%@.%&==......%*@@@@#.$$@%..%*@@@@#$$...#%$%#..%@.$$..@%.@%.@%...%@@%...$$..",
"..%@.@%.+-#..$$....@%..%@.%@..%@..%@#%+..*=.....$$.&-...%&....$$..#%+..*=......%@.$$..@%.@%.@%...%@.%@+%+.....=*..+-+.&%$=..=*..+-+$$....=-=...%@.$$..@%.@%.@%...%@#%+..-$..",
"..%@.@%&.-=@&%&....@%&.%@.%@..%@..%@.=-&&%*.....$-+#%$@$%#....$$...=-&&%*......%$#$$..@%.@%.@%...%@.%@.==.....&%*@--..#%-*..&%*@--.$$....*%&...%$#$$..@%.@%.@%...%@.=-@$%$..",
"..%@..=%&+=%%*......=%&%@.%@..%@..%@.#*%%*......+-%#@-%-@.....$$...#*%%*.......&%=$$..@%.@%.@%...%@.%@.+%+.....&-%=#...-%+...&-%=#.$$....@%+...&%=$$..@%.@%.@%...%@.#=%$$$..",
".........................................................................................................................................*-.........................+...$$..",
".........................................................................................................................................-*.........................-*.+%@..",
"........................................................................................................................................%%#.........................@%%%$...",
"............................................................................................................................................................................"
};
static int setup = 0;
static int i = 0, j = 0, y = 0;
unsigned char b = 0;
static int x = 1;
char c;
if (!setup)
{
blank_buf();
setup = 1;
y = (rand() % 14) + 4;
x = rand() % 7;
}
else
{
scroll_buf();
}
if (j > 171)
{
/* Do nothing this time */
;
}
else
{
for (i = y; i < (y + 19); i++)
{
if (x == 1)
c = xpm1[i - y][j];
else if (x == 2)
c = xpm2[i - y][j];
else if (x == 3)
c = xpm3[i - y][j];
else if (x == 4)
c = xpm4[i - y][j];
else if (x == 5)
c = xpm5[i - y][j];
else if (x == 6)
c = xpm6[i - y][j];
else
c = xpm5[i - y][j];
switch (c)
{
case '.':
{
b = 0;
break;
}
case '@':
{
b = 85;
break;
}
case '$':
{
b = 170;
break;
}
case '-':
{
b = 226;
break;
}
case '=':
{
b = 198;
break;
}
case '#':
{
b = 28;
break;
}
case '+':
{
b = 56;
break;
}
case '*':
{
b = 141;
break;
}
case '%':
{
b = 255;
break;
}
case '&':
{
b = 113;
break;
}
}
set_col_pixel(39, i, b, 136, 221, 221);
}
}
++j;
if (j > 190)
{
j = 0;
y = (rand() % 14) + 4;
x = rand() % 7;
}
}
Reference in New Issue View Git Blame Copy Permalink