Fischer-Bayern.de
 FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen   RegistrierenRegistrieren 
 ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin 

QuickTime Script zum Exportieren von Movies

 
Dieses Forum ist gesperrt, du kannst keine Beiträge editieren, schreiben oder beantworten.   Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten.    Fischer-Bayern.de Foren-Übersicht -> AppleScript-Forum
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
rammler
•->
•->


Anmeldedatum: 04.02.2002
Beiträge: 2
Wohnort: Im sch–nen Franken

BeitragVerfasst am: 04.02.2002 - 15:32    Titel: QuickTime Script zum Exportieren von Movies Antworten mit Zitat

Hi Ich bin ein absolter Script Anfänger! Ich frag mich wie ich den Befehl Export to TOAST Video CD automatiesieren kann, denn wenn ich ein movie exportiere dauert es ja ein odder zwei std. und dann wieder in die arbeit fahren und den nächsten zum exportieren schicken bingst ja nit! vielleicht könnt Ihr mir helfen! danke

hier noch ein kleines bild damit ihr wisst wasich meine!


ich will nen ordner definieren können indem die mov. mpeg, avi liegen
und der soll dann eben konvertiert werden!

super ich freu mich auf antworten!
_________________
_______________________
Gr¸þe Bernd
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Snow
Administrator
Administrator


Anmeldedatum: 21.11.2000
Beiträge: 1946
Wohnort: Deiningen

BeitragVerfasst am: 04.02.2002 - 20:11    Titel: QuickTime Script zum Exportieren von Movies Antworten mit Zitat

Hi Bernd,

schau dir doch mal die Scripts an, die Apple anbietet. Evtl. ist ja das gesuchte schon dabei.

http://www.apple.com/applescript/qtas.html

War mir jetzt auf die Schnelle zu viel zum Durchsehen.
_________________
Peter
-
Fischer-Bayern.de|Shadetreemicro.com
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen AIM-Name
Busyman
•-->
•-->


Anmeldedatum: 16.09.2001
Beiträge: 64
Wohnort: Ostwestfalen

BeitragVerfasst am: 04.02.2002 - 23:39    Titel: QuickTime Script zum Exportieren von Movies Antworten mit Zitat

Hi rammler,

wie Snow schon sagte: Es gibt ein QuickTime Script, namentlich "Export to DV Stream ", das man zu Deinen Zwecken umbauen könnte. Man müßte es lediglich mit einer Ordneraktion oder einem "Droplet" paaren,  dabei aber darauf achten, daß der TimeOut-Befehl erst nach recht langer Zeit einsetzt. Denn so eine Konvertierung dauert ja manchmal recht lange, da dürfte das Script dennoch nicht abbrechen.

Außerdem müßte natürlich bekannt sein, wo die konvertierten Dateien gespeichert werden sollen, denn ansonsten fragt QuickTime natürlich jedes Mal nach und fängt gar nicht erst mit der Konvertierung an.

Gruß,

Busyman
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
rammler
•->
•->


Anmeldedatum: 04.02.2002
Beiträge: 2
Wohnort: Im sch–nen Franken

BeitragVerfasst am: 05.02.2002 - 00:16    Titel: QuickTime Script zum Exportieren von Movies Antworten mit Zitat

ah ha! nagut werd ich mir mal das script ansehen! leider nur für X deswegen bin ich ja ins forum um zufragen ob ihr nen plan habt! X läfut bei mir nit!

danke

PS: ist echt krass apple script, wenn man das so liest! Smile ich hab keinen plan! welche ordneraktionen, alles leider nur fremdwörter, kann kan das sich irgendwo beibringen? weil wenn ich sowas lese:

property target_folder : ""
property use_default : true
property type_list : {"MooV"}
-- since file types are optional in Mac OS X,
-- check the name extension if there is no file type
-- NOTE: do not use periods (.) with the items in the name extensions list
-- eg: {"txt", "text", "jpg", "jpeg"}, NOT: {".txt", ".text", ".jpg", ".jpeg"}
property extension_list : {"mov"}
property default_preset : "NTSC 44.1 kHz"

on run
repeat
display dialog "Save as DV Stream Movie

This script will save a copy of dragged-on movie files as DV Stream QuickTime movies." buttons {"Set Prefs", "OK"} default button 2
if the button returned of the result is "Set Prefs" then
display dialog "Use default settings or the most recent settings?" buttons {"Cancel", "Recent", "Default"} default button 3
if the button returned of the result is "Recent" then
set use_default to false
else
set use_default to true
end if
else
exit repeat
end if
end repeat
end run

