Aurora Compiler - Example Syntax

Below is an example of what the syntax structure looks like in an Aurora source code file.

//TestWindow definition
class TestWindow : CWindow
{
	declare virtual OnClose(),int;
	declare virtual OnControl(int nID, int nNotifyCode, unsigned int hControl),int;
	declare virtual OnCreate(),int;
}

global sub main()
{
	TestWindow win;
	win.Create(0,0,300,212,AWS_VISIBLE|AWS_SYSMENU,0,"Test Window",NULL);
	win.EnableTabs(1);
	win.AddControl(CTBUTTON,"Close",45,157,70,20,0x50000000|AWS_TABSTOP,0x0,1);
	win.AddControl(CTBUTTON,"OK",183,157,70,20,0x50000001|AWS_TABSTOP,0x0,2);
	win.AddControl(CTGROUPBOX,"Enter Your Name",19,10,254,134,0x50000007,0x0,3);
	win.AddControl(CTEDIT,"",39,42,218,21,0x50800000|AWS_TABSTOP,0x200,4);
	win.SetFocus(4);
	CControl *pControl = win.GetControl(3);
	pControl->SetColor(0,0xFFFFFF);
	do{ wait();} until !win.IsValid();
}

TestWindow::OnCreate()
{
	CenterWindow();
	return 0;
}

TestWindow::OnClose()
{
	Destroy();
	return 0;
}

TestWindow::OnControl(int nID, int nNotifyCode, unsigned int hControl),int
{
	select(nID)
	{
		case 1:
			if(nNotifyCode = 0)
				Destroy();
		case 2:
			if(nNotifyCode = 0)
			{
				CControl *pControl = GetControl(4);
				MessageBox(this,"OK Pressed",pControl->GetText());
				SetFocus(4);
			}
	}
return 0;
}