-- BERNARDO AMORIM 
-- BERNARDOAMORIM.DASENTRANHAS.COM
-- 2010

macroScript CameraToggle category:"Bernielomax"
(
	sceneCameras_array =#()
	
	for i in cameras where classof i != TargetObject  do (
		append sceneCameras_array i
	)
counter = 0

on execute do (
	if (getActiveCamera() == undefined) 
	then(
		viewport.setCamera sceneCameras_array[1]
	)
	else(
		counter += 1 --increment
		activeCam = viewport.getCamera() 
		activeCamNum = findItem sceneCameras_array activeCam
		if activeCamNum >= sceneCameras_array.count 
		then(
			viewport.setCamera sceneCameras_array[1]
			counter = 0
		)
		else (
			viewport.setCamera sceneCameras_array[counter+1]
		)
	)
	
)
)