xtrace	"法線多重マッピングテスト"
{
	view	32, 0,0,1, 0,0,0, 100,-100,100;
	ambi	1, 0.000,0.000,0.000, 0.200,0.00,0;

	attr	light=
	{
		color	1,1,1;
		diff	1,0;
	};
	loc		0,0,20, 2, 0.700,0.700,0.700;

	ginit	128,128,32;
	var		y=0, ymax=fhei;
	while	(y<fhei)
	{
		hsv;
		var		col;
		col2pix	0,0,(cos (2*PI*y/ymax) + 1)/2, col;
		line	0,y,fwid - 1,y, col;
		y=y + 1;
	}
	bmap	mwave, 0,0,fwid - 1,fhei - 1, 1,fhei;

	var		c, yy, y_max=512;
	ginit	64,y_max,32;
	y=0;
	while	(y<y_max)
	{
		hsv;
		yy=y/y_max;
		col2pix	0,0,0.5^(yy*8), c;
		line	0,y_max - y - 1,63,y_max - y - 1, c;
		y=y + 1;
	}
	bmap	mweak, 0,0,fwid - 1,fhei - 1, 1,fhei;

	attr	apic=
	{
		color	0.400,0.400,1.000;
		diff	1.00,0.000;
		refl	0.01,60,0.5;
	};
	bump	bwave2=
	{
		nmap	mwave,1;
		mpla	0,0,0, 0,0,1, 0,1,0, 10,10;
		muxa	1;
	};
	bump	bweak=
	{
		nmap	mweak,1;
		mdsk	0,0,0, 0,0,1, 0,1,0, 1,30;
		mreg	0,0, 0,1, 0,0;
		muxm	1, bwave2;
	};
	bump	bwave=
	{
		nmap	mwave,2;
		mdsk	0,0,0, 0,0,1, 0,1,0, 1,4;
		muxa	1, bweak;
	};
	plane	0,0,0, 0,0,1;
}