podwojne buforowanie pomocy !

#include <allegro.h>
#include <ctime>

void init();
int main()
{
   
    float x = 100, y = 100, kx = 0.2, ky = 0.3, x1, y1, v = 2;
    allegro_init();
    install_timer();
    install_mouse();
    install_keyboard();
    set_gfx_mode( GFX_AUTODETECT_WINDOWED, 800, 600, 0, 0 );
    BITMAP * bufor = NULL;
    BITMAP * bmp = NULL;
   
    bufor = create_bitmap( 800, 600 );
    if( !bufor )
    {
        set_gfx_mode( GFX_TEXT, 0, 0, 0, 0 );
        allegro_message( "Nie mogę utworzyć bufora !" );
        allegro_exit();
        return 0;
    }
   
    while( !key[ KEY_ESC ] )
    {
        srand(( time( NULL ) ) );
        circle( bmp, x, y, 40, makecol( 255, 20, 128 ) );
       
        if( x >= 760 )
        {
            kx =- kx;
            kx =-( rand() % 9 + 0.3 ) / 10;
            v =( rand() % 13 + 0.5 ) / 10;
           
        }
       
        if( x <= 40 )
        {
            kx =- kx;
            kx =( rand() % 9 + 0.3 ) / 10;
            v =( rand() % 13 + 0.5 ) / 10;
           
        }
       
        if( y >= 560 )
        {
            ky =- ky;
            ky =-( rand() % 10 + 0.2 ) / 10;
            v =( rand() % 13 + 0.5 ) / 10;
           
        }
       
        if( y <= 40 )
        {
            ky =- ky;
            ky =( rand() % 10 + 0.2 ) / 10;
            v =( rand() % 13 + 0.5 ) / 10;
           
        }
       
       
        x1 = x + kx * v;
        y1 = y + ky * v;
        x = x1;
        y = y1;
       
       
        clear_to_color( bufor, makecol( 0, 0, 0 ) );
        masked_blit( bmp, bufor, 0, 0, x, y, x->w, y->h );
        blit( bufor, screen, 0, 0, 0, 0, 800, 600 );
       
       
       
       
       
    }
    destroy_bitmap( bufor );
    allegro_exit();
    return 0;
}
END_OF_MAIN();