folder action for multiple files

this script converts files that I copy into a folder using quicktime pro. It also removes the extension.

But it works fine when I copy one clip but I need it to work with multiple clips as well.

Can’t figure out what I’m doing wroong


on adding folder items to this_folder after receiving dropped_items
	
	
	repeat with qtfile in dropped_items
		
		set exportSettingsPath to ((path to applications folder as text) & "!POSTHOUSE:APPLESCRIPTS:qt pro encode:DVCproHD_pal")
		
		
		set current_name to name of (info for (qtfile))
		set x to the number of characters of current_name
		set the_new_name to characters 1 thru (x - 4) of current_name
		
		
		with timeout of 86400 seconds
			tell application "QuickTime Player 7"
				open qtfile
				tell first document
					export to (((path to applications folder as text) & "!POSTHOUSE:ADD2FORK:Add clip:") & the_new_name & ".mov") as QuickTime movie using settings exportSettingsPath with replacing
					delay 1
					close
				end tell
			end tell
		end timeout
		
		tell application "QuickTime Player 7" to quit
		
	end repeat
end adding folder items to