How to script a simple auto-bot [AutoIT]

10/31/2009 15:46 cyanicethebest#91
PLEASE RE-UPLOAD SS !!!

I NEED IT ><

THX .!
10/31/2009 22:47 alecz24#92
Quote:
Originally Posted by cyanicethebest View Post
PLEASE RE-UPLOAD SS !!!

I NEED IT ><

THX .!
don't u want a HD movie along with those pics?jeez man..concentrate a little.. :rolleyes:
11/02/2009 12:19 fear-x#93
yeh i need to se the SS's too plz re-upload ..links r dead
11/14/2009 09:53 cyanicethebest#94
oh comon please .. the links are dead. i have done the coding but i need the ss about getting pixels from the mobs.
thanks
11/19/2009 16:20 RedDragonX#95
hey guys can anyone post a full script here...?
i don't want to be all beggy and all but... next week i have tests xD and i would like to have my newest character, the FB lvl 4 (alt) to be atleast at lvl 30 :/
i have to study and i won't be able to bot xD or play Cabal, only in christmas...

i would really like if u post one :D

Thx for your support/reply :P
11/20/2009 17:55 (GAME)Master#96
would be better if AutoIt could make memory bots not just pixel bots(i.e memory bots are alot faster)

Quote:
Originally Posted by cyanicethebest View Post
oh comon please .. the links are dead. i have done the coding but i need the ss about getting pixels from the mobs.
thanks
just google a pixle identifier than goto the game and use that to indentify the pixels u wants and write em down.
11/20/2009 22:42 RedDragonX#97
Quote:
Originally Posted by dimabuwag View Post
BOTSnHACKS - AutoPOTS v.10 Original Script
Code:
#include GUIConstants.au3
#include GUIList.au3
#include Misc.au3
#include Array.au3

; GUI TABLE
 = GUICreate("AutoPOTS v1.0 [www.botsnhacks.blogspot.com]", 349, 350, 278, 199)
