git.sur5r.net Git - cc65/blob - testcode/lib/pce/conio.c

   1
   2 #include <conio.h>
   3 #include <time.h>
   4 #include <joystick.h>
   5 #include <string.h>
   6 #include <stdlib.h>
   7
   8 static int datavar = 10;
   9
  10 void main(void)
  11 {
  12     int stackvar = 42;
  13     int i, j;
  14     clock_t clk;
  15     char *p;
  16
  17     joy_install(&joy_static_stddrv);
  18
  19     clrscr();
  20
  21     cputs("hello world");
  22     cputsxy(0, 2, "colors:" );
  23     for (i = 0; i < 16; ++i) {
  24         textcolor(i);
  25         cputc('X');
  26     }
  27     textcolor(1);
  28
  29     gotoxy(0,4);
  30     cprintf("datavar:  %02x\n\r", datavar);
  31     cprintf("stackvar: %02x\n\r", stackvar);
  32
  33     j = joy_count();
  34     gotoxy(0,10);
  35     cprintf("Found %d Joysticks.", j);
  36
  37     for (i = 0; i < 4; ++i) {
  38         gotoxy(0, 17 + i);
  39         p = malloc(16);
  40         memcpy(p, "01234567890abcdef", 16);
  41         cprintf("alloced at: %04p - %c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c", p,
  42             p[0],p[1],p[2],p[3],p[4],p[5],p[6],p[7],p[8],p[9],p[10],p[11],p[12],p[13],p[14],p[15]
  43         );
  44     }
  45
  46     for(;;)
  47     {
  48         gotoxy(13,4);
  49         cprintf("%02x", datavar);
  50         gotoxy(13,5);
  51         cprintf("%02x", stackvar);
  52         ++datavar; ++stackvar;
  53
  54         gotoxy(0,8);
  55         clk = clock();
  56         cprintf("clock: %08lx", clk);
  57
  58         for (i = 0; i < 4; ++i)
  59         {
  60             gotoxy(0, 12 + i);
  61             j = joy_read (i);
  62             cprintf ("pad %d: %02x %-6s%-6s%-6s%-6s%-6s%-6s",
  63                      i, j,
  64                      (j & joy_masks[JOY_UP])?    "  up  " : " ---- ",
  65                      (j & joy_masks[JOY_DOWN])?  " down " : " ---- ",
  66                      (j & joy_masks[JOY_LEFT])?  " left " : " ---- ",
  67                      (j & joy_masks[JOY_RIGHT])? "right " : " ---- ",
  68                      (j & joy_masks[JOY_FIRE])?  " fire " : " ---- ",
  69                      (j & joy_masks[JOY_FIRE2])? "fire2 " : " ---- ");
  70         }
  71     }
  72     for(;;);
  73 }