cacalabs
/
libcaca
peilaus alkaen https://github.com/cacalabs/libcaca.git
1
0
Fork 0
Koodi Ongelmat 0 Julkaisut 7 Wiki Toiminta
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
922 Commitit
1 Haara
84 MiB
 
 
 
 
 
 
Puu: 142a830571
Branchit Tagit
${ item.name }
Create branch ${ searchTerm }
from '142a830571'
${ noResults }
libcaca/test/demo.c

608 rivejä
18 KiB
Raaka Blame Historia 

  1. /*

  2.  *  demo          demo for libcaca

  3.  *  Copyright (c) 2003 Sam Hocevar <sam@zoy.org>

  4.  *                All Rights Reserved

  5.  *

  6.  *  $Id$

  7.  *

  8.  *  This program is free software; you can redistribute it and/or

  9.  *  modify it under the terms of the Do What The Fuck You Want To

  10.  *  Public License, Version 2, as published by Sam Hocevar. See

  11.  *  http://sam.zoy.org/wtfpl/COPYING for more details.

  12.  */

  13. 

  14. #include "config.h"

  15. #include "common.h"

  16. #if !defined(__KERNEL__)

  17. #   include <math.h>

  18. #   include <string.h>

  19. #   include <stdio.h>

  20. #endif

  21. #include "caca.h"

  22. 

  23. static void display_menu(void);

  24. 

  25. static void demo_all(void);

  26. 

  27. static void demo_color(void);

  28. static void demo_dots(void);

  29. static void demo_lines(void);

  30. static void demo_boxes(void);

  31. static void demo_ellipses(void);

  32. static void demo_triangles(void);

  33. /*static void demo_sprites(void);*/

  34. static void demo_render(void);

  35. 

  36. int bounds = 0;

  37. int outline = 0;

  38. int dithering = 0;

  39. #if 0

  40. cucul_sprite_t *sprite = NULL;

  41. #endif

  42. 

  43. cucul_canvas_t *cv;

  44. caca_display_t *dp;

  45. 

  46. int main(int argc, char **argv)

  47. {

  48.     void (*demo)(void) = NULL;

  49.     int quit = 0;

  50. 

  51.     cv = cucul_create_canvas(0, 0);

  52.     if(!cv)

  53.         return 1;

  54.     dp = caca_create_display(cv);

  55.     if(!dp)

  56.         return 1;

  57. 

  58.     caca_set_display_time(dp, 40000);

  59. 

  60.     /* Initialize data */

  61. #if 0

  62.     sprite = cucul_load_sprite(DATADIR "/caca.txt");

  63.     if(!sprite)

  64.         sprite = cucul_load_sprite("caca.txt");

  65.     if(!sprite)

  66.         sprite = cucul_load_sprite("examples/caca.txt");

  67. #endif

  68. 

  69.     /* Disable cursor */

  70.     caca_set_mouse(dp, 0);

  71. 

  72.     /* Main menu */

  73.     display_menu();

  74.     caca_refresh_display(dp);

  75. 

  76.     /* Go ! */

  77.     while(!quit)

  78.     {

  79.         caca_event_t ev;

  80.         int menu = 0, mouse = 0, xmouse = 0, ymouse = 0;

  81. 

  82.         while(caca_get_event(dp, CACA_EVENT_ANY, &ev, 0))

  83.         {

  84.             if(demo && (ev.type & CACA_EVENT_KEY_PRESS))

  85.             {

  86.                 menu = 1;

  87.                 demo = NULL;

  88.             }

  89.             else if(ev.type & CACA_EVENT_KEY_PRESS)

  90.             {

  91.                 switch(ev.data.key.ch)

  92.                 {

  93.                 case 'q':

  94.                 case 'Q':

  95.                     demo = NULL;

  96.                     quit = 1;

  97.                     break;

  98.                 case 'o':

  99.                 case 'O':

  100.                     outline = (outline + 1) % 3;

  101.                     display_menu();

  102.                     break;

  103.                 case 'b':

  104.                 case 'B':

  105.                     bounds = (bounds + 1) % 2;

  106.                     display_menu();

  107.                     break;

  108. #if 0

  109.                 case 'd':

  110.                 case 'D':

  111.                     dithering = (dithering + 1) % 5;

  112.                     cucul_set_feature(cv, dithering);

  113.                     display_menu();

  114.                     break;

  115. #endif

  116.                 case 'c':

  117.                     demo = demo_color;

  118.                     break;

  119.                 case 'f':

  120.                 case 'F':

  121.                     demo = demo_all;

  122.                     break;

  123.                 case '1':

  124.                     demo = demo_dots;

  125.                     break;

  126.                 case '2':

  127.                     demo = demo_lines;

  128.                     break;

  129.                 case '3':

  130.                     demo = demo_boxes;

  131.                     break;

  132.                 case '4':

  133.                     demo = demo_triangles;

  134.                     break;

  135.                 case '5':

  136.                     demo = demo_ellipses;

  137.                     break;

  138. #if 0

  139.                 case 's':

  140.                 case 'S':

  141.                     if(sprite)

  142.                         demo = demo_sprites;

  143.                     break;

  144. #endif

  145.                 case 'r':

  146.                 case 'R':

  147.                     demo = demo_render;

  148.                     break;

  149.                 }

  150. 

  151.                 if(demo)

  152.                 {

  153.                     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_LIGHTGRAY,

  154.                                                           CUCUL_BLACK));

  155.                     cucul_clear_canvas(cv);

  156.                 }

  157.             }

  158.             else if(ev.type & CACA_EVENT_MOUSE_MOTION)

  159.             {

  160.                 mouse = 1;

  161.                 xmouse = ev.data.mouse.x;

  162.                 ymouse = ev.data.mouse.y;

  163.             }

  164.             else if(ev.type & CACA_EVENT_RESIZE)

  165.             {

  166.                 mouse = 1; /* old hack */

  167.             }

  168.         }

  169. 

  170.         if(menu || (mouse && !demo))

  171.         {

  172.             display_menu();

  173.             if(mouse && !demo)

  174.             {

  175.                 cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_RED, CUCUL_BLACK));

  176.                 cucul_putstr(cv, xmouse, ymouse,     ".");

  177.                 cucul_putstr(cv, xmouse, ymouse + 1, "|\\");

  178.             }

  179.             caca_refresh_display(dp);

  180.             mouse = menu = 0;

  181.         }

  182. 

  183.         if(demo)

  184.         {

  185.             demo();

  186. 

  187.             cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_LIGHTGRAY,

  188.                                                   CUCUL_BLACK));

  189.             cucul_draw_thin_box(cv, 1, 1, cucul_get_canvas_width(cv) - 2,

  190.                                           cucul_get_canvas_height(cv) - 2);

  191.             cucul_printf(cv, 4, 1, "[%i.%i fps]----",

  192.                          1000000 / caca_get_display_time(dp),

  193.                          (10000000 / caca_get_display_time(dp)) % 10);

  194.             caca_refresh_display(dp);

  195.         }

  196.     }

  197. 

  198.     /* Clean up */

  199. #if 0

  200.     cucul_free_sprite(sprite);

  201. #endif

  202.     caca_free_display(dp);

  203.     cucul_free_canvas(cv);

  204. 

  205.     return 0;

  206. }

  207. 

  208. static void display_menu(void)

  209. {

  210.     int xo = cucul_get_canvas_width(cv) - 2;

  211.     int yo = cucul_get_canvas_height(cv) - 2;

  212. 

  213.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_LIGHTGRAY, CUCUL_BLACK));

  214.     cucul_clear_canvas(cv);

  215.     cucul_draw_thin_box(cv, 1, 1, xo, yo);

  216. 

  217.     cucul_putstr(cv, (xo - strlen("libcaca demo")) / 2, 3, "libcaca demo");

  218.     cucul_putstr(cv, (xo - strlen("==============")) / 2, 4, "==============");

  219. 

  220.     cucul_putstr(cv, 4, 6, "demos:");

  221.     cucul_putstr(cv, 4, 7, "'f': full");

  222.     cucul_putstr(cv, 4, 8, "'1': dots");

  223.     cucul_putstr(cv, 4, 9, "'2': lines");

  224.     cucul_putstr(cv, 4, 10, "'3': boxes");

  225.     cucul_putstr(cv, 4, 11, "'4': triangles");

  226.     cucul_putstr(cv, 4, 12, "'5': ellipses");

  227.     cucul_putstr(cv, 4, 13, "'c': colour");

  228.     cucul_putstr(cv, 4, 14, "'r': render");

  229. #if 0

  230.     if(sprite)

  231.         cucul_putstr(cv, 4, 15, "'s': sprites");

  232. #endif

  233. 

  234.     cucul_putstr(cv, 4, 16, "settings:");

  235.     cucul_printf(cv, 4, 17, "'o': outline: %s",

  236.                  outline == 0 ? "none" : outline == 1 ? "solid" : "thin");

  237.     cucul_printf(cv, 4, 18, "'b': drawing boundaries: %s",

  238.                  bounds == 0 ? "screen" : "infinite");

  239.     //cucul_printf(cv, 4, 19, "'d': dithering (%s)",

  240.     //             cucul_get_feature_name(dithering));

  241. 

  242.     cucul_putstr(cv, 4, yo - 2, "'q': quit");

  243. 

  244.     caca_refresh_display(dp);

  245. }

  246. 

  247. static void demo_all(void)

  248. {

  249.     static int i = 0;

  250. 

  251.     int j, xo, yo, xa, ya, xb, yb, xc, yc;

  252. 

  253.     i++;

  254. 

  255.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_LIGHTGRAY, CUCUL_BLACK));

  256.     cucul_clear_canvas(cv);

  257. 

  258.     /* Draw the sun */

  259.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_YELLOW, CUCUL_BLACK));

  260.     xo = cucul_get_canvas_width(cv) / 4;

  261.     yo = cucul_get_canvas_height(cv) / 4 + 5 * sin(0.03*i);

  262. 

  263.     for(j = 0; j < 16; j++)

  264.     {

  265.         xa = xo - (30 + sin(0.03*i) * 8) * sin(0.03*i + M_PI*j/8);

  266.         ya = yo + (15 + sin(0.03*i) * 4) * cos(0.03*i + M_PI*j/8);

  267.         cucul_draw_thin_line(cv, xo, yo, xa, ya);

  268.     }

  269. 

  270.     j = 15 + sin(0.03*i) * 8;

  271.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_WHITE, CUCUL_BLACK));

  272.     cucul_fill_ellipse(cv, xo, yo, j, j / 2, "#");

  273.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_YELLOW, CUCUL_BLACK));

  274.     cucul_draw_ellipse(cv, xo, yo, j, j / 2, "#");

  275. 

  276.     /* Draw the pyramid */

  277.     xo = cucul_get_canvas_width(cv) * 5 / 8;

  278.     yo = 2;

  279. 

  280.     xa = cucul_get_canvas_width(cv) / 8 + sin(0.03*i) * 5;

  281.     ya = cucul_get_canvas_height(cv) / 2 + cos(0.03*i) * 5;

  282. 

  283.     xb = cucul_get_canvas_width(cv) - 10 - cos(0.02*i) * 10;

  284.     yb = cucul_get_canvas_height(cv) * 3 / 4 - 5 + sin(0.02*i) * 5;

  285. 

  286.     xc = cucul_get_canvas_width(cv) / 4 - sin(0.02*i) * 5;

  287.     yc = cucul_get_canvas_height(cv) * 3 / 4 + cos(0.02*i) * 5;

  288. 

  289.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_GREEN, CUCUL_BLACK));

  290.     cucul_fill_triangle(cv, xo, yo, xb, yb, xa, ya, "%");

  291.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_YELLOW, CUCUL_BLACK));

  292.     cucul_draw_thin_triangle(cv, xo, yo, xb, yb, xa, ya);

  293. 

  294.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_RED, CUCUL_BLACK));

  295.     cucul_fill_triangle(cv, xa, ya, xb, yb, xc, yc, "#");

  296.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_YELLOW, CUCUL_BLACK));

  297.     cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);

  298. 

  299.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_BLUE, CUCUL_BLACK));

  300.     cucul_fill_triangle(cv, xo, yo, xb, yb, xc, yc, "%");

  301.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_YELLOW, CUCUL_BLACK));

  302.     cucul_draw_thin_triangle(cv, xo, yo, xb, yb, xc, yc);

  303. 

  304.     /* Draw a background triangle */

  305.     xa = 2;

  306.     ya = 2;

  307. 

  308.     xb = cucul_get_canvas_width(cv) - 3;

  309.     yb = cucul_get_canvas_height(cv) / 2;

  310. 

  311.     xc = cucul_get_canvas_width(cv) / 3;

  312.     yc = cucul_get_canvas_height(cv) - 3;

  313. 

  314.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_CYAN, CUCUL_BLACK));

  315.     cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);

  316. 

  317.     xo = cucul_get_canvas_width(cv) / 2 + cos(0.027*i) * cucul_get_canvas_width(cv) / 3;

  318.     yo = cucul_get_canvas_height(cv) / 2 - sin(0.027*i) * cucul_get_canvas_height(cv) / 2;

  319. 

  320.     cucul_draw_thin_line(cv, xa, ya, xo, yo);

  321.     cucul_draw_thin_line(cv, xb, yb, xo, yo);

  322.     cucul_draw_thin_line(cv, xc, yc, xo, yo);

  323. 

  324.     /* Draw a sprite on the pyramid */

  325. #if 0

  326.     cucul_draw_sprite(cv, xo, yo, sprite, 0);

  327. #endif

  328. 

  329.     /* Draw a trail behind the foreground sprite */

  330.     for(j = i - 60; j < i; j++)

  331.     {

  332.         int delta = cucul_rand(-5, 6);

  333.         cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16),

  334.                                               cucul_rand(0, 16)));

  335.         cucul_putchar(cv, cucul_get_canvas_width(cv) / 2

  336.                     + cos(0.02*j) * (delta + cucul_get_canvas_width(cv) / 4),

  337.                    cucul_get_canvas_height(cv) / 2

  338.                     + sin(0.02*j) * (delta + cucul_get_canvas_height(cv) / 3),

  339.                    '#');

  340.     }

  341. 

  342.     /* Draw foreground sprite */

  343. #if 0

  344.     cucul_draw_sprite(cv, cucul_get_canvas_width(cv) / 2 + cos(0.02*i) * cucul_get_canvas_width(cv) / 4,

  345.                    cucul_get_canvas_height(cv) / 2 + sin(0.02*i) * cucul_get_canvas_height(cv) / 3,

  346.                    sprite, 0);

  347. #endif

  348. }

  349. 

  350. static void demo_dots(void)

  351. {

  352.     int xmax = cucul_get_canvas_width(cv);

  353.     int ymax = cucul_get_canvas_height(cv);

  354.     int i;

  355.     static char chars[10] =

  356.     {

  357.         '+', '-', '*', '#', 'X', '@', '%', '$', 'M', 'W'

  358.     };

  359. 

  360.     for(i = 1000; i--;)

  361.     {

  362.         /* Putpixel */

  363.         cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16),

  364.                                               cucul_rand(0, 16)));

  365.         cucul_putchar(cv, cucul_rand(0, xmax), cucul_rand(0, ymax),

  366.                       chars[cucul_rand(0, 9)]);

  367.     }

  368. }

  369. 

  370. static void demo_color(void)

  371. {

  372.     int i, j;

  373.     char buf[BUFSIZ];

  374. 

  375.     cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_LIGHTGRAY, CUCUL_BLACK));

  376.     cucul_clear_canvas(cv);

  377.     for(i = 0; i < 16; i++)

  378.     {

  379.         sprintf(buf, "'%c': %i (%s)", 'a' + i, i, cucul_get_color_name(i));

  380.         cucul_set_attr(cv, cucul_ansi_to_attr(CUCUL_LIGHTGRAY, CUCUL_BLACK));

  381.         cucul_putstr(cv, 4, i + (i >= 8 ? 4 : 3), buf);

  382.         for(j = 0; j < 16; j++)

  383.         {

  384.             cucul_set_attr(cv, cucul_ansi_to_attr(i, j));

  385.             cucul_putstr(cv, (j >= 8 ? 41 : 40) + j * 2, i + (i >= 8 ? 4 : 3), "# ");

  386.         }

  387.     }

  388. }

  389. 

  390. static void demo_lines(void)

  391. {

  392.     int w = cucul_get_canvas_width(cv);

  393.     int h = cucul_get_canvas_height(cv);

  394.     int xa, ya, xb, yb;

  395. 

  396.     if(bounds)

  397.     {

  398.         xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);

  399.         xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);

  400.     }

  401.     else

  402.     {

  403.         xa = cucul_rand(0, w); ya = cucul_rand(0, h);

  404.         xb = cucul_rand(0, w); yb = cucul_rand(0, h);

  405.     }

  406. 

  407.     cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16), CUCUL_BLACK));

  408.     if(outline > 1)

  409.         cucul_draw_thin_line(cv, xa, ya, xb, yb);

  410.     else

  411.         cucul_draw_line(cv, xa, ya, xb, yb, "#");

  412. }

  413. 

  414. static void demo_boxes(void)

  415. {

  416.     int w = cucul_get_canvas_width(cv);

  417.     int h = cucul_get_canvas_height(cv);

  418.     int xa, ya, xb, yb;

  419. 

  420.     if(bounds)

  421.     {

  422.         xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);

  423.         xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);

  424.     }

  425.     else

  426.     {

  427.         xa = cucul_rand(0, w); ya = cucul_rand(0, h);

  428.         xb = cucul_rand(0, w); yb = cucul_rand(0, h);

  429.     }

  430. 

  431.     cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16),

  432.                                           cucul_rand(0, 16)));

  433.     cucul_fill_box(cv, xa, ya, xb, yb, "#");

  434. 

  435.     cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16), CUCUL_BLACK));

  436.     if(outline == 2)

  437.         cucul_draw_thin_box(cv, xa, ya, xb, yb);

  438.     else if(outline == 1)

  439.         cucul_draw_box(cv, xa, ya, xb, yb, "#");

  440. }

  441. 

  442. static void demo_ellipses(void)

  443. {

  444.     int w = cucul_get_canvas_width(cv);

  445.     int h = cucul_get_canvas_height(cv);

  446.     int x, y, a, b;

  447. 

  448.     if(bounds)

  449.     {

  450.         x = cucul_rand(- w, 2 * w); y = cucul_rand(- h, 2 * h);

  451.         a = cucul_rand(0, w); b = cucul_rand(0, h);

  452.     }

  453.     else

  454.     {

  455.         do

  456.         {

  457.             x = cucul_rand(0, w); y = cucul_rand(0, h);

  458.             a = cucul_rand(0, w); b = cucul_rand(0, h);

  459. 

  460.         } while(x - a < 0 || x + a >= w || y - b < 0 || y + b >= h);

  461.     }

  462. 

  463.     cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16),

  464.                                           cucul_rand(0, 16)));

  465.     cucul_fill_ellipse(cv, x, y, a, b, "#");

  466. 

  467.     cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16), CUCUL_BLACK));

  468.     if(outline == 2)

  469.         cucul_draw_thin_ellipse(cv, x, y, a, b);

  470.     else if(outline == 1)

  471.         cucul_draw_ellipse(cv, x, y, a, b, "#");

  472. }

  473. 

  474. static void demo_triangles(void)

  475. {

  476.     int w = cucul_get_canvas_width(cv);

  477.     int h = cucul_get_canvas_height(cv);

  478.     int xa, ya, xb, yb, xc, yc;

  479. 

  480.     if(bounds)

  481.     {

  482.         xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);

  483.         xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);

  484.         xc = cucul_rand(- w, 2 * w); yc = cucul_rand(- h, 2 * h);

  485.     }

  486.     else

  487.     {

  488. 

  489.         xa = cucul_rand(0, w); ya = cucul_rand(0, h);

  490.         xb = cucul_rand(0, w); yb = cucul_rand(0, h);

  491.         xc = cucul_rand(0, w); yc = cucul_rand(0, h);

  492.     }

  493. 

  494.     cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16),

  495.                                           cucul_rand(0, 16)));

  496.     cucul_fill_triangle(cv, xa, ya, xb, yb, xc, yc, "#");

  497. 

  498.     cucul_set_attr(cv, cucul_ansi_to_attr(cucul_rand(0, 16), CUCUL_BLACK));

  499.     if(outline == 2)

  500.         cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);

  501.     else if(outline == 1)

  502.         cucul_draw_triangle(cv, xa, ya, xb, yb, xc, yc, "#");

  503. }

  504. #if 0

  505. static void demo_sprites(void)

  506. {

  507. 

  508.     cucul_draw_sprite(cv, cucul_rand(0, cucul_get_canvas_width(cv)),

  509.                       cucul_rand(0, cucul_get_canvas_height(cv)), sprite, 0);

  510. 

  511. }

  512. #endif

  513. #if 0

  514. static void demo_render(void)

  515. {

  516.     cucul_dither_t *dither;

  517.     //short buffer[256*256];

  518.     //short *dest = buffer;

  519.     int buffer[256*256];

  520.     int *dest = buffer;

  521.     int x, y, z;

  522.     static int i = 0;

  523. 

  524.     i = (i + 1) % 512;

  525.     z = i < 256 ? i : 511 - i;

  526. 

  527.     for(x = 0; x < 256; x++)

  528.         for(y = 0; y < 256; y++)

  529.     {

  530.         //*dest++ = ((x >> 3) << 11) | ((y >> 2) << 5) | ((z >> 3));

  531.         *dest++ = (x << 16) | (y << 8) | (z);

  532.     }

  533.     cucul_set_dither_invert(dither, 1);

  534.     //dither = cucul_create_dither(16, 256, 256, 2 * 256, 0xf800, 0x07e0, 0x001f, 0x0000);

  535.     dither = cucul_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);

  536.     cucul_dither_bitmap(cv, 0, 0, cucul_get_canvas_width(cv), cucul_get_canvas_height(cv),

  537.                      dither, buffer);

  538.     cucul_free_dither(dither);

  539. }

  540. #endif

  541. 

  542. static void draw_circle(int *buffer, int xo, int yo, int r, int mask, int val);

  543. 

  544. static void demo_render(void)

  545. {

  546.     cucul_dither_t *dither;

  547.     int buffer[256*256];

  548.     int *dest;

  549.     int x, y, z, xo, yo;

  550.     static int i = 0;

  551. 

  552.     i++;

  553. 

  554.     dest = buffer;

  555.     for(x = 0; x < 256; x++)

  556.         for(y = 0; y < 256; y++)

  557.     {

  558.         *dest++ = 0xff000000;

  559.     }

  560. 

  561.     /* red */

  562.     xo = 128 + 48 * sin(0.02 * i);

  563.     yo = 128 + 48 * cos(0.03 * i);

  564.     for(z = 0; z < 240; z++)

  565.         draw_circle(buffer, xo, yo, z, 0x00ff0000, 200 << 16);

  566. 

  567.     /* green */

  568.     xo = 128 + 48 * sin(2 + 0.06 * i);

  569.     yo = 128 + 48 * cos(2 + 0.05 * i);

  570.     for(z = 0; z < 240; z++)

  571.         draw_circle(buffer, xo, yo, z, 0x0000ff00, 200 << 8);

  572. 

  573.     /* blue */

  574.     xo = 128 + 48 * sin(1 + 0.04 * i);

  575.     yo = 128 + 48 * cos(1 + 0.03 * i);

  576.     for(z = 0; z < 240; z++)

  577.         draw_circle(buffer, xo, yo, z, 0x000000ff, 200);

  578. 

  579.     dither = cucul_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);

  580.  cucul_set_dither_invert(dither, 1);

  581.     cucul_dither_bitmap(cv, 0, 0, cucul_get_canvas_width(cv), cucul_get_canvas_height(cv), dither, (char *)buffer);

  582.     cucul_free_dither(dither);

  583. }

  584. 

  585. static void draw_circle(int *buffer, int x, int y, int r, int mask, int val)

  586. {

  587.     int t, dx, dy;

  588. 

  589. #define POINT(X,Y) \

  590.     buffer[(X) + 256 * (Y)] = 0xff000000 | (buffer[(X) + 256 * (Y)] & ~mask) | val;

  591. 

  592.     for(t = 0, dx = 0, dy = r; dx <= dy; dx++)

  593.     {

  594.         POINT(x - dx / 3, y - dy / 3);

  595.         POINT(x + dx / 3, y - dy / 3);

  596.         POINT(x - dx / 3, y + dy / 3);

  597.         POINT(x + dx / 3, y + dy / 3);

  598. 

  599.         POINT(x - dy / 3, y - dx / 3);

  600.         POINT(x + dy / 3, y - dx / 3);

  601.         POINT(x - dy / 3, y + dx / 3);

  602.         POINT(x + dy / 3, y + dx / 3);

  603. 

  604.         t += t > 0 ? dx - dy-- : dx;

  605.     }

  606. }