Jump to content

need verification


mmlm
 Share

Recommended Posts

?[autoit]

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,2)

sleep(7000)

Mouseclick("left", 76,273)

sleep(10)

Mouseclick("left", 582,243)

$coord = PixelSearch ( 425, 323, 703, 429,2171937)

If Not @error Then

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}")

send("{esc}")

Mouseclick("left", 412,258)

EndIf

WEnd

EndFunc

Func Terminate()

Exit

EndFunc

or can i say :

if @error then

EndIf

WEnd

EndFunc

Func Terminate()

Exit

EndFunc

Link to comment
Share on other sites

code tag

[ code] ; no spaces

; paste code

[ /code] no spaces

....... or

[ autoit] ; no spaces

; paste code

[ /autoit] ; no spaces

............ and

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, 2)
        Sleep(7000)
        MouseClick("left", 76, 273)
        Sleep(10)
        MouseClick("left", 582, 243)
        $coord = PixelSearch(425, 323, 703, 429, 2171937)
        If Not @error Then
            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}")
            Send("{esc}")
            MouseClick("left", 412, 258)
        EndIf
    WEnd
EndFunc   ;==>TogglePause

Func Terminate()
    Exit
EndFunc   ;==>Terminate

8)

NEWHeader1.png

Link to comment
Share on other sites

?[autoit]

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,2)

sleep(7000)

Mouseclick("left", 76,273)

sleep(10)

Mouseclick("left", 582,243)

$coord = PixelSearch ( 425, 323, 703, 429,2171937)

If Not @error Then

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}")

send("{esc}")

Mouseclick("left", 412,258)

EndIf

WEnd

EndFunc

Func Terminate()

Exit

EndFunc

or can i say :

if @error then

EndIf

WEnd

EndFunc

Func Terminate()

Exit

EndFunc

I am not lucky the search pixel have found the same pixel in the loby and start to spam etc. what command or fonction can i use if it's not search pixel.... can i look for item in the game like the rock block wall or the fire or a character is alwas in the game like wariv or akara but never in same place in town

I am frustrated. I am verry close.. now

Link to comment
Share on other sites

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,2)
        sleep(7000)
        Mouseclick("left", 76,273)
        sleep(10)
        Mouseclick("left", 582,243)
        $coord = PixelSearch ( 425, 323, 703, 429,2171937)
        If Not @error Then
            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}")
            send("{esc}")
            Mouseclick("left", 412,258)
        EndIf
    WEnd
EndFunc

Func Terminate()
    Exit
EndFuncoÝ÷ ÚÜjx¬k&®¶­s` bW'&÷"FVâ VæD` tVæ@¤VæDgVæ0 ¤gVæ2FW&ÖæFR W@¤VæDgVæ
You should really download SciTE4AutoIT and use it. Your scripts will be easier to read and understand! I reformatted the script above to be able to follow what it's doing. Only you can tell us if the first part above works correctly for you. The second ending after "or can i say:" doen't make sense because there are no functional statements between the IF/THEN and the ENDIF.

Hope that helps!

:P

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...