[AS] Script de script

Page principale
Supprimer ce message
Répondre à ce message
Auteur: Philippe Herzog - Free
Date:  
À: applescript_fr
Sujet: [AS] Script de script
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
Applescript_fr@???
http://listes.patpro.net/mailman/listinfo/applescript_fr