Most amikor ez a nagyon is szép és fontos ünnep egy horrorrá változott fontos meglátni a töredék szépségeket, és feltételezni, hogy nem mindenki hülyült meg. Ezt a kis programot egy fiatal gimnazista alkotta meg. A lefordításához szükségesek az allegro libjei, debian alapú rendszereknél: „apt-get install liballegro4.2-dev”.
A forrás:
/*
* Kokárda - az expal.c (Allegro csomag, http://allegro.cc) átirata.
* (c) 2007 Martinek Vilmos <m2marvil@radnoti-szeged.sulinet.hu>
* Fordítás: gcc -o kokarda kokarda.c `allegro-config --libs`
* Közreadja: Kovács Zoltán <kovzol@gmail.com>, Vilmos tanára
*/
#include <allegro.h>
int main(void)
{
PALETTE palette;
RGB temp;
int c;
if (allegro_init() != 0)
return 1;
install_keyboard();
if (set_gfx_mode(GFX_AUTODETECT, 800, 600, 0, 0) != 0) {
if (set_gfx_mode(GFX_AUTODETECT, 800, 600, 0, 0) != 0) {
allegro_message("Hiba: %s\n", allegro_error);
return 1;
}
}
set_palette(black_palette);
acquire_screen();
for (c=255; c>0; c--)
circlefill(screen, SCREEN_W/2, SCREEN_H/2, c, c);
release_screen();
install_mouse();
show_mouse(screen);
for (c=0; c<85; c++) {
palette[c].r = 255;
palette[c].g = 0;
palette[c].b = 0;
}
for (c=86; c<171; c++) {
palette[c].r = 0;
palette[c].g = 255;
palette[c].b = 0;
}
for (c=172; c<256; c++) {
palette[c].r = 255;
palette[c].g = 255;
palette[c].b = 255;
}
while (!keypressed()) {
temp = palette[255];
for (c=255; c>0; c--)
palette[c] = palette[c-1];
palette[0] = temp;
set_palette(palette);
}
return 0;
}
END_OF_MAIN()
Ezúton is szeretnék békés és boldog megemlékezést és kellemes hosszú hétvégét kívánni mindenkinek, és emlékezni nagyapámra, aki ma három éve tért örök nyugalomra!
ámen