Ignore:
Timestamp:
Nov 3, 2008, 11:18:27 PM (15 years ago)
Author:
bsittler
Message:

now works as PHP

File:
1 edited

Legend:

Unmodified
Added
Removed
  • libcaca/trunk/caca-php/examples/fullwidth.php

    • Property svn:executable set to *
    r3255 r3256  
     1#!/usr/bin/php5
     2<?php
    13/*
    24 *  fullwidth     libcaca fullwidth Unicode characters test program
     
    1315 */
    1416
    15 #include "config.h"
     17define('CACA', "쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊");
    1618
    17 #if !defined(__KERNEL__)
    18 #   include <stdio.h>
    19 #endif
    20 
    21 #include "caca.h"
    22 
    23 #define CACA "쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊쫊"
    24 
    25 int main(int argc, char *argv[])
     19$cv = caca_create_canvas(0, 0);
     20if(! $cv)
    2621{
    27     caca_canvas_t *cv, *caca, *line;
    28     caca_display_t *dp;
    29 
    30     unsigned int i;
    31 
    32     cv = caca_create_canvas(0, 0);
    33     if(cv == NULL)
    34     {
    35         printf("Can't created canvas\n");
    36         return -1;
    37     }
    38     dp = caca_create_display(cv);
    39     if(dp == NULL)
    40     {
    41         printf("Can't create display\n");
    42         return -1;
    43     }
    44 
    45     caca = caca_create_canvas(6, 10);
    46     line = caca_create_canvas(2, 1);
    47 
    48     /* Line of x's */
    49     for(i = 0; i < 10; i++)
    50     {
    51         caca_set_color_ansi(caca, CACA_WHITE, CACA_BLUE);
    52         caca_put_str(caca, 0, i, CACA);
    53         caca_set_color_ansi(caca, CACA_WHITE, CACA_RED);
    54         caca_put_char(caca, i - 2, i, 'x');
    55     }
    56 
    57     caca_blit(cv, 1, 1, caca, NULL);
    58 
    59     /* Line of ホ's */
    60     for(i = 0; i < 10; i++)
    61     {
    62         caca_set_color_ansi(caca, CACA_WHITE, CACA_BLUE);
    63         caca_put_str(caca, 0, i, CACA);
    64         caca_set_color_ansi(caca, CACA_WHITE, CACA_GREEN);
    65         caca_put_str(caca, i - 2, i, "ホ");
    66     }
    67 
    68     caca_blit(cv, 15, 1, caca, NULL);
    69 
    70     /* Line of canvas */
    71     caca_set_color_ansi(line, CACA_WHITE, CACA_MAGENTA);
    72     caca_put_str(line, 0, 0, "ほ");
    73     for(i = 0; i < 10; i++)
    74     {
    75         caca_set_color_ansi(caca, CACA_WHITE, CACA_BLUE);
    76         caca_put_str(caca, 0, i, CACA);
    77         caca_blit(caca, i - 2, i, line, NULL);
    78     }
    79 
    80     caca_blit(cv, 29, 1, caca, NULL);
    81 
    82     caca_refresh_display(dp);
    83 
    84     caca_get_event(dp, CACA_EVENT_KEY_PRESS, NULL, -1);
    85 
    86     caca_free_display(dp);
    87 
    88     caca_free_canvas(line);
    89     caca_free_canvas(caca);
    90     caca_free_canvas(cv);
    91 
    92     return 0;
     22        die("Can't created canvas\n");
     23}
     24$dp = caca_create_display($cv);
     25if(! $dp)
     26{
     27        die("Can't create display\n");
    9328}
    9429
     30$caca = caca_create_canvas(6, 10);
     31$line = caca_create_canvas(2, 1);
     32
     33/* Line of x's */
     34for($i = 0; $i < 10; $i++)
     35{
     36        caca_set_color_ansi($caca, CACA_WHITE, CACA_BLUE);
     37        caca_put_str($caca, 0, $i, CACA);
     38        caca_set_color_ansi($caca, CACA_WHITE, CACA_RED);
     39        caca_put_char($caca, $i - 2, $i, ord('x'));
     40}
     41
     42caca_blit($cv, 1, 1, $caca);
     43
     44/* Line of ホ's */
     45for($i = 0; $i < 10; $i++)
     46{
     47        caca_set_color_ansi($caca, CACA_WHITE, CACA_BLUE);
     48        caca_put_str($caca, 0, $i, CACA);
     49        caca_set_color_ansi($caca, CACA_WHITE, CACA_GREEN);
     50        caca_put_str($caca, $i - 2, $i, "ホ");
     51}
     52
     53caca_blit($cv, 15, 1, $caca);
     54
     55/* Line of canvas */
     56caca_set_color_ansi($line, CACA_WHITE, CACA_MAGENTA);
     57caca_put_str($line, 0, 0, "ほ");
     58for($i = 0; $i < 10; $i++)
     59{
     60        caca_set_color_ansi($caca, CACA_WHITE, CACA_BLUE);
     61        caca_put_str($caca, 0, $i, CACA);
     62        caca_blit($caca, $i - 2, $i, $line);
     63}
     64
     65caca_blit($cv, 29, 1, $caca);
     66
     67caca_refresh_display($dp);
     68
     69caca_get_event($dp, CACA_EVENT_KEY_PRESS, -1);
     70
     71?>
Note: See TracChangeset for help on using the changeset viewer.