Hi I have been working the elements of a script to allow me to convert some movie files into text so that i can paste them as subtitles.
Part 1
convert .mov to .aif
on adding folder items to thisfolder after receiving addedItems
tell application "QuickTime Player"
activate
close every window
if QuickTime Pro installed is false then ¬
display dialog "This script requires QuickTime Pro." buttons {"Cancel"} default button 1 with icon stop
repeat with thisitem in addedItems
try
open thisitem
if (can export (front movie) as AIFF) is true then
export front movie to desktop as AIFF using most recent settings
else
display dialog "QuickTime Player can't export "" & (thisitem as Unicode text) & ""." buttons {"OK"} default button 1 with icon caution
end if
on error errorMsg number errorNum
display dialog "Error (" & errorNum & "):" & return & return & errorMsg buttons {"OK"} default button 1 with icon caution
end try
end repeat
quit application "QuickTime Player"
end tell
end adding folder items to
part 2
open ilisten
do speech recognition
(looks this bit will be a nasty case of keystrokes)
tell application "iListen"
Set myOriginalRecogMode to get recognition mode
set recognition mode to Transcribe mode
--... do something interesting
set recognition mode to myOriginalRecogMode
--saves the current recognition mode, sets the recognition mode to Transcribe Speech From File mode. The last step restores the original mode.
-- trnascribe the file by clicking on the transcribe button
-- wait until transcribe is done
set myOriginalMicMode to get microphone mode
set microphone mode to inactive
end tell
part 3
paste text into a new textedit file
This is as far as I got before my wife asked me about the validity of my research programme and why I was shouting at the computer!
Thanks drPETE