property pathToSounds : "Naufrage:Users:jyb:Desktop:dtmf:" -- Faire un truc plus intelligent avec path to me
dialNumber("1234567890")
on dialNumber(aString) set AppleScript's text item delimiters to "" set digitList to every item of aString repeat with d in digitList dialDigit(d) end repeat end dialNumber
on dialDigit(digit) play(pathToSounds & "dtmf-" & digit & ".mp3") end dialDigit
on play(theFile) tell application "Play Sound" to play theFile as alias end play
merci pour ces éléments
je vais essayer de m'en tirer avec ça
Jean-Yves Bernier <grokub@pescadoo.net> wrote:
property pathToSounds : "Naufrage:Users:jyb:Desktop:dtmf:"
-- Faire un truc plus intelligent avec path to me
dialNumber("1234567890")
on dialNumber(aString)
set AppleScript's text item delimiters to ""
set digitList to every item of aString
repeat with d in digitList
dialDigit(d)
end repeat
end dialNumber
on dialDigit(digit)
play(pathToSounds & "dtmf-" & digit & ".mp3")
end dialDigit
on play(theFile)
tell application "Play Sound" to play theFile as alias
end play
property pathToSounds : "Naufrage:Users:jyb:Desktop:dtmf:" -- Faire un truc plus intelligent avec path to me
dialNumber("1234567890")
on dialNumber(aString) set AppleScript's text item delimiters to "" set digitList to every item of aString repeat with d in digitList dialDigit(d) end repeat end dialNumber
on dialDigit(digit) play(pathToSounds & "dtmf-" & digit & ".mp3") end dialDigit
on play(theFile) tell application "Play Sound" to play theFile as alias end play
merci pour ces éléments
je vais essayer de m'en tirer avec ça
blanc
JiPaul wrote:
J'ai modifié ton script pour le transformer en plugin pour le carnet d'adresses.
Nouvelle modif pour utiliser une autre version de playson (en CLI) que j'avais. Je ne sais pas si on peut encore la trouver. L'avantage est d'avoir une composition moins hachée.
Je ne mets que les fonctions modifiées ci-dessous (et certaines anciennes sont à supprimer).
on callnumber(ph) set ph to my cleannumber(ph) if ph is "" then tell me to activate display dialog "Numéro de telephone invalide" with icon stop buttons {"Stop"} default button 1 return else tell me to activate display dialog "Composition de " & ph with icon stop buttons {"OK"} default button 1
end if
set arg to "" repeat with c in ph set arg to pathToSounds & "dtmf-" & c & ".mp3 " & arg end repeat play(arg) end callnumber
on play(args) do shell script pathToPlaySon & args end play
-- JiPaul. / /--/--// Jean-Paul Blanc |/| L | quelquepart en (somewhere in) /|| = ||| FRANCE
JiPaul <blanc@empty.org> wrote:
J'ai modifié ton script pour le transformer en plugin pour le carnet
d'adresses.
Nouvelle modif pour utiliser une autre version de playson (en CLI) que
j'avais. Je ne sais pas si on peut encore la trouver. L'avantage est
d'avoir une composition moins hachée.
Je ne mets que les fonctions modifiées ci-dessous (et certaines
anciennes sont à supprimer).
on callnumber(ph)
set ph to my cleannumber(ph)
if ph is "" then
tell me to activate
display dialog "Numéro de telephone invalide" with icon
stop buttons {"Stop"} default button 1
return
else
tell me to activate
display dialog "Composition de " & ph with icon stop
buttons {"OK"} default button 1
end if
set arg to ""
repeat with c in ph
set arg to pathToSounds & "dtmf-" & c & ".mp3 " & arg
end repeat
play(arg)
end callnumber
on play(args)
do shell script pathToPlaySon & args
end play
--
JiPaul.
/ /--/--//\ Jean-Paul Blanc
|/| L |\ quelquepart en (somewhere in)
/|| = |||\ FRANCE
J'ai modifié ton script pour le transformer en plugin pour le carnet d'adresses.
Nouvelle modif pour utiliser une autre version de playson (en CLI) que j'avais. Je ne sais pas si on peut encore la trouver. L'avantage est d'avoir une composition moins hachée.
Je ne mets que les fonctions modifiées ci-dessous (et certaines anciennes sont à supprimer).
on callnumber(ph) set ph to my cleannumber(ph) if ph is "" then tell me to activate display dialog "Numéro de telephone invalide" with icon stop buttons {"Stop"} default button 1 return else tell me to activate display dialog "Composition de " & ph with icon stop buttons {"OK"} default button 1
end if
set arg to "" repeat with c in ph set arg to pathToSounds & "dtmf-" & c & ".mp3 " & arg end repeat play(arg) end callnumber
on play(args) do shell script pathToPlaySon & args end play
-- JiPaul. / /--/--// Jean-Paul Blanc |/| L | quelquepart en (somewhere in) /|| = ||| FRANCE
laurent.pertois
JiPaul wrote:
Nouvelle modif pour utiliser une autre version de playson (en CLI) que j'avais. Je ne sais pas si on peut encore la trouver. L'avantage est d'avoir une composition moins hachée.
A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai du l'intégrer dans ta fonction qui assemble les morceaux :
property pathToPlaySon : "/usr/bin/afplay "
on dialDigit(digit) do shell script pathToPlaySon & pathToSounds & "dtmf-" & digit & ".mp3" end dialDigit
Mais bon, c'est lent mais ça doit pouvoir s'améliorer, sauf qu'AppleScript et moi ça a toujours fait 2 :)
-- Politically Correct Unix - UTILITIES The "touch" command has been removed from the standard distribution due to its inappropriate use by high-level managers.
JiPaul <blanc@empty.org> wrote:
Nouvelle modif pour utiliser une autre version de playson (en CLI) que
j'avais. Je ne sais pas si on peut encore la trouver. L'avantage est
d'avoir une composition moins hachée.
A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que
lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai
du l'intégrer dans ta fonction qui assemble les morceaux :
property pathToPlaySon : "/usr/bin/afplay "
on dialDigit(digit)
do shell script pathToPlaySon & pathToSounds & "dtmf-" & digit &
".mp3"
end dialDigit
Mais bon, c'est lent mais ça doit pouvoir s'améliorer, sauf
qu'AppleScript et moi ça a toujours fait 2 :)
--
Politically Correct Unix - UTILITIES
The "touch" command has been removed from the standard distribution due
to its inappropriate use by high-level managers.
Nouvelle modif pour utiliser une autre version de playson (en CLI) que j'avais. Je ne sais pas si on peut encore la trouver. L'avantage est d'avoir une composition moins hachée.
A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai du l'intégrer dans ta fonction qui assemble les morceaux :
property pathToPlaySon : "/usr/bin/afplay "
on dialDigit(digit) do shell script pathToPlaySon & pathToSounds & "dtmf-" & digit & ".mp3" end dialDigit
Mais bon, c'est lent mais ça doit pouvoir s'améliorer, sauf qu'AppleScript et moi ça a toujours fait 2 :)
-- Politically Correct Unix - UTILITIES The "touch" command has been removed from the standard distribution due to its inappropriate use by high-level managers.
grokub
JiPaul wrote:
J'ai modifié ton script pour le transformer en plugin pour le carnet d'adresses.
Cool ! On s'amuse bien sur fcsmc.
Pour ceux qui ont un modem RTC (mon ziMac n'en n'a plus), il y existe une autre solution:
- Relier leur poste tel et le modem en parallèle (prise en "T" avec reprise arrière ou coupleur 2xRJ11)
- Expédier un ATDT "0123456789" sur /dev/cu.modem
- Décrocher le poste
Ce qui peut se faire depuis AppleScript avec SerialPort X:
http://mysite.verizon.net/vzenuoqe/MacSoft.html
Il y a même un exemple "Dial from Address Book" dans DfAB.scpt
Que demande le peuple ?
-- Jean-Yves Bernier <http://www.pescadoo.net/>
JiPaul <blanc@empty.org> wrote:
J'ai modifié ton script pour le transformer en plugin pour le carnet
d'adresses.
Cool ! On s'amuse bien sur fcsmc.
Pour ceux qui ont un modem RTC (mon ziMac n'en n'a plus),
il y existe une autre solution:
- Relier leur poste tel et le modem en parallèle (prise en "T" avec
reprise arrière ou coupleur 2xRJ11)
- Expédier un ATDT "0123456789" sur /dev/cu.modem
- Décrocher le poste
Ce qui peut se faire depuis AppleScript avec SerialPort X:
http://mysite.verizon.net/vzenuoqe/MacSoft.html
Il y a même un exemple "Dial from Address Book" dans DfAB.scpt
J'ai modifié ton script pour le transformer en plugin pour le carnet d'adresses.
Cool ! On s'amuse bien sur fcsmc.
Pour ceux qui ont un modem RTC (mon ziMac n'en n'a plus), il y existe une autre solution:
- Relier leur poste tel et le modem en parallèle (prise en "T" avec reprise arrière ou coupleur 2xRJ11)
- Expédier un ATDT "0123456789" sur /dev/cu.modem
- Décrocher le poste
Ce qui peut se faire depuis AppleScript avec SerialPort X:
http://mysite.verizon.net/vzenuoqe/MacSoft.html
Il y a même un exemple "Dial from Address Book" dans DfAB.scpt
Que demande le peuple ?
-- Jean-Yves Bernier <http://www.pescadoo.net/>
blanc
Laurent Pertois wrote:
A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai du l'intégrer dans ta fonction qui assemble les morceaux :
Dans ce cas, tu pouvais le faire sur la première version du script Message-ID: <1iq8lmh.1cwjlmf1t6jczhN%
-- JiPaul. / /--/--// Jean-Paul Blanc |/| L | quelquepart en (somewhere in) /|| = ||| FRANCE
A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que
lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai
du l'intégrer dans ta fonction qui assemble les morceaux :
Dans ce cas, tu pouvais le faire sur la première version du script
Message-ID: <1iq8lmh.1cwjlmf1t6jczhN%blanc@empty.org>
--
JiPaul.
/ /--/--//\ Jean-Paul Blanc
|/| L |\ quelquepart en (somewhere in)
/|| = |||\ FRANCE
A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai du l'intégrer dans ta fonction qui assemble les morceaux :
Dans ce cas, tu pouvais le faire sur la première version du script Message-ID: <1iq8lmh.1cwjlmf1t6jczhN%
-- JiPaul. / /--/--// Jean-Paul Blanc |/| L | quelquepart en (somewhere in) /|| = ||| FRANCE
blanc
Jean-Yves Bernier wrote:
Pour ceux qui ont un modem RTC (mon ziMac n'en n'a plus), il y existe une autre solution:
- Relier leur poste tel et le modem en parallèle (prise en "T" avec reprise arrière ou coupleur 2xRJ11)
- Expédier un ATDT "0123456789" sur /dev/cu.modem
- Décrocher le poste
Ce qui peut se faire depuis AppleScript avec SerialPort X:
http://mysite.verizon.net/vzenuoqe/MacSoft.html
Il y a même un exemple "Dial from Address Book" dans DfAB.scpt
OK. Merci :-) -- JiPaul. / /--/--// Jean-Paul Blanc |/| L | quelquepart en (somewhere in) /|| = ||| FRANCE
Jean-Yves Bernier <grokub@pescadoo.net> wrote:
Pour ceux qui ont un modem RTC (mon ziMac n'en n'a plus),
il y existe une autre solution:
- Relier leur poste tel et le modem en parallèle (prise en "T" avec
reprise arrière ou coupleur 2xRJ11)
- Expédier un ATDT "0123456789" sur /dev/cu.modem
- Décrocher le poste
Ce qui peut se faire depuis AppleScript avec SerialPort X:
http://mysite.verizon.net/vzenuoqe/MacSoft.html
Il y a même un exemple "Dial from Address Book" dans DfAB.scpt
OK. Merci :-)
--
JiPaul.
/ /--/--//\ Jean-Paul Blanc
|/| L |\ quelquepart en (somewhere in)
/|| = |||\ FRANCE
Pour ceux qui ont un modem RTC (mon ziMac n'en n'a plus), il y existe une autre solution:
- Relier leur poste tel et le modem en parallèle (prise en "T" avec reprise arrière ou coupleur 2xRJ11)
- Expédier un ATDT "0123456789" sur /dev/cu.modem
- Décrocher le poste
Ce qui peut se faire depuis AppleScript avec SerialPort X:
http://mysite.verizon.net/vzenuoqe/MacSoft.html
Il y a même un exemple "Dial from Address Book" dans DfAB.scpt
OK. Merci :-) -- JiPaul. / /--/--// Jean-Paul Blanc |/| L | quelquepart en (somewhere in) /|| = ||| FRANCE
laurent.pertois
JiPaul wrote:
Laurent Pertois wrote:
> A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que > lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai > du l'intégrer dans ta fonction qui assemble les morceaux :
Dans ce cas, tu pouvais le faire sur la première version du script
C'est ce que j'ai fait ;-)
Bon, par contre, je me suis trompé de message en répondant, j'aurais du répondre effectivement au premier.
-- Politically Correct Unix - UTILITIES The "touch" command has been removed from the standard distribution due to its inappropriate use by high-level managers.
> A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que
> lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai
> du l'intégrer dans ta fonction qui assemble les morceaux :
Dans ce cas, tu pouvais le faire sur la première version du script
C'est ce que j'ai fait ;-)
Bon, par contre, je me suis trompé de message en répondant, j'aurais du
répondre effectivement au premier.
--
Politically Correct Unix - UTILITIES
The "touch" command has been removed from the standard distribution due
to its inappropriate use by high-level managers.
> A noter aussi qu'en 10.5 il y a la commande afplay qui lit tout ce que > lit QuickTime, mais elle ne prend pas plusieurs arguments, du coup, j'ai > du l'intégrer dans ta fonction qui assemble les morceaux :
Dans ce cas, tu pouvais le faire sur la première version du script
C'est ce que j'ai fait ;-)
Bon, par contre, je me suis trompé de message en répondant, j'aurais du répondre effectivement au premier.
-- Politically Correct Unix - UTILITIES The "touch" command has been removed from the standard distribution due to its inappropriate use by high-level managers.
manet
Jean-Yves Bernier wrote:
Cool ! On s'amuse bien sur fcsmc.
bon, j'ai importé "serialPort X"
il s'agit d'un osax ; ils disent de le mettre dans scriptingaddition de la bib ; mais je n'ai pas un tel dossier dedans.
En revanche, il y en a un dans la bib du système
où le mettre ?
Jean-Yves Bernier <grokub@pescadoo.net> wrote:
Cool ! On s'amuse bien sur fcsmc.
bon, j'ai importé "serialPort X"
il s'agit d'un osax ; ils disent de le mettre dans scriptingaddition de
la bib ; mais je n'ai pas un tel dossier dedans.
