source: libcaca/trunk/test/demo.c @ 1462

Last change on this file since 1462 was 1462, checked in by Sam Hocevar, 13 years ago
  • Bwarf, typo in the no warranty clause.
  • Property svn:keywords set to Id
File size: 16.3 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 1462 2006-12-12 01:53:54Z 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#include "common.h"
17#if !defined(__KERNEL__)
18#   include <math.h>
19#   include <string.h>
20#   include <stdio.h>
21#endif
22#include "caca.h"
23
24static void display_menu(void);
25
26static void demo_all(void);
27
28static void demo_dots(void);
29static void demo_lines(void);
30static void demo_boxes(void);
31static void demo_ellipses(void);
32static void demo_triangles(void);
33/*static void demo_sprites(void);*/
34static void demo_render(void);
35
36int bounds = 0;
37int outline = 0;
38int dithering = 0;
39#if 0
40cucul_sprite_t *sprite = NULL;
41#endif
42
43cucul_canvas_t *cv;
44caca_display_t *dp;
45
46int 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 'f':
117                case 'F':
118                    demo = demo_all;
119                    break;
120                case '1':
121                    demo = demo_dots;
122                    break;
123                case '2':
124                    demo = demo_lines;
125                    break;
126                case '3':
127                    demo = demo_boxes;
128                    break;
129                case '4':
130                    demo = demo_triangles;
131                    break;
132                case '5':
133                    demo = demo_ellipses;
134                    break;
135#if 0
136                case 's':
137                case 'S':
138                    if(sprite)
139                        demo = demo_sprites;
140                    break;
141#endif
142                case 'r':
143                case 'R':
144                    demo = demo_render;
145                    break;
146                }
147
148                if(demo)
149                {
150                    cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
151                    cucul_clear_canvas(cv);
152                }
153            }
154            else if(ev.type & CACA_EVENT_MOUSE_MOTION)
155            {
156                mouse = 1;
157                xmouse = ev.data.mouse.x;
158                ymouse = ev.data.mouse.y;
159            }
160            else if(ev.type & CACA_EVENT_RESIZE)
161            {
162                mouse = 1; /* old hack */
163            }
164        }
165
166        if(menu || (mouse && !demo))
167        {
168            display_menu();
169            if(mouse && !demo)
170            {
171                cucul_set_color_ansi(cv, CUCUL_RED, CUCUL_BLACK);
172                cucul_put_str(cv, xmouse, ymouse,     ".");
173                cucul_put_str(cv, xmouse, ymouse + 1, "|\\");
174            }
175            caca_refresh_display(dp);
176            mouse = menu = 0;
177        }
178
179        if(demo)
180        {
181            demo();
182
183            cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
184            cucul_draw_thin_box(cv, 1, 1, cucul_get_canvas_width(cv) - 2,
185                                          cucul_get_canvas_height(cv) - 2);
186            cucul_printf(cv, 4, 1, "[%i.%i fps]----",
187                         1000000 / caca_get_display_time(dp),
188                         (10000000 / caca_get_display_time(dp)) % 10);
189            caca_refresh_display(dp);
190        }
191    }
192
193    /* Clean up */
194#if 0
195    cucul_free_sprite(sprite);
196#endif
197    caca_free_display(dp);
198    cucul_free_canvas(cv);
199
200    return 0;
201}
202
203static void display_menu(void)
204{
205    int xo = cucul_get_canvas_width(cv) - 2;
206    int yo = cucul_get_canvas_height(cv) - 2;
207
208    cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
209    cucul_clear_canvas(cv);
210    cucul_draw_thin_box(cv, 1, 1, xo, yo);
211
212    cucul_put_str(cv, (xo - strlen("libcaca demo")) / 2, 3, "libcaca demo");
213    cucul_put_str(cv, (xo - strlen("==============")) / 2, 4, "==============");
214
215    cucul_put_str(cv, 4, 6, "demos:");
216    cucul_put_str(cv, 4, 7, "'f': full");
217    cucul_put_str(cv, 4, 8, "'1': dots");
218    cucul_put_str(cv, 4, 9, "'2': lines");
219    cucul_put_str(cv, 4, 10, "'3': boxes");
220    cucul_put_str(cv, 4, 11, "'4': triangles");
221    cucul_put_str(cv, 4, 12, "'5': ellipses");
222    cucul_put_str(cv, 4, 13, "'c': colour");
223    cucul_put_str(cv, 4, 14, "'r': render");
224#if 0
225    if(sprite)
226        cucul_put_str(cv, 4, 15, "'s': sprites");
227#endif
228
229    cucul_put_str(cv, 4, 16, "settings:");
230    cucul_printf(cv, 4, 17, "'o': outline: %s",
231                 outline == 0 ? "none" : outline == 1 ? "solid" : "thin");
232    cucul_printf(cv, 4, 18, "'b': drawing boundaries: %s",
233                 bounds == 0 ? "screen" : "infinite");
234    //cucul_printf(cv, 4, 19, "'d': dithering (%s)",
235    //             cucul_get_feature_name(dithering));
236
237    cucul_put_str(cv, 4, yo - 2, "'q': quit");
238
239    caca_refresh_display(dp);
240}
241
242static void demo_all(void)
243{
244    static int i = 0;
245
246    int j, xo, yo, xa, ya, xb, yb, xc, yc;
247
248    i++;
249
250    cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
251    cucul_clear_canvas(cv);
252
253    /* Draw the sun */
254    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
255    xo = cucul_get_canvas_width(cv) / 4;
256    yo = cucul_get_canvas_height(cv) / 4 + 5 * sin(0.03*i);
257
258    for(j = 0; j < 16; j++)
259    {
260        xa = xo - (30 + sin(0.03*i) * 8) * sin(0.03*i + M_PI*j/8);
261        ya = yo + (15 + sin(0.03*i) * 4) * cos(0.03*i + M_PI*j/8);
262        cucul_draw_thin_line(cv, xo, yo, xa, ya);
263    }
264
265    j = 15 + sin(0.03*i) * 8;
266    cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLACK);
267    cucul_fill_ellipse(cv, xo, yo, j, j / 2, '#');
268    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
269    cucul_draw_ellipse(cv, xo, yo, j, j / 2, '#');
270
271    /* Draw the pyramid */
272    xo = cucul_get_canvas_width(cv) * 5 / 8;
273    yo = 2;
274
275    xa = cucul_get_canvas_width(cv) / 8 + sin(0.03*i) * 5;
276    ya = cucul_get_canvas_height(cv) / 2 + cos(0.03*i) * 5;
277
278    xb = cucul_get_canvas_width(cv) - 10 - cos(0.02*i) * 10;
279    yb = cucul_get_canvas_height(cv) * 3 / 4 - 5 + sin(0.02*i) * 5;
280
281    xc = cucul_get_canvas_width(cv) / 4 - sin(0.02*i) * 5;
282    yc = cucul_get_canvas_height(cv) * 3 / 4 + cos(0.02*i) * 5;
283
284    cucul_set_color_ansi(cv, CUCUL_GREEN, CUCUL_BLACK);
285    cucul_fill_triangle(cv, xo, yo, xb, yb, xa, ya, '%');
286    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
287    cucul_draw_thin_triangle(cv, xo, yo, xb, yb, xa, ya);
288
289    cucul_set_color_ansi(cv, CUCUL_RED, CUCUL_BLACK);
290    cucul_fill_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
291    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
292    cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
293
294    cucul_set_color_ansi(cv, CUCUL_BLUE, CUCUL_BLACK);
295    cucul_fill_triangle(cv, xo, yo, xb, yb, xc, yc, '%');
296    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
297    cucul_draw_thin_triangle(cv, xo, yo, xb, yb, xc, yc);
298
299    /* Draw a background triangle */
300    xa = 2;
301    ya = 2;
302
303    xb = cucul_get_canvas_width(cv) - 3;
304    yb = cucul_get_canvas_height(cv) / 2;
305
306    xc = cucul_get_canvas_width(cv) / 3;
307    yc = cucul_get_canvas_height(cv) - 3;
308
309    cucul_set_color_ansi(cv, CUCUL_CYAN, CUCUL_BLACK);
310    cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
311
312    xo = cucul_get_canvas_width(cv) / 2 + cos(0.027*i) * cucul_get_canvas_width(cv) / 3;
313    yo = cucul_get_canvas_height(cv) / 2 - sin(0.027*i) * cucul_get_canvas_height(cv) / 2;
314
315    cucul_draw_thin_line(cv, xa, ya, xo, yo);
316    cucul_draw_thin_line(cv, xb, yb, xo, yo);
317    cucul_draw_thin_line(cv, xc, yc, xo, yo);
318
319    /* Draw a sprite on the pyramid */
320#if 0
321    cucul_draw_sprite(cv, xo, yo, sprite, 0);
322#endif
323
324    /* Draw a trail behind the foreground sprite */
325    for(j = i - 60; j < i; j++)
326    {
327        int delta = cucul_rand(-5, 6);
328        cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
329        cucul_put_char(cv, cucul_get_canvas_width(cv) / 2
330                    + cos(0.02*j) * (delta + cucul_get_canvas_width(cv) / 4),
331                   cucul_get_canvas_height(cv) / 2
332                    + sin(0.02*j) * (delta + cucul_get_canvas_height(cv) / 3),
333                   '#');
334    }
335
336    /* Draw foreground sprite */
337#if 0
338    cucul_draw_sprite(cv, cucul_get_canvas_width(cv) / 2 + cos(0.02*i) * cucul_get_canvas_width(cv) / 4,
339                   cucul_get_canvas_height(cv) / 2 + sin(0.02*i) * cucul_get_canvas_height(cv) / 3,
340                   sprite, 0);
341#endif
342}
343
344static void demo_dots(void)
345{
346    int xmax = cucul_get_canvas_width(cv);
347    int ymax = cucul_get_canvas_height(cv);
348    int i;
349    static char chars[10] =
350    {
351        '+', '-', '*', '#', 'X', '@', '%', '$', 'M', 'W'
352    };
353
354    for(i = 1000; i--;)
355    {
356        /* Putpixel */
357        cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
358        cucul_put_char(cv, cucul_rand(0, xmax), cucul_rand(0, ymax),
359                      chars[cucul_rand(0, 9)]);
360    }
361}
362
363static void demo_lines(void)
364{
365    int w = cucul_get_canvas_width(cv);
366    int h = cucul_get_canvas_height(cv);
367    int xa, ya, xb, yb;
368
369    if(bounds)
370    {
371        xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);
372        xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);
373    }
374    else
375    {
376        xa = cucul_rand(0, w); ya = cucul_rand(0, h);
377        xb = cucul_rand(0, w); yb = cucul_rand(0, h);
378    }
379
380    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
381    if(outline > 1)
382        cucul_draw_thin_line(cv, xa, ya, xb, yb);
383    else
384        cucul_draw_line(cv, xa, ya, xb, yb, '#');
385}
386
387static void demo_boxes(void)
388{
389    int w = cucul_get_canvas_width(cv);
390    int h = cucul_get_canvas_height(cv);
391    int xa, ya, xb, yb;
392
393    if(bounds)
394    {
395        xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);
396        xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);
397    }
398    else
399    {
400        xa = cucul_rand(0, w); ya = cucul_rand(0, h);
401        xb = cucul_rand(0, w); yb = cucul_rand(0, h);
402    }
403
404    cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
405    cucul_fill_box(cv, xa, ya, xb, yb, '#');
406
407    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
408    if(outline == 2)
409        cucul_draw_thin_box(cv, xa, ya, xb, yb);
410    else if(outline == 1)
411        cucul_draw_box(cv, xa, ya, xb, yb, '#');
412}
413
414static void demo_ellipses(void)
415{
416    int w = cucul_get_canvas_width(cv);
417    int h = cucul_get_canvas_height(cv);
418    int x, y, a, b;
419
420    if(bounds)
421    {
422        x = cucul_rand(- w, 2 * w); y = cucul_rand(- h, 2 * h);
423        a = cucul_rand(0, w); b = cucul_rand(0, h);
424    }
425    else
426    {
427        do
428        {
429            x = cucul_rand(0, w); y = cucul_rand(0, h);
430            a = cucul_rand(0, w); b = cucul_rand(0, h);
431
432        } while(x - a < 0 || x + a >= w || y - b < 0 || y + b >= h);
433    }
434
435    cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
436    cucul_fill_ellipse(cv, x, y, a, b, '#');
437
438    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
439    if(outline == 2)
440        cucul_draw_thin_ellipse(cv, x, y, a, b);
441    else if(outline == 1)
442        cucul_draw_ellipse(cv, x, y, a, b, '#');
443}
444
445static void demo_triangles(void)
446{
447    int w = cucul_get_canvas_width(cv);
448    int h = cucul_get_canvas_height(cv);
449    int xa, ya, xb, yb, xc, yc;
450
451    if(bounds)
452    {
453        xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);
454        xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);
455        xc = cucul_rand(- w, 2 * w); yc = cucul_rand(- h, 2 * h);
456    }
457    else
458    {
459
460        xa = cucul_rand(0, w); ya = cucul_rand(0, h);
461        xb = cucul_rand(0, w); yb = cucul_rand(0, h);
462        xc = cucul_rand(0, w); yc = cucul_rand(0, h);
463    }
464
465    cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
466    cucul_fill_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
467
468    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
469    if(outline == 2)
470        cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
471    else if(outline == 1)
472        cucul_draw_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
473}
474#if 0
475static void demo_sprites(void)
476{
477
478    cucul_draw_sprite(cv, cucul_rand(0, cucul_get_canvas_width(cv)),
479                      cucul_rand(0, cucul_get_canvas_height(cv)), sprite, 0);
480
481}
482#endif
483#if 0
484static void demo_render(void)
485{
486    cucul_dither_t *dither;
487    //short buffer[256*256];
488    //short *dest = buffer;
489    int buffer[256*256];
490    int *dest = buffer;
491    int x, y, z;
492    static int i = 0;
493
494    i = (i + 1) % 512;
495    z = i < 256 ? i : 511 - i;
496
497    for(x = 0; x < 256; x++)
498        for(y = 0; y < 256; y++)
499    {
500        //*dest++ = ((x >> 3) << 11) | ((y >> 2) << 5) | ((z >> 3));
501        *dest++ = (x << 16) | (y << 8) | (z);
502    }
503    cucul_set_dither_invert(dither, 1);
504    //dither = cucul_create_dither(16, 256, 256, 2 * 256, 0xf800, 0x07e0, 0x001f, 0x0000);
505    dither = cucul_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);
506    cucul_dither_bitmap(cv, 0, 0, cucul_get_canvas_width(cv), cucul_get_canvas_height(cv),
507                     dither, buffer);
508    cucul_free_dither(dither);
509}
510#endif
511
512static void draw_circle(int *buffer, int xo, int yo, int r, int mask, int val);
513
514static void demo_render(void)
515{
516    cucul_dither_t *dither;
517    int buffer[256*256];
518    int *dest;
519    int x, y, z, xo, yo;
520    static int i = 0;
521
522    i++;
523
524    dest = buffer;
525    for(x = 0; x < 256; x++)
526        for(y = 0; y < 256; y++)
527    {
528        *dest++ = 0xff000000;
529    }
530
531    /* red */
532    xo = 128 + 48 * sin(0.02 * i);
533    yo = 128 + 48 * cos(0.03 * i);
534    for(z = 0; z < 240; z++)
535        draw_circle(buffer, xo, yo, z, 0x00ff0000, 200 << 16);
536
537    /* green */
538    xo = 128 + 48 * sin(2 + 0.06 * i);
539    yo = 128 + 48 * cos(2 + 0.05 * i);
540    for(z = 0; z < 240; z++)
541        draw_circle(buffer, xo, yo, z, 0x0000ff00, 200 << 8);
542
543    /* blue */
544    xo = 128 + 48 * sin(1 + 0.04 * i);
545    yo = 128 + 48 * cos(1 + 0.03 * i);
546    for(z = 0; z < 240; z++)
547        draw_circle(buffer, xo, yo, z, 0x000000ff, 200);
548
549    dither = cucul_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);
550 cucul_set_dither_invert(dither, 1);
551    cucul_dither_bitmap(cv, 0, 0, cucul_get_canvas_width(cv), cucul_get_canvas_height(cv), dither, (char *)buffer);
552    cucul_free_dither(dither);
553}
554
555static void draw_circle(int *buffer, int x, int y, int r, int mask, int val)
556{
557    int t, dx, dy;
558
559#define POINT(X,Y) \
560    buffer[(X) + 256 * (Y)] = 0xff000000 | (buffer[(X) + 256 * (Y)] & ~mask) | val;
561
562    for(t = 0, dx = 0, dy = r; dx <= dy; dx++)
563    {
564        POINT(x - dx / 3, y - dy / 3);
565        POINT(x + dx / 3, y - dy / 3);
566        POINT(x - dx / 3, y + dy / 3);
567        POINT(x + dx / 3, y + dy / 3);
568
569        POINT(x - dy / 3, y - dx / 3);
570        POINT(x + dy / 3, y - dx / 3);
571        POINT(x - dy / 3, y + dx / 3);
572        POINT(x + dy / 3, y + dx / 3);
573
574        t += t > 0 ? dx - dy-- : dx;
575    }
576}
577
Note: See TracBrowser for help on using the repository browser.