MEL I

エミッターを円状に並べる

global proc circleEmitter1(float $rad, int $num)
{
	int $i;
	float $r = 0.0;
	float $add = 360.0 / $num;
	string $names[];
	for($i = 0; $i < $num; $i++)
	{
		select -cl;
		string $ename[] = `emitter`;
		move $rad 0 0;
		rotate -ws -p 0 0 0  0 $r 0;
		string $pname[] = `particle`;
		$names[$i] = $pname[0];
		connectDynamic -emitters $ename[0];

		$r += $add;
	}
	select -r $names[0];
	string $fname[] = `air -magnitude 2.0 -dx 0.0 -dy 1.0 -dz 0.0`;
	connectDynamic -fields $fname[0] $names;
}