[<] Sujet : [AS] Script de script
De : Philippe Herzog - Free <anonyme@...>
Date : 2010-03-02 17:01:48

Bonjour à tous,
j'utilise des AS pour lancer simplement des créations composées d'une  
part de présentation multimedia, d'autre part de séquence quicktime;
cela fonctionne correctement, j'arrive à donner une durée pour  
l'ensemble;
maintenant, je voudrais faire un script avec un enchainement de  
plusieurs .app comme ci-dessous :

--[SCRIPT QuickTime+Dessin vectoriel]

(*  Philippe Herzog - Numeric'Art,  Garches (FRANCE)  le 1er mars  
2010  *)

-- -------------------------------------

on run
	
	tell application "H 08017_t15"
		activate
		
	end tell
	
	tell application "H 08018_t15"
		activate
		
	end tell
	
end run

--[/SCRIPT]


mon problème est que les 2 .app se lancent simultanément, alors que je  
voudrais qu'elles se lancent dans l'ordre, quand la 1ère est terminée;
je suppose qu'il manque un élément de syntaxe ??


pour info, j'arrive à ce que je veux en remettant le détail des 2  
scripts comme suit :

--[SCRIPT QuickTime+Dessin vectoriel]

(*  Philippe Herzog - Numeric'Art,  Garches (FRANCE)  le 1er mars  
2010  *)

-- -------------------------------------

on run
	
	tell application "QuickTime Player"
		activate
		open file ("Léon:Desktop Folder:Gallery:Présentation:H  
08017_blax1:Theme From Shaft_1_1971.mp3" as text)
		
		tell front document
			play
		end tell
		
	end tell
	
	
	tell application "AppleWorks 6"
		activate
		open file ("Léon:Desktop Folder:Gallery:Présentation:H 08017_blax1:H  
08017_blax1.cwk" as text)
		
		tell front document
			start slides
		end tell
		
		set n_Boucles to 1
		repeat n_Boucles times
			delay 15
		end repeat
		
		tell front document
			stop slides
		end tell
		
		close document 1
		
	end tell
	
	
	tell application "QuickTime Player"
		
		tell front document
			stop
		end tell
		
		close document 1
		
	end tell
	
	
	
	tell application "QuickTime Player"
		activate
		open file ("Léon:Desktop Folder:Gallery:Présentation:H  
08018_blax2:Theme From Shaft_2_1971.mp3" as text)
		
		tell front document
			play
		end tell
		
	end tell
	
	
	tell application "AppleWorks 6"
		activate
		open file ("Léon:Desktop Folder:Gallery:Présentation:H 08018_blax2:H  
08018_blax2.cwk" as text)
		
		tell front document
			start slides
		end tell
		
		set n_Boucles to 1
		repeat n_Boucles times
			delay 15
		end repeat
		
		tell front document
			stop slides
		end tell
		
		close document 1
		
	end tell
	
	
	tell application "QuickTime Player"
		
		tell front document
			stop
		end tell
		
		close document 1
		
	end tell
	
end run

--[/SCRIPT]




mais cela me semblerait plus simple de passer par les .app ...

merci de votre aide, cordialement, Philippe

_______________________________________________
Applescript_fr mailing list
anonyme@...
http://listes.patpro.net/mailman/listinfo/applescript_fr

Apple, AppleScript, AppleScript Studio, AppleTalk, AppleWorks, ColorSync, Finder, HyperCard, iBook, iLife, iMac, iWork, Keynote, Mac, Macintosh, Mac OS, Pages, Panther, PowerBook, Power Mac, Power Macintosh, QuickTime, Safari, Tiger, Xcode sont des marques déposées par Apple Computer, Inc., enregistrées aux Etats-Unis et dans les autres pays. Liste officielle