CTRL+ALT+SHIFT commands,how to use,keep CTRL+ALT+SHIFT pressed followed by these keys..
Insert =Increase runspeed
Delete = Decrease runspeed
Home = No CD plus no Cast time
End = Disables above
Page down = Toggles Skill FX on/off
/(numpad) = Increases attack range
*(numpad) = Decreases attack range
-(numpad) = Decrease attack reach
+(numpad) = Increase attack reach
No delay hack(This adress combined with the no cooldown allows you to cast skills x50 faster,its all about ut casting speed,I used Chromes auto-click with 0.1 sec delay between clicks to cast skills from hotkey ,you can do the same.)
1 Search 1 in Byte
2 Dance,and Search 0
3 Repeat 1-2 untill u find like 10 adresses
4 Lock the desired one at 1
Party hack(This hack is usefull,bcuz you can use ur party buffs ,fury shout,morale shout,etc without beeing in a party,thus making you stronger)
1 Party someone and search 2
2 Leave and search 0
3 Repeat 1-3 untill u found a green adress,that is statick and you can add it to a save file bcuz it will work everytime.
4 Lock it ad 2,use ur buffs...
Use scan range 0000000-1000000 for less results and faster search
CT file,use lvl hack to smart edit it
Static addy's(wont change)
00C60AA0 range
00c60aa4 aoe
00C2D6D8 gm addy,lock it at 2
Code:
#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=..\xxx\icon.ico
#AutoIt3Wrapper_Outfile=Clicker.exe
#AutoIt3Wrapper_Res_Comment=Clicks as much as you want.
#AutoIt3Wrapper_Res_Description=Clicker
#AutoIt3Wrapper_Res_Fileversion=1.8
#AutoIt3Wrapper_Res_LegalCopyright=Chrome
#AutoIt3Wrapper_Res_Language=1031
#AutoIt3Wrapper_Res_Field=Mady by|Chrome
#AutoIt3Wrapper_Au3Check_Stop_OnWarning=y
#AutoIt3Wrapper_Run_Tidy=y
#AutoIt3Wrapper_Tidy_Stop_OnError=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\xxx\clicker.kxf
$box = GUICreate("Clicker", 203, 50, 193, 125)
GUISetCursor(3)
GUISetBkColor(0x000000)
$startleft = GUICtrlCreateButton("Left", 0, 0, 57, 25, 0)
GUICtrlSetFont(-1, 12, 400, 0, "Base 05")
GUICtrlSetCursor(-1, 3)
$startshop = GUICtrlCreateButton("Shop", 0, 24, 57, 25, 0)
GUICtrlSetFont(-1, 12, 400, 0, "Base 05")
GUICtrlSetCursor(-1, 3)
$startright = GUICtrlCreateButton("Right", 56, 0, 65, 25, 0)
GUICtrlSetFont(-1, 12, 400, 0, "Base 05")
GUICtrlSetCursor(-1, 3)
$glory = GUICtrlCreateButton("Glory", 56, 24, 65, 25, 0)
GUICtrlSetFont(-1, 12, 400, 0, "Base 05")
GUICtrlSetCursor(-1, 3)
$credits = GUICtrlCreateButton("Credits", 120, 24, 81, 25, 0)
GUICtrlSetFont(-1, 12, 400, 0, "Base 05")
GUICtrlSetCursor(-1, 3)
$input1 = GUICtrlCreateInput("100000", 120, -8, 81, 33)
GUICtrlSetFont(-1, 12, 800, 0, "Base 05")
GUICtrlSetCursor(-1, 3)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
GUISetIcon("\cabal.exe")
GUISetCursor(3)
GUISetBkColor(0x000000)
$g_szVersion = "ClickScript"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)
HotKeySet("^!x", "HotkeyExit")
HotKeySet("^!c", "HotkeyEnde")
$inp = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
If $nMsg = $startleft Then
$i = 0
$inp = GUICtrlRead($input1)
If Not IsDeclared("sToolTipAnswer") Then Local $sToolTipAnswer
If $inp >= 1 Then
Do
Sleep(300)
MouseClick("left")
$i = $i + 1
$sToolTipAnswer = ToolTip("" & $i & "", 500, 500, "Clicks:", 0, 0)
Until $i = $inp
$sToolTipAnswer = ToolTip("Fertig: " & $i & "", 500, 500, "Clicks:", 0, 0)
EndIf
EndIf
If $nMsg = $startright Then
$i = 0
$inp = GUICtrlRead($input1)
If Not IsDeclared("sToolTipAnswer") Then Local $sToolTipAnswer
If $inp >= 1 Then
Do
Sleep(300)
MouseClick("right")
$i = $i + 1
$sToolTipAnswer = ToolTip("" & $i & "", 500, 500, "Clicks:", 0, 0)
Until $i = $inp
$sToolTipAnswer = ToolTip("Fertig: " & $i & "", 500, 500, "Clicks:", 0, 0)
EndIf
EndIf
If $nMsg = $startshop Then
$j = 0
$inp = GUICtrlRead($input1)
If Not IsDeclared("sToolTipAnswer") Then Local $sToolTipAnswer
Do
$coord1 = PixelSearch(490, 280, 700, 580, 0x4F0303)
If Not @error Then
Sleep(1000)
MouseClick("left", $coord1[0], $coord1[1])
EndIf
Sleep(400)
$coord2 = PixelSearch(447, 550, 700, 580, 0xEEEEEE)
If Not @error Then
Sleep(1500)
MouseClick("left", $coord2[0], $coord2[1])
$sToolTipAnswer = ToolTip("Fertig: " & $j & "", 500, 500, "Items:", 0, 0)
EndIf
$j = $j + 1
Until $j = $inp
$sToolTipAnswer = ToolTip("Fertig: " & $j & "", 500, 500, "Items:", 0, 0)
EndIf
If $nMsg = $glory Then
$j = 0
$inp = GUICtrlRead($input1)
If Not IsDeclared("sToolTipAnswer") Then Local $sToolTipAnswer
Do
$coord3 = PixelSearch(800, 340, 1020, 560, 0xE3DFA4)
;$coord3 = PixelSearch(800, 340, 1020, 560, 0xE2E2E2) ;potion
If Not @error Then
Sleep(200)
MouseClick("right", $coord3[0], $coord3[1])
EndIf
;$coord4 = PixelSearch(385, 280, 685, 320, 0x020204)
$coord4 = PixelSearch(385, 280, 685, 320, 0xC7C7C7) ;yes
If Not @error Then
Sleep(50)
MouseClick("left", $coord4[0], $coord4[1])
Send("I")
Send("I")
$sToolTipAnswer = ToolTip("" & $j & "", 500, 500, "Pots:", 0, 0)
EndIf
Sleep(1500)
$j = $j + 1
Until $j = $inp
EndIf
If $nMsg = $credits Then
MsgBox(0, "Clicker", " ##################" & @CRLF & " # This Program Clicks #" & @CRLF & " # As Much As You Want #" & @CRLF & " ##################" & @CRLF & " # (c) Chrome 2008 #" & @CRLF & " ##################")
EndIf
WEnd
Func HotkeyExit()
Exit
EndFunc ;==>HotkeyExit
Func HotkeyEnde()
$j = $inp
$i = $inp
EndFunc ;==>HotkeyEnde
Hope you like it ,har har
