Archives actuelles avec moteur de recherche
N'hésitez pas à vous inscrire à la liste : 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
De : (Liste AppleScript francophone) <applescript_fr@xxxxxxx.net>
À : "(Liste AppleScript francophone)" <applescript_fr@xxxxxxx.net>
Date : mardi 16 avril 2002 07:01
Objet : applescript_fr Digest #476
Liste AppleScript francophone Digest #476
1) Lancement programmé
by "odr.r" <odr.r@xxxxxxx.net>
2) Re: Lancement programmé
by Jude <jude16@xxxxxxx.com>
3) Re: Lancement programmé
by patpro <patpro@xxxxxxx.net>
4) Re: Lancement programmé
by Jude <jude16@xxxxxxx.com>
5) Re: Lancement programmé
by "odr.r" <odr.r@xxxxxxx.net>
6) Re: Lancement programmé
by patpro <patpro@xxxxxxx.net>
7) Script de dossier
by PDescamps@xxxxxxx.Com
8) Re: Script de dossier
by nicolas descombes <nicolas.descombes@xxxxxxx.fr>
9) Réf. : [AS] Re: Script de dossier
by PDescamps@xxxxxxx.Com
10) delay 0.5
by lamica <la.mica@xxxxxxx.net>
11) Re: Lancement programmé
by lamica <la.mica@xxxxxxx.net>
12) Re: delay 0.5
by Daniel Varlet <varlet@xxxxxxx.ch>
13) Re: Disk Copy
by Daniel Varlet <varlet@xxxxxxx.ch>
14) Re: delay
by lamica <la.mica@xxxxxxx.net>
15) Re: Créer des "fichiers d'adresse Web" à partir d'un texte
by Nicolas Barbulesco <nbarbulesco@xxxxxxx.fr>
16) Re: Créer des "fichiers d'adresse Web" à partir d'un texte
by Daniel Varlet <varlet@xxxxxxx.ch>
17) Re: delay
by Daniel Varlet <varlet@xxxxxxx.ch>
De : "odr.r" <odr.r@xxxxxxx.net> Date : Mon, 15 Apr 2002 11:03:17 +0200 Objet : [AS] Lancement programmé Bonjour. Je souhaite crée un script qui se lance par exemple tout les mois. Comment faire ? Et aussi comment faire pour qu'un script se quitte quand il a fini ? Merci
De : Jude <jude16@xxxxxxx.com> Date : Mon, 15 Apr 2002 11:18:59 +0200 Objet : [AS] Re: Lancement programmé Bonjour à tous (suis nouveau sur cette liste je vais éviter de dire trop de betises dans les premiers temps ;-)) Sous OS X ou sous OS 9? - Sous X, moi j'utiliserai plutot "cron". Il y a un utilitaire simple "cronnix" (cf versiontracker). Il suffit de taper une commande du style "open ~username/peu/importe/les/dossiers/nom_du_script" pour voir s'exécuter une tache au moment voulue. (Le script doit être une application) - Sous 9, je créerai tout simplement un script qui se chargerait au démarrage et qui vérifierait la date. Et si la date correspond à celle prédéfinie, ce script lancerait un autre script ou appli. Pour quitter quand il a fini? Un simple "quit" en fin de script, non? Jude Le lundi 15 avril 2002, à 11:03 , odr.r a écrit : > Bonjour. > Je souhaite crée un script qui se lance par exemple tout les mois. > Comment faire ? > Et aussi comment faire pour qu'un script se quitte quand il a fini ? > Merci > > > -- > Pour vous désinscrire ou régler les options de votre abonnement : > http://www.macplus.org/plusonest/liste/
De : patpro <patpro@xxxxxxx.net> Date : Mon, 15 Apr 2002 11:29:54 +0200 Objet : [AS] Re: Lancement programmé le 15/04/02 11:18, Jude à jude16@xxxxxxx.com a écrit : > Sous OS X ou sous OS 9? > - Sous X, moi j'utiliserai plutot "cron". Il y a un utilitaire simple > "cronnix" (cf versiontracker). Il suffit de taper une commande du style > "open ~username/peu/importe/les/dossiers/nom_du_script" pour voir > s'exécuter une tache au moment voulue. > (Le script doit être une application) [digression unix] j'ai jamais utilisé cronnix, mais par défaut je dirais que c'est plutot ~/chemin/du/script, puisque ~ est égal à la variable d'environnement $HOME. Donc avec : [localhost:~] patpro% echo $HOME /Users/patpro d'où ~ = /Users/patpro mon expérience du cron me porterait de toute maniere à tjrs spécifier les chemins complets des fichiers. [/digression] > - Sous 9, je créerai tout simplement un script qui se chargerait au > démarrage et qui vérifierait la date. Et si la date correspond à celle > prédéfinie, ce script lancerait un autre script ou appli. pareil, mais ca pose le probleme des machines qui sont allumées 24/24 et redémarrent peu souvent. Auquel cas, l'utilisation de quelque chose comme iDo Script Scheduler me paraît indiquée. > Pour quitter quand il a fini? Un simple "quit" en fin de script, non? Par défaut le script quitte en fin d'exécution, vérifie que tu n'as pas coché "Rester en arriere plan" au moment d'enregistrer ton script en applet.. Cocher cette case fait en sorte que le script ne quitte pas en fin d'exécution et reste disponible plus rapidement pour les exécutions suivantes. Tres utile pour des scripts souvent sollicités, mais pour un script mensuel, c'est parfaitement contre-indiqué. patpro
De : Jude <jude16@xxxxxxx.com> Date : Mon, 15 Apr 2002 11:38:27 +0200 Objet : [AS] Re: Lancement programmé Le lundi 15 avril 2002, à 11:29 , patpro a écrit : > le 15/04/02 11:18, Jude à jude16@xxxxxxx.com a écrit : > >> Sous OS X ou sous OS 9? >> - Sous X, moi j'utiliserai plutot "cron". Il y a un utilitaire simple >> "cronnix" (cf versiontracker). Il suffit de taper une commande du style >> "open ~username/peu/importe/les/dossiers/nom_du_script" pour voir >> s'exécuter une tache au moment voulue. >> (Le script doit être une application) > > [digression unix] > j'ai jamais utilisé cronnix, mais par défaut je dirais que c'est plutot > ~/chemin/du/script, puisque ~ est égal à la variable d'environnement $HOME. > Donc avec : > [localhost:~] patpro% echo $HOME > /Users/patpro > > d'où ~ = /Users/patpro > > mon expérience du cron me porterait de toute maniere à tjrs spécifier les > chemins complets des fichiers. > > [/digression] Exact, je me suis mal exprimé. Pour etre sur du "chemin" à prendre... -ouvrir Terminal -faire un glisser déposer de l'appli a ouvrir -copier -coller dans "cronnix" en ajoutant avt "open " Ca peut éviter pas mal de désagréments, surtout quand on s'exprime mal ;-) Jude
De : "odr.r" <odr.r@xxxxxxx.net> Date : Mon, 15 Apr 2002 11:40:06 +0200 Objet : [AS] Re: Lancement programmé le 15/04/02 11:29, patpro à patpro@xxxxxxx.net a écrit : > le 15/04/02 11:18, Jude à jude16@xxxxxxx.com a écrit : > >> Sous OS X ou sous OS 9? >> - Sous X, moi j'utiliserai plutot "cron". Il y a un utilitaire simple >> "cronnix" (cf versiontracker). Il suffit de taper une commande du style >> "open ~username/peu/importe/les/dossiers/nom_du_script" pour voir >> s'exécuter une tache au moment voulue. >> (Le script doit être une application) > > [digression unix] > j'ai jamais utilisé cronnix, mais par défaut je dirais que c'est plutot > ~/chemin/du/script, puisque ~ est égal à la variable d'environnement $HOME. > Donc avec : > [localhost:~] patpro% echo $HOME > /Users/patpro > > d'où ~ = /Users/patpro > > mon expérience du cron me porterait de toute maniere à tjrs spécifier les > chemins complets des fichiers. > > [/digression] > >> - Sous 9, je créerai tout simplement un script qui se chargerait au >> démarrage et qui vérifierait la date. Et si la date correspond à celle >> prédéfinie, ce script lancerait un autre script ou appli. > > pareil, mais ca pose le probleme des machines qui sont allumées 24/24 et > redémarrent peu souvent. Auquel cas, l'utilisation de quelque chose comme > iDo Script Scheduler me paraît indiquée. > > >> Pour quitter quand il a fini? Un simple "quit" en fin de script, non? > > Par défaut le script quitte en fin d'exécution, vérifie que tu n'as pas > coché "Rester en arriere plan" au moment d'enregistrer ton script en applet. > Cocher cette case fait en sorte que le script ne quitte pas en fin > d'exécution et reste disponible plus rapidement pour les exécutions > suivantes. Tres utile pour des scripts souvent sollicités, mais pour un > script mensuel, c'est parfaitement contre-indiqué. > > patpro > > Merci beaucoup a tous les deux pour vos réponces. Je croi que pour quitter j'ai coché la case "rester en arriere plan".
De : patpro <patpro@xxxxxxx.net> Date : Mon, 15 Apr 2002 11:45:51 +0200 Objet : [AS] Re: Lancement programmé le 15/04/02 11:38, Jude à jude16@xxxxxxx.com a écrit : > Exact, je me suis mal exprimé. > > Pour etre sur du "chemin" à prendre... > -ouvrir Terminal > -faire un glisser déposer de l'appli a ouvrir > -copier > -coller dans "cronnix" en ajoutant avt "open " > > Ca peut éviter pas mal de désagréments, surtout quand on s'exprime mal ;-) t'as bien raison, en plus avec les espaces et les caractères accentués il faut vraiment ce méfier. (au passage je conchie Apple pour son terminal qui supporte pas les accents, son encodage pourrit et tout le reste...) Sinon pour Applescript à la ligne de commande y'a aussi la commande osascript, qui manque franchement de doc mais qui marche vaguement quand même. patpro
De : PDescamps@xxxxxxx.Com Date : Mon, 15 Apr 2002 15:47:29 +0200 Objet : [AS] Script de dossier Salut a tous Que veut dire : Une erreur -1728 est survenue pendant que le serveur de scripts de dossiers exécutait un script? pascal
De : nicolas descombes <nicolas.descombes@xxxxxxx.fr> Date : Mon, 15 Apr 2002 16:51:03 +0200 Objet : [AS] Re: Script de dossier Le 15/04/02 15:47, PDescamps@xxxxxxx.Com a écrit : > Salut a tous > > Que veut dire : > Une erreur -1728 est survenue pendant que le serveur de scripts de dossiers > exécutait un script? erreur -1728 : impossible d'obtenir <reference> erreur AppleEvent ton script a dû demander une référence et l'appel a échoué a+ Nicolas -- Traduction française de AppleScript Language Guide 1.3.7 Tome 1 -> 5 disponibles Sommaire général avec liens directs <http://trad.applescript.free.fr/Accueil.html> --
De : PDescamps@xxxxxxx.Com Date : Mon, 15 Apr 2002 17:32:53 +0200 Objet : [AS] Réf. : [AS] Re: Script de dossier Merci
De : lamica <la.mica@xxxxxxx.net> Date : Mon, 15 Apr 2002 17:43:43 +0200 Objet : [AS] delay 0.5 bonjour comment faire une pause inférieure à 1 seconde ? je suis en train d'écrire un programme de métronome amélioré qui marche bien mais j'ai besoin d'une instruction équivalente à "delay 0.5" or le dictionnaire dit que delay doit être suivi d'un integer et si j'essaie quand même de faire delay 0.5 il y a des problèmes: ça ne tourne pas rond... comment faire ? vincent ps voici mon script: (pour la bossa nova) tell application "Finder" set secondes to (the text returned of ¬ (display dialog ("le tempo en battements par minute ?") default answer "144")) as integer set tempo to (60 / secondes) set toc to true set hum to false set temps to {toc, hum, toc, hum, toc, toc, hum, toc} end tell tell application "Finder" --repeat repeat with son in temps delay tempo if son then beep end repeat --end repeat end tell
De : lamica <la.mica@xxxxxxx.net> Date : Mon, 15 Apr 2002 18:17:03 +0200 Objet : [AS] Re: Lancement programmé pour quitter le script à la fin, tu peux aussi indiquer "quit me" je m'étai sposé cette question
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Mon, 15 Apr 2002 18:48:16 +0200 Objet : [AS] Re: delay 0.5 À 17:43 +0200 le 15.04.2002, lamica écrivait au sujet de "[AS] delay 0.5" : > comment faire une pause inférieure à 1 seconde ? osax WaitTicks 1.0.2 a+ -- Daniel
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Mon, 15 Apr 2002 19:41:53 +0200 Objet : [AS] Re: Disk Copy À 19:06 +0200 le 13.04.2002, Patrice Roussel écrivait au sujet de "[AS] Disk Copy" : > Je suis sous OS X > Lorsque je lance un disque image (‘.img’), Disk Copy se lance et lance la vérification. J’ai le pouvoir (the power) de l'arrêter en cliquant sur le bouton ignorer. Préférences, onglet vérification. Mais Je ne vois pas le problème avec la vérif. Le temps ?? Disk Copy ne reste pas ouvert une fois l'image montée. > Mais malheureusement Disk Copy application écrite par Apple n’est pas scriptable !! > Et je vous justement ouvrir mon ‘.img’ dans un scipt ! Tell app "finder" to open item monFichier --using application file id "ddsk" > Je pense qu’il serait mieux que j’utilise des self mounting image ‘.smi’ qui, elles, n’utilise pas Disck Copy au lancement et ne demande donc pas de vérification. > Mais,... Je viens de m'apercevoir que je ne savais pas créer de ‘smi’ > Une âme charitable, je sais qu’il y en a beaucoup sur cette liste, pourrait-elle m’aider? Les .smi ne sont faisables que par AppleScript... (Ce n'est pas une blague...) Disk Copy est scriptable en version Classique. (6.3.3) Il existe des scripts déjà fait par Apple pour celà : <http://downloAd.info.apple.com/Apple_Support_Area/Apple_Software_Updates/English-North_American/Macintosh/Utilities/Disk_Copy/Disk_Copy_6.3_Scripts.smi.bin> Doc sur Dis Copy classic en français : <http://www.gete.net/dossiers/diskcopy/> A+ P.S. : Merci d'éviter le HTML quand ce n'est pas nécessaire. Voir : <http://marc.herbert.free.fr/mail/> -- Daniel
De : lamica <la.mica@xxxxxxx.net> Date : Mon, 15 Apr 2002 21:02:10 +0200 Objet : [AS] Re: delay Bonsoir suite au conseil de Daniel Varlet, j'utilise l'osax WaitTicks le script suivant marche très bien pour un tempo de 144 j'ai beau me creuser la tête, je ne vois absolument pas pourquoi, à partir d'un tempo 300, il perd les pédales: le rythme devient uniforme. Est-ce dû à la lenteur de mon processeur (300 Mhz...) -- tempo Bossa Nova tell application "Finder" set tempo to (the text returned of ¬ (display dialog ("le tempo en battements par minute ?") default answer "144")) as integer set secondes to (60 / tempo) set ticks to (secondes * 60) display dialog ticks set toc to true set hum to false set temps to {toc, hum, toc, hum, toc, toc, hum, toc} end tell tell application "Finder" --repeat repeat with son in temps if son then beep WaitTicks {ticks, false} end repeat --end repeat end tell Vincent ibook 300 mhz 3 go 160 mo mac os 9,2,1
De : Nicolas Barbulesco <nbarbulesco@xxxxxxx.fr> Date : Mon, 15 Apr 2002 22:28:32 +0200 (CEST) Objet : [AS] Re: Créer des "fichiers d'adresse Web" à partir d'un texte --- Daniel Varlet <varlet@xxxxxxx.ch> a écrit : > À 21:44 +0200 le 13.04.2002, Nicolas Barbulesco > écrivait au sujet de "[AS] Créer des "fichiers > d'adresse Web" à partir d'un t" : > > Bonjour, > > > > Voilà, j'ai un texte (dans un fichier, ou une > > variable, ou le presse-papiers) qui contient > > -- Début du texte > > www.yahoo.fr > > www.apple.com > > www.macplus.net > > www.patpro.net > > -- Fin du texte > > > > Pour l'instant on dit que mon texte ne contient > que > > les URL, séparées par un retour à la ligne. Donc > pas > > de filtrage à faire. Donc le problème est : > comment > > crée un "fichier d'adresse Web" dirigé vers > l'adresse > > monAdresse ? Les fichiers d'adresse Web sont ces > > fichiers qu'on obtient en faisant glisser un bout > de > > texte dans le Finder (type : adresse d'une page > Web" > > dans les infos). Déjà, je ne sais pas si on peut > créer > > un tel fichier avec AppleScript, mais admettons > qu'on > > dispose d'un fichier modèle qu'on modifie. Dans > > ResEdit, j'ai vu certaines ressources, donc je me > > demande si on peut modifier dans un script les > > ressources d'un fichier... > > > > Bref, si quelqu'un a une idée... ;-) > > Pas trop le temps de développer. > juste ce ***Brouillon*** /note avec tanaka : > > [SCRIPT Brouillon/notes] > -- Internet location file types > assigned by the Finder. > -- OSType looks like > Description > -- > ______________________________________________________________________ > -- 'ilht' http:// an http > address > -- > -- 'ilft' ftp:// a ftp > server address > -- > -- 'ilfi' file:// a file > on disk > -- > -- 'ilma' mailto: an > email address > -- > -- 'ilnw' news: news > group or article > -- > -- 'ilaf' afp:// (AppleShare) Apple > Filing Protocol address > -- > -- 'ilat' at:// (AppleTalk) an > AppleTalk address > -- > -- 'ilge' unknown (generic) URL scheme some > other resource > > > set t to "www.patpro.net" > > set list_type to {"ilht", "ilft", "ilfi", "ilma", > "ilnw", "ilaf", "ilat", "ilge"} > if t begins with "http:" or t begins with "www" then > 1 > else if t begins with "ftp:" then > 2 > else if t begins with "file:" then > 3 > else if t begins with "mailto:" or t contains "@" > then > 4 > else if t begins with "news:" or t begins with > "nntp:" then > 5 > else if t begins with "afp:" then > 6 > else if t begins with "at:" then > 7 > else > 8 > end if > set type_file to item result of list_type > > if (count of t) > 31 then > text 1 thru 31 of t > else > t > end if > set name_file to result > > set f to "" & (path to desktop) & name_file > MT Write Clipping t to f with as URL > tell application "Finder" to set file type of item f > to type_file > > [/SCRIPT] > > Il s'avère que ça ne marche pas pour autre chose > que http.... C'est vraiment une ébauche !!! > Certainement avec Akua ou autre pour faire des > ressources + complètes. > > Voir en vrac : > pour les ressources : > <http://listserv.dartmouth.edu/scripts/wa.exe?A2=ind0002&L=macscrpt&D=0&P=5921> > > une appli AScriptable pas testé : > <http://www-rohan.sdsu.edu/~cleaver/software/> > > > Désolé, à la bourre... > A+ Merci beaucoup ! J'ai téléchargé Tanaka, ça marchait pas, mais avec MT Write Clipping t to file f with as URL à la place de MT Write Clipping t to f with as URL ça marche. Je suis donc arrivé à un script qui fonctionne et qui gère l'ajout de numéros à la fin d'un fichier qui a le même nom qu'un fichier existant (ça m'a bien pris la tête, ça !) : -- Début du script tell application "Finder" set laBaseDossier to "Adresses" set leNomDuDossier to laBaseDossier if exists item ("Macintosh HD:Desktop Folder:" & leNomDuDossier) then set i to 2 set leNomDuDossier to laBaseDossier & i repeat while exists item ("Macintosh HD:Desktop Folder:" & leNomDuDossier) set i to i + 1 set leNomDuDossier to laBaseDossier & i end repeat end if make new folder at desktop with properties {name:leNomDuDossier} end tell set leTexte to the clipboard set AppleScript's text item delimiters to return set laListe to text items of leTexte repeat with cetElement in laListe if cetElement is not in {"", return} then if (count of cetElement) > 31 then set leNomDuFichier to text 1 thru 31 of cetElement else set leNomDuFichier to cetElement end if set AppleScript's text item delimiters to ":" set lesElementsTexte to text items of leNomDuFichier set AppleScript's text item delimiters to "-" set leNomDuFichier to (lesElementsTexte as text) set leNomDuFichierNouv to leNomDuFichier tell application "Finder" if exists item ("Macintosh HD:Desktop Folder:" & leNomDuDossier & ":" & leNomDuFichierNouv) then set i to 2 repeat while exists item ("Macintosh HD:Desktop Folder:" & leNomDuDossier & ":" & leNomDuFichierNouv) set leNomDuFichierNouv to my nomAvecNombre(leNomDuFichierNouv, i) set i to i + 1 end repeat end if end tell set leFichier to ("Macintosh HD:Desktop Folder:" & leNomDuDossier & ":" & leNomDuFichierNouv) MT Write Clipping cetElement to file leFichier with as URL tell application "Finder" to set file type of file leFichier to "ilht" end if end repeat on nomAvecNombre(nom, n) if length of (nom & n) <= 31 then return (nom & n) else return (text 1 thru (31 - (length of (n as text))) of nom) & n end if end nomAvecNombre -- Fin du script ___________________________________________________________ Do You Yahoo!? -- Une adresse @yahoo.fr gratuite et en français ! Yahoo! Mail : http://fr.mail.yahoo.com
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Tue, 16 Apr 2002 00:29:08 +0200 Objet : [AS] Re: Créer des "fichiers d'adresse Web" à partir d'un texte À 22:28 +0200 le 15.04.2002, Nicolas Barbulesco écrivait au sujet de "[AS] Re: Créer des "fichiers d'adresse Web" à partir " : Si tu pouvais ne pas tout reprendre dans ta réponse, ce serait bien. [...snip... ] > > Merci beaucoup ! J'ai téléchargé Tanaka, ça marchait > pas, mais avec MT Write Clipping t to file f with as > URL à la place de MT Write Clipping t to f with as URL > ça marche. Désolé, c'est un coup de traitre de jon's Commands ou d'Akua. Ils font des coercitions en douce... Ce qui fait que je n'ai pas remarqué que j'avais lu le dico de travers. > Je suis donc arrivé à un script qui fonctionne et qui > gère l'ajout de numéros à la fin d'un fichier qui a le > même nom qu'un fichier existant (ça m'a bien pris la > tête, ça !) : > > -- Début du script Désolé encore, mais pas le temps de reformatter ton script. Tes longueurs de lignes sont trop courtes, ou ajoute des "¬". Encadre aussi tes scripts avec les balises : [SCRIPT] [/SCRIPT] Ça permet de les récupérer facilement avec email2script. A+ -- Daniel
De : Daniel Varlet <varlet@xxxxxxx.ch> Date : Tue, 16 Apr 2002 01:10:01 +0200 Objet : [AS] Re: delay À 21:02 +0200 le 15.04.2002, lamica écrivait au sujet de "[AS] Re: delay" : > Bonsoir > > suite au conseil de Daniel Varlet, j'utilise l'osax WaitTicks > > > le script suivant marche très bien pour un tempo de 144 > > j'ai beau me creuser la tête, je ne vois absolument pas pourquoi, à > partir d'un tempo 300, > il perd les pédales: le rythme devient uniforme. > > Est-ce dû à la lenteur de mon processeur (300 Mhz...) Les events sont trop lent, il accumule les infos (events) et les sort à son rythme... AS n'a pas l'air fait pour ça. C'est encore pire avec un 733 mhz. Tempo presque indifférenciable de 120 à 300. Peut-être avec QuicKTime ou autre pour régler la vitesse d'un son joué en boucle. néanmoins j'en ai profité pour rapidemment mettre ton script avec Akua. Permet de sortir d'une boucle sans fin en éternuant près de la souris... merci de baliser tes scripts comme suit . [SCRIPT] -- tempo Bossa Nova tell application "Finder" set tempo to (the text returned of ¬ (display dialog ("le tempo en battements par minute ?") default answer "144")) as integer set secondes to (60 / tempo) set ticks to round (secondes * 60) display dialog ticks set toc to true set hum to false set temps to {toc, hum, toc, hum, toc, toc, hum, toc} end tell tell application "Finder" set c to conglomerate of (input state) -- n'importe quelle action clavier/souris repeat repeat with son in temps if son then beep --WaitTicks {ticks, false} pause for ticks with break on key and break on button without seconds timing end repeat if conglomerate of (input state) ≠ c then exit repeat end repeat end tell [/SCRIPT] A+ -- Daniel