//

#include <type.h>
#include <nexus.h>
#include <memmgr.h>
#include <pref.h>

const char  AppName[] = "Test";     // application's name
const DWord AppCreator = 'JAMS';         // must be unique
const DWord AppVersion = '1.0';        // version of application

#define  WITH_ALIGNMENT(X)	__attribute__ (( aligned (X) ))
#define  WITH_BITMAP_ATTRS	WITH_ALIGNMENT (sizeof (unsigned short))

// Icone dell'applicazione
const Byte AppIconBmpUp[] WITH_BITMAP_ATTRS = {
	0x00, 0x30, 0x00, 0x28, 0x00, 0x06, 0x00, 0x00,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x3F, 0xFF,
	0xFF, 0xFE, 0x00, 0x00, 0x3E, 0x00, 0x00, 0x02,
	0x00, 0x00, 0x28, 0x00, 0x00, 0x02, 0x01, 0xC0,
	0x28, 0x00, 0x00, 0x02, 0x01, 0xC0, 0x2D, 0xFF,
	0xFF, 0xE2, 0x01, 0xC0, 0x3F, 0x11, 0xFC, 0x22,
	0x01, 0xC0, 0x21, 0x79, 0xC4, 0x62, 0x01, 0xC0,
	0x21, 0x7D, 0x2E, 0x62, 0x01, 0xC0, 0x2F, 0xFD,
	0x06, 0x62, 0x01, 0xC0, 0x2F, 0xED, 0x16, 0x62,
	0x01, 0xC0, 0x21, 0x11, 0x07, 0x62, 0x01, 0xC0,
	0x21, 0x02, 0x0F, 0x62, 0x09, 0xC0, 0x21, 0x1F,
	0xF7, 0xE2, 0x1F, 0x80, 0x21, 0x77, 0xFF, 0xE2,
	0x0F, 0x00, 0x21, 0x7F, 0x1D, 0xE2, 0x00, 0x00,
	0x21, 0xFD, 0xED, 0xE2, 0x00, 0x00, 0x21, 0x7B,
	0x16, 0xE2, 0x00, 0x00, 0x21, 0x7F, 0xFF, 0xA2,
	0x00, 0x00, 0x21, 0xF7, 0xFF, 0x62, 0x00, 0x00,
	0x21, 0xBF, 0xFB, 0xE2, 0x00, 0x00, 0x21, 0x7F,
	0xFF, 0xA2, 0x00, 0x00, 0x21, 0xDA, 0x37, 0xA2,
	0x00, 0x00, 0x21, 0xED, 0xEF, 0xE2, 0x00, 0x00,
	0x21, 0xEE, 0x3F, 0xA2, 0x01, 0xC0, 0x21, 0xFF,
	0xFB, 0xA2, 0x01, 0xC0, 0x21, 0xFB, 0xFE, 0x22,
	0x01, 0xC0, 0x21, 0xBC, 0x10, 0x22, 0x01, 0xC0,
	0x21, 0xB8, 0x22, 0x22, 0x01, 0xC0, 0x21, 0x9A,
	0x2D, 0xFE, 0x01, 0xC0, 0x21, 0x98, 0x2F, 0xFE,
	0x01, 0xC0, 0x21, 0x9F, 0x2F, 0xA2, 0x01, 0xC0,
	0x21, 0x88, 0xE7, 0xA2, 0x01, 0xC0, 0x21, 0x0F,
	0xE2, 0x3E, 0x09, 0xC0, 0x21, 0xFF, 0xFF, 0xEE,
	0x1F, 0x80, 0x20, 0x00, 0x00, 0x06, 0x0F, 0x00,
	0x20, 0x00, 0x00, 0x06, 0x00, 0x00, 0x20, 0x00,
	0x00, 0x1E, 0x00, 0x00, 0x20, 0x00, 0x00, 0x02,
	0x00, 0x00, 0x3F, 0xFF, 0xFF, 0xFE, 0x00, 0x00
	};

