//	M560 : ʑ̈قȂW̐g\
option double;

define	t	 = 0;

function main()
{
	define	dat[8];

	_Cls();
	_PrintF("ʑ̈قȂW̐g\\n");

	_TmcOpen("W̐g\");
	_TmcSetItems(8);
	_TimerStart(1, 10);

	_Stop();

	_TmcClose();

}

//	^C}
function  _OnTimer(tid)
{
	define	i, dt;
	define	dat[8];

	if (tid == 1) {	//	^C}PH
		for (i = 0, dt = 0; i < 8; i++, dt += 5) {
			dat[i] = _Sin(t + dt);
		}
		_TmcPutData(dat[]);
		t += 1.0;
	}
}

//	^C`[gEChN[Y̏
function  _OnTmcClose()
{
	_Restart();
}
