pal[0].r = 0;
pal[0].g = 0;
pal[0].b = 0;

#include <dos.h>
#include <stdlib.h>
#include <time.h>
#include "allegro.h" // hlav. soubor. allegra

// virt. obr. pro DB - DOUBLE BUFFERING
BITMAP *backbuffer;
char ss[20];

// zapne allegro a grafiku vcetne backbufferu
// kdyz chyba - konec programu
int init(void)
{
  int result;

  if ( (result = allegro_init() ) != 0 )  // inicializuje allegro
  {

    printf("Nejde Allegro! - %s\n\nZmackni cokoliv.",allegro_error);
    getch();
    return 0;
  }
  // nahodi mod 640 * 480 * 8

  set_color_depth(8);
  if ( (result = set_gfx_mode(GFX_AUTODETECT, 640, 480, 0, 0) ) < 0) {
    set_gfx_mode(GFX_TEXT, 80, 25, 0, 0);
    printf("Nejde grafika! - %s\n\nZmackni cokoliv.",allegro_error);
    getch();
    allegro_exit();
    return 0;
  }
  set_palette(desktop_palette);

  backbuffer = create_bitmap(SCREEN_W, SCREEN_H);
}

// zkopiruje backbuffer na obrazovku
void flip_to_screen(void)
{
  blit(backbuffer, screen, 0, 0, 0, 0, backbuffer->w, backbuffer->h);
}

int main(void)
{
  int i;
  PALETTE pal;

  init();

  // kresli kolecko bez DB
  for (i = 0; i < 640; i+=5) {

    clear(screen);
    circlefill(screen, i, SCREEN_H / 2, 50, makecol(255, 0, 0));
    textout(screen,font,"BEZ DOUBLE BUFFERINGU",i,0,makecol(0, 0, 255));

    delay(40);
  }

  clear(screen);

  // kresli kolecko s DB
  for (i = 0; i < 640; i+=5) {
    clear(backbuffer);
    circlefill(backbuffer, i, SCREEN_H / 2, 50, makecol(255, 0, 0));
    textout(backbuffer,font,"S DOUBLE BUFFERINGEM",i,0,makecol(0, 0, 255));

    flip_to_screen();
    delay(40);
  }


  sprintf(ss, "%d", bitmap_mask_color(backbuffer));

  textout(screen, font, ss , 20, 20, makecol(0, 0, 255));


  getch();
  // uvolni pamet
  destroy_bitmap(backbuffer);

  // mozne i vynechat
  allegro_exit();

  return 0;
}