You could try this folder action.
Attach it to an empty folder, then drop folders of image sequences onto that folder. The movie will be saved inside the image sequence folder, with the first image's name as the movie name.
Hope that helps.
Code:
on adding folder items to thisFolder after receiving droppedFolders
repeat with aFolder in droppedFolders
tell application "Finder" to set theSequence to (get first file of aFolder as alias)
tell application "QuickTime Player"
activate
open image sequence theSequence
set nameSequence to (theSequence as string) & ".mov"
tell movie 1
with timeout of 500 seconds
save self contained in nameSequence
end timeout
close
end tell
end tell
end repeat
end adding folder items to