//	M110 : Sample button and check box
option unsigned;

define	fEnd = 0;

//------------------------------------------------------------------------------//
//	Sample button and check box													//
//																				//
//	Return	:	None															//
//------------------------------------------------------------------------------//
function main()
{
	define	i, x, y;

	_Cls();
	_Print("<<< ", $_MyName, " >>>\n");

	_BtnOpen(0, "End");
	_BtnOpen(1, "Btn1");
	_BtnOpen(2, "Btn2");
	_BtnOpen(3, "Btn3");
	_BtnOpen(4, "Btn4");
	_BtnOpen(5, "Btn5");
	_BtnOpen(6, "Btn6");
	_BtnOpen(7, "Btn7");

	_ChkBoxOpen(0, "Chk0");	_ChkBoxSetSts(0, _TRUE);
	_ChkBoxOpen(1, "Chk1");	_ChkBoxSetSts(1, _TRUE);
	_ChkBoxOpen(2, "Chk2");	_ChkBoxSetSts(2, _TRUE);
	_ChkBoxOpen(3, "Chk3");	_ChkBoxSetSts(3, _TRUE);
	_ChkBoxOpen(4, "Chk4");	_ChkBoxSetSts(4, _FALSE);
	_ChkBoxOpen(5, "Chk5");	_ChkBoxSetSts(5, _FALSE);
	_ChkBoxOpen(6, "Chk6");	_ChkBoxSetSts(6, _FALSE);
	_ChkBoxOpen(7, "Chk7");	_ChkBoxSetSts(7, _FALSE);

	_Stop();
}
//------------------------------------------------------------------------------//
//	Processing when button is pressed											//
//																				//
//	Argument:	BtnNo - Button ID		 										//
//																				//
//	Return	:	None															//
//------------------------------------------------------------------------------//
function _OnButton(BtnNo)
{
	if (BtnNo == 0) {
		_Restart();
	}
	else {
		_Print("Button-", BtnNo, " was pressed\n");
	}
}
//------------------------------------------------------------------------------//
//	Processing when check box is set											//
//																				//
//	Argument:	ChkBoxNo - Check box ID	 										//
//				status	 - Checkbox status										//
//																				//
//	Return	:	None															//
//------------------------------------------------------------------------------//
function _OnChkBox(ChkBoxNo, status)
{
	_Print("Check-box-", ChkBoxNo, " has been set, Status = ", status, "\n");
	//	Allow / prohibit buttons with the same number
	_BtnEnable(ChkBoxNo, status);
}
