Sign in to follow this  
Followers 0
iHonda

Diablo Ii Lod Idle Bot

9 posts in this topic

#1 ·  Posted (edited)

you might wanna change the directory of diablo 2 but make sure that it still opens in a window

; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author:        Zmaster <zmaster.atf@gmail.com>
;
; Script Function:
;   idle ur diablo 2 character in a game
;
; ----------------------------------------------------------------------------

; Script Start - Add your code below here

SplashImageOn("Diablo II idlebot By:Zmaster. Made with AutoIt", "autoit_builder_wall_800x600.jpg", 800, 600, -1, -1, 1)
SoundPlay("introwave.wav", 1)
SplashOff()

If FileExists("Info_To_Exicute.ini") Then
$acct = IniRead("Info_To_Exicute.ini", "Log In Info", "Account", "could not find")
$pass = IniRead("Info_To_Exicute.ini", "Log In Info", "Password", "could not find")
$game_name = IniRead("Info_To_Exicute.ini", "Game Info", "Game", "could not find")
$game_pass = IniRead("Info_To_Exicute.ini", "Game Info", "Pass", "could not find")
$speech1 = IniRead("Info_To_Exicute.ini", "Speech", "Line1", "could not find")
$speech2 = IniRead("Info_To_Exicute.ini", "Speech", "Line2", "could not find")
$speech3 = IniRead("Info_To_Exicute.ini", "Speech", "Line3", "could not find")
$speech4 = IniRead("Info_To_Exicute.ini", "Speech", "Line4", "could not find")
Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
Global $Quit
HotKeySet("{END}", "END")
ToolTip('To stop the script press Pause then End to exit.',0, 0)
Run("C:\Program Files\Diablo II\Diablo II.exe -w -skiptobnet")  
WinWaitActive("Diablo II")
WinMove("Diablo II", "", 0, 0)
Sleep(1000)
WinActivate("Diablo II")
Sleep(100)
Send("{TAB}")
Sleep(600)
Send($acct, 1)
Send("{TAB}")
Sleep(200)
Send($pass, 1)
Sleep(200)
Send("{ENTER}")
Send("{PAUSE}")
MouseClick("left", 600, 489, 1, 0)
Send($game_name, 1)
Send("{TAB}")
Send($game_pass, 1)
Send("{TAB}{ENTER}")
Sleep(400)
While 1
    WinActivate("Diablo II")
    Send("{Enter}")
    Send($speech1, 1)
    Send("{ENTER}")
    sleep(30000)
    WinActivate("Diablo II")
    Send("{Enter}")
    Send($speech2, 1)
    Send("{ENTER}")
    sleep(30000)
    WinActivate("Diablo II")
    Send("{Enter}")
    Send($speech3, 1)
    Send("{ENTER}")
    sleep(30000)
    WinActivate("Diablo II")
    Send("{Enter}")
    Send($speech4, 1)
    Send("{ENTER}")
    sleep(30000)
WEnd
Else
    IniWrite("Info_To_Exicute.ini", "Log In info", "Account", "Acct")
IniWrite("Info_To_Exicute.ini", "Log In info", "Password", "Pass")
IniWrite("Info_To_Exicute.ini", "Game Info", "Game", "asdfj")
IniWrite("Info_To_Exicute.ini", "Game Info", "Pass", "asdfj")
IniWrite("Info_To_Exicute.ini", "Speech", "Line1", "this is spam")
IniWrite("Info_To_Exicute.ini", "Speech", "Line2", "this is spam")
IniWrite("Info_To_Exicute.ini", "Speech", "Line3", "this is spam")
IniWrite("Info_To_Exicute.ini", "Speech", "Line4", "this is spam")
Exit
EndIf
Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is Paused, press the Pause key to resume after picking character, or completing your action.',0, 0)
    WEnd
        ToolTip("")
EndFunc
Func END()
    Exit
EndFunc
Edited by Zmaster

A great place to start Autoit 1-2-3

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

Wow this is great. All i need is to edit it so it doesn't need to log in to your account. and can someone verify that this will not send my acct and pass and drop all my gear please?

Edited by Suburban Turban

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

lol dude read it, there is no part of the code where it sends the name and pass of the acct to ppl.

lol Bounda that Urban Turban (or what ever his name is) guy is a total noob he doesnt even under the most basic commands

Edited by Zmaster

A great place to start Autoit 1-2-3

Share this post


Link to post
Share on other sites

that is true, but no need to be so harsh :think:


The below statement is False.The above statement is True.a lesson I learned from Greenmachine; give a man a code and he'll solve one problem. Teach a man to code and he'll solve all his problems.P.S please don't use autoIt as a virus creator/spyware maker(keyLogger especially)Cick this and help me[center]My Scripts:[/center][center]Port Scanner[/center]

Share this post


Link to post
Share on other sites

lol Bounda that Urban Turban (or what ever his name is) guy is a total noob he doesnt even under the most basic commands

I could say the same to you.

In fact, I suppose I just did.


"I thoroughly disapprove of duels. If a man should challenge me, I would take him kindly and forgivingly by the hand and lead him to a quiet place and kill him." - Mark TwainPatient: "It hurts when I do $var_"Doctor: "Don't do $var_" - Lar.

Share this post


Link to post
Share on other sites

this is not hard to create you know ...


-jaenster

Share this post


Link to post
Share on other sites

yea i kno its easy but then again im really noob the only reason im not having really bad problems like Turban is bcuz im not having trouble reading the help file but even then im having problems


A great place to start Autoit 1-2-3

Share this post


Link to post
Share on other sites

#9 ·  Posted (edited)

hahah want to see a supreme anti idle script

while 1
send("{Up}")
sleep(10000)
wend

so advanced its mine boggling

Edited by thatsgreat2345

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0