[MAYA] _switchCams (emu Mobu)

MAYA_switchCams.mel

proc _switchCams()
{
	string $p=`getPanel -withFocus`;
	if(!`modelPanel -ex $p`) return;

	string $cams[]={};
	string $cur=`modelPanel -q -cam $p`;
	if(nodeType($cur)!="camera"){
		$cams=`listRelatives -pa -s $cur`;
		$cur=$cams[0];
	}

	$cams=`ls -cameras`;
	string $ign[]={"frontShape", "sideShape", "topShape"};
	$cams=stringArrayRemove($ign, $cams);
	clear $ign;

	int $id=0;
	for($c in $cams){ if($c==$cur) break; $id++; }
	if(!($id<size($cams))) return;

	modelPanel -e -cam ($cams[($id+1) % size($cams)]) $p;
	clear $cams;
}
_switchCams();