source: libcaca/trunk/examples/demo.c @ 3404

Last change on this file since 3404 was 3404, checked in by Sam Hocevar, 11 years ago

Remove occurrences of DATADIR, it conflicts with MinGW's <objidl.h>.
Fixes ticket #51.

  • Property svn:keywords set to Id
File size: 16.2 KB
Line 
1/*
2 *  demo          demo for libcaca
3 *  Copyright (c) 2003 Sam Hocevar <sam@zoy.org>
4 *                All Rights Reserved
5 *
6 *  $Id: demo.c 3404 2009-02-26 10:41:32Z sam $
7 *
8 *  This program is free software. It comes without any warranty, to
9 *  the extent permitted by applicable law. You can redistribute it
10 *  and/or modify it under the terms of the Do What The Fuck You Want
11 *  To Public License, Version 2, as published by Sam Hocevar. See
12 *  http://sam.zoy.org/wtfpl/COPYING for more details.
13 */
14
15#include "config.h"
16
17#if !defined(__KERNEL__)
18#   include <math.h>
19#   include <string.h>
20#   include <stdio.h>
21#endif
22
23#include "caca.h"
24
25static void display_menu(void);
26
27static void demo_all(void);
28
29static void demo_dots(void);
30static void demo_lines(void);
31static void demo_boxes(void);
32static void demo_ellipses(void);
33static void demo_triangles(void);
34/*static void demo_sprites(void);*/
35static void demo_render(void);
36
37int bounds = 0;
38int outline = 0;
39int dithering = 0;
40#if 0
41caca_sprite_t *sprite = NULL;
42#endif
43
44caca_canvas_t *cv;
45caca_display_t *dp;
46
47int main(int argc, char **argv)
48{
49    void (*demo)(void) = NULL;
50    int quit = 0;
51
52    cv = caca_create_canvas(80, 24);
53    if(cv == NULL)
54    {
55        printf("Failed to create canvas\n");
56        return 1;
57    }
58
59    dp = caca_create_display(cv);
60    if(dp == NULL)
61    {
62        printf("Failed to create display\n");
63        return 1;
64    }
65
66    caca_set_display_time(dp, 40000);
67
68    /* Initialize data */
69#if 0
70    sprite = caca_load_sprite("caca.txt");
71    if(!sprite)
72        sprite = caca_load_sprite("examples/caca.txt");
73#endif
74
75    /* Disable cursor */
76    caca_set_mouse(dp, 0);
77
78    /* Main menu */
79    display_menu();
80    caca_refresh_display(dp);
81
82    /* Go ! */
83    while(!quit)
84    {
85        caca_event_t ev;
86        int menu = 0, mouse = 0, xmouse = 0, ymouse = 0;
87
88        while(caca_get_event(dp, CACA_EVENT_ANY, &ev, 0))
89        {
90            if(demo && (caca_get_event_type(&ev) & CACA_EVENT_KEY_PRESS))
91            {
92                menu = 1;
93                demo = NULL;
94            }
95            else if(caca_get_event_type(&ev) & CACA_EVENT_KEY_PRESS)
96            {
97                switch(caca_get_event_key_ch(&ev))
98                {
99                case 'q':
100                case 'Q':
101                case CACA_KEY_ESCAPE:
102                    demo = NULL;
103                    quit = 1;
104                    break;
105                case 'o':
106                case 'O':
107                    outline = (outline + 1) % 3;
108                    display_menu();
109                    break;
110                case 'b':
111                case 'B':
112                    bounds = (bounds + 1) % 2;
113                    display_menu();
114                    break;
115#if 0
116                case 'd':
117                case 'D':
118                    dithering = (dithering + 1) % 5;
119                    caca_set_feature(cv, dithering);
120                    display_menu();
121                    break;
122#endif
123                case 'f':
124                case 'F':
125                    demo = demo_all;
126                    break;
127                case '1':
128                    demo = demo_dots;
129                    break;
130                case '2':
131                    demo = demo_lines;
132                    break;
133                case '3':
134                    demo = demo_boxes;
135                    break;
136                case '4':
137                    demo = demo_triangles;
138                    break;
139                case '5':
140                    demo = demo_ellipses;
141                    break;
142#if 0
143                case 's':
144                case 'S':
145                    if(sprite)
146                        demo = demo_sprites;
147                    break;
148#endif
149                case 'r':
150                case 'R':
151                    demo = demo_render;
152                    break;
153                }
154
155                if(demo)
156                {
157                    caca_set_color_ansi(cv, CACA_LIGHTGRAY, CACA_BLACK);
158                    caca_clear_canvas(cv);
159                }
160            }
161            else if(caca_get_event_type(&ev) & CACA_EVENT_MOUSE_MOTION)
162            {
163                mouse = 1;
164                xmouse = caca_get_event_mouse_x(&ev);
165                ymouse = caca_get_event_mouse_y(&ev);
166            }
167            else if(caca_get_event_type(&ev) & CACA_EVENT_RESIZE)
168            {
169                mouse = 1; /* old hack */
170            }
171        }
172
173        if(menu || (mouse && !demo))
174        {
175            display_menu();
176            if(mouse && !demo)
177            {
178                caca_set_color_ansi(cv, CACA_RED, CACA_BLACK);
179                caca_put_str(cv, xmouse, ymouse,     ".");
180                caca_put_str(cv, xmouse, ymouse + 1, "|\\");
181            }
182            caca_refresh_display(dp);
183            mouse = menu = 0;
184        }
185
186        if(demo)
187        {
188            demo();
189
190            caca_set_color_ansi(cv, CACA_LIGHTGRAY, CACA_BLACK);
191            caca_draw_thin_box(cv, 1, 1, caca_get_canvas_width(cv) - 2,
192                                          caca_get_canvas_height(cv) - 2);
193            caca_printf(cv, 4, 1, "[%i.%i fps]----",
194                         1000000 / caca_get_display_time(dp),
195                         (10000000 / caca_get_display_time(dp)) % 10);
196            caca_refresh_display(dp);
197        }
198    }
199
200    /* Clean up */
201#if 0
202    caca_free_sprite(sprite);
203#endif
204    caca_free_display(dp);
205    caca_free_canvas(cv);
206
207    return 0;
208}
209
210static void display_menu(void)
211{
212    int xo = caca_get_canvas_width(cv) - 2;
213    int yo = caca_get_canvas_height(cv) - 2;
214
215    caca_set_color_ansi(cv, CACA_LIGHTGRAY, CACA_BLACK);
216    caca_clear_canvas(cv);
217    caca_draw_thin_box(cv, 1, 1, xo, yo);
218
219    caca_put_str(cv, (xo - strlen("libcaca demo")) / 2, 3, "libcaca demo");
220    caca_put_str(cv, (xo - strlen("==============")) / 2, 4, "==============");
221
222    caca_put_str(cv, 4, 6, "demos:");
223    caca_put_str(cv, 4, 7, "'f': full");
224    caca_put_str(cv, 4, 8, "'1': dots");
225    caca_put_str(cv, 4, 9, "'2': lines");
226    caca_put_str(cv, 4, 10, "'3': boxes");
227    caca_put_str(cv, 4, 11, "'4': triangles");
228    caca_put_str(cv, 4, 12, "'5': ellipses");
229    caca_put_str(cv, 4, 13, "'c': colour");
230    caca_put_str(cv, 4, 14, "'r': render");
231#if 0
232    if(sprite)
233        caca_put_str(cv, 4, 15, "'s': sprites");
234#endif
235
236    caca_put_str(cv, 4, 16, "settings:");
237    caca_printf(cv, 4, 17, "'o': outline: %s",
238                 outline == 0 ? "none" : outline == 1 ? "solid" : "thin");
239    caca_printf(cv, 4, 18, "'b': drawing boundaries: %s",
240                 bounds == 0 ? "screen" : "infinite");
241    //caca_printf(cv, 4, 19, "'d': dithering (%s)",
242    //             caca_get_feature_name(dithering));
243
244    caca_put_str(cv, 4, yo - 2, "'q': quit");
245
246    caca_refresh_display(dp);
247}
248
249static void demo_all(void)
250{
251    static int i = 0;
252
253    int j, xo, yo, xa, ya, xb, yb, xc, yc;
254
255    i++;
256
257    caca_set_color_ansi(cv, CACA_LIGHTGRAY, CACA_BLACK);
258    caca_clear_canvas(cv);
259
260    /* Draw the sun */
261    caca_set_color_ansi(cv, CACA_YELLOW, CACA_BLACK);
262    xo = caca_get_canvas_width(cv) / 4;
263    yo = caca_get_canvas_height(cv) / 4 + 5 * sin(0.03*i);
264
265    for(j = 0; j < 16; j++)
266    {
267        xa = xo - (30 + sin(0.03*i) * 8) * sin(0.03*i + M_PI*j/8);
268        ya = yo + (15 + sin(0.03*i) * 4) * cos(0.03*i + M_PI*j/8);
269        caca_draw_thin_line(cv, xo, yo, xa, ya);
270    }
271
272    j = 15 + sin(0.03*i) * 8;
273    caca_set_color_ansi(cv, CACA_WHITE, CACA_BLACK);
274    caca_fill_ellipse(cv, xo, yo, j, j / 2, '#');
275    caca_set_color_ansi(cv, CACA_YELLOW, CACA_BLACK);
276    caca_draw_ellipse(cv, xo, yo, j, j / 2, '#');
277
278    /* Draw the pyramid */
279    xo = caca_get_canvas_width(cv) * 5 / 8;
280    yo = 2;
281
282    xa = caca_get_canvas_width(cv) / 8 + sin(0.03*i) * 5;
283    ya = caca_get_canvas_height(cv) / 2 + cos(0.03*i) * 5;
284
285    xb = caca_get_canvas_width(cv) - 10 - cos(0.02*i) * 10;
286    yb = caca_get_canvas_height(cv) * 3 / 4 - 5 + sin(0.02*i) * 5;
287
288    xc = caca_get_canvas_width(cv) / 4 - sin(0.02*i) * 5;
289    yc = caca_get_canvas_height(cv) * 3 / 4 + cos(0.02*i) * 5;
290
291    caca_set_color_ansi(cv, CACA_GREEN, CACA_BLACK);
292    caca_fill_triangle(cv, xo, yo, xb, yb, xa, ya, '%');
293    caca_set_color_ansi(cv, CACA_YELLOW, CACA_BLACK);
294    caca_draw_thin_triangle(cv, xo, yo, xb, yb, xa, ya);
295
296    caca_set_color_ansi(cv, CACA_RED, CACA_BLACK);
297    caca_fill_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
298    caca_set_color_ansi(cv, CACA_YELLOW, CACA_BLACK);
299    caca_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
300
301    caca_set_color_ansi(cv, CACA_BLUE, CACA_BLACK);
302    caca_fill_triangle(cv, xo, yo, xb, yb, xc, yc, '%');
303    caca_set_color_ansi(cv, CACA_YELLOW, CACA_BLACK);
304    caca_draw_thin_triangle(cv, xo, yo, xb, yb, xc, yc);
305
306    /* Draw a background triangle */
307    xa = 2;
308    ya = 2;
309
310    xb = caca_get_canvas_width(cv) - 3;
311    yb = caca_get_canvas_height(cv) / 2;
312
313    xc = caca_get_canvas_width(cv) / 3;
314    yc = caca_get_canvas_height(cv) - 3;
315
316    caca_set_color_ansi(cv, CACA_CYAN, CACA_BLACK);
317    caca_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
318
319    xo = caca_get_canvas_width(cv) / 2 + cos(0.027*i) * caca_get_canvas_width(cv) / 3;
320    yo = caca_get_canvas_height(cv) / 2 - sin(0.027*i) * caca_get_canvas_height(cv) / 2;
321
322    caca_draw_thin_line(cv, xa, ya, xo, yo);
323    caca_draw_thin_line(cv, xb, yb, xo, yo);
324    caca_draw_thin_line(cv, xc, yc, xo, yo);
325
326    /* Draw a sprite on the pyramid */
327#if 0
328    caca_draw_sprite(cv, xo, yo, sprite, 0);
329#endif
330
331    /* Draw a trail behind the foreground sprite */
332    for(j = i - 60; j < i; j++)
333    {
334        int delta = caca_rand(-5, 6);
335        caca_set_color_ansi(cv, caca_rand(0, 16), caca_rand(0, 16));
336        caca_put_char(cv, caca_get_canvas_width(cv) / 2
337                    + cos(0.02*j) * (delta + caca_get_canvas_width(cv) / 4),
338                   caca_get_canvas_height(cv) / 2
339                    + sin(0.02*j) * (delta + caca_get_canvas_height(cv) / 3),
340                   '#');
341    }
342
343    /* Draw foreground sprite */
344#if 0
345    caca_draw_sprite(cv, caca_get_canvas_width(cv) / 2 + cos(0.02*i) * caca_get_canvas_width(cv) / 4,
346                   caca_get_canvas_height(cv) / 2 + sin(0.02*i) * caca_get_canvas_height(cv) / 3,
347                   sprite, 0);
348#endif
349}
350
351static void demo_dots(void)
352{
353    int xmax = caca_get_canvas_width(cv);
354    int ymax = caca_get_canvas_height(cv);
355    int i;
356    static char chars[10] =
357    {
358        '+', '-', '*', '#', 'X', '@', '%', '$', 'M', 'W'
359    };
360
361    for(i = 1000; i--;)
362    {
363        /* Putpixel */
364        caca_set_color_ansi(cv, caca_rand(0, 16), caca_rand(0, 16));
365        caca_put_char(cv, caca_rand(0, xmax), caca_rand(0, ymax),
366                      chars[caca_rand(0, 9)]);
367    }
368}
369
370static void demo_lines(void)
371{
372    int w = caca_get_canvas_width(cv);
373    int h = caca_get_canvas_height(cv);
374    int xa, ya, xb, yb;
375
376    if(bounds)
377    {
378        xa = caca_rand(- w, 2 * w); ya = caca_rand(- h, 2 * h);
379        xb = caca_rand(- w, 2 * w); yb = caca_rand(- h, 2 * h);
380    }
381    else
382    {
383        xa = caca_rand(0, w); ya = caca_rand(0, h);
384        xb = caca_rand(0, w); yb = caca_rand(0, h);
385    }
386
387    caca_set_color_ansi(cv, caca_rand(0, 16), CACA_BLACK);
388    if(outline > 1)
389        caca_draw_thin_line(cv, xa, ya, xb, yb);
390    else
391        caca_draw_line(cv, xa, ya, xb, yb, '#');
392}
393
394static void demo_boxes(void)
395{
396    int w = caca_get_canvas_width(cv);
397    int h = caca_get_canvas_height(cv);
398    int xa, ya, xb, yb;
399
400    if(bounds)
401    {
402        xa = caca_rand(- w, 2 * w); ya = caca_rand(- h, 2 * h);
403        xb = caca_rand(- w, 2 * w); yb = caca_rand(- h, 2 * h);
404    }
405    else
406    {
407        xa = caca_rand(0, w); ya = caca_rand(0, h);
408        xb = caca_rand(0, w); yb = caca_rand(0, h);
409    }
410
411    caca_set_color_ansi(cv, caca_rand(0, 16), caca_rand(0, 16));
412    caca_fill_box(cv, xa, ya, xb, yb, '#');
413
414    caca_set_color_ansi(cv, caca_rand(0, 16), CACA_BLACK);
415    if(outline == 2)
416        caca_draw_thin_box(cv, xa, ya, xb, yb);
417    else if(outline == 1)
418        caca_draw_box(cv, xa, ya, xb, yb, '#');
419}
420
421static void demo_ellipses(void)
422{
423    int w = caca_get_canvas_width(cv);
424    int h = caca_get_canvas_height(cv);
425    int x, y, a, b;
426
427    if(bounds)
428    {
429        x = caca_rand(- w, 2 * w); y = caca_rand(- h, 2 * h);
430        a = caca_rand(0, w); b = caca_rand(0, h);
431    }
432    else
433    {
434        do
435        {
436            x = caca_rand(0, w); y = caca_rand(0, h);
437            a = caca_rand(0, w); b = caca_rand(0, h);
438
439        } while(x - a < 0 || x + a >= w || y - b < 0 || y + b >= h);
440    }
441
442    caca_set_color_ansi(cv, caca_rand(0, 16), caca_rand(0, 16));
443    caca_fill_ellipse(cv, x, y, a, b, '#');
444
445    caca_set_color_ansi(cv, caca_rand(0, 16), CACA_BLACK);
446    if(outline == 2)
447        caca_draw_thin_ellipse(cv, x, y, a, b);
448    else if(outline == 1)
449        caca_draw_ellipse(cv, x, y, a, b, '#');
450}
451
452static void demo_triangles(void)
453{
454    int w = caca_get_canvas_width(cv);
455    int h = caca_get_canvas_height(cv);
456    int xa, ya, xb, yb, xc, yc;
457
458    if(bounds)
459    {
460        xa = caca_rand(- w, 2 * w); ya = caca_rand(- h, 2 * h);
461        xb = caca_rand(- w, 2 * w); yb = caca_rand(- h, 2 * h);
462        xc = caca_rand(- w, 2 * w); yc = caca_rand(- h, 2 * h);
463    }
464    else
465    {
466
467        xa = caca_rand(0, w); ya = caca_rand(0, h);
468        xb = caca_rand(0, w); yb = caca_rand(0, h);
469        xc = caca_rand(0, w); yc = caca_rand(0, h);
470    }
471
472    caca_set_color_ansi(cv, caca_rand(0, 16), caca_rand(0, 16));
473    caca_fill_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
474
475    caca_set_color_ansi(cv, caca_rand(0, 16), CACA_BLACK);
476    if(outline == 2)
477        caca_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
478    else if(outline == 1)
479        caca_draw_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
480}
481#if 0
482static void demo_sprites(void)
483{
484
485    caca_draw_sprite(cv, caca_rand(0, caca_get_canvas_width(cv)),
486                      caca_rand(0, caca_get_canvas_height(cv)), sprite, 0);
487
488}
489#endif
490#if 0
491static void demo_render(void)
492{
493    caca_dither_t *dither;
494    //short buffer[256*256];
495    //short *dest = buffer;
496    int buffer[256*256];
497    int *dest = buffer;
498    int x, y, z;
499    static int i = 0;
500
501    i = (i + 1) % 512;
502    z = i < 256 ? i : 511 - i;
503
504    for(x = 0; x < 256; x++)
505        for(y = 0; y < 256; y++)
506    {
507        //*dest++ = ((x >> 3) << 11) | ((y >> 2) << 5) | ((z >> 3));
508        *dest++ = (x << 16) | (y << 8) | (z);
509    }
510    caca_set_dither_invert(dither, 1);
511    //dither = caca_create_dither(16, 256, 256, 2 * 256, 0xf800, 0x07e0, 0x001f, 0x0000);
512    dither = caca_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);
513    caca_dither_bitmap(cv, 0, 0, caca_get_canvas_width(cv), caca_get_canvas_height(cv),
514                     dither, buffer);
515    caca_free_dither(dither);
516}
517#endif
518
519static void draw_circle(int *buffer, int xo, int yo, int r, int mask, int val);
520
521static void demo_render(void)
522{
523    caca_dither_t *dither;
524    int buffer[256*256];
525    int *dest;
526    int x, y, z, xo, yo;
527    static int i = 0;
528
529    i++;
530
531    dest = buffer;
532    for(x = 0; x < 256; x++)
533        for(y = 0; y < 256; y++)
534    {
535        *dest++ = 0xff000000;
536    }
537
538    /* red */
539    xo = 128 + 48 * sin(0.02 * i);
540    yo = 128 + 48 * cos(0.03 * i);
541    for(z = 0; z < 240; z++)
542        draw_circle(buffer, xo, yo, z, 0x00ff0000, 200 << 16);
543
544    /* green */
545    xo = 128 + 48 * sin(2 + 0.06 * i);
546    yo = 128 + 48 * cos(2 + 0.05 * i);
547    for(z = 0; z < 240; z++)
548        draw_circle(buffer, xo, yo, z, 0x0000ff00, 200 << 8);
549
550    /* blue */
551    xo = 128 + 48 * sin(1 + 0.04 * i);
552    yo = 128 + 48 * cos(1 + 0.03 * i);
553    for(z = 0; z < 240; z++)
554        draw_circle(buffer, xo, yo, z, 0x000000ff, 200);
555
556    dither = caca_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);
557    caca_set_dither_gamma(dither, -1.0);
558    caca_dither_bitmap(cv, 0, 0, caca_get_canvas_width(cv), caca_get_canvas_height(cv), dither, (char *)buffer);
559    caca_free_dither(dither);
560}
561
562static void draw_circle(int *buffer, int x, int y, int r, int mask, int val)
563{
564    int t, dx, dy;
565
566#define POINT(X,Y) \
567    buffer[(X) + 256 * (Y)] = 0xff000000 | (buffer[(X) + 256 * (Y)] & ~mask) | val;
568
569    for(t = 0, dx = 0, dy = r; dx <= dy; dx++)
570    {
571        POINT(x - dx / 3, y - dy / 3);
572        POINT(x + dx / 3, y - dy / 3);
573        POINT(x - dx / 3, y + dy / 3);
574        POINT(x + dx / 3, y + dy / 3);
575
576        POINT(x - dy / 3, y - dx / 3);
577        POINT(x + dy / 3, y - dx / 3);
578        POINT(x - dy / 3, y + dx / 3);
579        POINT(x + dy / 3, y + dx / 3);
580
581        t += t > 0 ? dx - dy-- : dx;
582    }
583}
584
Note: See TracBrowser for help on using the repository browser.