opc.c

Go to the documentation of this file.

#include "ctl/ctldef.h"
#ifndef CTL_UNIT



#else /* CTL_UNIT */

#include "unit/unit.h"

#define PIXEL uint8
#include "opc/opc.h"
#include "opc/opctool.h"
#include "opc/opc.temp.h"
#include "opc/opctool.temp.h"
#include "opc/iterator.h"
#include "opc/bmp.h"

/* Displays like a bitmap in a decent visual debugger for watching the output. */

void Test_OPC(void)
{
    PIXEL buff[32][32];
    OPC opc;
    size_t size = OPC_Needs(32,32);
    Rect tmp = {0,0,32,32};
    Test_Error( sizeof(buff) == size );

    OPC_Init( &opc, 0,0, &tmp, buff );

    /* Clear the screen */
    memset(buff,0x20,sizeof(buff));
    OPC_VLine( &opc, 31, 0, 32, '\0' );
    /* Draw a big plus thing */
    OPC_HLine( &opc, 0, 15, 31, '+' );
    OPC_HLine( &opc, -3, 16, 36, '-' );
    OPC_VLine( &opc, 15, 0, 32, '+' );
    OPC_VLine( &opc, 16, -3, 36, '|' );
    OPC_VLine( &opc, 31, 0, 32, '\0' );

    {
        OPC opcshape;
        Rect tmp = {0,0,31,31};
        size_t size;
        OPC_Clip( &opcshape, &opc, &tmp );
        size = OPC_Shape_Calc( &opcshape, 0x20, false );
        {
            /* Make a sprite out of the image */
            void* pBuff = malloc(size);
            OPCShape* shape = OPC_Shape_Create( &opcshape, 0x20, pBuff, false );

            /* Should've been enough room in buffer */
            Test_Error( size >= OPC_Shape_TotalSize( shape ) );

            /* Clear the screen */
            memset(buff,'.',sizeof(buff));
            OPC_VLine( &opc, 31, 0, 32, '\0' );

            /* Test shape and mask */
            OPC_Shape( &opc, shape, 0,0 );
            OPC_Shape_Mask( &opc, shape, 0,0, '*' );

            /* Clear the screen */
            memset(buff,'.',sizeof(buff));
            OPC_VLine( &opc, 31, 0, 32, '\0' );

            /* Test shape and mask, clipping */
            OPC_Shape( &opc, shape, -10,-10 );
            OPC_Shape_Mask( &opc, shape, -10,-10, '*' );
        
            /* Clear the screen */
            memset(buff,'.',sizeof(buff));
            OPC_VLine( &opc, 31, 0, 32, '\0' );

            /* Test shape and mask, clipping */
            OPC_Shape( &opc, shape, 10,10 );
            OPC_VLine( &opc, 31, 0, 32, '\0' );
            OPC_Shape_Mask( &opc, shape, 10,10, '*' );
            OPC_VLine( &opc, 31, 0, 32, '\0' );
        }
    }
    {
        IncLine(test);
        IncLine_Init_Step(test, 0,0, 15,15 );
        while( IncLine_Remains(test) )
        {
            int x, y;
            IncLine_XY(test,x,y)
            Test_Error( x == y );
            IncLine_Step(test);
        }
    }
    {
        IncLine(test);
        IncLine_Init_Step(test, 0,0, 15,15 );
        {
            IncLine_foreach(test, x, y )
                Test_Error( x == y );
        }
    }
    {
        IncLine(test);
        IncLine_Init_Span(test, 0,0, 15,31 );
        Test_Error( IncLine_Spans_Y(test) );
        while( IncLine_Remains(test) )
        {
            int x, y;
            IncLine_XY(test,x,y)
            Test_Error( x*2 == y );
            IncLine_Step(test);
        }
    }
    {
        IncLine(test);
        IncLine_Init_Span(test, 0,0, 15,31 );
        Test_Error( IncLine_Spans_Y(test) );
        {
            IncLine_foreach_spans(test, xs, ys, xe, ye )
            {
                Test_Error( xs*2 == ys );
                Test_Error( xe*2 == ye );
            }
        }
    }
}

#endif /* CTL_UNIT */