#include <stdio.h>
#define MWINCLUDECOLORS
#include "microwin/nano-X.h"

GR_WINDOW_ID  wid;
GR_GC_ID      gc;
GR_FONT_ID    font[9];
int j = 0;

void event_handler (GR_EVENT *event);

int main (void)
{
    int degree, fontsize;
	
	fontsize = 12;
	if (GrOpen() < 0)
    {
        fprintf (stderr, "GrOpen failed");
        exit (1);
    }

    gc = GrNewGC();
    GrSetGCUseBackground (gc, GR_FALSE);
    GrSetGCForeground (gc, RED);
 
    wid = GrNewWindowEx (GR_WM_PROPS_APPFRAME |
                         GR_WM_PROPS_CAPTION  |
                         GR_WM_PROPS_CLOSEBOX,
                         "Font Test Window",
                         GR_ROOT_WINDOW_ID, 50, 50, 
                         500, 500, WHITE);

    GrSelectEvents (wid, GR_EVENT_MASK_EXPOSURE | 
                         GR_EVENT_MASK_CLOSE_REQ);

    
	degree = 0;
	for (j=0;j<9 ;j++ )
	{
		fontsize += 3;
		font[j] = GrCreateFont ("arial", fontsize, NULL);
		degree -= 400;
		GrSetFontRotation(font[j],degree);
	}
	
    GrMapWindow (wid);
    GrMainLoop (event_handler);
    return 0;
}

void event_handler (GR_EVENT *event)
{
    switch (event->type)
    {
    case GR_EVENT_TYPE_EXPOSURE:
		for(j = 0;j<9;j++)
		{
			GrSetFontAttr(font[j], GR_TFANTIALIAS, 0);
			GrSetGCFont (gc, font[j]);
			GrText (wid, gc, 200, 250, "     Nano-X API",  -1, GR_TFASCII);
        }
        break;

    case GR_EVENT_TYPE_CLOSE_REQ:
        GrClose();
        exit (0);
    }
}