source: libcaca/trunk/caca-php/examples/demo.php @ 3244

Last change on this file since 3244 was 3241, checked in by bsittler, 12 years ago

make examples/demo.php executable

  • Property svn:executable set to *
File size: 11.2 KB
RevLine 
[3107]1#!/usr/bin/php5
[3126]2<?php
[3110]3/*
4 *  demo.php      demo for libcaca php binding
5 *  Copyright (c) 2008 Nicolas Vion <nico@yojik.eu>
6 *
7 *  This file is a Php port of the official libcaca's sample program "demo.c"
8 *  which is:
9 *  Copyright (c) 2003 Sam Hocevar <sam@zoy.org>
10 *
11 *  This program is free software. It comes without any warranty, to
12 *  the extent permitted by applicable law. You can redistribute it
13 *  and/or modify it under the terms of the Do What The Fuck You Want
14 *  To Public License, Version 2, as published by Sam Hocevar. See
15 *  http://sam.zoy.org/wtfpl/COPYING for more details.
16 */
[3107]17
[3108]18function main() {
19        $cv = caca_create_canvas(0, 0);
20        if (!$cv) {
21                die("Error while creating canvas\n");
22        }
23
24        $dp = caca_create_display($cv);
25        if (!$dp) {
26                die("Error while attaching canvas to display\n");
27        }
28
29        caca_set_display_time($dp, 40000);
30
[3142]31        /* Disable X cursor */
[3108]32        caca_set_mouse($dp, 0);
33
34        /* Main menu */
[3176]35        $bounds = $outline = $dithering = 0;
36
[3109]37        display_menu($cv, $dp, $bounds, $outline);
[3108]38
39        /* Go ! */
[3140]40        $need_refresh = false;
[3176]41        $quit = 0;
[3108]42        while(!$quit) {
[3142]43                while ($ev = caca_get_event($dp, CACA_EVENT_ANY, 1000)) {
[3140]44                        if (caca_get_event_type($ev) & CACA_EVENT_KEY_PRESS) {
[3108]45                                switch (caca_get_event_key_ch($ev)) {
46                                        case ord('q'):
47                                        case ord('Q'):
48                                        case CACA_KEY_ESCAPE:
49                                                $demo = false;
50                                                $quit = 1;
51                                                break;
52                                        case ord('o'):
53                                        case ord('O'):
54                                                $outline = ($outline + 1) % 3;
[3109]55                                                display_menu($cv, $dp, $bounds, $outline);
[3108]56                                                break;
57                                        case ord('b'):
58                                        case ord('B'):
59                                                $bounds = ($bounds + 1) % 2;
[3109]60                                                display_menu($cv, $dp, $bounds, $outline);
[3108]61                                                break;
62                                        case ord('d'):
63                                        case ord('D'):
64                                                $dithering = ($dithering + 1) % 5;
65                                                caca_set_feature($cv, $dithering);
[3109]66                                                display_menu($cv, $dp, $bounds, $outline);
[3108]67                                                break;
68                                        case ord('f'):
69                                        case ord('F'):
[3140]70                                                demo_go($dp, "demo_all", $cv, $bounds, $outline);
[3108]71                                                break;
72                                        case ord('1'):
[3140]73                                                demo_go($dp, "demo_dots", $cv, $bounds, $outline);
[3108]74                                                break;
75                                        case ord('2'):
[3140]76                                                demo_go($dp, "demo_lines", $cv, $bounds, $outline);
[3108]77                                                break;
78                                        case ord('3'):
[3140]79                                                demo_go($dp, "demo_boxes", $cv, $bounds, $outline);
[3108]80                                                break;
81                                        case ord('4'):
[3140]82                                                demo_go($dp, "demo_triangles", $cv, $bounds, $outline);
[3108]83                                                break;
84                                        case ord('5'):
[3140]85                                                demo_go($dp, "demo_ellipses", $cv, $bounds, $outline);
[3108]86                                                break;
87                                        case ord('s'):
88                                        case ord('S'):
[3140]89                                                demo_go($dp, "demo_sprites", $cv, $bounds, $outline);
[3108]90                                                break;
91                                        case ord('r'):
92                                        case ord('R'):
[3140]93                                                demo_go($dp, "demo_render", $cv, $bounds, $outline);
[3108]94                                                break;
95                                }
96                        }
97                        else if(caca_get_event_type($ev) & CACA_EVENT_MOUSE_MOTION) {
[3140]98                                $x = caca_get_event_mouse_x($ev);
99                                $y = caca_get_event_mouse_y($ev);
100                                display_menu($cv, $dp, $bounds, $outline, false);
101                                caca_set_color_ansi($cv, CACA_RED, CACA_BLACK);
102                                caca_put_str($cv, $x, $y, ".");
103                                caca_put_str($cv, $x, $y + 1, "|\\");
104                                $need_refresh = true;
[3108]105                        }
106                        else if(caca_get_event_type($ev) & CACA_EVENT_RESIZE) {
[3140]107                                display_menu($cv, $dp, $bounds, $outline);
[3108]108                        }
109                }
110
[3140]111                if ($need_refresh) {
[3108]112                        caca_refresh_display($dp);
[3140]113                        $need_refresh = false;
[3108]114                }
[3140]115        }
116}
[3108]117
[3142]118function display_menu($cv, $dp, $bounds, $outline, $refresh = true) {
119        $xo = caca_get_canvas_width($cv) - 2;
120        $yo = caca_get_canvas_height($cv) - 2;
121
122        caca_set_color_ansi($cv, CACA_LIGHTGRAY, CACA_BLACK);
123        caca_clear_canvas($cv);
124        caca_draw_thin_box($cv, 1, 1, $xo, $yo);
125
126        caca_put_str($cv, ($xo - strlen("libcaca demo")) / 2, 3, "libcaca demo");
127        caca_put_str($cv, ($xo - strlen("==============")) / 2, 4, "==============");
128
129        caca_put_str($cv, 4, 6, "demos:");
130        caca_put_str($cv, 4, 7, "'f': full");
131        caca_put_str($cv, 4, 8, "'1': dots");
132        caca_put_str($cv, 4, 9, "'2': lines");
133        caca_put_str($cv, 4, 10, "'3': boxes");
134        caca_put_str($cv, 4, 11, "'4': triangles");
135        caca_put_str($cv, 4, 12, "'5': ellipses");
[3173]136//      caca_put_str($cv, 4, 13, "'c': colour");
137//      caca_put_str($cv, 4, 14, "'r': render");
[3142]138
[3176]139//      caca_put_str($cv, 4, 15, "'s': sprites");
[3142]140
141        caca_put_str($cv, 4, 16, "settings:");
142        caca_put_str($cv, 4, 17, "'o': outline: ".(($outline == 0) ? "none" : (($outline == 1) ? "solid" : "thin")));
143        caca_put_str($cv, 4, 18, "'b': drawing boundaries: ".(($bounds == 0) ? "screen" : "infinite"));
144        caca_put_str($cv, 4, $yo - 2, "'q': quit");
145
146        if ($refresh)
147                caca_refresh_display($dp);
148}
149
[3140]150function demo_go($dp, $demo, $cv, $bounds, $outline) {
151        caca_set_color_ansi($cv, CACA_LIGHTGRAY, CACA_BLACK);
152        caca_clear_canvas($cv);
[3108]153
[3140]154        while (!caca_get_event($dp, CACA_EVENT_KEY_PRESS)) {
155                if (function_exists($demo))
156                        $demo($cv, $bounds, $outline);
157
158                caca_set_color_ansi($cv, CACA_LIGHTGRAY, CACA_BLACK);
159                caca_draw_thin_box($cv, 1, 1, caca_get_canvas_width($cv) - 2, caca_get_canvas_height($cv) - 2);
160                $rate = sprintf("%01.2f", 1000000 / caca_get_display_time($dp));
161                caca_put_str($cv, 4, 1, "[$rate fps]----");
162                caca_refresh_display($dp);
[3108]163        }
[3140]164
165        display_menu($cv, $dp, $bounds, $outline);
166        caca_refresh_display($dp);
[3108]167}
168
[3140]169
170function demo_all($cv, $bounds, $outline) {
[3109]171        global $i;
172
173        $i++;
174
175        caca_set_color_ansi($cv, CACA_LIGHTGRAY, CACA_BLACK);
176        caca_clear_canvas($cv);
177
178        /* Draw the sun */
179        caca_set_color_ansi($cv, CACA_YELLOW, CACA_BLACK);
180        $xo = caca_get_canvas_width($cv) / 4;
181        $yo = caca_get_canvas_height($cv) / 4 + 5 * sin(0.03 * $i);
182
183        for ($j = 0; $j < 16; $j++) {
184                $xa = $xo - (30 + sin(0.03 * $i) * 8) * sin(0.03 * $i + M_PI * $j / 8);
185                $ya = $yo + (15 + sin(0.03 * $i) * 4) * cos(0.03 * $i + M_PI * $j / 8);
186                caca_draw_thin_line($cv, $xo, $yo, $xa, $ya);
187        }
188
189        $j = 15 + sin(0.03 * $i) * 8;
190        caca_set_color_ansi($cv, CACA_WHITE, CACA_BLACK);
[3132]191        caca_fill_ellipse($cv, $xo, $yo, $j, $j / 2, ord('#'));
[3109]192        caca_set_color_ansi($cv, CACA_YELLOW, CACA_BLACK);
[3132]193        caca_draw_ellipse($cv, $xo, $yo, $j, $j / 2, ord('#'));
[3109]194
195        /* Draw the pyramid */
196        $xo = caca_get_canvas_width($cv) * 5 / 8;
197        $yo = 2;
198
199        $xa = caca_get_canvas_width($cv) / 8 + sin(0.03 * $i) * 5;
200        $ya = caca_get_canvas_height($cv) / 2 + cos(0.03 * $i) * 5;
201
202        $xb = caca_get_canvas_width($cv) - 10 - cos(0.02 * $i) * 10;
203        $yb = caca_get_canvas_height($cv) * 3 / 4 - 5 + sin(0.02 * $i) * 5;
204
205        $xc = caca_get_canvas_width($cv) / 4 - sin(0.02 * $i) * 5;
206        $yc = caca_get_canvas_height($cv) * 3 / 4 + cos(0.02 * $i) * 5;
207
208        caca_set_color_ansi($cv, CACA_GREEN, CACA_BLACK);
[3132]209        caca_fill_triangle($cv, $xo, $yo, $xb, $yb, $xa, $ya, ord('%'));
[3109]210        caca_set_color_ansi($cv, CACA_YELLOW, CACA_BLACK);
211        caca_draw_thin_triangle($cv, $xo, $yo, $xb, $yb, $xa, $ya);
212
213        caca_set_color_ansi($cv, CACA_RED, CACA_BLACK);
[3132]214        caca_fill_triangle($cv, $xa, $ya, $xb, $yb, $xc, $yc, ord('#'));
[3109]215        caca_set_color_ansi($cv, CACA_YELLOW, CACA_BLACK);
216        caca_draw_thin_triangle($cv, $xa, $ya, $xb, $yb, $xc, $yc);
217
218        caca_set_color_ansi($cv, CACA_BLUE, CACA_BLACK);
[3132]219        caca_fill_triangle($cv, $xo, $yo, $xb, $yb, $xc, $yc, ord('%'));
[3109]220        caca_set_color_ansi($cv, CACA_YELLOW, CACA_BLACK);
221        caca_draw_thin_triangle($cv, $xo, $yo, $xb, $yb, $xc, $yc);
222
223        /* Draw a background triangle */
224        $xa = 2;
225        $ya = 2;
226
227        $xb = caca_get_canvas_width($cv) - 3;
228        $yb = caca_get_canvas_height($cv) / 2;
229
230        $xc = caca_get_canvas_width($cv) / 3;
231        $yc = caca_get_canvas_height($cv) - 3;
232
233        caca_set_color_ansi($cv, CACA_CYAN, CACA_BLACK);
234        caca_draw_thin_triangle($cv, $xa, $ya, $xb, $yb, $xc, $yc);
235
236        $xo = caca_get_canvas_width($cv) / 2 + cos(0.027 * $i) * caca_get_canvas_width($cv) / 3;
237        $yo = caca_get_canvas_height($cv) / 2 - sin(0.027 * $i) * caca_get_canvas_height($cv) / 2;
238
239        caca_draw_thin_line($cv, $xa, $ya, $xo, $yo);
240        caca_draw_thin_line($cv, $xb, $yb, $xo, $yo);
241        caca_draw_thin_line($cv, $xc, $yc, $xo, $yo);
242
243        /* Draw a trail behind the foreground sprite */
244        for($j = $i - 60; $j < $i; $j++) {
245                $delta = caca_rand(-5, 6);
246                caca_set_color_ansi($cv, caca_rand(0, 16), caca_rand(0, 16));
247                caca_put_char($cv,
248                        caca_get_canvas_width($cv) / 2 + cos(0.02 * $j) * ($delta + caca_get_canvas_width($cv) / 4),
249                        caca_get_canvas_height($cv) / 2 + sin(0.02 * $j) * ($delta + caca_get_canvas_height($cv) / 3),
[3132]250                        ord('#'));
[3109]251        }
252}
253
[3140]254function demo_dots($cv, $bounds, $outline) {
[3108]255        $xmax = caca_get_canvas_width($cv);
256        $ymax = caca_get_canvas_height($cv);
[3107]257
[3108]258        $chars = array('+', '-', '*', '#', 'X', '@', '%', '$', 'M', 'W');
[3107]259
[3108]260        for ($i = 1000; $i--;) {
261                /* Putpixel */
262                caca_set_color_ansi($cv, caca_rand(0, 16), caca_rand(0, 16));
[3132]263                caca_put_char($cv, caca_rand(0, $xmax), caca_rand(0, $ymax), ord($chars[caca_rand(0, 9)]));
[3107]264        }
265}
266
[3140]267function demo_lines($cv, $bounds, $outline) {
[3107]268        $w = caca_get_canvas_width($cv);
269        $h = caca_get_canvas_height($cv);
270
271        if ($bounds) {
272                $xa = caca_rand(- $w, 2 * $w); $ya = caca_rand(- $h, 2 * $h);
273                $xb = caca_rand(- $w, 2 * $w); $yb = caca_rand(- $h, 2 * $h);
274        }
275        else {
276                $xa = caca_rand(0, $w); $ya = caca_rand(0, $h);
277                $xb = caca_rand(0, $w); $yb = caca_rand(0, $h);
278        }
279
280        caca_set_color_ansi($cv, caca_rand(0, 16), CACA_BLACK);
281        if ($outline > 1)
282                caca_draw_thin_line($cv, $xa, $ya, $xb, $yb);
283        else
[3132]284                caca_draw_line($cv, $xa, $ya, $xb, $yb, ord('#'));
[3107]285}
286
[3140]287function demo_boxes($cv, $bounds, $outline) {
[3108]288        $w = caca_get_canvas_width($cv);
289        $h = caca_get_canvas_height($cv);
[3107]290
[3108]291        if ($bounds) {
292                $xa = caca_rand(- $w, 2 * $w); $ya = caca_rand(- $h, 2 * $h);
293                $xb = caca_rand(- $w, 2 * $w); $yb = caca_rand(- $h, 2 * $h);
294        }
295        else {
296                $xa = caca_rand(0, $w); $ya = caca_rand(0, $h);
297                $xb = caca_rand(0, $w); $yb = caca_rand(0, $h);
298        }
299
300        caca_set_color_ansi($cv, caca_rand(0, 16), caca_rand(0, 16));
[3132]301        caca_fill_box($cv, $xa, $ya, $xb, $yb, ord('#'));
[3108]302
303        caca_set_color_ansi($cv, caca_rand(0, 16), CACA_BLACK);
304        if($outline == 2)
305                caca_draw_thin_box($cv, $xa, $ya, $xb, $yb);
306        else if($outline == 1)
[3132]307                caca_draw_box($cv, $xa, $ya, $xb, $yb, ord('#'));
[3108]308}
309
[3140]310function demo_ellipses($cv, $bounds, $outline) {
[3108]311        $w = caca_get_canvas_width($cv);
312        $h = caca_get_canvas_height($cv);
313
314        if ($bounds) {
315                $x = caca_rand(- $w, 2 * $w); $y = caca_rand(- $h, 2 * $h);
316                $a = caca_rand(0, $w); $b = caca_rand(0, $h);
317        }
318        else {
319                do {
320                        $x = caca_rand(0, $w); $y = caca_rand(0, $h);
321                        $a = caca_rand(0, $w); $b = caca_rand(0, $h);
322                } while ($x - $a < 0 || $x + $a >= $w || $y - $b < 0 || $y + $b >= $h);
323        }
324
325        caca_set_color_ansi($cv, caca_rand(0, 16), caca_rand(0, 16));
[3132]326        caca_fill_ellipse($cv, $x, $y, $a, $b, ord('#'));
[3108]327
328        caca_set_color_ansi($cv, caca_rand(0, 16), CACA_BLACK);
329        if ($outline == 2)
330                caca_draw_thin_ellipse($cv, $x, $y, $a, $b);
331        else if ($outline == 1)
[3132]332                caca_draw_ellipse($cv, $x, $y, $a, $b, ord('#'));
[3108]333}
334
[3140]335function demo_triangles($cv, $bounds, $outline) {
[3109]336        $w = caca_get_canvas_width($cv);
337        $h = caca_get_canvas_height($cv);
[3108]338
[3109]339        if ($bounds) {
340                $xa = caca_rand(- $w, 2 * $w); $ya = caca_rand(- $h, 2 * $h);
341                $xb = caca_rand(- $w, 2 * $w); $yb = caca_rand(- $h, 2 * $h);
342                $xc = caca_rand(- $w, 2 * $w); $yc = caca_rand(- $h, 2 * $h);
343        }
344        else {
345                $xa = caca_rand(0, $w); $ya = caca_rand(0, $h);
346                $xb = caca_rand(0, $w); $yb = caca_rand(0, $h);
347                $xc = caca_rand(0, $w); $yc = caca_rand(0, $h);
348        }
[3108]349
[3109]350        caca_set_color_ansi($cv, caca_rand(0, 16), caca_rand(0, 16));
[3132]351        caca_fill_triangle($cv, $xa, $ya, $xb, $yb, $xc, $yc, ord('#'));
[3109]352
353        caca_set_color_ansi($cv, caca_rand(0, 16), CACA_BLACK);
354        if ($outline == 2)
355                caca_draw_thin_triangle($cv, $xa, $ya, $xb, $yb, $xc, $yc);
356        else if ($outline == 1)
[3132]357                caca_draw_triangle($cv, $xa, $ya, $xb, $yb, $xc, $yc, ord('#'));
[3109]358}
359
[3140]360function demo_render($cv, $bounds, $outline) {
[3127]361}
[3109]362
[3175]363
[3177]364if (php_sapi_name() != "cli") {
[3175]365        die("You have to run this program with php-cli!\n");
[3177]366}
[3175]367
[3141]368main();
[3109]369
[3141]370?>
Note: See TracBrowser for help on using the repository browser.