Jump to content

Recommended Posts

Posted

abit more info on the game would help though.

If you post link to game i can sse if its easily done.

UDF:Crypter a file encrypt / decrypt tool with no need to remember a password again. Based on Caesar cipher using entire ASCII Table.Script's: PixelSearch Helper, quick and simple way to create a PixelSeach.Chatserver - simplified, not so complicated multi-socket server.AutoIT - Firewall, simple example on howto create a firewall with AutoIt.
  • Moderators
Posted

I would love for some one else to do it but plz show the source.

Hrm is this a link here

you gata register dun see a problem why but ;)

Im not telling you my acc on there to get banned

keep it annonomis

Lazy...

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Posted (edited)

i already have much done.

lots of errors tho.

; http://ladderslasher.d2jsp.org/
; todo list
; Status - kills - deaths 
; End monster life bar =  525 210
; Start monster life bar = 334 212
; Fight Another
; 
; 
HotKeySet("{ESC}",'quit')
    HotKeySet("{INS}",'doit')
#include <GUIConstants.au3>
$win='Ladderslasher'
$monsterlife0top=201
$monsterlife0bottem=212

$monsterlife0middleloc= $monsterlife0bottem - $monsterlife0top
$monsterlife0middle= $monsterlife0middleloc/$monsterlife0top
$monsterlife0mid=$monsterlife0bottem+$monsterlife0middle

$monsterlife0left=334
$monsterlife0right=525

$monsterlife0middleloc2= $monsterlife0right - $monsterlife0left
$monsterlife0middle2= $monsterlife0middleloc/$monsterlife0top
$monsterlife0midd2= $monsterlife0left+$monsterlife0middleloc2
$monsterlife0mid2=$monsterlife0right+$monsterlife0middle2

$status=0
$deaths=0
$killed=0
$death=0
$top= 129
$left=323
$bottem=476
$right=654
$attackclr='0x840084'
$itemclr='0x0000FF'
$lifeclr='0xD68284'

#Region ### START Koda GUI section ### Form=C:\Documents and Settings\kcd\Desktop\Gamers-Vision\hackslash\AForm1.kxf
$Form1 = GUICreate("AForm1", 635, 486, 237, 160)
$Obj1 = ObjCreate("Shell.Explorer.2")
$Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 634, 412)
$Start = GUICtrlCreateButton("Start", 560, 416, 49, 17, 0)
$Stop = GUICtrlCreateButton("Stop", 560, 432, 49, 17, 0)
$Exit = GUICtrlCreateButton("Exit", 560, 448, 49, 17, 0)
$Group1 = GUICtrlCreateGroup("Stats", 0, 416, 385, 49)
$Kills = GUICtrlCreateLabel("Kills", 8, 432, 22, 25)
$Deaths = GUICtrlCreateLabel("Deaths", 32, 432, 38, 25)
$Items = GUICtrlCreateLabel("Items", 72, 432, 29, 25)
$clritem = GUICtrlCreateLabel('item clr'&@CRLF&$itemclr, 104, 432, 51, 25)
$clrlife = GUICtrlCreateLabel('life clr'&@CRLF&$lifeclr, 160, 432, 51, 25)
$clrattack = GUICtrlCreateLabel('attack clr'&@CRLF&$attackclr, 216, 432, 51, 25)
$status = GUICtrlCreateLabel("Status - Booting", 272, 440, 103, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label1 = GUICtrlCreateLabel("ALabel1", 0, 464, 387, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$Obj1.navigate("http://ladderslasher.d2jsp.org/")
GUICtrlSetData($status,"Status - Stoped")

GUICtrlSetData($Label1,"")
GUICtrlSetData($Deaths,"Deaths"&@CRLF&$death)
GUICtrlSetData($Kills,"Kills "&@CRLF&$killed)

Func quit()
    Exit
EndFunc

Func doit()
;~  $monsterlifeloc = PixelSearch(504,208 ,801, 508, $lifeclr )
;~ If Not @error Then
;~     $monsterlife=PixelGetColor($monsterlife0midd2+94,$monsterlifeloc[1]+2)
;~ EndIf
;~  MouseMove($monsterlife0midd2+94,$monsterlifeloc[1]+2,0)

EndFunc

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Exit
            Exit
        Case $Stop
GUICtrlSetData($status,"Status - Stoped")
$status=0
        Case $Start
GUICtrlSetData($status,"Status - Running")
$monsterlifeloc = PixelSearch(504,208 ,801, 508, $lifeclr )
$status=1
        Case Else

If $status = 1 Then
$heal=PixelGetColor(100,155)
$alive=PixelGetColor(76,155)
If Not @error Then
 $monsterlife=PixelGetColor($monsterlife0midd2+94,$monsterlifeloc[1]+2)
EndIf

If $alive <> $lifeclr Then
GUICtrlSetData($status,"Status - You died")
$death=$death+1
Sleep(5000)
EndIf

If $heal <> $lifeclr Then
GUICtrlSetData($status,"Status - Healing")
Sleep(5000)
EndIf

If $monsterlife <> $lifeclr Then
GUICtrlSetData($status,"Status - Monster dead")
$killed=$killed+1
Sleep(5000)
EndIf
$attackloc = PixelSearch(512,$monsterlifeloc[1] ,801, 508, $attackclr)
If Not @error Then
    MouseClick("LEFT",$attackloc[0],$attackloc[1],25,0)
    Sleep(1)
    MouseClick("LEFT",$attackloc[0],$attackloc[1],25,0)
    Sleep(1)
    MouseClick("LEFT",$attackloc[0],$attackloc[1],25,0)
    Sleep(1)
    MouseClick("LEFT",$attackloc[0],$attackloc[1],25,0)
    Sleep(1)
    MouseClick("LEFT",$attackloc[0],$attackloc[1],25,0)
    Sleep(1)
    MouseClick("LEFT",$attackloc[0],$attackloc[1],25,0)
    Sleep(1)
    MouseClick("LEFT",$attackloc[0],$attackloc[1],25,0)
EndIf

GUICtrlSetData($Deaths,"Deaths - "&$death)
GUICtrlSetData($Kills,"Kills - "&$killed)
    GUICtrlSetData($Label1,$attackloc[0]&' '&$monsterlifeloc[1]&' - '&$attackloc[0]&' '&$monsterlifeloc[1])
EndIf
EndSwitch
WEnd
Edited by kcd-clan
Visit mEMy programs made.Iul - IulG-V Console - G-V Console_RandomLetter - _RandomLetter()Saftey Kill - Saftey Killcolorzone() = colorzone()

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
  • Recently Browsing   0 members

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