Register for your free account! | Forgot your password?


Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 03:42

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Pc Sprechen lassen.

Discussion on Pc Sprechen lassen. within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Dec 2009
Posts: 1,622
Received Thanks: 2,070
Pc Sprechen lassen.

Hallo.

Ich wollte denen unter euch die es nicht kennen, zeigen, wie ihr euren Pc in englischem akzent sprechen lässt.

Mit Folgender funktion:

Code:
Func Talk($text)
    $StrText=($text) 
    $ObjVoice = ObjCreate("SAPI.SpVoice")
    $ObjVoice.Speak ($StrText)
EndFunc
Und hier ein beispiel.


Code:
Talk("Hello and Welcome. I am DeineMudda.")

Func Talk($text)
    $StrText=($text) 
    $ObjVoice = ObjCreate("SAPI.SpVoice")
    $ObjVoice.Speak ($StrText)
EndFunc



Und hier nochmal der Source, von einem kleinen tool, wenn ihr niemandem zum reden habt xD

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Pc Talker", 412, 71, 192, 124)
$Label1 = GUICtrlCreateLabel("Text:", 8, 8, 28, 17)
$Input1 = GUICtrlCreateInput("Hello and Welcome. This is a Test.", 48, 8, 345, 21)
$Button1 = GUICtrlCreateButton("Speak it!", 152, 40, 107, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			
		Case $Button1
			guictrlsetstate($Button1, $GUI_DISABLE)
			sleep(200)
			Talk(Guictrlread($Input1))
            guictrlsetstate($Button1, $GUI_ENABLE)
	EndSwitch
WEnd






Func Talk($text)
$StrText=($text) 
$ObjVoice = ObjCreate("SAPI.SpVoice")
$ObjVoice.Speak ($StrText)
EndFunc




So nun fragt ihr euch vielleicht: "Wozu soll das gut sein?"

Und hier die Antwort:

"Zum beispiel um dem benutzer nicht nur optisch, sondern auch akustisch manches klar zu machen

Wenn ihr ihm zum beispiel mitteilen wollt, dass er etwas gestartet hat, könnt ihr das optisch und akustisch zeigen. Zum Beispiel 'Suspended Process successfully.'"

Hierbei ist es natürlich wichtig, dass ihr in klarem englisch schreibt.
freehuntx is offline  
Thanks
4 Users
Old 07/25/2011, 14:14   #2
 
elite*gold: 0
Join Date: May 2011
Posts: 515
Received Thanks: 64
Danke. Kann man bestimmt irgendwann einmal gebrauchen
SIEG.FRIED is offline  
Old 07/25/2011, 16:32   #3
 
elite*gold: 0
Join Date: Nov 2009
Posts: 221
Received Thanks: 71
Geht das auch mit deutschem akzent??
bollen is offline  
Old 07/25/2011, 19:33   #4
 
elite*gold: 6
Join Date: May 2011
Posts: 2,950
Received Thanks: 1,270
Thanks, das hätte ich sonst irgendwann mal gesucht und so weiß ich gleich, wie es geht!
dommerle is offline  
Old 07/25/2011, 21:17   #5
 
elite*gold: 20
Join Date: Feb 2007
Posts: 3,080
Received Thanks: 4,295
wollts mal ausprobieren bekomme aber fehlermeldung

Code:
 ==> ....Variable must be of type "Object".:
$ObjVoice.Speak ($StrText)
$ObjVoice^ ERROR
@error returned mir auf jedenfall keinen fehler.

hm hab eben festgestellt das die ObjCreate beispiele aus der hilfe auch nicht funktionieren, vielleicht liegts am os? win7 64bit
kknb is offline  
Thanks
1 User
Old 07/25/2011, 23:23   #6
 
elite*gold: 0
Join Date: Apr 2008
Posts: 1,079
Received Thanks: 436
Quote:
Originally Posted by kknb View Post
wollts mal ausprobieren bekomme aber fehlermeldung

Code:
 ==> ....Variable must be of type "Object".:
$ObjVoice.Speak ($StrText)
$ObjVoice^ ERROR
@error returned mir auf jedenfall keinen fehler.

hm hab eben festgestellt das die ObjCreate beispiele aus der hilfe auch nicht funktionieren, vielleicht liegts am os? win7 64bit
Daran liegts nicht, hab genau dieselbe Konfiguration.
Bei mir hat dass Beispiel Script, so wie es ist, auf Anhieb funktioniert.
Code:
Talk("Hello and Welcome. I am DeineMudda.")

Func Talk($text)
    $StrText=($text) 
    $ObjVoice = ObjCreate("SAPI.SpVoice")
    $ObjVoice.Speak ($StrText)
EndFunc
Installier mal die neuste Version von Autoit.
| Moep | is offline  
Old 07/26/2011, 00:52   #7
 
elite*gold: 0
Join Date: Dec 2009
Posts: 1,622
Received Thanks: 2,070
Quote:
Originally Posted by bollen View Post
Geht das auch mit deutschem akzent??
Nein Leider nicht.

Aber ich finde englisch sowieso viel besser, weil du damit nicht nur deutsche, sondern leute aller welt bedienst.
freehuntx is offline  
Old 07/26/2011, 14:37   #8
 
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
Man kann stimmen hinzu installieren.
Ansonsten pretty basic, gibt ne UDF auf autoitscript.com
PenGuin :O is offline  
Old 07/27/2011, 11:34   #9
 
elite*gold: 0
Join Date: Dec 2009
Posts: 1,622
Received Thanks: 2,070
Quote:
Originally Posted by PenGuin :O View Post
Man kann stimmen hinzu installieren.
Ansonsten pretty basic, gibt ne UDF auf autoitscript.com
Schon klar dass man stimmen installieren kann, aber die sind bis zu 100 mb groß.
freehuntx is offline  
Old 07/27/2011, 16:48   #10
 
elite*gold: 0
Join Date: Nov 2009
Posts: 221
Received Thanks: 71
Wenn es Auf Win7 x64 nicht funktioniert dan setz mal
Code:
#AutoIt3Wrapper_usex64=n
an den Anfang
bollen is offline  
Reply


Similar Threads Similar Threads
[Locale_big5.lua] NPCs & Mobs sprechen lassen
11/27/2011 - Metin2 PServer Guides & Strategies - 50 Replies
Hi, hab die locale_big5.lua weiter übersetzt: NPCs und Mobs reden nun deutsch (text über den Köpfen)... Habe mir einige bekannte Film-Zitate rausgesucht, anstatt mir irgendeinen Blödsinn einfallen zu lassen :) Filme wie Der Pate, Scarface, Kleine Arschloch, Harold & Kumar usw ...
Metin2 Hamachi P Server NPC`s sprechen und Lehrern Fb´s vken lassen!
12/12/2010 - Metin2 Private Server - 11 Replies
Hallo,Leutz! Mir haben viele von euch geziegt (z.B Raiden und andere),dass man bei Problemen sehr genau aufgeklärt wird!Naja mein P Server steht jetz kanpp 48 Std und ich arbeite grade an den NPC´s mein Problem ist das ich z.B die Lehrer nicht zum vken kriege!Die Gemi oda Eventhelferin was zu vken lassen ist relativ einfach!Könnte mir einer das ma erklären wie das auch bei NPC´s geht die eig keinen Shop haben!Danke!Und braucht man für NPC´s sprechen undbeding Filezilla?Wenn ja bitte auch...
[How to] NPC sprechen lassen
08/27/2010 - Metin2 PServer Guides & Strategies - 3 Replies
Hallo Com, Ich zeige euch wie ihr den Monster oder NPC das Sprechen beibringt. 1. Ladet euch die locale_big5.lua von eurem Server. Ihr findet Sie im Verzeichniss: /usr/rain/channel/share_data/locale/hongkong/ques t 2. Öffnet die Datei mit einem Texteditor und sucht nach "locale.monster_chat = { " 3. In der 1. Klammer steht die ID des NPC/Mops dann kommt ={ und nun euer Text in Anführungseichen. Wenn ihr mehr als eine Satz sagen lassen wollt, Trennt die einzelnen Sätze mit einem...



All times are GMT +2. The time now is 03:42.


Powered by vBulletin®
Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2021 elitepvpers All Rights Reserved.