Hey
When i have time, I make these scripts for 1024x768.
Ive maked some Scripts, it work with:
-m_ragg gameguard bypass
-Screen size 1280x1024 (window mode) and full screened
-Cheat Engine 5.3
-If you have the "Disconnected before World loadet" error, the relogin script will auto restart cheat engine and set speed to: 18 and sleep time to 1 (perfekt settings)
-Skills in the range 1-4 and mana positions to 6
-For the auto-Relogin script, please not save ID, the script will enter your name, when youve set it
-When you bot, make the vies on high top!
Guide:
1. Downlaod and Install AutoIt 3:
http://www.autoitscript.com/cgi-bin/....4.9-setup.exe2.After Finish installation, start the AutoIt Script Editor (Start -> Programms -> AutoIt x3 -> SciTE Script Editor.exe
3. Copy the Code of the Bot/Relogin cript
4. Save it to Desktop:
FILENAME.au3
5. Start Cabal With m_ragg.exe in Cabal folder(gameguard bypass)
6. then start game and disable Save ID and use Window mode!
7. then make dopple klick on blue top, then cabal will ge bigger
8. change graphic settings to:
9. go to login screen for relogin script, then start the relogin script, then make make cabal full, that you see the login screen (dont change size or whatever!), the login script will now login you fast!
10. For the bot: go to War Server, then go to Yellow or Orange Monsters, then make screen like
and then the bot will click on monsters and make skills from 1-4 and use mana potitions from slot 6
11. Please give me a feedback^^
:End Guide:
Updates:
Bot:
-The Bot Screen is roate, thats help to find more monsters
Relogin script:
- Just for the Lgoin-Disconnect bug: The cabalmain.exe Procress must be on place 4 from under
First the Auto-Rejoin Script:
Trích:
While 1
If Hex(PixelGetColor(712, 525),6) = "C5C5C5" *Then
*Sleep(1000)
*WinActivate("CABAL")
Send("{Backspace 15}")
Send("LOGINNAME")
Send("{TAB}")
*Send("{Backspace 10}")
Send("PASSWORD") *
Send("{Enter}")
EndIf
If Hex(PixelGetColor(590, 435),6) = "1D1D1D" *Then
Send("{Right}")
Send("{Down 7}")
Send("{Enter}")
EndIf
If Hex(PixelGetColor(1053, 755),6) = "A4A2A2" *Then
Send("{Enter}");Enter 1-6 für Charakter 1-6
EndIf
If Hex(PixelGetColor(1274, 819),6) = "191919" Then
WinMinimizeAll ()
Sleep(5000)
WinClose("Cheat Engine 5.3")
Run("C:\Programme\Cheat Engine\Cheat Engine.exe")
EndIf
If Hex(PixelGetColor(787, 447),6) = "D4D0C8" Then
MouseMove(393, 260)
Sleep(200)
MouseClick("left",393, 260)
Sleep(500)
EndIf
If Hex(PixelGetColor(524, 348),6) = "008080" Then
MouseMove(748, 495)
Sleep(100)
MouseClick("left",748, 495)
*MouseClick("left",748, 495)
* MouseClick("left",748, 495)
* *MouseClick("left",748, 495)
* * * *MouseClick("left",748, 495)
* *Sleep(150)
MouseMove(604, 443)
Sleep(150)
MouseClick("left",604, 443)
Sleep(100)
MouseMove(593, 536)
Sleep(150)
MouseClick("left",593, 536)
sleep(5000)
MouseMove(790, 450)
Sleep(1500)
MouseClick("left",790, 450)
Sleep(50)
*Sleep(30000)
MouseClick("left",818, 484)
Sleep(150)
Send("{Backspace 15}")
Sleep(150)
Send("18")
Sleep(50)
Send("{TAB}")
Sleep(100)
Send("1")
Sleep(100)
MouseClick("left",839, 509)
WinMinimizeAll ()
*WinActivate("CABAL")
EndIf
WEnd
The Bot:
Trích:
While 1
* If Hex(PixelGetColor(312, 37),6) = "EDF0F3" *Then
$coord = PixelSearch( 100, 100, 1280, 950, 0xFF8000, 1, 2);Orange Monsters
If Not @error Then
* *MouseMove($coord[0],$coord[1],0)
* *MouseClick("right",$coord[0],$coord[1])
* *Sleep (50)
EndIf
Send("{Right 4}")
Send("1")
Sleep(100)
Send("2")
Sleep(100)
Send("3")
Sleep(100)
Send("4")
Send("{Right 4}")
Sleep(100)
Send("{Space}")
Sleep(100)
Send("1")
Sleep(100)
Send("2")
Sleep(100)
Send("3")
Sleep(100)
Send("4")
Sleep(100)
Send("6")
Send("{Space}")
Send("{Right 4}")
$coord = PixelSearch( 100, 100, 1280, 950, 0xFFFF00, 1, 2);Yellow Monsters
If Not @error Then
* *MouseMove($coord[0],$coord[1],0)
* *MouseClick("right",$coord[0],$coord[1])
* *Sleep (50)
EndIf
Send("{Right 4}")
Send("1")
Sleep(100)
Send("2")
Sleep(100)
Send("3")
Sleep(100)
Send("4")
Sleep(100)
Send("{Space}")
Sleep(100)
Send("1")
Sleep(100)
Send("{Right 4}")
Send("2")
Sleep(100)
Send("3")
Sleep(100)
Send("4")
Sleep(100)
Send("6")
Send("{Space}")
Send("{Shift}")
Send("{Right 4}")
Send("{Strg}")
EndIf
WEnd