
SoundOfDeath
Members-
Posts
13 -
Joined
-
Last visited
About SoundOfDeath
- Birthday 09/09/1994
Profile Information
-
Location
Netherland, Amsterdam
-
Interests
Computer Languege's
SoundOfDeath's Achievements

Seeker (1/7)
0
Reputation
-
Hyperlink help needed
SoundOfDeath replied to SoundOfDeath's topic in AutoIt General Help and Support
Owh i see, it works perfectly now, thanks for you help -
Hyperlink help needed
SoundOfDeath replied to SoundOfDeath's topic in AutoIt General Help and Support
Thanks lordicast, could you also help me with my new problem? -
NEW Problem! Okay, so now I got a new problem, the hyperlinks for the list works currently I got this: #include <GUIConstantsEx.au3> #include <GUIListBox.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> #include <ie.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Youtube Navigator", 411, 269, 632, 128) GUISetIcon("D:\005.ico") $PageControl1 = GUICtrlCreateTab(8, 8, 396, 256) GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT) $TabSheet1 = GUICtrlCreateTabItem("Youtube Favorites") $List1 = GUICtrlCreateList("", 16, 40, 377, 174) GUICtrlSetData(-1, "::Emnesty:: Time to DIE montage|Ace the Best Combatarms Community Montage by Taylon & Hammudi|Banned xbox 360 Ad|Xbox Mosquito TV Commercial") GUICtrlSetFont(-1, 8, 400, 0, "Arial") $Label1 = GUICtrlCreateLabel("http://www.youtube.com/user/ComplicatedKiller", 88, 232, 235, 18) GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlSetColor(-1, 0x0066CC) GUICtrlSetCursor (-1, 0) $TabSheet2 = GUICtrlCreateTabItem("Youtube Uploads") $Label2 = GUICtrlCreateLabel("http://www.youtube.com/user/ComplicatedKiller", 88, 232, 235, 18) GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlSetColor(-1, 0x0066CC) GUICtrlSetCursor (-1, 0) $List2 = GUICtrlCreateList("", 16, 40, 377, 174) GUICtrlSetData(-1, "") GUICtrlSetFont(-1, 8, 400, 0, "Arial") GUICtrlCreateTabItem("") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $List1 $selected = GUICtrlRead($List1) $selected1 = GUICtrlRead($List1) if $selected = "::Emnesty:: Time to DIE montage" Then _IECreate("http://www.youtube.com/user/ComplicatedKiller#p/a/508A4A7076651750/1/z3i3agcGwyo") ElseIf $selected1 = "Ace the Best Combatarms Community Montage by Taylon & Hammudi" Then _IECreate("http://www.youtube.com/user/ComplicatedKiller#p/a/508A4A7076651750/0/6dxwItemR-M") EndIf EndSwitch If $nMsg = $Label1 Then _IECreate ("http://www.youtube.com/user/ComplicatedKiller", 1, 1, 0) EndIf If $nMsg = $Label2 Then _IECreate ("http://www.youtube.com/user/ComplicatedKiller", 1, 1, 0) EndIf WEnd But when I try to open the page again with clicking on the same item in the list, it doesn't respond, so I can only open the page once, does someone know how to fix this?
-
Copy - Paste in AutoIT
SoundOfDeath replied to SoundOfDeath's topic in AutoIt General Help and Support
Got it to work now, thanks for the quick answer Sh3llC043r ^.^ -
Hello, I got a little problem, I want to let AutoIT read a line and then copy it in a GUI. The copy part already works but the paste part doesn't. I looked up in the helpfile and now I got this: ControlSend ("Auto-Read V2","","Edit1","^{V}") But it only writes V in it, how can I let it paste the line I copy'd? did I do something wrong in the line or do I need to use a other command. ~Thanks for reading!
-
Thanks for the help Yoriz, it works like I wanted it now
-
Hello first of all here is the script I got so far: #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> $item1 = "Once upon a time" $item2 = "A little man walked in the grass" $item3 = "He smashed into a tree" $item4 = "And a apple felt on his head, he was lucky he wasn't dead" #Region ### START Koda GUI section ### Form=C:\Documents and Settings\Laptops&Zo\Bureaublad\AutoIt\Form\Story Teller.kxf $Form1 = GUICreate("Story Test", 538, 218, 192, 124) $Group1 = GUICtrlCreateGroup("", 8, 0, 521, 209) $Button1 = GUICtrlCreateButton("Story 1", 16, 16, 107, 25, $WS_GROUP) $Group2 = GUICtrlCreateGroup("", 128, 0, 401, 209) $Edit1 = GUICtrlCreateEdit("", 136, 16, 385, 177) GUICtrlSetData(-1, "Edit1") GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Button2 = GUICtrlCreateButton("Story 2", 16, 48, 107, 25, $WS_GROUP) $Button3 = GUICtrlCreateButton("Story 3", 16, 80, 107, 25, $WS_GROUP) $Button4 = GUICtrlCreateButton("Story 4", 16, 112, 107, 25, $WS_GROUP) $Button5 = GUICtrlCreateButton("Story 5", 16, 144, 107, 25, $WS_GROUP) $Button6 = GUICtrlCreateButton("Credits", 16, 176, 107, 25, $WS_GROUP) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch If $nMsg = $Button1 Then GUICtrlSetData ($Edit1,$item1 & $item2 & $item3 & $item4) EndIf WEnd So as you can see when you click on $Button1 you get a text in $Edit1, the problem here is, I don't know how to separate it with Enter so it will look like this: It now just looks like this: can someone help me out with this? ~Thanks
-
Well I added: #include <INet.au3> but I still get the same error :S
-
Error: Unknown function name.
-
Hey, I am working on a E-mail option, a friend of my gave me a source and I tryed to update it, here is the script: #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=C:\Users\tjado\Desktop\AutoIt\Form\Sod's Bday Cracker [EMS].kxf $Form1 = GUICreate("Sod's E-Mail test", 249, 265, 192, 124) $Group1 = GUICtrlCreateGroup("Info:", 8, 8, 233, 249) $Label1 = GUICtrlCreateLabel("First Name:", 16, 32, 57, 17) $Label2 = GUICtrlCreateLabel("E-Mail:", 16, 96, 36, 17) $Label3 = GUICtrlCreateLabel("Last Name:", 16, 64, 58, 17) $Input1 = GUICtrlCreateInput("", 104, 32, 121, 21) $Input2 = GUICtrlCreateInput("", 104, 64, 121, 21) $Input3 = GUICtrlCreateInput("", 104, 96, 121, 21) $Label4 = GUICtrlCreateLabel("BirthDay above year:", 16, 128, 103, 17) $Label5 = GUICtrlCreateLabel("BirthDay bellow year:", 16, 160, 103, 17) $Combo1 = GUICtrlCreateCombo("Year", 144, 128, 81, 25) GUICtrlSetData(-1, "2010|2009|2008|2007|2006|2005|2004|2003|2002|2001|2000|1999|1998|1997|1996|1995|1994|1993|1992|1991|1990|1989|1988|1987|1986|1985|1984|1983|1982|1981|1980|1979|1978|1977|1976|1975|1974|1973|1972|1971|1970|1969|1968|1967|1966|1965|1964|1963|1962|1961|1960|1959|1958|1957|1956|1955|1954|1953|1952|1951|1950|1949|1948|1947|1946|1945|1946") $Combo2 = GUICtrlCreateCombo("Year", 144, 160, 81, 25) GUICtrlSetData(-1, "2011|2010|2009|2008|2007|2006|2005|2004|2003|2002|2001|2000|1999|1998|1997|1996|1995|1994|1993|1992|1991|1990|1989|1988|1987|1986|1985|1984|1983|1982|1981|1980|1979|1978|1977|1976|1975|1974|1973|1972|1971|1970|1969|1968|1967|1966|1965|1964|1963|1962|1961|1960|1959|1958|1957|1956|1955|1954|1953|1952|1951|1950|1949|1948|1947|1946|1945") $Button1 = GUICtrlCreateButton("Send", 96, 216, 75, 25, $WS_GROUP) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Do $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $email1 = GUICtrlRead($Input1) $email2 = GUICtrlRead($Input2) $email3 = GUICtrlRead($Input3) $emailmsg1 = GUICtrlRead($Input1) $emailmsg2 = GUICtrlRead($Input2) $emailmsg3 = GUICtrlRead($Input3) $emailmsg4 = GUICtrlRead($Combo1) $emailmsg5 = GUICtrlRead($Combo2) $SmtpServer = "smtp.gmail.com" ; address for the smtp-server to use - REQUIRED $FromName = "Name" ; name from who the email was sent $FromAddress = $email3 If $FromAddress = "" Then $FromAddress = "your@Email.Address.com" ; address from where the mail should come EndIf $ToAddress = "XXXXXXXXXX" ; destination address of the email - REQUIRED $Subject = "Info test" ; subject from the email - can be anything you want it to be $Body = $emailmsg1 & $emailmsg2 & $emailmsg3 & $emailmsg4 & $emailmsg5 ; the messagebody from the mail - can be left blank but then you get a blank mail $AttachFiles = "" ; the file you want to attach- leave blank if not needed $CcAddress = "" ; address for cc - leave blank if not needed $BccAddress = "" ; address for bcc - leave blank if not needed $Importance = "Normal" ; Send message priority: "High", "Normal", "Low" $Username = "XXXXXXXXXX" ; username for the account used from where the mail gets sent - REQUIRED $Password = "XXXXXXXX" ; password for the account used from where the mail gets sent - REQUIRED ;$IPPort = 25 ; port used for sending the mail ;$ssl = 0 ; enables/disables secure socket layer sending - put to 1 if using httpS $IPPort = 465 ; GMAIL port used for sending the mail $ssl = 1 ; GMAILenables/disables secure socket layer sending - put to 1 if using httpS _INetSmtpMailCom($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl) ExitLoop (1) EndSwitch Until $nMsg = $GUI_EVENT_CLOSE GUIDelete($Form1) The XXXXX are persenal info, so thats not the error, I get a error at the following line: _INetSmtpMailCom($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl) Can someone please help me? ~Thanks
-
Hey, I got this simple script: #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <SliderConstants.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> HotKeySet ("{F1}","AutoAttackLR") Global $ua = False #Region ### START Koda GUI section ### Form=C:\Users\tjado\Desktop\AutoIt\Form\DS Bot V1.kxf $Form1 = GUICreate("DS Bot V1", 235, 364, 192, 124) $Group1 = GUICtrlCreateGroup("Info", 8, 8, 217, 105) $Label1 = GUICtrlCreateLabel("Attacks:", 16, 32, 43, 17) $Label2 = GUICtrlCreateLabel("Total Attacks:", 16, 56, 70, 17) $Label3 = GUICtrlCreateLabel("-", 96, 32, 7, 17) $Label4 = GUICtrlCreateLabel("-", 96, 56, 7, 17) $Label5 = GUICtrlCreateLabel("HP:", 144, 32, 22, 17) $Label6 = GUICtrlCreateLabel("MP:", 144, 56, 23, 17) $Label7 = GUICtrlCreateLabel("-", 176, 32, 7, 17) $Label8 = GUICtrlCreateLabel("-", 176, 56, 7, 17) $Button2 = GUICtrlCreateButton("Reset", 80, 80, 75, 25, $WS_GROUP) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group2 = GUICtrlCreateGroup("Auto Attack", 8, 120, 217, 121) $Radio1 = GUICtrlCreateRadio("Left", 56, 152, 41, 17) $Radio2 = GUICtrlCreateRadio("Right", 136, 152, 49, 17) $Label9 = GUICtrlCreateLabel("Start Auto Attack [A] - F1", 40, 184, 122, 17) $Button3 = GUICtrlCreateButton("Options", 72, 208, 75, 25, $WS_GROUP) $Label10 = GUICtrlCreateLabel("Off", 176, 184, 18, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group3 = GUICtrlCreateGroup("AutoPot", 8, 248, 217, 105) $Button4 = GUICtrlCreateButton("AutoHP Options", 24, 272, 91, 25, $WS_GROUP) $Button5 = GUICtrlCreateButton("AutoMP Options", 120, 272, 91, 25, $WS_GROUP) $Slider1 = GUICtrlCreateSlider(24, 312, 182, 29) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch Sleep (5) If $nMsg = $Button3 Then Call ("AutoAttackOptions") EndIf WEnd Func AutoAttackLR() GUICtrlSetData($Label10, "On") GuiCtrlSetColor($Label10, 0x00FF00) $ua = Not $ua If $ua = True Then MsgBox (0,"Test","Let it work!") Sleep($Input1q) MsgBox (0,"Succes","It worked!") Sleep($Input1q) MsgBox (0,"Succes","It worked!") Sleep($Input1q) MsgBox (0,"Succes","It worked!") GUICtrlSetData($Label10, "Off") GuiCtrlSetColor($Label10, 0x000000) EndIf EndFunc Func AutoAttackOptions() #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <SliderConstants.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=C:\Users\tjado\Desktop\AutoIt\Form\Attack Options.kxf $Form2q = GUICreate("Attack Options", 265, 187, 448, 198) $Group1q = GUICtrlCreateGroup("Options", 8, 8, 241, 169) $Label1q = GUICtrlCreateLabel("Delay:", 16, 32, 34, 17) $Input1q = GUICtrlCreateInput("", 64, 32, 49, 21) $Slider1q = GUICtrlCreateSlider(24, 120, 214, 45) $Label2q = GUICtrlCreateLabel("Move Size:", 112, 96, 57, 17) $Label3q = GUICtrlCreateLabel("Pause:", 16, 64, 37, 17) $Input2q = GUICtrlCreateInput("", 64, 64, 49, 21) $Label4q = GUICtrlCreateLabel("Reset:", 136, 32, 35, 17) $Input3q = GUICtrlCreateInput("", 184, 32, 49, 21) $Button1q = GUICtrlCreateButton("Close", 136, 64, 99, 25, $WS_GROUP) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch Sleep (5) If $nMsg = $Button1q Then GUIDelete ($Form2q) EndIf WEnd EndFunc I did the msgbox because it is just a test, so the point of this script is: its a simple program for a game, when I click on options, a other form pops up, then when I fill in a delay in the delay box, now when I press F1, a msgbox pops up, now it should wait the delay i filled in, but I get an error. Can anyone help me with this? ~Thanks
-
Help with GUICtrlSetData
SoundOfDeath replied to SoundOfDeath's topic in AutoIt General Help and Support
Thanks Jos & Melba23 for the help knew it was only such a easy thing also thanks for the welcome Melba23 -
Alright, I made this simple script: #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=c:\documents and settings\laptops&zo\bureaublad\autoit\form\search test.kxf $Form1 = GUICreate("Beta", 225, 105, 192, 124) $Group1 = GUICtrlCreateGroup("Char Information", 8, 8, 209, 89) $Label1 = GUICtrlCreateLabel("Name:", 16, 32, 35, 17) $Label3 = GUICtrlCreateLabel("Unknow", 96, 32, 67, 17) $Input2 = GUICtrlCreateInput("", 72, 64, 121, 21) $Label14 = GUICtrlCreateLabel("Search:", 16, 64, 41, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit HotKeySet("{Enter}", "search") Sleep (10) EndSwitch WEnd Func search() GUICtrlSetData ($Label3, "Random") EndFunc When I hit enter Unknown should change to Random, but it doesn't I tryed some other things to let it work, like changing the hotkey, but it still doesn't work and I can't find the problem here, if someone can help me with this I would really appreciate it. ~Thanks for reading!