Masqo Posted October 17, 2004 Share Posted October 17, 2004 Hello ! Im the beginner yet in autoit , so i made my first script. Its the diablo 2 spambot (for my use only). But i got a problem with that making a gui. Like i got a inifile for modifications , inisettings.exe for modify the ini file inside gui and spambot.exe the main program. Inisettings : expandcollapse popup; ---------------------------------------------------------------------------- ; ; AutoIt Version: v3.0.103 ; Language: English ; Platform: Win 2000/XP ; Author: Masqo <Masqo@hotmail.com> ; ; Script Function: ; Spamming Diablo 2 channels and games. ; ; ---------------------------------------------------------------------------- ;MY OPTS : Opt("CaretCoordMode", 0) AutoItSetOption ( "CaretCoordMode", 0 ) Opt("MouseClickDelay", 30) ;MY VARIABLES : $d2path = IniRead ( "spambot.ini", "Config", "path", "default" ); $d2exe = IniRead ( "spambot.ini", "Config", "exe", "default" ); $paras = IniRead ( "spambot.ini", "Config", "paras", "-w -skiptobnet -screensize 800x600"); $title = IniRead ( "spambot.ini", "Config", "title", "default"); $d2acc = IniRead ( "spambot.ini", "Login", "acc", "default" ); $d2pass = IniRead ( "spambot.ini" , "Login", "pass" , "default"); $charloc = IniRead ( "spambot.ini" , "Login", "char" , "default"); $spamcount = Iniread ("spambot.ini" , "Spam configurations" , "spamcount" , "default"); $spamnumber = Iniread ("spambot.ini" , "Spam configurations" , "spamnumber" , "default"); $rsleep = random ( 7500 ) ; ---------------------------------------------------------------------------- ; Script Start - Add your code below here ; ---------------------------------------------------------------------------- #include <GUIConstants.au3> TrayTip("Inisettings" , "Please modify this file and then close the window and start spambot V 1.2", 10 , 1 ) GUICreate("Spambot V 1.2" , 400 , 450) GUISetState (@SW_SHOW) GUICtrlCreateLabel ("Inisettings for Spambot V 1.2", 100, 5 , 500, 150) GUICtrlSetFont (-1,9, 400, 2, "Comic Sans") GUICtrlSetColor(-1,0x446099) $d2acc1 = GUICtrlCreateInput ($d2acc, 15, 40, 100, 20) GUICtrlCreateLabel ("Your account here", 150, 40 , 300, 20) $save1 = GUICtrlCreateButton ( "Save", 15, 62, 90, 20) $d2pass1 = GUICtrlCreateInput ($d2pass, 15, 90 , 100, 20) GUICtrlCreateLabel ("Password", 150, 90 , 300, 20) $save2 = GUICtrlCreateButton ( "Save", 15, 112, 90, 20) $charloc1 = GUICtrlCreateInput ($charloc, 15, 140, 100, 20) GUICtrlCreateLabel ("Character number(look char.txt)", 150, 140, 300, 20) $save3 = GUICtrlCreateButton ( "Save", 15, 162, 90, 20) $d2path1 = GUICtrlCreateInput ($d2path, 15, 190, 200, 20) GUICtrlCreateLabel ("Full patch to Diablo 2", 260, 190 , 300, 20) $save4 = GUICtrlCreateButton ( "Save", 15, 212, 90, 20) $d2exe1 = GUICtrlCreateInput ($d2exe, 15, 240, 200, 20) GUICtrlCreateLabel ("Diablo 2 Executable", 260, 240 , 300, 20) $save5 = GUICtrlCreateButton ( "Save", 15, 262, 90, 20) $paras1 = GUICtrlCreateInput ($paras, 15, 290, 200, 20) GUICtrlCreateLabel ("Diablo 2 parameters", 260, 290 , 650, 20) $save6 = GUICtrlCreateButton ( "Save", 15, 312, 90, 20) $title1 = GUICtrlCreateInput ($title, 15, 340, 200, 20) GUICtrlCreateLabel ("Diablo 2 Title name", 260, 340 , 300, 20) $save7 = GUICtrlCreateButton ( "Save", 15, 362, 90, 20) $guibutton1 = GUICtrlCreateButton ( "Exit", 15, 420, 90, 20) $guibutton2 = GUICtrlCreateButton ( "Restart program", 120, 420, 90, 20) $guibutton3 = GUICtrlCreateButton ( "Save all", 225, 420, 90, 20) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then Traytip("Inisettings" , "Have a nice day!", 10, 1) If $msg = $GUI_EVENT_CLOSE Then Sleep('500') If $msg = $GUI_EVENT_CLOSE Then Exit If $msg = $guibutton1 Then Traytip("Inisettings" , "Have a nice day!", 10, 1) If $msg = $guibutton1 Then Sleep('500') If $msg = $guibutton1 Then Exit If $msg = $guibutton2 Then Run('Spambot V 1.2.exe') If $msg = $guibutton2 Then Exit(0) If $msg = $save1 Then IniDelete ( "spambot.ini", "Login", "acc" ) If $msg = $save1 Then IniWrite ( "spambot.ini", "Login", "acc", $d2acc1) If $msg = $save2 Then IniDelete ( "spambot.ini", "Login", "pass" ) If $msg = $save2 Then IniWrite ( "spambot.ini", "Login", "pass",$d2pass1) If $msg = $save3 Then IniDelete ( "spambot.ini", "Login", "char" ) If $msg = $save3 Then IniWrite ( "spambot.ini", "Login", "char", $charloc1) If $msg = $save4 Then IniDelete ( "spambot.ini", "Config", "path" ) If $msg = $save4 Then IniWrite ( "spambot.ini", "Config", "path", $d2path1) If $msg = $save5 Then IniDelete ( "spambot.ini", "Config", "exe" ) If $msg = $save5 Then IniWrite ( "spambot.ini", "Config", "exe", $d2exe) If $msg = $save6 Then IniDelete ( "spambot.ini", "Config", "paras" ) If $msg = $save6 Then IniWrite ( "spambot.ini", "Config", "paras", $paras1) If $msg = $save4 Then IniDelete ( "spambot.ini", "Config", "title" ) If $msg = $save7 Then IniWrite ( "spambot.ini", "Config", "title", $title1) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Login", "acc", $d2acc1) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Login", "pass",$d2pass1) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Login", "char", $charloc1) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "path", $d2path1) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "exe", $d2exe) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "paras", $paras1) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "title", $title1) Wend Ini file : expandcollapse popup[Config] path=13 <<<< SEE ? Thats the whole problem! It just saves the number if i modify the ini inside inisettings.exe , strange :S ;Full Patch to diablo 2 exe=Diablo II.exe ;Diablo 2 exe (D2loader recommended) paras=19 ;Parameters to run with diablo 2, please do not remove -w or -screensize 800x600 or -skiptobnet title=D2 ;Title for diablo :) [Login] acc=4 ;Account to spam with pass=7 ;Password to spamming account char=10 ;Character location , look char.txt for more info [Messages] msg=Spam message 1 ;Message to spam msg1=Spam message 2 ;Message to spam 2 (It will spam these all messages randomly!) msg2=Spam message 3 ;Message to spam 3 (It will spam these all messages randomly!) msg3=Spam message 4 ;Message to spam 4 (It will spam these all messages randomly!) msg4=Spam message 5 ;Message to spam 5 (It will spam these all messages randomly!) msg5=Spam message 6 ;Message to spam 6 (It will spam these all messages randomly!) ;PS ! If u want to spam only one message , copy the message to all msg-s! [Spamming Channels] chan1=Diablo II Europe-NLD-1 chan2=Diablo II Europe-FIN-1 chan3=Diablo II Europe-SWE-1 chan4=Diablo II Europe-DNK-1 chan5=Diablo II Europe-DEU-1 chan6=Diablo II Europe-GBR-1 chan7=Diablo II Europe-ITA-1 chan8=Diablo II Europe-FRA-1 chan9=Diablo II Europe-USA-1 chan10=Diablo II Europe-ISR-1 chan11=Diablo II Europe-RUS-1 chan12=Diablo II Europe-NOR-1 chan13=Diablo II Europe-EST-1 chan14=Diablo II Europe-GBR-2 chan15=Diablo II Europe-SWE-2 chan16=Diablo II Europe-NOR-2 chan17=Diablo II Europe-USA-2 chan18=LoD Trading Europe-1 chan19=LoD Trading Europe-2 chan20=LoD Trading Europe-3 chan21=LoD Ladder Trading Europe-1 chan22=LoD Ladder Trading Europe-2 chan23=LoD Ladder Trading Europe-3 chan24=LoD Ladder Trading Europe-4 chan25=LoD Hardcore Europe-1 chan26=Diablo II Europe-GBR-2 chan27=LoD Ladder Trading Europe-4 chan28=LoD Ladder Trading Europe-1 chan29=Diablo II Europe-ITA-1 chan30=Diablo II Europe-USA-1 chan31= chan32= chan33= chan34= chan35= ;Enter the channels bot to go , u may repeat channels so bot got 50% more chance to go to that channel. Entering Channels randomly! [Spam Configurations] spamcount=0 ;DO NOT MODIFY spamnumber=50000 ;How many messages to spam before quiting Look , if i modify ini file inside the inisettings.exe , it will just remove the ini line and then enters some numbers , not the same thing i entered to the gui :/ very strange , if u need the spambot.exe code , i can copy it too but i think its not necessary. Thanks for answers Link to comment Share on other sites More sharing options...
Developers Jos Posted October 17, 2004 Developers Share Posted October 17, 2004 (edited) Hello ! Im the beginner yet in autoit , so i made my first script. Its the diablo 2 spambot (for my use only). But i got a problem with that making a gui.Like i got a inifile for modifications , inisettings.exe for modify the ini file inside gui and spambot.exe the main program.Look , if i modify ini file inside the inisettings.exe , it will just remove the ini line and then enters some numbers , not the same thing i entered to the gui :/very strange , if u need the spambot.exe code , i can copy it too but i think its not necessary.Thanks for answers <{POST_SNAPBACK}>Use GuiRead() to retrieve the value of an input field.The $d2acc1 field contains a handle to the input field.ps:1. why do an inidelete first everytime?2. this looks like a typo: If $msg = $save6 Then IniWrite ( "spambot.ini", "Config", "paras", $paras1) If $msg = $save4 Then IniDelete ( "spambot.ini", "Config", "title" ) If $msg = $save7 Then IniWrite ( "spambot.ini", "Config", "title", $title1) Edited October 17, 2004 by JdeB SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
Masqo Posted October 17, 2004 Author Share Posted October 17, 2004 Use GuiRead() to retrieve the value of an input field.The $d2acc1 field contains a handle to the input field.ps:1. why do an inidelete first everytime?2. this looks like a typo: If $msg = $save6 Then IniWrite ( "spambot.ini", "Config", "paras", $paras1) If $msg = $save4 Then IniDelete ( "spambot.ini", "Config", "title" ) If $msg = $save7 Then IniWrite ( "spambot.ini", "Config", "title", $title1)<{POST_SNAPBACK}>yep , ur right ... 2. is a typo but 1. , can it be without a inidelete too? K but how to use guiread? like If $msg = $save6 Then GuiRead() or something? dunno how to do that.. can u make me an example plz? Link to comment Share on other sites More sharing options...
Developers Jos Posted October 17, 2004 Developers Share Posted October 17, 2004 (edited) yep , ur right ... 2. is a typo but 1. , can it be without a inidelete too? K but how to use guiread? like If $msg = $save6 Then GuiRead() or something? dunno how to do that.. can u make me an example plz? <{POST_SNAPBACK}>Did you look at the examples in the Helpfile? Something like this should do it for you:If $msg = $save1 Then IniWrite ( "spambot.ini", "Login", "acc", GuiRead($d2acc1)) Don't understand why you ask: "can it be without a inidelete too?" Why remove something first when you override it with a new value in the next statement? Edited October 17, 2004 by JdeB SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
Masqo Posted October 17, 2004 Author Share Posted October 17, 2004 hmm hey i did as u recommend me.. the guiread method.. and everything worked , except the d2exe :S Thats the inisettings file expandcollapse popup; ---------------------------------------------------------------------------- ; ; AutoIt Version: v3.0.103 ; Language: English ; Platform: Win 2000/XP ; Author: Masqo <Masqo@hotmail.com> ; ; Script Function: ; Spamming Diablo 2 channels and games. ; ; ---------------------------------------------------------------------------- ;MY OPTS : Opt("CaretCoordMode", 0) AutoItSetOption ( "CaretCoordMode", 0 ) Opt("MouseClickDelay", 30) ;MY VARIABLES : $d2path = IniRead ( "spambot.ini", "Config", "path", "default" ); $d2exe = IniRead ( "spambot.ini", "Config", "exe", "default" ); $paras = IniRead ( "spambot.ini", "Config", "paras", "-w -skiptobnet -screensize 800x600"); $title = IniRead ( "spambot.ini", "Config", "title", "default"); $d2acc = IniRead ( "spambot.ini", "Login", "acc", "default" ); $d2pass = IniRead ( "spambot.ini" , "Login", "pass" , "default"); $charloc = IniRead ( "spambot.ini" , "Login", "char" , "default"); $spamcount = Iniread ("spambot.ini" , "Spam configurations" , "spamcount" , "default"); $spamnumber = Iniread ("spambot.ini" , "Spam configurations" , "spamnumber" , "default"); $rsleep = random ( 7500 ) ; ---------------------------------------------------------------------------- ; Script Start - Add your code below here ; ---------------------------------------------------------------------------- #include <GUIConstants.au3> TrayTip("Inisettings" , "Please modify this file and then close the window and start spambot V 1.2", 10 , 1 ) GUICreate("Spambot V 1.2" , 400 , 450) GUISetState (@SW_SHOW) GUICtrlCreateLabel ("Inisettings for Spambot V 1.2", 100, 5 , 500, 150) GUICtrlSetFont (-1,9, 400, 2, "Comic Sans") GUICtrlSetColor(-1,0x446099) $d2acc1 = GUICtrlCreateInput ($d2acc, 15, 40, 100, 20) GUICtrlCreateLabel ("Your account here", 150, 40 , 300, 20) $save1 = GUICtrlCreateButton ( "Save", 15, 62, 90, 20) $d2pass1 = GUICtrlCreateInput ($d2pass, 15, 90 , 100, 20) GUICtrlCreateLabel ("Password", 150, 90 , 300, 20) $save2 = GUICtrlCreateButton ( "Save", 15, 112, 90, 20) $charloc1 = GUICtrlCreateInput ($charloc, 15, 140, 100, 20) GUICtrlCreateLabel ("Character number(look char.txt)", 150, 140, 300, 20) $save3 = GUICtrlCreateButton ( "Save", 15, 162, 90, 20) $d2path1 = GUICtrlCreateInput ($d2path, 15, 190, 200, 20) GUICtrlCreateLabel ("Full patch to Diablo 2", 260, 190 , 300, 20) $save4 = GUICtrlCreateButton ( "Save", 15, 212, 90, 20) $d2exe1 = GUICtrlCreateInput ($d2exe, 15, 240, 200, 20) GUICtrlCreateLabel ("Diablo 2 Executable", 260, 240 , 300, 20) $save5 = GUICtrlCreateButton ( "Save", 15, 262, 90, 20) $paras1 = GUICtrlCreateInput ($paras, 15, 290, 200, 20) GUICtrlCreateLabel ("Diablo 2 parameters", 260, 290 , 650, 20) $save6 = GUICtrlCreateButton ( "Save", 15, 312, 90, 20) $title1 = GUICtrlCreateInput ($title, 15, 340, 200, 20) GUICtrlCreateLabel ("Diablo 2 Title name", 260, 340 , 300, 20) $save7 = GUICtrlCreateButton ( "Save", 15, 362, 90, 20) $guibutton1 = GUICtrlCreateButton ( "Exit", 15, 420, 90, 20) $guibutton2 = GUICtrlCreateButton ( "Restart program", 120, 420, 90, 20) $guibutton3 = GUICtrlCreateButton ( "Save all", 225, 420, 90, 20) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then Traytip("Inisettings" , "Have a nice day!", 10, 1) If $msg = $GUI_EVENT_CLOSE Then Sleep('500') If $msg = $GUI_EVENT_CLOSE Then Exit If $msg = $guibutton1 Then Traytip("Inisettings" , "Have a nice day!", 10, 1) If $msg = $guibutton1 Then Sleep('500') If $msg = $guibutton1 Then Exit If $msg = $guibutton2 Then Run('Spambot V 1.2.exe') If $msg = $guibutton2 Then Exit(0) If $msg = $save1 Then IniWrite ( "spambot.ini", "Login", "acc", GuiRead($d2acc1)) If $msg = $save2 Then IniWrite ( "spambot.ini", "Login", "pass",GuiRead($d2pass1)) If $msg = $save3 Then IniWrite ( "spambot.ini", "Login", "char",GuiRead($charloc1)) If $msg = $save4 Then IniWrite ( "spambot.ini", "Config", "path",GuiRead($d2path1)) If $msg = $save5 Then IniWrite ( "spambot.ini", "Config", "exe", GuiRead($d2exe)) If $msg = $save6 Then IniWrite ( "spambot.ini", "Config", "paras", GuiRead($paras1)) If $msg = $save7 Then IniWrite ( "spambot.ini", "Config", "title", GuiRead($title1)) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Login", "acc", GuiRead($d2acc1)) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Login", "pass",GuiRead($d2pass1)) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Login", "char", GuiRead($charloc1)) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "path", GuiRead($d2path1)) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "exe", GuiRead($d2exe)) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "paras", GuiRead($paras1)) If $msg = $guibutton3 Then IniWrite ( "spambot.ini", "Config", "title", GuiRead($title1)) Wend And thats the part of ini what does not work : ,,,,, [Config] path=C:/Program Files/Diablo II/ ;Full Patch to diablo 2 exe=1243456 ;Diablo 2 exe (D2loader recommended) ,,,,, why the exe is typed as 1243456 ? i typed in diablo 2.exe but it showed numbers :S Link to comment Share on other sites More sharing options...
Developers Jos Posted October 17, 2004 Developers Share Posted October 17, 2004 (edited) hmm hey i did as u recommend me.. the guiread method.. and everything worked , except the d2exe :Swhy the exe is typed as 1243456 ? i typed in diablo 2.exe but it showed numbers :S<{POST_SNAPBACK}>you are not reading the proper Handle... it should be:If $msg = $save5 Then IniWrite("spambot.ini", "Config", "exe", GUIRead($d2exe1)) Edited October 17, 2004 by JdeB SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
Masqo Posted October 17, 2004 Author Share Posted October 17, 2004 you are not reading the proper Handle... it should be:If $msg = $save5 Then IniWrite("spambot.ini", "Config", "exe", GUIRead($d2exe1))<{POST_SNAPBACK}>oh yeah , sry was a typo :) Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now