GUISetIcon("favicon.ico")
GUISetBkColor(0x0)

 = GUICtrlCreateInput("",90, 13, 100, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
 = GUICtrlCreateLabel("Game Title", 16, 15, 70, 17)
GUICtrlSetColor(,977156)

;HP Group
 = GUICtrlCreateGroup("HP/Pots", 8, 37, 225, 89)
GUICtrlSetColor(,16720929)
 = GUICtrlCreateLabel("HP Color", 16, 54, 70, 17)
GUICtrlSetColor(,16720929)
 = GUICtrlCreateInput("",90, 52, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
 = GUICtrlCreateLabel("HP Location", 16, 75, 70, 17)
GUICtrlSetColor(,16720929)
 = GUICtrlCreateInput("",90, 73, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
 = GUICtrlCreateInput("",360, 73, 30, 17)
 = GUICtrlCreateInput("",390, 73, 30, 17)
 = GUICtrlCreateLabel("HP Pot Button", 16, 96, 70, 17)
GUICtrlSetColor(,16720929)
 = GUICtrlCreateInput("",90, 94, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)

;MP Group
 = GUICtrlCreateGroup("MP/Pots", 8, 132, 225, 89)
GUICtrlSetColor(,5737171)
 = GUICtrlCreateLabel("MP Color", 16, 149, 70, 17)
GUICtrlSetColor(,5737171)
 = GUICtrlCreateInput("",90, 147, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
 = GUICtrlCreateLabel("MP Location", 16, 170, 70, 17)
GUICtrlSetColor(,5737171)
 = GUICtrlCreateInput("",90, 168, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
 = GUICtrlCreateInput("",360, 90, 30, 17)
 = GUICtrlCreateInput("",390, 90, 30, 17)
 = GUICtrlCreateLabel("MP Pot Button", 16, 191, 70, 17)
GUICtrlSetColor(,5737171)
 = GUICtrlCreateInput("",90, 189, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
;SP Group
 = GUICtrlCreateGroup("SP/Pots", 8, 227, 225, 89)
GUICtrlSetColor(,16037638)
 = GUICtrlCreateLabel("SP Color", 16, 244, 70, 17)
GUICtrlSetColor(,16037638)
 = GUICtrlCreateInput("",90, 242, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
 = GUICtrlCreateLabel("SP Location", 16, 265, 70, 17)
GUICtrlSetColor(,16037638)
 = GUICtrlCreateInput("",90, 263, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)
 = GUICtrlCreateInput("",360, 110, 30, 17)
 = GUICtrlCreateInput("",390, 110, 30, 17)
 = GUICtrlCreateLabel("SP Pot Button", 16, 286, 70, 17)
GUICtrlSetColor(,16037638)
 = GUICtrlCreateInput("",90, 284, 65, 17)
GUICtrlSetColor(,977156)
GUICtrlSetBkColor(,0x0)

;Buttons
 = GUICtrlCreateButton("Save Setting", 252, 239, 91, 25, 0)
GUICtrlSetColor(,16776320)
GUICtrlSetBkColor(,0x0)
GUICtrlSetFont(, 10, 10, 1)
 = GUICtrlCreateButton("START", 252, 269, 91, 25, 0)
GUICtrlSetColor(,16776320)
GUICtrlSetBkColor(,0x0)
GUICtrlSetFont(, 10, 800, 2)
 = GUICtrlCreateButton("Setup", 160, 48, 50, 20, 0)
GUICtrlSetColor(,16720929)
GUICtrlSetBkColor(,0x0)
GUICtrlSetFont(, 10, 10, 1)
 = GUICtrlCreateButton("Setup", 160, 143, 50, 20, 0)
GUICtrlSetColor(,5737171)
GUICtrlSetBkColor(,0x0)
GUICtrlSetFont(, 10, 10, 1)
 = GUICtrlCreateButton("Setup", 160, 238, 50, 20, 0)
GUICtrlSetColor(,16037638)
GUICtrlSetBkColor(,0x0)
GUICtrlSetFont(, 10, 10, 1)

;Label
 = GUICtrlCreateLabel("Press F11 to STOP", 247, 190, 120, 17)
GUICtrlSetColor(,16720929)
 = GUICtrlCreateLabel("SPAGHETT1", 247, 330, 120, 17)
GUICtrlSetFont(, 10, 1500, 2)
GUICtrlSetColor(,16720929)
 = GUICtrlCreateLabel("www.botsnhacks.blogspot.com", 16, 330, 200, 17)
GUICtrlSetFont(, 10, 10, 1)
GUICtrlSetColor(,7849550)

GUISetState(@SW_SHOW)

Func EnDisAble()
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
EndFunc


Func HP_endisable()
GuiCtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GuiCtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GuiCtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )
GUICtrlSetState(, )

EndFunc


Func GetColorHP()
 = GuiCtrlCreateLabel("", 160, 70, 50, 40)
While 1
 = MouseGetPos()
 = PixelGetColor(,)
sleep(100)
GuiCtrlSetBkColor(-1, )
If  <>  Then
GUICtrlSetData(,)
endif
If  <>  then
GUICtrlSetData(, )
GUICtrlSetData(, )
GUICtrlSetData(, &"x"&)
endif
if _ispressed("7A") Then
ExitLoop
endIF
Wend
EndFunc

Func GetColorMP()
 = GuiCtrlCreateLabel("", 160, 165, 50, 40)
While 1
 = MouseGetPos()
 = PixelGetColor(,)
sleep(100)
GuiCtrlSetBkColor(-1, )
If  <>  Then
GUICtrlSetData(,)
endif
If  <>  then
GUICtrlSetData(, )
GUICtrlSetData(, )
GUICtrlSetData(, &"x"&)
endif
if _ispressed("7A") Then
ExitLoop
endIF
Wend
EndFunc

Func GetColorSP()
 = GuiCtrlCreateLabel("", 160, 260, 50, 40)
While 1
 = MouseGetPos()
 = PixelGetColor(,)
sleep(100)
GuiCtrlSetBkColor(-1, )
If  <>  Then
GUICtrlSetData(,)
endif
If  <>  then
GUICtrlSetData(, )
GUICtrlSetData(, )
GUICtrlSetData(, &"x"&)
endif
if _ispressed("7A") Then
ExitLoop
endIF
Wend
EndFunc



Func Save()
IniWrite("botsnhacks.ini","Game", "Game_N",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "HP_x",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "HP_y",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "HP_K",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "HP_Color",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "MP_x",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "MP_y",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "MP_K",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "MP_Color",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "SP_x",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "SP_y",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "SP_K",GUICtrlRead())
IniWrite("botsnhacks.ini","AutoPot", "SP_Color",GUICtrlRead())
EndFunc



Func Load()
if (not FileExists("botsnhacks.ini")) Then
Return
EndIf

 = iniread("botsnhacks.ini", "Game", "Game_N", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_Color", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_x", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_y", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_K", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_Color", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_x", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_y", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_K", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_Color", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_x", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_y", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_K", "")

GUICtrlSetData(,)
GUICtrlSetData(,)
 = GuiCtrlCreateLabel("", 160, 70, 50, 40)
GuiCtrlSetBkColor(-1, )
GUICtrlSetData(,)
GUICtrlSetData(,)
GUICtrlSetData(,)
GUICtrlSetData(,&"x"&)
GUICtrlSetData(,)
 = GuiCtrlCreateLabel("", 160, 165, 50, 40)
GuiCtrlSetBkColor(-1, )
GUICtrlSetData(,)
GUICtrlSetData(,)
GUICtrlSetData(,)
GUICtrlSetData(,&"x"&)
GUICtrlSetData(,)
 = GuiCtrlCreateLabel("", 160, 260, 50, 40)
GuiCtrlSetBkColor(-1, )
GUICtrlSetData(,)
GUICtrlSetData(,)
GUICtrlSetData(,)
GUICtrlSetData(,&"x"&)
HP_endisable()
EndFunc


Func Start()

 = iniread("botsnhacks.ini", "Game", "Game_N", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_Color", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_x", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_y", "")
 = IniRead("botsnhacks.ini", "AutoPot", "HP_K", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_Color", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_x", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_y", "")
 = IniRead("botsnhacks.ini", "AutoPot", "MP_K", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_Color", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_x", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_y", "")
 = IniRead("botsnhacks.ini", "AutoPot", "SP_K", "")
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", , "int", 500, "long", 0x00090000)
WinActivate ()
WinWaitActive()
ControlEnable(,"","")

do
sleep(100)
If  = true then
 = PixelGetColor(, )
If  =  Then
 = 0
Else
 = 0
send()
EndIf
EndIf

If  = true Then
 = PixelGetColor(, )
If  =  Then
 = 0
Else
 = 0
Send()
EndIf
EndIF

If  = true Then
 = PixelGetColor(, )
If  =  Then
 = 0
Else
 = 0
Send()
EndIf
EndIf

until _ispressed("7A")

EndFunc


;Main Run
Load()
While 1

 = GUIGetMsg()
Switch 
Case 
Exit
Case 
call("GetColorHP")
Case 
call("GetColorMP")
Case 
call("GetColorSP")
Case 
Endisable()
Start()
Endisable()
Case 
Save()
EndSwitch
WEnd
<=========Script Ends Here =============>


I also create a file name BOTSnHACKS.ini where all the value that was entered and saved in AutoPOTS v1.0 GUI are stored.. The main program will read from this BOTSnHACKS.ini to get the value needed for program execution..

See Below

[Game]
Game_N= Cabal

[AutoPot]
HP_color=12788500
HP_x=119
HP_y=50
HP_K={-}
MP_color=5737171
MP_x=90 MP_y=356
MP_K=
SP_color=16037638
SP_x=79
SP_y=483
SP_K=
Rest_K={Home}
Rest_Delay=


______________

copy and paste :D
there is an error with
#include GUIConstants.au3
it should be
#include <GUIConstants.ae3>
but even so the scripts keeps kgetting errors
11/21/2009 11:20 RedDragonX#98
well i have made an Auto-Hunt bot and a Auto-Pot+AutoPick Bot
but since i figured out by myself since nobody helped me... like i asked D:
oh well gl trying to make one ;D it isn't really that hard, just copy paste the Auto hunt from this Thread, then do some changes, which? U figure it out ;P i was watching TV for 40 mins, my character, lvl 29 was with 1 bar to lets see... well till 16 bars, in 40 mins, without me doing anything, and besides when i arrived he had died and already respawned
11/29/2009 18:20 Black0ne#99
I'm assuming AutoIt still works for PH and EU?, because NA has xtrap pinky, which blocks autoit completely.
05/16/2010 19:41 XdragonmasterX#100
hmmm, nobody plays this game anymore or why the last post was 29.11.2009?
is there something like cabalrider? i stoped play for a long time and now i want to play again.
05/24/2010 11:19 teddykeren#101
give me auto hunt,pot and collect in elitecabal please....
05/30/2010 19:42 karemgiga#102
Working pretty well!xD
06/29/2010 13:31 mhelzkhie#103
Quote:
Originally Posted by teddykeren View Post
give me auto hunt,pot and collect in elitecabal please....
yeah i also want it...

i just need the SS for mobs Pixels etc:mofo:
07/09/2010 22:20 bahamut3000#104
I use HotKeySet function but it's not work in cabal windows.

how to fix it?
08/28/2010 22:29 calonlineFreak#105
look at this here:

[Only registered and activated users can see links. Click Here To Register...]

i found it while surfing. seems nice to lern coding as well...