pet-projects/games/allegro-demo/allegro-test.c

   1 #include <allegro.h>
   2
   3 static BITMAP *tux, *gnu, *buffer;
   4
   5 static inline void game_color_depth(void)
   6 {
   7         int depth;
   8
   9         depth = desktop_color_depth();
  10         if (!depth)
  11                 depth = 32;
  12         set_color_depth(depth);
  13 }
  14
  15 static void game_init(void)
  16 {
  17         int ret;
  18
  19         allegro_init();
  20         game_color_depth();
  21
  22         ret = set_gfx_mode(GFX_AUTODETECT_WINDOWED, 640, 480, 0, 0);
  23         if (ret) {
  24                 allegro_message(allegro_error);
  25                 exit(1);
  26         }
  27
  28         install_timer();
  29         install_keyboard();
  30         install_mouse();
  31
  32         /* add other initializations here */
  33         tux = load_bitmap("Tux.bmp", NULL);
  34         if (!tux) {
  35                 allegro_message(allegro_error);
  36                 exit(1);
  37         }
  38
  39         gnu = load_bitmap("gnu.bmp", NULL);
  40         if (!gnu) {
  41                 allegro_message(allegro_error);
  42                 exit(1);
  43         }
  44
  45         buffer = create_bitmap(SCREEN_W, SCREEN_H);
  46         if (!buffer) {
  47                 allegro_message(allegro_error);
  48                 exit(1);
  49         }
  50 }
  51
  52 static void game_deinit(void)
  53 {
  54         clear_keybuf();
  55         /* add other deinitializations here */
  56         //FIXME: free tux, gnu and buffer
  57 }
  58
  59 int main(void)
  60 {
  61         int col = 400;
  62         int lin = 2;
  63
  64         game_init();
  65
  66         while (!key[KEY_ESC]) {
  67
  68                 if (key[KEY_LEFT] && col > 0)
  69                         col--;
  70                 if (key[KEY_RIGHT] && col < (SCREEN_W - tux->w))
  71                         col++;
  72                 if (key[KEY_UP] && lin > 0)
  73                         lin--;
  74                 if (key[KEY_DOWN] && lin < (SCREEN_H - tux->h))
  75                         lin++;
  76
  77                 clear_bitmap(buffer);
  78                 draw_sprite(buffer, tux, col, lin);
  79                 draw_sprite(buffer, gnu, 100, 40);
  80                 draw_sprite(screen, buffer, 0, 0);
  81         }
  82
  83         game_deinit();
  84         return 0;
  85 }
  86 END_OF_MAIN()