/************************************************************************/
/* Copy a 100,100 block from upper left corner of the screen            */
/* and move it successively 50 times, two pixels at a time              */
/************************************************************************/

slide_block()
        {
        #define COPY    0
        int     i,j,x,y,color;

        /* First draw interresting background                           */

        clear_screen();
        for (i = 0; i < 25; i++)
                for (j = 0; j < 80; j++)
                        printf("%c",'A'+i);

        /* Here we use BITBLT to copy a block 50 times                  */

        for (i = 0; i < 100; i += 2)    /* Copy next block                      */
                bitblt(0,0, 320+i, 0+i, 100, 100, COPY);
        }