Search a good Autoit Post

Hi i need a good Autoit Script for tppk i search for it found but all not good works atm.

I dont need Bmtppk crack what ever all keylogger +++

Some one have good Create Aotoit.ini?

Bye

Vibe0

Ok 1 for see what i mean but ho do this maby never play diablo Hc -.-

HotKeySet ( "{F10}","Host" )

hotkeyset("{F11}","startTP")

HotKeySet ( "{F9}","Party" )

;our two arrays

Dim $coordArray[4]

$coordArray[0] = 1

$coordArray[1] = 1

$coordArray[2] = 1

$coordArray[3] = 1

Dim $clickArray[2]

$clickArray[0] = 1

$clickArray[1] = 1

Opt("MouseCoordMode", 105)

Opt("PixelCoordMode", 105)

$harVar = 0

Func Host ()

WinGetPos ("Diablo II")

send("{F8}")

MouseDown("right")

Sleep(100)

MouseUp("right")

send("{F1}")

Sleep(100)

MouseDown("right")

Sleep(2000)

MouseUp("right")

if $p = 394758 OR $p = 263172 Then

MouseMove(570,230)

sleep(100)

MouseClick("left")

sleep(100)

MouseClick("left")

Sleep(100)

Else

MouseMove(367,230)

sleep(100)

MouseClick("left")

sleep(100)

MouseClick("left")

Sleep(100)

send("p")

Endif

$var = PixelGetColor( 105 , 150 )

While $var <> 6906717 AND $var <> 4472892

sleep (10)

$var = PixelGetColor( 105 , 150 )

WEnd

MouseMove(105,150,0)

MouseClick("left")

EndFunc

Func Party ()

$p = PixelGetColor( 370 , 440 )

if $p = 394758 OR $p = 263172 Then

Sleep(10)

Else

send("p")

Endif

Sleep(100)

For $i = 143 To 371 step 38

MouseMove(300,$i,0)

MouseClick("left")

Next

EndFunc

While 1

Sleep(100)

WEnd

This honestly dose not look like a good code.

What exactly is the purpose of it?

Also please use the edit button in the future.