BlitTest.zs

ffc script blitter{
    void run(){
        int a[5]; //destx, desty, destw, desth, rot
        a[0] = 0; a[1] = 0; a[2] = 256; a[3] = 176; a[4] = 0;
        while(1){
            Screen->SetRenderTarget(2);
            Screen->Rectangle(0, 0, 0, 255, 175, 1, 100, 0, 0, 0, true, 128);
            Screen->Circle(0, 100, 80, 65, 0, 100, 1, 0, 0, 0, true, 128);
            Screen->SetRenderTarget(-1);
            Screen->DrawBitmap( 7, 2, 0, 0, 256, 176, a[0], a[1], a[2], a[3], a[4], true);

            Screen->DrawInteger(7, 0, 0, 2, 0x02, 0x0F, -1, -1, a[0], 0, 128);
            Screen->DrawInteger(7, 0, 18, 2, 0x02, 0x0F, -1, -1, a[1], 0, 128);
            Screen->DrawInteger(7, 0, 36, 2, 0x02, 0x0F, -1, -1, a[2], 0, 128);
            Screen->DrawInteger(7, 0, 54, 2, 0x02, 0x0F, -1, -1, a[3], 0, 128);
            Screen->DrawInteger(7, 0, 70, 2, 0x02, 0x0F, -1, -1, a[4], 0, 128);

            if ( Link->InputUp ) { a[0]++; }
            if ( Link->InputDown ) { a[0]--; }
            if ( Link->InputLeft ) { a[1]--; }
            if ( Link->InputRight ) { a[1]++; }

            if ( Link->InputL ) { a[2]--; }
            if ( Link->InputR ) { a[2]++; }

            if ( Link->InputEx1 ) { a[3]--; }
            if ( Link->InputEx2 ) { a[3]++; }

            if ( Link->InputEx3 ) { a[4]--; }
            if ( Link->InputEx4 ) { a[4]++; }

            Waitframe();
        }
    }
}