AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  Connexion  

Partagez | 
 

 Faire parler 'The Voice'

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
onilink_
Modérateur
avatar

Messages : 8926
Localisation : Montpellier
Projet Actuel : Planet Centauri
OniDev

MessageSujet: Faire parler 'The Voice'   Mar 23 Aoû 2011 - 18:55

Bon histoire de dire que la section n'est pas morte, voila un ptit script pour faire parler the VOICE

Code:
// speak(words)
var file;
file = file_text_open_write("say.vbs")
file_text_write_string(file,'Set d=CreateObject("SAPI.SpVoice")')
file_text_writeln(file)
file_text_writeln(file)
file_text_write_string(file,'d.Speak "' + string(argument0) + '"')
file_text_close(file)
execute_shell("say.vbs","")


Et voici une version avec plus de paramètres :

Code:
// speak_ext(message, volume, speed, voice id)

if(argument1 > 100) argument1 = 100

var f; f = file_text_open_write("say.vbs")
file_text_write_string(f, 'Set v=CreateObject("SAPI.SpVoice")' )
file_text_writeln(f)
file_text_write_string(f, 'size = 0')
file_text_writeln(f)
file_text_write_string(f, 'For Each Voice In v.GetVoices')
file_text_writeln(f)
file_text_write_string(f, 'size = size + 1')
file_text_writeln(f)
file_text_write_string(f, 'Next')
file_text_writeln(f)

file_text_write_string(f, 'If ' + string(argument3) + ' <= size-1 Then')
file_text_writeln(f)
file_text_write_string(f, 'Set v.Voice = v.GetVoices().Item(' + string(argument3) + ')')
file_text_writeln(f)
file_text_write_string(f, 'End If')
file_text_writeln(f)

file_text_write_string(f, 'v.Volume = ' + string(argument1) )
file_text_writeln(f)
file_text_write_string(f, 'v.Rate = ' + string(argument2) )
file_text_writeln(f)
file_text_write_string(f, 'v.Speak "' + string(argument0) + '"')
file_text_writeln(f)

file_text_close(f)
execute_shell("say.vbs","")

argument0 : Le message
argument1 : Le volume entre 0 et 100
argument2 : La vitesse de la voix, entre 0 et 100
argument3 : l'id de la voix. Par défaut il n'y a qu'une voix, et c'est donc l'id 0. (Je n'ai qu'une voix sur mon pc donc je suis pas sur que ça fonctionne)


Si vous voulez connaitre toutes les voix disponible sur un pc :
Code:
//show_voices()
var f; f = file_text_open_write("get.vbs")
file_text_write_string(f, 'Set v=CreateObject("SAPI.SpVoice")' )
file_text_writeln(f)
file_text_write_string(f, 'For Each Voice In v.getvoices' )
file_text_writeln(f)
file_text_write_string(f, 'n = n + 1' )
file_text_writeln(f)
file_text_write_string(f, 'msgbox "" & (n - 1) & " - " & Voice.GetDescription' )
file_text_writeln(f)
file_text_write_string(f, 'Next' )
file_text_writeln(f)
file_text_close(f)
execute_shell("get.vbs", "")

Pour plus d'infos allez donc faire un tour ici : http://msdn.microsoft.com/en-us/library/ms723602%28v=VS.85%29.aspx

_________________
                 


Dernière édition par onilink_ le Mer 26 Oct 2011 - 12:51, édité 2 fois
Revenir en haut Aller en bas
arthuro
Utilisateur confirmé: Rang ****
avatar

Messages : 1337
Localisation : Grenoble / Méribel
Projet Actuel : CBNA

MessageSujet: Re: Faire parler 'The Voice'   Mar 23 Aoû 2011 - 21:48

hé sympa!

_________________

D'autres jeux :
In The Cube
In the cube 2
Revenir en haut Aller en bas
onilink_
Modérateur
avatar

Messages : 8926
Localisation : Montpellier
Projet Actuel : Planet Centauri
OniDev

MessageSujet: Re: Faire parler 'The Voice'   Mer 26 Oct 2011 - 12:52

Plop, j'ai ajouté une version avec de nombreux paramètres pour les intéressés :p

_________________
                 
Revenir en haut Aller en bas
PsycKho
Très bonne participation
avatar

Messages : 154
Projet Actuel : http://www.sharedojo.netai.net/

MessageSujet: Re: Faire parler 'The Voice'   Dim 27 Nov 2011 - 0:25

Ouille sympa o,o
ça pourrait être intéressant dans un simulateur spatial pour faire une IA : D
Revenir en haut Aller en bas
http://www.sharedojo.netai.net/
Contenu sponsorisé




MessageSujet: Re: Faire parler 'The Voice'   

Revenir en haut Aller en bas
 
Faire parler 'The Voice'
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Le normand : langue ou pas langue ?
» Techniques pour parler en public - Trucs contre le trac
» [Presse] Awa Sy (Voice 4) - La prod veut la faire gagner !
» Faire disparaître les pores voyants...
» Que faire avec des coings ?

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
Forum Le CBNA :: Développement :: Scripts GML-
Sauter vers: