Re: Add Scaled
Re: Add Scaled
- Subject: Re: Add Scaled
- From: Bryan <email@hidden>
- Date: Sat, 16 Jun 2001 03:48:40 -0400
- Organization: Apex Radiology
There is no way I have fond to do it directly, I use prefab player to
accomplish this:
-- this script requires QuickTime Pro and PreFab Player
--(another macro program will do i.e. OneClick, QuickKeys, etc.)
tell application "Finder"
set my_movie to (open file (choose file with prompt "Select a movie to add
the sound to."))
set my_movie_name to name of (info for my_movie)
end tell
tell application "QuickTime Player"
tell movie my_movie_name to select all
end tell
tell application "PreFab Player"
do menu menu item "Copy" of menu "Edit"
end tell
tell application "Finder"
set my_sound to (open file (choose file with prompt "Select a sound file
to add."))
set my_sound_name to name of (info for my_sound)
end tell
tell application "QuickTime Player"
activate
tell movie my_sound_name to select all
end tell
tell application "PreFab Player"
do menu menu item "Paste" of menu "Edit" holding command & shift & option
end tell
tell application "QuickTime Player" to tell movie my_movie_name to close
Bryan Kaufman
Jeff Handy wrote:
>
I'm working on an AppleScript that assembles our movies with href and
>
chapter track info that we've already created. Currently, we use
>
AutoType with QT4, but I know there is a way to script this one step in
>
QT5 now. Looking at the dictionary tells me nothing of syntax for the
>
"add" operator and no sample of its use seems to be anywhere. Anyone?
>
>
I've tried the following:
>
>
Tell application "Quicktime Player"
>
add
>
scaled
>
End tell
>
>
Tell application "Quicktime Player"
>
add movie
>
scaled
>
End tell
>
>
Tell application "Quicktime Player"
>
add selection
>
scaled
>
End tell
>
>
The old script goes:
>
>
Tell application "Quicktime Player"
>
AutoType "`#118" holding "command shift option"
>
End tell
>
>
Which works fine. I just want to eliminate any excess code referring to
>
third party tools where I can. THX for any help.
>
>
Jeff Handy - Senior Digital Media Specialist
>
Bisk Education - Technology Development
>
World Headquarters - Tampa, FL
>
800-874-7877 x360
>
email@hidden
>
http://www.bisk-education.com
>
>
Cleaner Forum Cowmunity Leader
>
http://www.creativecow.net/cgi-bin/select_forum.cgi?forum=cleaner
>
_______________________________________________
>
applescript-users mailing list
>
email@hidden
>
http://www.lists.apple.com/mailman/listinfo/applescript-users
References: | |
| >Add Scaled (From: "Jeff Handy" <email@hidden>) |