-- This droplet processes both files or folders of files dropped onto the applet
on open these_items
-- this routine uses the gestaltVersion_info() sub-routine
copy my gestaltVersion_info("qtim", 8) to {QT_version, QT_string}
if the QT_version is less than "0502" then
display dialog "This script requires QuickTime 5.0.2 or higher." & ¨
return & return & "The currently installed version is: " & ¨
QT_string buttons {"Cancel"} default button 1
end if
set the target_folder to choose folder with prompt "Destination folder for the converted files:"
repeat with i from 1 to the count of these_items
set this_item to (item i of these_items)
set the item_info to info for this_item
if folder of the item_info is true then
process_folder(this_item)
else if (alias of the item_info is false) and ¨
((the file type of the item_info is in the type_list) or ¨
the ´class nmxtª of the item_info is in the extension_list) then
process_item(this_item)
end if
end repeat
end open

-- this sub-routine processes folders
on process_folder(this_folder)
set these_items to list folder this_folder without invisibles
repeat with i from 1 to the count of these_items
set this_item to alias ((this_folder as text) & (item i of these_items))
set the item_info to info for this_item
if folder of the item_info is true then
process_folder(this_item)
else if (alias of the item_info is false) and ¨
((the file type of the item_info is in the type_list) or ¨
the ´class nmxtª of the item_info is in the extension_list) then
process_item(this_item)
end if
end repeat
end process_folder

-- this sub-routine processes files
on process_item(this_item)
-- NOTE that the variable this_item is a file reference in alias format
-- FILE PROCESSING STATEMENTS GOES HERE
with timeout of 3600 seconds -- one hour per movie time limit
tell application "QuickTime Player"
launch -- bypasses promo movie
activate
try
my toggle_suppress(true)
stop every movie
close every movie saving no
open this_item
if saveable of movie 1 is false then
error "This movie has previously been set so that it cannot be copied, edited, or saved."
end if
set this_file to the original file of movie 1
-- get the name of the movie
set the movie_name to the name of movie 1
-- check to see if the opened movie can be exported
if (can export movie 1 as DV stream) is true then
tell application "Finder"
set the file_name to the name of this_file
set the new_file to ((the target_folder as text) & the file_name) as string
if (exists file new_file) then ¨
delete file new_file
end tell
-- export the movie as hinted movie
if use_default is true then
export movie 1 to file new_file as DV stream using settings preset default_preset
else
export movie 1 to file new_file as DV stream using most recent settings
end if
else
error "The movie ³" & the movie_name & "² cannot be exported as a DV stream movie."
end if
my toggle_suppress(false)
on error error_msg
my toggle_suppress(false)
display dialog error_msg buttons {"Stop", "Continue"} default button 2
set the button_pressed to the button returned of the result
close movie 1 saving no
if the button_pressed is "Stop" then error number -128
end try
-- close the movie
close movie 1 saving no
end tell
end timeout
end process_item

on toggle_suppress(status_flag)
tell application "QuickTime Player"
set ignore auto play to the status_flag
set ignore auto present to the status_flag
end tell
end toggle_suppress

on gestaltVersion_info(gestalt_code, string_length)
try
tell application "Finder" to ¨
copy my NumToHex((´event fndrgstlª gestalt_code), ¨
string_length) to {a, b, c, d}
set the numeric_version to {a, b, c, d} as string
if a is "0" then set a to ""
set the version_string to (a & b & "." & c & "." & d) as string
return {numeric_version, version_string}
on error
return {"", "unknown"}
end try
end gestaltVersion_info

on NumToHex(hexData, stringLength)
set hexString to {}
repeat with i from stringLength to 1 by -1
set hexString to ((hexData mod 16) as string) & hexString
set hexData to hexData div 16
end repeat
return (hexString as string)
end NumToHex


" kapier ich echt nix!

danke für eure tipps Smile
_________________
_______________________
Gr¸þe Bernd
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Dieses Forum ist gesperrt, du kannst keine Beiträge editieren, schreiben oder beantworten.   Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten.    Fischer-Bayern.de Foren-Übersicht -> AppleScript-Forum Alle Zeiten sind GMT + 2 Stunden
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.


Powered by phpBB © 2001, 2002 phpBB Group
Deutsche Übersetzung von phpBB.de


AppleScript für absolute Starter