Beiträge von masterRobb

  • [GUI] Hintergrundbild

    thx an alle schonmal^^
    aber iwie klappt bei mir nix von dem....^^
    Liegt das vlt. daran das ich alle Bilder "umcodeirt" habe - also Filename.... damit jeder die Bilder sieht, der das Programm hat^^... ?
    Oder könnte es sein das ich was falsch gemacht haben könnte?^^ -
    Wenn jmd gerade lust dazu hat ;P *hust* :D
    dann kann er gerne meinen HauptScript so ändern das er klappen sollte ;D^^

    ... ihr habt keine lust oder?...
    Hmm ... -.- also iwie ist das jetzt doof xD - das Hintergrundbild ist eig. das Beste^^ -.- (2.000 Zeilen lang... -.- - Filenames...)
    Ich hoffe ihr wisst auch was filenames sind... und ich damit meine also mit der codeirung eines bildes...^^

    Habe ich mir auch aus dem Forum geklaut xD^^...

    - Ich habe mir gerade nochmal den script von EisTee angeschaut.... emm heißt das ich soll jetzt jeden Button so umschreiben!?!? xD - ja ich bin blöd^^
    Emm - Weil dann wäre es bisschen doof^^....

    mfg MasterRobb

  • [GUI] Hintergrundbild

    Danke klappt bei mir aber iwie nicht ... :D
    Was vlt. auch ein Problem sein könnte:
    Das Bild kommt so nicht obwohl es eig. überhaupt erstmal kommen sollte oder? - und hat AutoIt keine Funktion die ein Hintergrundbild
    ersellt :!: :?:

    Das ist untypisch für AutoIt^^
    Na ja,... wenn euch was einfällt...^^

    Ach und es tut mir echt leid das das in nur wenigen Zeilen zusammen gequetscht ist, aber keine hat eine Ahnung wie so das so ist -.-
    Ist voll kacke - Mein Bruder weiß auch nicht wieso -.-

    mfg MasterRobb

  • [GUI] Hintergrundbild

    Hi,
    ich habe mal eine Frage:
    Also ich habe mir eine Gui erstellt etc.....
    Und auch schon Bilder...
    Problem:
    Ich will mir jetzt noch ein Hintergrundbild reinmachen - wie geht das? ^^
    - Wenn es geht, erklärt es möglichst einfach - für einen Idioten(/klein Kind) wie mich xD^^... Ich bin etwas schwer von Begriff bei AutoIt... :D


    Das ist das Hauptprogramm:

    Spoiler anzeigen
    [autoit]

    #include #include #include #include #include #include #include Global $voice = ObjCreate("Sapi.SpVoice")

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    #Region ### START Koda GUI section ### Form=$Form1_1 = GUICreate("SpeakMaster2009", 626, 414, 194, 126);$Pic1 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Robert.KLINGER-ROBERT\Eigene Dateien\Eigene Bilder\images.jpg", 440, 368, 65, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS));$Pic2 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Robert.KLINGER-ROBERT\Eigene Dateien\Eigene Bilder\Vokale o-lang.gif", 488, 368, 60, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS));$Pic3 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Robert.KLINGER-ROBERT\Eigene Dateien\Eigene Bilder\pi_500.jpg", 544, 368, 52, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS));$Pic1 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Robert.KLINGER-ROBERT\Eigene Dateien\Eigene Bilder\3681_buchstabe_B.jpg", 376, 392, 52, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS));$Pic2 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Robert.KLINGER-ROBERT\Eigene Dateien\Eigene Bilder\BuchstabeY.gif", 424, 392, 36, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS));$Pic1 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Robert.KLINGER-ROBERT\Eigene Dateien\Eigene Bilder\matrix.JPG", 0, 0, 633, 449, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    GUICtrlCreatePic (@ScriptDir&"\matrix.JPG",0,0,632,448)GUICtrlCreatePic (@ScriptDir&"\images.jpg" , 440, 358, 65, 52)GUICtrlCreatePic (@ScriptDir&"\Vokale o-lang.gif", 488, 358, 60, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))GUICtrlCreatePic (@ScriptDir&"\pi_500.jpg", 544, 358, 52, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))GUICtrlCreatePic (@ScriptDir&"\3681_buchstabe_B.jpg",340,358,52,52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) ; NOCH FERTIG MACHEN!!!GUICtrlCreatePic (@ScriptDir&"\BuchstabeY.gif",391,358,36,52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))$Edit1 = GUICtrlCreateEdit("Text", 112, 64, 321, 169)GUICtrlSetTip ($Edit1,"Gebe hier deinen zu Sagenden Text ein")$Edit2 = GUICtrlCreateEdit ("0.5",480,32,145,65)GUICtrlSetTip ($Edit2,"Gebe hier die Geschwindigkeit an 0.5 ist der Standartwert")$Edit3 = GUICtrlCreateEdit("100", 480, 104, 145, 65)GUICtrlSetTip ($Edit3,"Gebe hier die Lautstärke ein - 0-100")$Button1 = GUICtrlCreateButton("Sprechen", 112, 256, 161, 73)GUICtrlSetTip ($Button1,"Das Obenangegeben wird vorgelesen")$Button2 = GUICtrlCreateButton("nehcerpS", 280, 256, 153, 73, 0)GUICtrlSetTip ($Button2,"Das Oben Angegebene wird rückwärts vorgelesen")$Button3 = GUICtrlCreateButton("Codeirung", 8, 8, 89, 65, 0)GUICtrlSetTip ($Button3,"Codirt den Text")$Button4 = GUICtrlCreateButton("EntCodeirung", 8, 75, 89, 65, 0)GUICtrlSetTip ($Button4,"EntCodirt den Text")GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###
    While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 Speak(GUICtrlRead($Edit1),GUICtrlRead($Edit2),GUICtrlRead ($Edit3)) ; ,0.5 ; 100 Case $Button2 Speak(_StringReverse(GUICtrlRead($Edit1)), GUICtrlRead ($Edit2), GUICtrlRead ($Edit3)) ; _StringReverse() drecht alles um also so wie du es willst^^Case $Button3$code = ""Local $code, $stringLocal $string1[26] = ["a", "b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"]Local $code1[26] = ["5", "4","3","2","1","10","9","8","7","6","15","14","13","12","11","20","19","18","17","16","25","24","23","22","21","26"]$var = GUICtrlRead ($Edit1)For $i = 1 To Stringlen($var)$string = StringMid($var, $i, 1)For $a = 0 To 25If $string1[$a] = $string Then $code = $code&$code1[$a]&". "NextNextGUICtrlSetData ($Edit1,$code)Case $Button4$code = ""Local $code, $string, $arrayLocal $string1[27] = [" ","5", "4","3","2","1","10","9","8","7","6","15","14","13","12","11","20","19","18","17","16","25","24","23","22","21","26"]Local $code1[27] = [".","a", "b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"]$var = GUICtrlRead ($Edit1)$array = StringSplit ($var,". ")For $i = 1 to $array[0]For $a = 0 to 26If $array[$i] = $string1[$a] Then $code = $code&$code1[$a]NextNextGUICtrlSetData ($Edit1,$code) EndSwitchWEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func Speak($Text, $Rate, $Vol) $voice.Rate = $Rate $voice.Volume = $Vol $voice.Speak($Text)EndFunc ;==>Speak

    [/autoit] [autoit][/autoit] [autoit]

    Local $code, $stringLocal $string1[2] = ["a", "b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"]Local $code1[2] = ["5", "4","3","2","1","10","9","8","7","6","15","14","13","12","11","20","19","18","17","16","25","24","23","22","21","26"]$var = "Hi ich heiße"
    For $i = 1 To Stringlen($var)$string = StringMid($var, $i, 1)For $a = 0 To 25If $string1[$a] = $string Then $code = $code&$code1[$a]&", "NextNext
    MsgBox(0,"",$code)

    [/autoit]


    PS: Sorry das es so zusammengequetscht ist - Das Forum mag mich nicht -.- DOOFER BUG :(
    Falls es jmd. dazu braucht ... glaube aber nicht^^ - PS: Ist nur ein Teil des Programms weil mit den Filenames ist es 4.800 Zeilen lang und man darf hier sowieso "nur" 100 000 Zeichen abschicken^^

    mfg MasterRobb

  • [GUI] Textart - Schrift - Farbe - Fotos überall

    Hi,
    also ich habe mal eine Frage: Wie kann ich mit koda die Schriftart, - Größe, - Farbe etc. ändern?^^
    Und wie kann ich es machen das ein Bild bei koda auch auf anderen Computern klappt,.... und das automatisch^^ - also sobald ich die Datei weiterschicke - gleichzeitig die bilder.... etc.?^^
    Nun ja geht das überhaupt?^^

    mfg MasterRobb

  • Speaker - Verknüpfung zwischen Text und Variable

    Hi^^
    Also ich bräuchte mal hilfe:^^


    1. Problem hat sich gelöst sry....^^ aber wie kriege ich es hin das der Quelltext nicht in einer Zeile steht?

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------
    AutoIt Version: 3.3.0.0 Author: myName
    Script Function:Template AutoIt script.
    #ce ----------------------------------------------------------------------------
    ; Script Start - Add your code below here
    #include #include #include #include #include Global $b,$cGlobal $voice = ObjCreate("Sapi.SpVoice")
    #Region ### START Koda GUI section ### Form=$Form1_1 = GUICreate("SpeakMaster2009", 626, 414, 194, 126)$Edit1 = GUICtrlCreateEdit("", 112, 64, 321, 169)GUICtrlSetData(-1, "Text")$Edit2 = GUICtrlCreateEdit ("",480,32,145,65)GUICtrlSetData(-1, "Geschwindigkeit - 0,5 gleich Standart")$Edit3 = GUICtrlCreateEdit("", 480, 104, 145, 65)GUICtrlSetData(-1, "Lautstärke - 0-100")$Button1 = GUICtrlCreateButton("Sprechen", 112, 256, 161, 73)$Button2 = GUICtrlCreateButton("nehcerpS", 280, 256, 153, 73, 0)GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 Speak(GUICtrlRead($Edit1),$b, $c) ; ,0.5 ; 100 Case $Button2 Speak(_StringReverse(GUICtrlRead($Edit1)), 0.5, 100) ; _StringReverse() drecht alles um also so wie du es willst^^ EndSwitchWEndFunc Speak($Text, $Rate, $Vol) $voice.Rate = $Rate $voice.Volume = $Vol $voice.Speak($Text)EndFunc ;==>Speak

    [/autoit]


    Sry das der Text jetzt in wenigen Zeilen zusammen gequetscht ist -.- das ist ein kack!! weeeeee nur bei mir klappts mal wieder nicht -.-
    na ja was solls... also da wo $b und $c steht will ich eine Verbindung mit dem Text von $Edit2 und $Edit3 machen^^ - So kann man jeder Zeit die Lautstärke und Geschwindigkeit ändern... aber wie?^^

    PS: sind eig. 2 Fragen...^^ Wie geht dieser bug weg mit dem Quelltext?^^

    mfg MasterRobb

  • [Hilfe] AutoIt - Speaker

    Hi :D
    Ich bin relativ neu hier im Forum also sry wenn es euch bisschen kindisch vorkommt was ich schreibe.... xD^^

    [autoit]

    #include #include #include #include
    Global $voice = ObjCreate("Sapi.SpVoice")
    #Region ### START Koda GUI section ### Form=$Form1 = GUICreate("SpeakMaster2009", 633, 447, 193, 125)$Edit1 = GUICtrlCreateEdit("", 112, 64, 321, 169)$Button1 = GUICtrlCreateButton("Sprechen", 192, 256, 161, 73, 0)GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###
    While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1Speak(GUICtrlRead($Edit1),0.5,100) EndSwitchWEnd

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    Func Speak($Text, $Rate, $Vol)$voice.Rate = $Rate$voice.Volume = $Vol$voice.Speak ($Text)EndFunc;==>Speak

    [/autoit]

    Also mein Freund wollte, dass man noch einen 2. Botton haben soll und, dass wenn man den drückt er das geschriebene rückwerz vorliest...
    Wie soll ich das machen?^^
    Greek hat mir schon geholfen oder es versucht^^ - verstehe das aber nicht umbedingt^^
    iwas mit _stringreverse^^
    Also String verstehe ich noch - aber wie mache ich es das der string $edit1 reversed wird?^^ - Wenn ich das mache liest er immer "0"


    2. Problem : wieso zeigt er mir das Programm hier eig. falsch an? Er schreibt mir hier iwie alles in 1 Zeile rein -.- dabei habe ich 30 Zeilen... -.- HELP^^
    Danke im Vorraus

  • Nutzer mit 0 Beiträgen, bzw. weniger Beteiligung...

    Also ich bin dafür das man leute möglicher Weise löscht die lange nicht mehr on waren - aber nicht die mit 0 Beiträgen :) hehe^^
    Ich bin auch einer von denen^^ Ich habe nämlich keine Ahnung wie ich jmdn. helfen kann...^^
    Ich bin halt ein Anfänger...^^
    Und immerhin bin ich ein Hilfesuchender ^^ - Und ich glaube kaum das viele Leute mit 13 Jahren, die sich kaum mit AutoIt auskennen, anderen Leuten helfen können^^ - Vlt. gibt es ein paar Genies, aber wie schon gesagt - Genies! :D

    mfg masterRobb

  • [FuncSuche] Bereits exestierende Animationen + Sprechfunktion

    thx^^

    Spoiler anzeigen
    [autoit]

    #include
    #include
    #include
    Quellcode
    Global $voice = ObjCreate("Sapi.SpVoice")

    [/autoit] [autoit][/autoit] [autoit]

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("SpeakMaster2009", 633, 447, 193, 125)
    $Edit1 = GUICtrlCreateEdit("", 112, 64, 321, 169)
    $Button1 = GUICtrlCreateButton("Sprechen", 192, 256, 161, 73, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    Speak(GUICtrlRead($Edit1),0.5,100)
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func Speak($Text, $Rate, $Vol)
    $voice.Rate = $Rate
    $voice.Volume = $Vol
    $voice.Speak ($Text)
    EndFunc;==>Speak

    [/autoit]


    Danke^^
    So also: Das ist ein kleines Programm:
    Also es erscheint eine GUI in der man seinen Text reinschreiben kann und dann wenn man auf "Sprechen" klickt, spricht "das Programm" xD
    Danke an Greek nochmal - Er hat mir dabei geholfen^^ oder eig. fast alles gemacht xD^^

    So nun ja,... mein Freund will jetzt das Programm haben, nur es soll jetzt noch ein 2. Botton haben, bei dem er alles geschriebene Rückwerz vorliest...^^
    Ich komme nicht drauf, wie ich das machen soll^^ ... - Habe mir schon überlegt, das ich jeden Buchstaben einer Variablen zuordne (oder jeden Zeichen...) und dann einfach alle vertausche xD aber das checke ich langsam auch nicht mehr xD
    Danke im Vorraus :)


    Ich habe jetzt versucht etwas mit "String" zu machen klappt aber nicht -.- - StringRight denke ich - Aber bei mir gibt er dann immer 0 zurück und deswegen sagt er immer "0" - HILFe xD^^

    MfG masterRobb


    Danke nochmal an alle die mir schon geholfen haben/noch helfen werden^^

  • [FuncSuche] Bereits exestierende Animationen + Sprechfunktion

    Und noch ein Thx^^

    Habe wieder was gefunden^^ hehe
    Also: will so ein Programm schreiben, in das man selber eingeben kann was der Sprecher sagen soll^^...


    Was muss ich nun machen das, dass was man in den "Edit" reinschreibt dort im Programm erscheint was er spricht?^^....
    Ich weiß schon mal mit Variablen^^... aber mehr auch nicht xD^^


    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    Global $a
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("SpeakMaster2009", 633, 447, 193, 125)
    $Edit1 = GUICtrlCreateEdit("", 112, 64, 321, 169)
    GUICtrlSetData(-1, $a)
    $Button1 = GUICtrlCreateButton("Sprechen", 192, 256, 161, 73, 0)
    Call ("Sprechen")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    EndSwitch
    WEnd

    Func Sprechen ()
    Global $voice = ObjCreate("Sapi.SpVoice")

    $Ansage=$a
    Speak($Ansage, 0.50, 100)
    EndFunc

    Func Speak($Text, $Rate, $Vol)
    $voice.Rate = $Rate
    $voice.Volume = $Vol
    $voice.Speak ($Text)
    EndFunc;==>Speak
    Das habe ich bisscher...
    2. Frage^^ wie kriege ich diesen Text so schön wie bei euch? Oder sogar als Spoiler...?^^

  • [FuncSuche] Bereits exestierende Animationen + Sprechfunktion

    COOL!^^ EIN BIG BIG BIG BIG THX AN EUCH!
    Geil und das auch noch so schnell RESPEKT!!! :) Ich liebe euch jetzt schon alle xD^^
    Dennoch habe ich wieder eine Frage:^^
    Könnte mir das jmd vlt genauer erklären mit dem Script? xD^^
    Ich bin bisschen schwer von Begriff ;D
    nun ja,... was müsste ich machen um ihm jetzt ne andere Animation bezu bringen oder so^^ ....
    Z.B. DoMagic2 ... wie müsste ich das jetzt einfügen?^^
    hehe

  • [FuncSuche] Bereits exestierende Animationen + Sprechfunktion

    Hi,


    Ich hätte da mal 2 Frage:
    Also meine 1. Frage:
    Animationen
    Mein Bruder hat gesagt, dass es in AutoIt auch eine Funcmöglichkeit gibt um z.B. einen "Zauberer" herbeizuzaubern xD
    Dieser Zauberer soll dann z.B. irgendeinen Zauberspruch sagen oder kp. xD^^
    Ohne das ich selbst was Animieren muss.... - kennt jmd. diese Func. / oder Verbindung von Funktionen?
    Ich hoffe ihr könnt das verstehen was ich hier schreibe^^ ... bin 13 Jahre alt und etwas blöd xD^^...

    Meine 2. Frage:
    Sprechfunktion
    Es gibt da noch so eine Funktion mit der man "den PC sprechen lassen kann" ^^
    Da gibt man z.B. Hallo ein und eine Stimme sagt dann Hallo - mit einem Englischen Akzent
    Kennt die hier rein zufällig jemand?^^


    Ich hafte für keine Rechtschreibfehler xD^^ :D