I need help please whit that script

[mmlm]

Hi, If someone talk french... that will be great.

first tank you for that site.. I start to use autoit and i verry like all that software can do for me. but now I have a problem to do someting.

sorry for my english I am french and not realy good in english. I will try to explain my problem.

I play diablo2. I have receave from a friend a script for try to join all time the same game, and now I try to modify that script for be able to enter whit my char in a game for spam information, and quit.

For now it's pretty good.. dont forget i start .. i am verry newb in that !

I can do my mouse move to the join button. click on it wait and click twice in a game on the list available. I join the game and i spam my information..

All that work great but ....... I have one problem. the script dont know if the game is full or if the char have join or not the game and start to spam .. same if i am in game and if i am in the lobby.

I dont know to say to the script if the game is full and canot join dont spam just retry other game. lol

and my second problem is for the loop. I want my script after finished to spam information, I want he quit and that's great the esc and mousemove and clik on save exit.

but dont retry to join other game after the delay.

I have make that script for play in full screen mode.

Can someone try to tel me what's wrong whit what i have enter.

that's my link for the script. plz verify and tel me what's wrong whit it. and if you can tel me what i have to add to it work

tank you verry much.

I tink someone have already make a bot like that for spam information about d2legit item or someting like that. If i can found somehere... just let me know i will try to fix my script my self whit his script.

thank you again

or it's a small script look it here if you want that dont work where it's red at the bottom

Global $Paused

HotKeySet("{END}", "TogglePause")

HotKeySet("{HOME}", "Terminate")

While 1

Sleep(100)

WEnd

Func TogglePause()

$Paused = NOT $Paused

While $Paused

Sleep(100)

Mouseclick("left", 719,462)

Sleep(2000)

Mouseclick("left", 479,309)

sleep(50)

Mouseclick("left", 479,309)

Sleep(10000)

Send("{ENTER}")

Send("Hi, I am mmlm, alias DLCONEOWNER")

send("{ENTER}")

Sleep(1450)

send("{ENTER}")

Send("...")

send("{ENTER}")

send("{ENTER}")

Send("I Hunt and kill all diablo clones myself")

send("{ENTER}")

Sleep(50)

send("{ENTER}")

Send("...")

send("{ENTER}")

send("{ENTER}")

Send("I can help you every time you need I am tagged TRUSTED")

send("{ENTER}")

Sleep(9000)

send("{esc}")

Mouseclick("left", 412,258)

EndIf

WEnd

EndFunc

Func Terminate()

Exit 0

EndFunc

[mmlm]

I know for you it's pretty easy but i have pass all day for make that small script....

for that be more easy I have put in blue text in the script what i want .. can you only tel me what is the code i need to insert for repleace the blue line

and what i have to insert in the red line at the end for it work properly tank you

Global $Paused

HotKeySet("{END}", "TogglePause")

HotKeySet("{HOME}", "Terminate")

While 1

Sleep(100)

WEnd

Func TogglePause()

$Paused = NOT $Paused

While $Paused

Sleep(100)

Mouseclick("left", 719,462)CLICK ON JOIN BUTTON

Sleep(2000)

Mouseclick("left", 479,309)CLICK ON A GAME NAME IN THE LIST

sleep(50)

Mouseclick("left", 479,309)CLICK ON A GAME NAME IN THE LIST

Sleep(10000)

HERE I AM SUPPOSE TO ENTER IN A GAME. IF I ENTER THAT'S OK SCRIPT HAVE TO CONTINUE. BUT IF FAIL TO JOIN BECAUSE GAME IS FULL OR BECAUSE GAME DO NOT EXIST : SCRIPT HAVE TO RETRY TO JOIN AN OTHER GAME IN THE LIST AND IT'S THAT PART I DONT KNOW HOW FORMULATE IT

Send("{ENTER}")

Send("Hi, I am mmlm, alias DLCONEOWNER")

send("{ENTER}")

Sleep(1450)

send("{ENTER}")

Send("...")

send("{ENTER}")

send("{ENTER}")

Send("I Hunt and kill all diablo clones myself")

send("{ENTER}")

Sleep(50)

send("{ENTER}")

Send("...")

send("{ENTER}")

send("{ENTER}")

Send("I can help you every time you need I am tagged TRUSTED")

send("{ENTER}")

Sleep(9000)

send("{esc}")

Mouseclick("left", 412,258)

SOMETING IS MISSING OR RONG WHIT MY END I WANT THE BOT AFTER QUIT GAME WHAIT AVRAGE 45 SECOND AND RESTART TO JOIN OTHER GAME BY CLICK THE JOIN BUTTON (LOOP)

EndIf

WEnd

EndFunc

Func Terminate()

Exit 0

EndFunc

TANK YOU VERRY MUCH FOR HELP ME

[clearguy]

You need to find a caracteristic when the game is joined,like a colored pixe etc...

Then you make a function to look if this pixel is really that color...if yes then ok.

For this function look in the help file,I don't know these by heart .

[mmlm]

You need to find a caracteristic when the game is joined,like a colored pixe etc...

Then you make a function to look if this pixel is really that color...if yes then ok.

For this function look in the help file,I don't know these by heart .

do you receave my pm ?

when i open a game if i join that make a red or orange portal like fire that take avrage 5-12 second if the game is full that say almost emediatly game full

and if fail to join.. that more long.. that take i tink like 1 min and a black screen appear and it's fail to join

wow what i have to do whit that

[clearguy]

Look in help file about PixelGetColor(you can get the needed color with that).

Then you can integrate a PixelSearch in your script

Edited August 21, 2006 by clearguy

[mmlm]

is it better like that but still not work.. why.. what's the end if at the bottom dont work why ?