const Byte AppIconBmpDn[] WITH_BITMAP_ATTRS = {
	0x00, 0x30, 0x00, 0x28, 0x00, 0x06, 0x00, 0x00,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xC0, 0x00,
	0x00, 0x01, 0xFF, 0xFF, 0xC1, 0xFF, 0xFF, 0xFD,
	0xFF, 0xFF, 0xD7, 0xFF, 0xFF, 0xFD, 0xFE, 0x3F,
	0xD7, 0xFF, 0xFF, 0xFD, 0xFE, 0x3F, 0xD2, 0x00,
	0x00, 0x1D, 0xFE, 0x3F, 0xC0, 0xEE, 0x03, 0xDD,
	0xFE, 0x3F, 0xDE, 0x86, 0x3B, 0x9D, 0xFE, 0x3F,
	0xDE, 0x82, 0xD1, 0x9D, 0xFE, 0x3F, 0xD0, 0x02,
	0xF9, 0x9D, 0xFE, 0x3F, 0xD0, 0x12, 0xE9, 0x9D,
	0xFE, 0x3F, 0xDE, 0xEE, 0xF8, 0x9D, 0xFE, 0x3F,
	0xDE, 0xFD, 0xF0, 0x9D, 0xF6, 0x3F, 0xDE, 0xE0,
	0x08, 0x1D, 0xE0, 0x7F, 0xDE, 0x88, 0x00, 0x1D,
	0xF0, 0xFF, 0xDE, 0x80, 0xE2, 0x1D, 0xFF, 0xFF,
	0xDE, 0x02, 0x12, 0x1D, 0xFF, 0xFF, 0xDE, 0x84,
	0xE9, 0x1D, 0xFF, 0xFF, 0xDE, 0x80, 0x00, 0x5D,
	0xFF, 0xFF, 0xDE, 0x08, 0x00, 0x9D, 0xFF, 0xFF,
	0xDE, 0x40, 0x04, 0x1D, 0xFF, 0xFF, 0xDE, 0x80,
	0x00, 0x5D, 0xFF, 0xFF, 0xDE, 0x25, 0xC8, 0x5D,
	0xFF, 0xFF, 0xDE, 0x12, 0x10, 0x1D, 0xFF, 0xFF,
	0xDE, 0x11, 0xC0, 0x5D, 0xFE, 0x3F, 0xDE, 0x00,
	0x04, 0x5D, 0xFE, 0x3F, 0xDE, 0x04, 0x01, 0xDD,
	0xFE, 0x3F, 0xDE, 0x43, 0xEF, 0xDD, 0xFE, 0x3F,
	0xDE, 0x47, 0xDD, 0xDD, 0xFE, 0x3F, 0xDE, 0x65,
	0xD2, 0x01, 0xFE, 0x3F, 0xDE, 0x67, 0xD0, 0x01,
	0xFE, 0x3F, 0xDE, 0x60, 0xD0, 0x5D, 0xFE, 0x3F,
	0xDE, 0x77, 0x18, 0x5D, 0xFE, 0x3F, 0xDE, 0xF0,
	0x1D, 0xC1, 0xF6, 0x3F, 0xDE, 0x00, 0x00, 0x11,
	0xE0, 0x7F, 0xDF, 0xFF, 0xFF, 0xF9, 0xF0, 0xFF,
	0xDF, 0xFF, 0xFF, 0xF9, 0xFF, 0xFF, 0xDF, 0xFF,
	0xFF, 0xE1, 0xFF, 0xFF, 0xDF, 0xFF, 0xFF, 0xFD,
	0xFF, 0xFF, 0xC0, 0x00, 0x00, 0x01, 0xFF, 0xFF
	};


char stringa[50];

AREA_INFO_TYPE myFieldArea = {
20,20,100,40,
};

LINE_TYPE myField;

WORD MyFormProc(P_SYSTEM_EVENT_TYPE pEvent, ObjectPtr pObject)
{

switch (pEvent->eventType)
	{
	case FORM_LOAD_EVENT:
		AdvDrawFormBound();
		FntSetFont(FONT6);
		myField.areaInfoPtr = &myFieldArea;
		myField.displayWidth = 40;
		myField.maxChar = 20;
		myField.numChar = 0;
		myField.font = FONT6;
		strcpy(myField.charPtr,"Hello");
		DisplayLineField(&myField);
		break;
	case PEN_EVENT:
		LineEditPenInput(pEvent,&myField);
		break;
	case KEY_CODE_INPUT:
		LineEditKeyInput(pEvent,&myField);
		// Show the field content on the bottom
		ClearRectangle(4,90,150,40);
		sprintf(stringa,"%s",myField.charPtr);
		DisplayChr(stringa,4,90,strlen(stringa));
		break;
	case FORM_EXIT_EVENT:
		return 1;
	default:
		return 0;
	}
}

DWord NexusMain(Word cmd, Ptr cmdPBP, Word launchFlags)
{
SYSTEM_EVENT_TYPE  evt;    

switch (cmd)
	{
	case sysAppLaunchCmdNormalLaunch:
		FrmGotoForm(0, 0, 160, 160, MyFormProc, 0);
		do
			{
			NexusEvtGetEvent(&evt, -1);
			if (!SystemHandleEvent(&evt))
				if (ClockHandleEvent(&evt) != TRUE)
					FrmHandleEvent(&evt);
			}
			while (evt.eventType != appStopEvent);
		FrmCloseAllForms();
		break;
	}
return 1;
}