/*              Testprogramm fr Resourcen als C-Quelltext              */

#include <gemfast.h>;

int dx,dy,db,dh;
char str[]="Test";
OBJECT o[]={-1, 1, 1, G_BOX,    NONE, OUTLINED, (char *)0x21100l, 0, 0,400,200,
             0,-1,-1, G_BUTTON, 0x27, NORMAL,   str,             10,20, 80, 16};

main()
{
    appl_init();
    graf_mouse(ARROW,0);

    form_center(o,&dx,&dy,&db,&dh);
    form_dial(FMD_START,dx,dy,db,dh,dx,dy,db,dh);
    objc_draw(o,ROOT,MAX_DEPTH,dx,dy,db,dh);
    form_do(o,-1);
    form_dial(FMD_FINISH,dx,dy,db,dh,dx,dy,db,dh);

    appl_exit();
}