Global $Paused

HotKeySet("{END}", "TogglePause")

HotKeySet("{HOME}", "Terminate")

While 1

Sleep(100)

WEnd

Func TogglePause()

$Paused = NOT $Paused

While $Paused

Sleep(100)

Mouseclick("left", 719,462)

Sleep(2000)

Mouseclick("left", 479,309)

sleep(50)

Mouseclick("left", 479,309)

Sleep(10000)

func cherchepixel()

pixelsearch(386,272+0xd4d0c8,13947080)

if @error<>1 then

$pixel = "ok"

elseif

$pixel = "no"

endif

endfunc

fonc talk()

Sleep(10000)

Send("{ENTER}")

Send("Hi, I am mmlm, alias DLCONEOWNER")

send("{ENTER}")

Sleep(1450)

send("{ENTER}")

Send("...")

send("{ENTER}")

send("{ENTER}")

Send("I Hunt and kill all diablo clones myself")

send("{ENTER}")

Sleep(50)

send("{ENTER}")

Send("...")

send("{ENTER}")

send("{ENTER}")

Send("I can help you every time you need I am tagged TRUSTED")

send("{ENTER}")

Sleep(9000)

send("{esc}")

Mouseclick("left", 412,258)

EndIf

WEnd

EndFunc

Func Terminate()

Exit 0

EndFunc

[Bundy]

If I remember correctly, full games aren't available at games list. Am I wrong? Easier way to find if you are in game is buying a mercenary and searching for green frame. It's static and easy to find.

[BPBNA]

Wow this is really chopped up... You have EndIf and WEnd statements when there is no If or While. You have a function in a function and your missing an EndFunc. I really don't know whats going on with that pixelsearch inside cherchpixel() so I'm not gunna touch it 0_o Try this.

expandcollapse popup

Global $Paused
HotKeySet("{END}", "TogglePause")
HotKeySet("{HOME}", "Terminate")

While 1
Sleep(100)
WEnd

Func TogglePause()
$Paused = NOT $Paused
While $Paused
Sleep(100)
Mouseclick("left", 719,462)
Sleep(2000)
Mouseclick("left", 479,309)
sleep(50)
Mouseclick("left", 479,309)
Sleep(10000)
cherchpixel()
EndFunc

func cherchepixel()
pixelsearch(386,272+0xd4d0c8,13947080)
if @error<>1 then
$pixel = "ok"
elseif
$pixel = "no"
endif
EndFunc

Func talk()
Sleep(10000)
Send("{ENTER}")
Send("Hi, I am mmlm, alias DLCONEOWNER")
send("{ENTER}")
Sleep(1450)
send("{ENTER}")
Send("...")
send("{ENTER}")
send("{ENTER}")
Send("I Hunt and kill all diablo clones myself") 
send("{ENTER}")
Sleep(50)
send("{ENTER}")
Send("...")
send("{ENTER}")
send("{ENTER}")
Send("I can help you every time you need I am tagged TRUSTED")
send("{ENTER}")
Sleep(9000)
send("{esc}")
Mouseclick("left", 412,258)
EndIf
WEnd
EndFunc

Func Terminate()
Exit
EndFunc

Edited August 21, 2006 by BPBNA

[mmlm]

noting work good.. after the the last line

Global $Paused

HotKeySet("{END}", "TogglePause")

HotKeySet("{HOME}", "Terminate")

While 1

Sleep(100)

WEnd

Func TogglePause()

$Paused = NOT $Paused

While $Paused

Sleep(100)

Mouseclick("left", 719,462)

Sleep(2000)

Mouseclick("left", 479,309)

sleep(50)

Mouseclick("left", 479,309)

the script have to know if the red portal open or not ... he have to know if he have join or not the game.

if ok and have join... he can talk..

if not ok if he have fail to join, or if the game was full, or if the game dont exist the bot have to restart all that

or someting like that

Sleep(1000)

Mouseclick("left", 719,462)

Sleep(2000)

Mouseclick("left", 479,309)

sleep(50)

Mouseclick("left", 479,309)

can someone help me whit that plz

[dandymcgee]

OK, well here's what I have. It's not perfect, but it worked great for me. Depending on your internet speed you may or may not need to change the Sleep functions. Here it is:

expandcollapse popup

Global $Paused
HotKeySet("{END}", "TogglePause")
HotKeySet("{HOME}", "Terminate")
HotKeySet("{INSERT}", "Start")


While 1
    Sleep(100)
WEnd

Func Start()
    Join()
EndFunc

Func Join()
    MouseMove(10, 10, 3)
    MouseClick("left", 710, 461, 1, 3)
    Sleep(3000)
    MouseClick("left", 490, 231, 1, 3)
    Send("{ENTER}")
    Sleep(100)
    Talk()
    Sleep(100)
EndFunc

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        Sleep(100)
    WEnd
EndFunc

Func Talk()
    Sleep(5000)
    Send("{ENTER}")
    Sleep(500)
    Send("Hi, I am mmlm, alias DLCONEOWNER")
    Sleep(500)
    Send("{ENTER}")
    Sleep(500)
    Send("{ENTER}")
    Sleep(500)
    Send("I Hunt and kill all diablo clones myself")
    Sleep(500)
    Send("{ENTER}")
    Sleep(500)
    Send("{ENTER}")
    Sleep(500)
    Send("I can help you every time you need I am tagged TRUSTED")
    Sleep(500)
    Send("{ENTER}")
    Sleep(1000)
    MouseMove(10, 10, 3)
    Send("{Esc}")
    Mouseclick("left", 317, 196, 1, 3)
    Sleep(10000)
    Join()
EndFunc

Func Terminate()
    Exit
EndFunc