borgware-2d/animations/mherweg.c

285 lines
6.6 KiB
C

#include "../compat/pgmspace.h"
#include "../random/prng.h"
#include "../config.h"
#include "../pixel.h"
#include "../util.h"
/*
* The following animations were developed by Martin Herweg (hence the name)
* as a personal aid for getting familiar with programming the Borg.
*
* Although these animations are rarely used among Borg owners, we left them in
* because of their simplicity in hopes that a novice Borg developer may find
* them useful.
*/
// macro for simplifying flash memory access
#define PGM(x) pgm_read_byte(&(x))
// use 8 bit operands where feasible
#if NUM_ROWS < 127 && NUM_COLS < 127
typedef signed char operand_t;
#else
typedef int operand_t;
#endif
/**
* An implementation of Bresenham's line drawing algorithm.
* @param p1 first coordinate of the line
* @param p2 second coordinate of the line
* @param color brightness level of the line
*/
static void line(pixel p1,
pixel const p2,
unsigned char const color)
{
operand_t const dx = p1.x < p2.x ? p2.x - p1.x : p1.x - p2.x;
operand_t const sx = p1.x < p2.x ? 1 : -1;
operand_t const dy = p1.y < p2.y ? p2.y - p1.y : p1.y - p2.y;
operand_t const sy = p1.y < p2.y ? 1 : -1;
operand_t error = dx - dy;
while(1)
{
setpixel(p1, color);
if ((p1.x == p2.x) && (p1.y == p2.y))
break;
operand_t const error2 = 2 * error;
if (error2 > -dy)
{
error -= dy;
p1.x += sx;
}
if (error2 < dx)
{
error += dx;
p1.y += sy;
}
}
}
/**
* Draws a rectangle at the given coordinates.
* @param p coordinate of the rectangle's upper right corner
* @param w width of the rectangle
* @param h height of the rectangle
* @param color brightness level of the rectangle
*/
static void filled_rectangle(pixel const p,
unsigned char const w,
unsigned char const h,
unsigned char const color)
{
// emulate the rectangle via consecutive drawn lines
for (unsigned char y = p.y; y < (p.y + h); ++y)
{
line((pixel){p.x, y}, (pixel){p.x + w - 1, y}, color);
}
}
/**
* Draws a checkbox like figure.
*/
static void checkbox()
{
// some parameters regarding appearance and timing
unsigned char const color = NUMPLANE; // brightest color
int const delay = 250, shiftdelay = 30;
// draw a surrounding square
static pixel const square[] = {{0, 0}, {7, 0}, {7, 7}, {0, 7}, {0, 0}};
for (unsigned char i = 0; i < 4; ++i)
{
line(square[i], square[i + 1], color);
wait(delay);
}
// draw two diagonal lines
line ((pixel){7, 7}, (pixel){0, 0}, color);
wait (delay);
line ((pixel){0, 7}, (pixel){7, 0}, color);
wait (delay * 3);
// shift image to the right (shift_pximap_l() really shifts to the right)
for (unsigned char x = NUM_COLS; x--;)
{
shift_pixmap_l();
wait (shiftdelay);
}
}
/**
* Animated lines walking over the screen.
*/
static void movinglines()
{
// some parameters regarding appearance and timing
unsigned char const color = NUMPLANE; // brightest color
unsigned char const blank = 0;
int const delay = 100;
// a line walking to the right
line((pixel){NUM_COLS - 1, NUM_ROWS - 1}, (pixel){NUM_COLS - 1, 0}, color);
for (unsigned char x = 0; x < NUM_COLS; x++)
{
shift_pixmap_l();
wait (delay);
}
// a line walking from the lower to the upper border
for (unsigned char y = NUM_ROWS; y--;)
{
line ((pixel){0, y}, (pixel){NUM_COLS - 1, y}, color);
wait (delay);
line ((pixel){0, y}, (pixel){NUM_COLS - 1, y}, blank);
}
// quickly moving cross hairs
for (unsigned char n = 0; n < 4; n++)
{
for (unsigned char x = 0; x < NUM_COLS - 1; x++)
{
unsigned char y = x % NUM_ROWS;
line ((pixel){0, y}, (pixel){NUM_COLS - 1, y}, color);
line ((pixel){x, 0}, (pixel){x, NUM_ROWS - 1}, color);
wait (delay / 2);
line ((pixel){0, y}, (pixel){NUM_COLS - 1, y}, blank);
line ((pixel){x, 0}, (pixel){x, NUM_ROWS - 1}, blank);
}
}
}
/**
* Draws a gradient colored square.
*/
static void rectangle1()
{
// we want a centered square
unsigned char const xcenter = NUM_COLS / 2, ycenter = NUM_ROWS / 2;
// it should be as big as the borg's height
unsigned char size = NUM_ROWS;
// darkest color as a starting point for the gradient
unsigned char color = 0;
// wait about 500 ms between each frame
int const delay = 500;
// create a gradient by drawing shrinking rectangles on top of each other
clear_screen(0);
for (unsigned char x = 8; x > 0; x--)
{
// draw the rectangle and wait for a moment
filled_rectangle((pixel){(xcenter - x), (ycenter - x)},
size, size, color);
wait (delay);
// iterate through all colors periodically
++color;
color %= (NUMPLANE + 1);
// shrink the dimensions of the succeeding rectangle
size -= 2;
}
wait (delay * 3);
}
/**
* Draws randomly placed rectangles.
*/
static void rectangles()
{
unsigned char const blank = 0;
clear_screen(blank);
for (unsigned char n = 0; n < 60; n++)
{
// randomly chosen position, dimension and color
unsigned char const x = random8() % NUM_COLS;
unsigned char const y = random8() % NUM_ROWS;
unsigned char const h = random8() % NUM_COLS / 2;
unsigned char const w = random8() % NUM_ROWS / 2;
unsigned char const color = random8() % (NUMPLANE + 1);
filled_rectangle((pixel){x, y}, w, h, color);
// wait between 500 and 750 ms
wait (500 + random8());
}
}
/**
* Draws flashing slanted lines.
*/
static void lines1()
{
unsigned char const blank = 0;
clear_screen(blank);
for (unsigned char n = 0; n < 200; n++)
{
// randomly chosen position, dimension and color
unsigned char const x = random8() % NUM_COLS;
unsigned char const y = random8() % NUM_ROWS;
unsigned char const h = random8() % NUM_COLS;
unsigned char const w = random8() % NUM_ROWS;
unsigned char const color = random8() % (NUMPLANE + 1);
line((pixel){x, y}, (pixel){w, h}, color);
wait(random8()); // wait up to 250 ms
line((pixel){x, y}, (pixel){w, h}, blank);
}
}
/**
* Draws randomly placed dots.
*/
static void dots1()
{
// some parameters regarding appearance and timing
int const glimmer_delay = 100;
unsigned char const blank = 0;
clear_screen(blank);
// draw up to 50 dots
for (unsigned char n = 50; n--;)
{
// random coordinates
unsigned char x = random8() % NUM_COLS;
unsigned char y = random8() % NUM_ROWS;
// those dots are glimmering
static unsigned char const color[5] PROGMEM = {1, 2, 3, 2, 1};
for (unsigned char i = 0; i < 5; ++i)
{
setpixel ((pixel){x, y}, PGM(color[i]));
wait(glimmer_delay);
}
// wait up to 2500 ms until the next dot is drawn
wait (random8() * 10);
}
}
/**
* Go through all of Martin's animations.
*/
void mherweg()
{
lines1();
dots1();
movinglines();
checkbox();
rectangle1();
rectangles();
}