
Orochimaru
Members-
Posts
17 -
Joined
-
Last visited
Orochimaru's Achievements

Seeker (1/7)
0
Reputation
-
Does anyone know if its possible to send color text from Autoit to WordPad?.. So from it being black it can be any other color such as red, green, yellow...and so on
-
Me again -.- can someone please show me how to make it so it goes trough all of my passwords from 1 to w/e and if those passwords are not right. Then the next name comes up and all those passwords are tried on that name and so on. Someone please tell me how to do that and im done -.- My Code is up already so if you guys can help please.
-
Hey cameronsdad i looked at yours and i checked it out it works good but i dont even know where to start to put that in my code -.-This is my Source all this does is start the game and then a inputbox pops up at the login screen and i type the login screen i want in the inputbox. After 1 second it types the first password in the password.ini list in the password place. But can you somehow make this source so that it reads off the password list 1 by 1 till it reaches the end of the password list. Also if its possible i want to have the same thing for Names list. So basically The first name in the names list goes in to the Login name place. Then the password list tries all the passwords in it to guess the right one.. If they are all wrong then the next name in the name list comes up and all those passwords are tried on that name also if wrong then next name. I hope u understand my bad english -.- But can you see what you can do to make this better please. #include <C:\Documents and Settings\nezar1\Desktop\autoit-v3.1.1\Include\GUIConstants.au3> dim $pass, $gamename, $password Hotkeyset("{Esc}", "Quit") func quit() exit endfunc If $pass = -1 Then MsgBox ( 0, "Error", "Unable to open passfile.txt.") Exit EndIf RUn("C:\Program Files\Starcraft\Starcraft.exe"); Runs Sc Winwaitactive("Brood War") Sleep(3000) Send("M") Sleep(1000) Send("E") Sleep(2000) Send("O") Sleep(3000) MouseClick("Left",103,223,2) $pass = FileOpen("C:\Documents and Settings\nezar1\Desktop\Passwords.ini",2) If $pass = -1 Then MsgBox ( 0, "Error", "Unable to open passfile.txt." ) Exit EndIf $gamename=InputBox ("Starcraft", "Account you want:") Run("C:\Program Files\Starcraft\Starcraft.exe") sleep(300) send($gamename) sleep(200) send("{tab}") sleep(300) While 1 $password = FileReadLine($pass) If @error = -1 Then ExitLoop Sleep(1000) send($Password,2) Sleep(1000) Send("{Enter}") Wend FileClose($pass)Thanks in advance i'll be looking back real quick and a lot to see what you got
-
Hmm i'm done my code but i don't think i can post it cuz of the codes or w/e
-
Yay i've got it done:D Thanks to you guys ofcourse.. Don't know how to say this THANK YOU!!! ^.^
-
no one knows how to do it? aww comon there has to be somone please help
-
What do you mean oopz -.- you mean the wend endfunc at the end? lol just incase i put it in now i get no errors while running the script its just it wont type whats in the spambot.ini where all the passwords are located.
-
Hey Everyone I was working on a new project today I tried to make a Password Guesser. All it did was Open up a game and then go to the login screen and type a screen name and then go to the password place and type your password in, then press enter to login. I am trying to make it so this Password Guesser Picks names from a file that i put my names in, 1 by 1 till the end. Same with the passwords. So for example: The first name in the Name.txt is Eclipse so it types Eclipse on the login screen and then goes to the password place and sleeps for 1 second and then types the first password in the password.txt if password is wrong it Sleeps for 5 seconds and then goes back to Log in name and types the second Password in the Password.txt file and the same name in the Name.txt list untill it gets it. If all the passwords were wrong then it goes to the second name in the Name.txt if the passwords were all wrong for that it goes and picks another name and same passwords till it gets it and so on...till it has finished the name list.. I Hope you guys understand my bad english -.- this is what i have so far: #include <C:\Documents and Settings\nezar1\Desktop\autoit-v3.1.1\Include\GUIConstants.au3> dim $pass, $accountname RUn("C:\Program Files\Starcraft\Starcraft.exe"); Runs Sc Winwaitactive("Brood War") Sleep(3000) Send("M") Sleep(1000) Send("E") Sleep(2000) Send("O") Sleep(4000) MouseClick("Left",103,223,2) Global $pass = FileOpen ( "C:\Documents and Settings\nezar1\Desktop\SpamBot.ini", 0 ) If $pass = -1 Then MsgBox ( 0, "Error", "Unable to open passfile.txt." ) Exit EndIf $accountname=InputBox ("Starcraft", "Enter exact game name:") Run("C:\Program Files\Starcraft\Starcraft.exe") sleep(300) send($accountname) sleep(1000) send("{tab}") sleep(1000) Func readpass() While 1 $pass = FileReadLine ( $pass ) If @ERROR = -1 Then ExitLoop Sleep(1000) Send ( $password , 0 ) sleep(100) Send ( '{ENTER}' ) sleep ( 100 ) Wend EndFunc All the code above does is start the program and go to the login screen and type the name i type on the inputbox. Then i wanted it to read the passwords off the SpamBot.txt file and type them in the password place. But it hasnt done that -.- Also i want this program to read names off a line so i dont have to type in a name everytime its wrong. Can someone help me please. Thanks in advance
-
Thanks a lot you two It works fine now i found out what the problem was with #include <GUIConstants.au3> I had to put the full link of where the file was located #include <C:\Documents and Settings\nezar1\Desktop\autoit-v3.1.1\Include\GUIConstants.au3> Well this works fine thanks a lot i one one more thing to ask =.= how do i make it when i click "Ok" button that the dialogbox it closes till the next time its hotkey is pressed but when it closes it sends the key also. For example like a inputbox you can click ok it'll close and send what u told it to send. If thats not possible how do i add a cancle button to close it cuz if i click it with the X button on top it closes whole program. Btw Thanks A lot!! You 2.
-
That source above doesnt work because first off when ever i put #include <GUIConstants.au3> at the top it always says Error reading GUIConstants.au3 Second thing is that i used that source u just gave me and it says If $msg = $ok then if $msg = ^ Error Error: Variable used with out being declared
-
Ic ic... Hmm the source you wrote for me works fine but i wanted to make the dialogboxa hotkey i tried doing this Func Open() While 1 $nEdit = GUICtrlCreateEdit ("",3,3,300,200) $ok = GUICtrlCreateButton ("Ok",0,210,50) GUISetState (@SW_SHOW) Do $msg = GUIGetMsg() if $msg = $ok then $blah = GUICtrlRead($nEdit) Run("C:\Program Files\Starcraft\Starcraft.exe") WinWaitActive("Brood War") Send("{Enter}") Send($blah) Send("{Enter}") Endif Sleep(50) Until $msg = $GUI_EVENT_CLOSE Wend Endfunc That code above doesnt seem to do anything when i press the hotkey. Also i tried to do Hotkeyset("F7", "Open") Func Open() While 1 $nEdit = GUICtrlCreateEdit ("",3,3,300,200) $ok = GUICtrlCreateButton ("Ok",0,210,50) GUISetState (@SW_SHOW) Wend Endfunc $nEdit = GUICtrlCreateEdit ("",3,3,300,200) $ok = GUICtrlCreateButton ("Ok",0,210,50) GUISetState (@SW_SHOW) Do $msg = GUIGetMsg() if $msg = $ok then $blah = GUICtrlRead($nEdit) Run("C:\Program Files\Starcraft\Starcraft.exe") WinWaitActive("Brood War") Send("{Enter}") Send($blah) Send("{Enter}") Endif Sleep(50) Until $msg = $GUI_EVENT_CLOSE That source worked but the problem with that was when i tried to type in the dialogbox it kept earsing and coming back for some reason. I wrote this a gain because it was giving me a error when i didn't $nEdit = GUICtrlCreateEdit ("",3,3,300,200) $ok = GUICtrlCreateButton ("Ok",0,210,50) GUISetState (@SW_SHOW) I was just wondering how do i make it a Hotkey, thanks.
-
Hey Valuater Thank You So Much. Also I apologize for posting it twice and the other mistake, sorry. Your Source Is what i wanted Exactly Thank you very Much I was wondering if i can Send Color Text while doing that. Like what i type in the dialog box gets sended in red text or the color i pick is that possible is so -.- sorry but can u tell me how. Thanks
-
Can't get dialog to change to $WS_EX_TOPMOST
Orochimaru replied to egalvez's topic in AutoIt General Help and Support
Hey everyone, darn im soo tired i've been trying to find out how to make a dialog box by pressing a shortcutkey. After the dialog has poped up i wanted to type somthing and then click ok and then make it Sleep(3000) after that open notepad and make it Send w/e i typed. But ofcourse i havnt got to do that, thats why im here for help.I did that with a INput box here is the code: HotKeySet("{F5}", "Type") HotKeySet("{F8}", "Pause") HotKeySet("{F9}", "Quit") While 1 Sleep(100) Wend Func Type() While 1 $clip1 = InputBox("Message", "Enter/Paste text to Spam", "" ) Run("C:\Program Files\Starcraft\Starcraft.exe") Sleep(700) $i=0 Do Send("{Enter}") Send("" & $clip1) Send("{Enter}") until $i=10 wend EndFunc Func Quit() While 1 Exit 0 Wend Endfunc Func Pause() While1 Wend Endfunc Basically all that does is when i press F5 a inputbox pops up and what ever i type in it. Gets send to w/e window im on after its sleep time. So i wanted to do that with a Dialog box because i wanted to Send Profiles that are more then 1 line at once. This is what i have so far but it seems to make no sense what so ever: dim $clip1 HotKeySet("{F7}", "Type") HotKeySet("{F9}", "Pause") Func Pause() While 1 Wend Endfunc func type() while 1 $clip1 = Dialog Box Sleep(700) $i=0 Do Send("{Enter}") Send("" & $clip1) Send("{Enter}") until $i=10 wend EndFunc GUICreate("Type What You Want To Spam Below") ; will create a dialog box that when displayed is centered GUISetState (@SW_SHOW) ; will display an empty dialog box $GUI_EVENT_CLOSE = "1" $nEdit = GUICtrlCreateEdit ("Type Here", 3,3,300,180) GUICtrlCreateButton ("Ok", 20,200,50) GUISetState () for $n=1 to 5 GUICtrlSetData ($nEdit,@CRLF & "line "& $n) next $EM_LINEINDEX = 0x00BB $EM_LINEFROMCHAR = 0x00C9 Do $msg = GUIGetMsg() if $msg >0 then $n=GUICtrlSendMsg ($nEdit, $EM_LINEINDEX,-1,0) $nline=GUICtrlSendMsg( $nEdit, $EM_LINEFROMCHAR,$n,0) GUICtrlSetState ($nEdit,256) ; set focus MsgBox (0,"Currentline",$nLine) Endif Until $msg = $GUI_EVENT_CLOSE All this does is when i run it a Dialog box pops up right away and then when i press F7 it types random words or numbers... Also i didnt include #include gui.........au3. because it says "Error reading #include gui.........au3." Can anyone please look at these sources and see if they can help me, i really need it thank you for reading. -
Ic ic ^.^ Learned somthing for next time but Hey w0uter can you try to help me with the Dialogbox problem please. I need help on that really bad i just want a box to come up where you can type more then 1 line at once.