-- Toggle_Passthrough v1.0
-- by S.Neve - House of Secrets 13-05-2009
-- for latest version, check http://www.svennneve.com

local toollist = composition:GetToolList()

for i, tool in toollist do
	-- Finds all comments for tool.  Checks to see if it’s animated. 
	message = "" 
	if tool.Comments then 
		if tool.Comments[TIME_UNDEFINED]=="" then 
		else 
			if tool.Comments:GetConnectedOutput() then 
				x=tool.Comments:GetKeyFrames() 
				for k, keyframe in x do 
					message = message .. tool.Comments[keyframe]
				end 
			else 
				message = tool.Comments[TIME_UNDEFINED]
			end 
		end 
	end 

	if string.find(message, "[!]") then
		tool:SetAttrs({TOOLB_PassThrough = not tool:GetAttrs().TOOLB_PassThrough})
		print ("toggled passthrough on " .. tool:GetAttrs().TOOLS_Name .. "\n")
	end
end