#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <winb.h>
#include <te.h>
#include <fntb.h>
#include <gui.h>
#include <egb.h>
#include <guidbg.h>

char	*guiEgbPtr ;			/*	EGB のワークアドレス	*/

#include <wgb.h>
#include <mos.h>
#include <kh.h>
//#define DEBUG

extern int quitIconID;
extern int windowID;
extern int quitIconID;
extern int upIconID;
extern int downIconID;

extern void setIcon(void);
extern void setSize(void);
extern void setUser(void);

extern int quitFuncRet;
extern unsigned int zoom;
extern HYPER whyp;

int userFunc(apliId, messId, info, data)
int	apliId;
int	messId;
int	info;
int	data;
{
	register int	ret;

	ret = ILLEGAL_FUNCTION;

	switch(messId)
	{
		case	GM_QUIT :
			MMI_SendMessage(quitIconID,MM_EXEC,2,0,0);
			ret = quitFuncRet ;
			break;
	}

	return(ret);
}

void main()
{
	static MMICTRL mmi ={
				SCREEN16|SCREENIGNORE,		// ページ0側解像度
				SCREENUNUSED,				// ページ1側解像度
				0, 							// 書き込みページ
				SCREENAVAILABLE, 			// 表示ページ
				0, 							// 表示プライオリティ
				SCREENAVAILABLE,			// 色数
				SCREENEXPAND, 				// VRAMの横の長さ
				0, 							// メモリ領域の大きさ
				NULL, 						// メモリ領域のアドレス
				0, 							// ユーザ領域の大きさ
				NULL, 						// ユーザ領域のアドレス
				0, 0, 						// 画面枠	lupx,lupy
				0, 0,						//			rdwx,rdwy
				-16384, -16384,				// 移動枠	lupx,lupy
				16383, 16383,				//			rdwx,rdwy
				15, 						// 白色
				8,  						// 黒色
				7,  						// 灰色
				6	 						// 反転色
	};

	extern int APL_init() ;

	/*	初期化処理	*/
	if (MMI_Open( &mmi ) == NOERR)
	{
		/*	初期化に成功すればメインループに入る.	*/
		if (APL_init() == NOERR)
			MMI_ExecSystem() ;
	}

	/*	終了処理	*/
	MMI_Close() ;

}

int APL_init()
{
	extern MMIINIT	initDataGUI ;

	register int	ret ;

	/*	EGB ワークアドレスの取得.	*/
	guiEgbPtr = MMI_GetEgbPtr() ;

	/*	ユーザアイコン設定		*/
	extern unsigned char *iconTbl[];
	extern int iconMaxId;
	MMI_SetIconTable(iconTbl, iconMaxId);

	/*	ハイパ型部品の初期化			*/
	if ((ret = MMI_initHyper()) < 0)
		return ret ;
	/*	ダイアログ型部品の初期化		*/
	if ((ret = MMI_initDialogL40()) < 0)
		return ret ;
	/*	ウインドウ型部品の初期化		*/
	if ((ret = MMI_initWindowL40()) < 0)
		return ret ;
	/*	ボタン型部品の初期化			*/
	if ((ret = MMI_initButtonL40()) < 0)
		return ret ;
	/*	アイコンボタン型部品の初期化	*/
	if ((ret = MMI_initIconL40()) < 0)
		return ret ;

	/*	背景データの初期化						*/

	/*	データの登録		*/
	if ((ret = MMI_Init(&initDataGUI)) < 0)
		return ret ;

	//デフォルトの位置に移動
	FRAME fr;
	fr.lupx=0;
	fr.lupy=0;
	fr.rdwx=100;
	fr.rdwy=50;
	zoom=4;
	MMI_SendMessage(windowID,MM_MOVE,1,&fr);
	MMI_SendMessage(windowID,MM_GETHYPER,1,&whyp);
	setIcon();

	/*	Tmenuにパレットを合わせる	*/
	KH_initGuiColor();

	/*	背景を表示する							*/
	MMI_SendMessage(MMI_GetBaseObj(), MM_SHOW, 0) ;

	setUser();
	setSize();

	MMI_SendMessage(MMI_GetBaseObj(), MM_SETEXEC, 1, userFunc);
	MMI_CallMessage(MMI_GetApliId(), GM_TITLE, (int)"Mscope                          By 機拡", 0);

	extern void	userIdleTask();
	MMI_SetIdleTaskFunc( userIdleTask );
	userIdleTask();

	return NOERR ;
}