Zaidimu Forumas

Mini Zaidimai Maži geri žaidimai internete, kompiuteryje ir telefone.

Horoskopai Palmiros horoskopas 2009

Zaidimai | Zaidimu Forumas | Games Forums | Žaidimai


Go Back   Zaidimai | Zaidimu Forumas | Games Forums | Žaidimai > Games Forums > MMORPG > Cabal Online Hacks

Reply
 
LinkBack Thread Tools Display Modes
Old 03-23-2009, 07:01 PM   #1 (permalink)
Senior Member
 
ZilviS's Avatar
 
Join Date: Dec 2008
Posts: 6,296
Default BOT for DMG Hackers/DEF Hackers

This code is primitive & I do not hold any responsible for what you do with this.
This won't HEAL or detect your HP by Pixel or by offset.
This will simply scan a color & click, use skill if found & repeat.
USEFUL ONLY TO THOSE WHO DMG HACK & DEF HACK.

PHP Code:
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; AutoItScript for Damage Hackers ;
; Author: Infidel_ ;
; Functions: ;
; (*) will Rotate the Camera to the Left ;
; _to ensure it will constantly looking ;
; _for a monster. ;
; (*) will try to SendKeys 1,2,3,4,(SPACE);
; _2,3,1,4,7,6 (In that Order) ;
; (*) Will try to scan the screen for ;
; _yellow Monsters... ;
; License: FREE, you may edit this. ;
; USEFUL FOR AFK-LEVELING IN MF OR PF ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


HotKeySet("{DEL}", "MyExit") ;press the END key to exit the program

WinActivate("CABAL")

If WinActive("CABAL") Then

While 1
Sleep(500)
WinSetOnTop("CABAL","",1)
If WinGetState("CABAL","") <> 32 Then
WinSetState("CABAL","",@SW_MAXIMIZE )
EndIf

$coord = PixelSearch( 100, 100, 1280, 950, 0xcfcd00, 1, 2);Yellow Monsters
If Not @error Then
MouseMove($coord[0],$coord[1],0)
MouseClick("left",$coord[0],$coord[1])
Sleep (1000)

Send("1")
Sleep(100)
Send("2")
Sleep(100)
Send("3")
Sleep(100)
Send("4")
Sleep(100)
Send("{Space}")
Sleep(100)
Send("2")
Sleep(100)
Send("3")
Sleep(100)
Send("1")
Sleep(100)
Send("4")
Sleep(100)
Send("7")
Sleep(200)
Send("6")
Sleep(200)

EndIf
Send("{Space}")
Send("{Space}")
Send("{Space}")
Send("{Space}")
Send("{Space}")
Send("{Space}")
Send("{Space}")
sleep(500)
Send("{Right 4}")

WEnd
EndIf

Func MyExit()
Exit
EndFunc

; cfcd00 <- yellow
I don't know if people will still say SCAN this... <_<
Compile it using AutoIt.

edit:
The script will constantly monitor CABAL window and will always make it maximize.
The script is set to as 1280x1024 desktop resolution.
Edit at your own will.
Anyhow, I'd like to see some of your scripts as well.

edit2:
Works only in private servers.
__________________
http://www.mmorpgcastle.com/
MMORPG CASTLE ! MMORPG And Other Games Hacks, Tutorials, Guides, Videos.Photoshop and 3D modeling progams guides! Making money online tutorials!!
ZilviS is offline   Reply With Quote

Powered by vBulletin® Version 3.8.0
Copyright ©2000 - 2010, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 3.3.0 RC1 ©2009, Crawlability, Inc.
copyrights 2009 - zaidimai Games Forums | zaidimu website | Žaidimai Forumas