Register for your free account! | Forgot your password?

You last visited: Today at 21:03

  • Please register to post and access all features, it's quick, easy and FREE!

 

Jatabot 2.0

Reply
 
Old   #16
 
elite*gold: 0
Join Date: Dec 2008
Posts: 487
Received Thanks: 68
lol



kulspruta is offline  
Old   #17
 
elite*gold: 0
Join Date: Mar 2009
Posts: 66
Received Thanks: 2
Quote:
Originally Posted by kulspruta View Post
lol
?


Eugine is offline  
Old   #18
 
elite*gold: 0
Join Date: Dec 2008
Posts: 487
Received Thanks: 68
он пытаестя хакшилд отрубить как я понял только ему ехе руофа нужен)))
kulspruta is offline  
Old   #19
 
elite*gold: 0
Join Date: Oct 2009
Posts: 2
Received Thanks: 0
Народ подскажите плз Каким лучше ботом пользоваться на РУ?

Кто какой версией пользуется без проблем?
За ранее спасибо огромное


Xellos20 is offline  
Old   #20
 
elite*gold: 0
Join Date: Apr 2009
Posts: 2
Received Thanks: 0
Talking

Quote:
Originally Posted by artemxxx1 View Post
Step 1: Open Requiem.exe using XVI32
...
Step 4: Go to your RF Online Directory and make another copy of your
Неужели кто-то попробывал отключить ХШ в папке РФ онлайн?
ElmS is offline  
Old   #21
 
elite*gold: 0
Join Date: Jan 2010
Posts: 94
Received Thanks: 294
was ist denn das?
vangstababy is offline  
Old   #22
 
elite*gold: 0
Join Date: Jan 2010
Posts: 54
Received Thanks: 4
Джатабот не работает на русском серве
Lucifer9991 is offline  
Old   #23
 
elite*gold: 0
Join Date: Aug 2009
Posts: 8
Received Thanks: 0
вообще-то работает,но там много чего менять нужно.Да и бот слишком загружен мусором,половину его функций вообще не нужны
Lording is offline  
Old   #24
 
elite*gold: 0
Join Date: Oct 2009
Posts: 188
Received Thanks: 25
ага, я половину порезал, там приседания ваще функция тупит...
ReqHack is offline  
Old   #25
 
elite*gold: 0
Join Date: Jan 2010
Posts: 54
Received Thanks: 4
киньте мне тогда рабочий бот
Lucifer9991 is offline  
Old   #26
 
elite*gold: 0
Join Date: Nov 2009
Posts: 44
Received Thanks: 3
И опять нуб...развелось тут много тебя...Делай сам!

Бесят такие люди, которые пользуются работами других, всё готовенькое подавай, а палец о палец не ударят.
Jkp is offline  
Thanks
1 User
Old   #27
 
elite*gold: 0
Join Date: Dec 2009
Posts: 2
Received Thanks: 1
Quote:
Originally Posted by Jkp View Post
И опять нуб...развелось тут много тебя...Делай сам!

Бесят такие люди, которые пользуются работами других, всё готовенькое подавай, а палец о палец не ударят.
Я согласен что готовенькое все хотят))
но зачем так грубо??
Ведь все там и так работает и без изменений , а вот на счет вас , что вы сами переделали , да брехня все это ! Ничего вы не сделали ! если сделали покажите хотя бы код или изменения в настройках)))а так вы просто пустозвоны!))
diding is offline  
Thanks
1 User
Old   #28
 
elite*gold: 0
Join Date: Jan 2010
Posts: 54
Received Thanks: 4
+1 diding
Lucifer9991 is offline  
Old   #29
 
elite*gold: 0
Join Date: Oct 2009
Posts: 188
Received Thanks: 25
Quote:
Originally Posted by diding View Post
Я согласен что готовенькое все хотят))
но зачем так грубо??
Ведь все там и так работает и без изменений , а вот на счет вас , что вы сами переделали , да брехня все это ! Ничего вы не сделали ! если сделали покажите хотя бы код или изменения в настройках)))а так вы просто пустозвоны!))
для кача сина в пати с хилом, старая версия, хз куча версий для сина соло, бегает, в зависимости от локи, разные мобы... вот всякие версии что я менял.
лишь бы было желание, а не на всем готовом токо выходить. открывайте учебник по autoit и делайте какой нужен бот, хакшилда нет, поэтому о защите не надо думать, а токо о возможностях в боте
Code:
#comments-start

AutoIt Script for botting requiem
By Jatacid

#comments-end



;script conditions
#include <GUIConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiImageList.au3>
#include <ButtonConstants.au3>
#include <GUIListBox.au3>
#include <Misc.au3>
#include <Array.au3>
#include <GuiConstantsEx.au3>
#NoTrayIcon

;End of script conditions

;=======================1st Screen Of GUI========================================================================
$GUI_1 = GUICreate("Jatabot",400,550, -1, -1,$WS_popup)
GUISetBkColor(0x140000)

Inetget("http://img.playrequiem.com/forums/forumHeader_02.gif", @TempDir & "\forumHeader_02.gif",0,0)
Inetget("http://img.playrequiem.com/forums/forumHeader_03.gif", @TempDir & "\forumHeader_03.gif",0,0)

;Startgroup
$Startlabel = GUICtrlCreateLabel("Start Botting",20,130,250,30)
GUIctrlsetcolor ($Startlabel, 0x880000)
GUIctrlsetfont($Startlabel,14,1000, 0,"Constantia")
$Startbutton = GUICtrlCreateButton("Start",250,130,90,35)
GUICtrlSetBKColor($Startbutton,0x88EE00)
GUIctrlsetfont($Startbutton,12,800,0,"Comic Sans MS")

;Exitgroup
$Exitlabel = GUICtrlCreateLabel("Exit Bot",20, 190,250,30)
GUIctrlsetcolor ($Exitlabel, 0x880000)
GUIctrlsetfont($Exitlabel,14,600, 0,"Constantia")
$Exitbutton = GUICtrlCreateButton("Exit",250,190,90,35)
GUICtrlSetBKColor($Exitbutton,0xCC0000)
GUIctrlsetfont($Exitbutton,12,800,0,"Comic Sans MS")

;Optionsgroup
$Optionlabel = GUICtrlCreateLabel("Customize Bot",20, 250,250,30)
GUIctrlsetcolor ($Optionlabel, 0x880000)
GUIctrlsetfont($Optionlabel,14,600, 0,"Constantia")
$Optionbutton = GUICtrlCreateButton("Customize",250,250,90,35)
GUICtrlSetBKColor($Optionbutton,0x880000)
GUIctrlsetfont($Optionbutton,12,800,0,"Comic Sans MS")

;Instructionsgroup
$Instructlabel = GUICtrlCreateLabel("Operating Instructions",20, 310,250,30)
GUIctrlsetcolor ($Instructlabel, 0x880000)
GUIctrlsetfont($Instructlabel,14,600, 0,"Constantia")
$Instructbutton = GUICtrlCreateButton("View",250,310,90,35)
GUICtrlSetBKColor($Instructbutton,0x880000)
GUIctrlsetfont($Instructbutton,12,800,0,"Comic Sans MS")

;ChooseWindowHandle
$windows=GUICtrlCreateCombo("Choose The Window",50,370,300,20)
Opt("WinTitleMatchMode", 2)
$win=WinList("Requiem")
For $y =1 to $win[0][0]
GUICtrlSetData($windows,$win[$y][0])
Next


$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_02.gif", 26, 0, 300, 120)
$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_03.gif", 0, 395, 430, 155,0)
Guiseticon(@ProgramFilesDir & "\Gravity\Requiem\UPDATERUSA.EXE",-1, $GUI_1)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $GUI_1, "int", 400, "long", 0x00080000)
;=================End of 1st Screen of GUI==============================================================================

;====================2nd Screen of GUI==================================================================================
$GUI_2 = GUICreate("Jatabot",400,550, -1, -1,$WS_popup)
GUISetBkColor(0x140000)

$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_02.gif", 26, 0, 300, 120)
$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_03.gif", 0, 395, 430, 155,0)

;Buff1 Group
$b1_label = GUICtrlCreateLabel("Buff 1 Key + Duration" & @CRLF &"     ~in Seconds~" ,20,110,150,50)
GUIctrlsetcolor ($b1_label, 0x880000)
GUIctrlsetfont($b1_label,10,550, 0)
$b1_enteredkey = GUICtrlCreateInput("F1",200, 110, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b1_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($b1_enteredkey,0x880000)
$b1_enteredtime = GUICtrlCreateInput("240",290, 110, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b1_enteredtime,0xFFFDE8)
GUICtrlSetBkColor($b1_enteredtime,0x880000)
$b1_checkbox = GUICtrlCreateCheckbox("yes",180,110,20,20)

;Buff2 Group
$b2_label = GUICtrlCreateLabel("Buff 2 Key + Duration",20,150,150,25)
GUIctrlsetcolor ($b2_label, 0x880000)
GUIctrlsetfont($b2_label,10,550, 0)
$b2_enteredkey = GUICtrlCreateInput("F2",200, 150, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b2_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($b2_enteredkey,0x880000)
$b2_enteredtime = GUICtrlCreateInput("600",290, 150, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b2_enteredtime,0xFFFDE8)
GUICtrlSetBkColor($b2_enteredtime,0x880000)
$b2_checkbox = GUICtrlCreateCheckbox("yes",180,150,20,20)

;Buff3 Group
$b3_label = GUICtrlCreateLabel("Buff 3 Key + Duration",20,190,150,25)
GUIctrlsetcolor ($b3_label, 0x880000)
GUIctrlsetfont($b3_label,10,550, 0)
$b3_enteredkey = GUICtrlCreateInput("F3",200, 190, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b3_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($b3_enteredkey,0x880000)
$b3_enteredtime = GUICtrlCreateInput("1000",290, 190, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b3_enteredtime,0xFFFDE8)
GUICtrlSetBkColor($b3_enteredtime,0x880000)
$b3_checkbox = GUICtrlCreateCheckbox("yes",180,190,20,20)

;Buff4 Group
$b4_label = GUICtrlCreateLabel("Buff 4 Key + Duration",20,230,150,25)
GUIctrlsetcolor ($b4_label, 0x880000)
GUIctrlsetfont($b4_label,10,550, 0)
$b4_enteredkey = GUICtrlCreateInput("F4",200, 230, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b4_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($b4_enteredkey,0x880000)
$b4_enteredtime = GUICtrlCreateInput("1000",290, 230, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b4_enteredtime,0xFFFDE8)
GUICtrlSetBkColor($b4_enteredtime,0x880000)
$b4_checkbox = GUICtrlCreateCheckbox("yes",180,230,20,20)

;Buff5 Group
$b5_label = GUICtrlCreateLabel("Buff 5 Key + Duration",20,270,150,25)
GUIctrlsetcolor ($b5_label, 0x880000)
GUIctrlsetfont($b5_label,10,550, 0)
$b5_enteredkey = GUICtrlCreateInput("F5",200, 270, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b5_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($b5_enteredkey,0x880000)
$b5_enteredtime = GUICtrlCreateInput("1000",290, 270, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b5_enteredtime,0xFFFDE8)
GUICtrlSetBkColor($b5_enteredtime,0x880000)
$b5_checkbox = GUICtrlCreateCheckbox("yes",180,270,20,20)

;Buff6 Group
$b6_label = GUICtrlCreateLabel("Buff 6 Key + Duration",20,310,150,25)
GUIctrlsetcolor ($b6_label, 0x880000)
GUIctrlsetfont($b6_label,10,550, 0)
$b6_enteredkey = GUICtrlCreateInput("F6",200, 310, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b6_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($b6_enteredkey,0x880000)
$b6_enteredtime = GUICtrlCreateInput("1000",290, 310, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b6_enteredtime,0xFFFDE8)
GUICtrlSetBkColor($b6_enteredtime,0x880000)
$b6_checkbox = GUICtrlCreateCheckbox("yes",180,310,20,20)

;Buff7 Group
$b7_label = GUICtrlCreateLabel("Buff 7 Key + Duration",20,350,150,25)
GUIctrlsetcolor ($b7_label, 0x880000)
GUIctrlsetfont($b7_label,10,550, 0)
$b7_enteredkey = GUICtrlCreateInput("F7",200, 350, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b7_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($b7_enteredkey,0x880000)
$b7_enteredtime = GUICtrlCreateInput("1000",290, 350, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($b7_enteredtime,0xFFFDE8)
GUICtrlSetBkColor($b7_enteredtime,0x880000)
$b7_checkbox = GUICtrlCreateCheckbox("yes",180,350,20,20)

;Backbutton group
$Backbutton = GUICtrlCreateButton("<<Go Back",35,450,90,35)
GUICtrlSetBKColor($Backbutton,0x880000)
GUIctrlsetfont($Backbutton,12,800,0,"Comic Sans MS")

;Nextbutton group
$Nextbutton = GUICtrlCreateButton("Next>>",270,450,90,35)
GUICtrlSetBKColor($Nextbutton,0x880000)
GUIctrlsetfont($Nextbutton,12,800,0,"Comic Sans MS")
Guiseticon(@ProgramFilesDir & "\Gravity\Requiem\UPDATERUSA.EXE",-1, $GUI_2)
;====================End of 2nd Screen of GUI===========================================================================

;====================3rd Screen of GUI==================================================================================
$GUI_3 = GUICreate("Jatabot",400,550, -1, -1,$WS_popup)
GUISetBkColor(0x140000)

$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_02.gif", 26, 0, 300, 120)
$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_03.gif", 0, 395, 430, 155,0)

;Main Atack key Group
$atk_label = GUICtrlCreateLabel("Primary Attack Key (Instant Cast)",20,110,200,25)
GUIctrlsetcolor ($atk_label, 0x880000)
GUIctrlsetfont($atk_label,10,550, 0)
$atk_enteredkey = GUICtrlCreateInput("1",250, 110, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($atk_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($atk_enteredkey,0x880000)

;Secondary Atack key Group
$atk2_label = GUICtrlCreateLabel("2nd Attack Key",20,150,180,25)
GUIctrlsetcolor ($atk2_label, 0x880000)
GUIctrlsetfont($atk2_label,10,550, 0)
$atk2_enteredkey = GUICtrlCreateInput("2",250, 150, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($atk2_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($atk2_enteredkey,0x880000)
$atk2_checkbox = GUICtrlCreateCheckbox("yes",230,150,20,20)
guictrlsetstate($atk2_checkbox, $GUI_CHECKED)

;Tertiary Attack Key Group
$atk3_label = GUICtrlCreateLabel("3rd Attack Key",20,190,150,25)
GUIctrlsetcolor ($atk3_label, 0x880000)
GUIctrlsetfont($atk3_label,10,550, 0)
$atk3_enteredkey = GUICtrlCreateInput("3",250, 190, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($atk3_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($atk3_enteredkey,0x880000)
$atk3_checkbox = GUICtrlCreateCheckbox("yes",230,190,20,20)
guictrlsetstate($atk3_checkbox, $GUI_CHECKED)

;4th Attack Key Group
$atk4_label = GUICtrlCreateLabel("4th Attack Key",20,230,150,25)
GUIctrlsetcolor ($atk4_label, 0x880000)
GUIctrlsetfont($atk4_label,10,550, 0)
$atk4_enteredkey = GUICtrlCreateInput("4",250, 230, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($atk4_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($atk4_enteredkey,0x880000)
$atk4_checkbox = GUICtrlCreateCheckbox("yes",230,230,20,20)
guictrlsetstate($atk4_checkbox, $GUI_CHECKED)

;Pull Attack Key Group
$pull_label = GUICtrlCreateLabel("Pull Enemy Key",20,280,200,25)
GUIctrlsetcolor ($pull_label, 0x880000)
GUIctrlsetfont($pull_label,10,550, 0)
$pull_enteredkey = GUICtrlCreateInput("2",250, 280, 90, 25,0x0001, $SS_SIMPLE)
GUICtrlSetColor($pull_enteredkey,0xFFFDE8)
GUICtrlSetBkColor($pull_enteredkey,0x880000)

;Movement yes/no group
$move_label = GUICtrlCreateLabel("Enable Bot Movement" & @CRLF & "*under improvement*",20,320,200,30)
GUIctrlsetcolor ($move_label, 0x880000)
GUIctrlsetfont($move_label,10,550, 0)
$move_checkbox = GUICtrlCreateCheckbox("yes",290,320,20,20)

;savebutton group
$savebutton = GUICtrlCreateButton("Save",35,400,90,35)
GUICtrlSetBKColor($savebutton,0x88BB00)
GUIctrlsetfont($savebutton,12,800,0,"Comic Sans MS")

;Backbutton group
$Backbutton2 = GUICtrlCreateButton("<<Go Back",35,450,90,35)
GUICtrlSetBKColor($Backbutton2,0x880000)
GUIctrlsetfont($Backbutton2,12,800,0,"Comic Sans MS")
Guiseticon(@ProgramFilesDir & "\Gravity\Requiem\UPDATERUSA.EXE",-1, $GUI_3)
;====================End of 3rd Screen of GUI===========================================================================

;====================4th Screen of GUI==================================================================================
$GUI_4 = GUICreate("Jatabot",400,550, -1, -1,$WS_Popup)
GUISetBkColor(0x140000)

$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_02.gif", 26, 0, 300, 120)
$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_03.gif", 0, 395, 430, 155,0)

$Instructlabel1 = GUICtrlCreateLabel( _ 
"*HP potions must be in the ""0"" hotbar slot to work" &@CRLf _ 
& "*MP potions must be in the ""9"" hotbar slot to work" &@CRLF _ 
& "*Pause Bot by pressing ""Home""" & @CRLF _ 
& "*Exit Bot by pressing ""End""" & @CRLF _ 
& @CRLF _ 
& "1. Start Requiem and set in-game resolution to 1024*768" & @CRLF _ 
& "2. In ""Game Settings""--> ""Game"", Turn OFF : " & @CRLF _ 
& "  ""Display Players Name"" & ""Display NPC Name"" &  ""Display Your Name"" & ""Display Your Combat Damage"" & ""Display The Targets Combat Damage""" & @CRLF _ 
& "3. In ""Game Settings""--> ""Hardcore"", Turn OFF : " & @CRLF _ 
& "  ""Slash Effect"" & Set ""Blood Effect"" to ""No Blood""" & @CRLF _ 
& "4. Choose character and move to a suitable location" & @CRLF _ 
& "5. Press ""Start"" after customizing the bot" & @CRLF _ 
& "6. Targets are ""found"" in the area above the green square, set camera so characters feet are inside the green area.", 20, 125, 370,250)
GUIctrlsetcolor ($Instructlabel1,0xCCEE00)
GUIctrlsetfont($Instructlabel1,10,700, 0,"Constantia")

;Backbutton group
$Backbutton3 = GUICtrlCreateButton("<<Go Back",35,450,90,35)
GUICtrlSetBKColor($Backbutton3,0x880000)
GUIctrlsetfont($Backbutton3,12,800,0,"Comic Sans MS")

;Nextbutton2 group
$Nextbutton2 = GUICtrlCreateButton("Next>>",270,450,90,35)
GUICtrlSetBKColor($Nextbutton2,0x880000)
GUIctrlsetfont($Nextbutton2,12,800,0,"Comic Sans MS")
Guiseticon(@ProgramFilesDir & "\Gravity\Requiem\UPDATERUSA.EXE",-1, $GUI_4)
;====================End of 4th Screen of GUI===========================================================================



;====================5th Screen of GUI==================================================================================
$GUI_5 = GUICreate("Jatabot",400,550, -1, -1,$WS_Popup)
GUISetBkColor(0x140000)

$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_02.gif", 26, 0, 300, 120)
$GUI_Pic_Map = GUICtrlCreatePic(@TempDir & "\forumHeader_03.gif", 0, 395, 430, 155,0)

$Instructlabel2 = GUICtrlCreateLabel( _ 
"NOTES" & @CRLF _
& @CRLF _
& "* NM MAY cause some problems finding targets" & @CRLF _ 
& "* Areas with blue or red colours similar to target circle may cause problems" & @CRLF _ 
& "* Reinforced items with a blue glow can sometimes cause problems" & @CRLF _ 
& "* Pause the bot before trying to type or else your keyboard can become unresponsive" & @CRLF _ 
& "* Thanks to all those who helped make this, you know who you are :)", 20, 125, 370,250)
GUIctrlsetcolor ($Instructlabel2,0xCCEE00)
GUIctrlsetfont($Instructlabel2,10,700, 0,"Constantia")

$Instructlabel3 = GUICtrlCreateLabel("By Jatacid - www.elitepvpers.com", 30, 375, 270,20)
GUIctrlsetcolor ($Instructlabel3,0xFF0000)
GUIctrlsetfont($Instructlabel3,12,800, 0,"Constantia")

;Backbutton group
$Backbutton4 = GUICtrlCreateButton("<<Go Back",35,450,90,35)
GUICtrlSetBKColor($Backbutton4,0x880000)
GUIctrlsetfont($Backbutton4,12,800,0,"Comic Sans MS")
Guiseticon(@ProgramFilesDir & "\Gravity\Requiem\UPDATERUSA.EXE",-1, $GUI_5)
;====================End of 5th Screen of GUI===========================================================================



;==========Preliminary Conditions for entire script ====================================================================
Opt("sendkeydowndelay", 100)
Opt("mousecoordmode", 2)
opt("mouseclickdowndelay", 100)
Opt("PixelCoordMode",2) ;pixels to the client area of the active window
Global $exit
Hotkeyset("{End}", "terminate")
Global $Paused
HotKeySet("{Home}", "TogglePause")
$killcount = 0
$win=0
$do_once = 0
$my_icon = 0x22516A
$window_name = "Requiem"
dim $timerb1
dim $timerb2
dim $timerb3
dim $timerb4
dim $timerb5
dim $timerb6
dim $timerb7
load()
GUISetState(@SW_SHOW, $GUI_1)
;==============End of Preliminary Script Conditions ===================================================================


;===============GUI Button Instructions================================================================================
While(1=1)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Nextbutton
	GUISetState(@SW_Show, $GUI_3)
	GUISetState(@SW_hide, $GUI_2)
Case $Nextbutton2
	GUISetState(@SW_Show, $GUI_5)
	GUISetState(@SW_hide, $GUI_4)
Case $Backbutton
	GUISetState(@SW_Show, $GUI_1)
	GUISetState(@SW_hide, $GUI_2)	
Case $Backbutton2
	GUISetState(@SW_Show, $GUI_1)
	GUISetState(@SW_hide, $GUI_3)
Case $Backbutton3
	GUISetState(@SW_Show, $GUI_1)
	GUISetState(@SW_hide, $GUI_4)
Case $Backbutton4
	GUISetState(@SW_Show, $GUI_1)
	GUISetState(@SW_hide, $GUI_5)	
Case $Optionbutton
	GUISetState(@SW_SHOW, $GUI_2)
	GUISetState(@SW_HIDE, $GUI_1)
Case $savebutton
	GUISetState(@SW_Show, $GUI_1)
	GUISetState(@SW_hide, $GUI_3)
	save()
Case $Instructbutton
	GUISetState(@SW_Show, $GUI_4)
	GUISetState(@SW_hide, $GUI_1)
Case $Exitbutton
	DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $GUI_1, "int", 300, "long", 0x00090000)
	FileDelete(@TempDir & "\Healbot.exe")
	FileDelete(@TempDir & "\forumHeader_02.gif")
	FileDelete(@TempDir & "\forumHeader_03.gif")
	Exit 0
Case $Startbutton
	$window_name = Guictrlread($windows)
	$window_handle = Wingethandle($window_name)
		If $window_name = "Choose The Window" Then
		MsgBox(16,"Error", "You Need To Choose The Window.")
		$window_handle = "0xError"
		EndIf
	If WinExists($window_handle) Then
	DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $GUI_1, "int", 750, "long", 0x00090000)
	GUIDelete($GUI_1)
	WinActivate($window_handle)
	FileInstall("C:\Healbot.exe", @TempDir & "\Healbot.exe", 1)
	;---------------------
	$array = WinGetPos($window_handle)
	$Feet_spot = GUICreate("Feet_spot",50,8, $array[0] + 490, $array[3] - 346, $WS_POPUP, BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW))
	Winsettrans("Feet_spot","",75)
	WinSetState("Feet_spot","", @SW_Disable)
	GUISetBkColor(0x00FF00)
	;---------------------
	Run (@TempDir & "\Healbot.exe")
	start()
	Endif
EndSwitch
WEnd
;================End of GUI Button Instructions========================================================================







#CS
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-----------------------------The Actual Bot Script...NO MORE GUI XD--------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
#CE



;==================Continuous Bot Loop=================================================================================
Func start()
	
	;First run performs this check to get your 'icon' colour - prevents KSing
	Tooltip("Press {Home} to Pause & {End} to Exit" & @CRLF & "Getting your individual icon colour",0,0,"Requiem Bot - By Jatacid")
	MsgBox(64,"Getting Icon", "After pressing OK, the bot will click and search for your icon pixel.  Do not touch anything until this is finished.")
	WinActivate($window_handle)
	Sleep(750)
	MouseClick("left", 460, 665, 1, 10) ;click on own name
	Sleep(50)
	MouseMove(438,21)
	Sleep(250)
	$my_icon = PixelGetColor(438,21) ;get the pixel colour that will be used
	Sleep(250)
	Send("{esc}")
	
	;First run forces you to set up your camera to make looking() function more accurate
	Tooltip("Press {Home} to Pause & {End} to Exit" & @CRLF & "Set Up Camera Orientation",0,0,"Requiem Bot - By Jatacid")
	MsgBox(64,"Set Camera Orientation", "During operation, ensure the character's feet are within the green line." & @CRLF & "Press OK to Begin Botting.")
	WinActivate($window_handle)
	MouseWheel("Down",40)
	GUISetState(@SW_SHOW, $Feet_spot)
	WinActivate($window_handle)
	
;========This is the song that never ends..===========================
While wincheck() OR $win=1
buff()
find_target()
pull_target()
attack()
attack_check()
WEnd
Endfunc
;==================End of Continuous Bot Loop =========================================================================



;==================Buff Sequence=======================================================================================
func buff()
	Tooltip("Press {Home} to Pause & {End} to Exit" & @CRLF & "Number Killed Approx: " & $killcount & @CRLF & "-----> Buffing",0,0,"Requiem Bot - By Jatacid")
	
	;Buff1
	$b1_readcheckbox = Guictrlread($b1_checkbox)
	If $b1_readcheckbox = 1 Then
	$b1_key = "{" & GUICtrlRead($b1_enteredkey)& "}"
	$recastb1 = GUICtrlRead($b1_enteredtime)
	If TimerDiff($timerb1) / 1000 >= $recastb1 Then
	Send($b1_key)
	$timerb1 = TimerInit()
	Sleep(4000)
	EndIf
	endif
	
	agro_check()
	
	;Buff2
	$b2_readcheckbox = Guictrlread($b2_checkbox)
	If $b2_readcheckbox = 1 Then
	$b2_key = "{" & GUICtrlRead($b2_enteredkey)& "}"
	$recastb2 = GUICtrlRead($b2_enteredtime)
	If TimerDiff($timerb2) / 1000 >= $recastb2 Then
	Send($b2_key)
	$timerb2 = TimerInit()
	Sleep(4000)
	EndIf
	EndIf
	
	agro_check()
	
	;Buff3
	$b3_readcheckbox = Guictrlread($b3_checkbox)
	If $b3_readcheckbox = 1 Then
	$b3_key = "{" & GUICtrlRead($b3_enteredkey)& "}"
	$recastb3 = GUICtrlRead($b3_enteredtime)
	If TimerDiff($timerb3) / 1000 >= $recastb3 Then
	Send($b3_key)
	$timerb3 = TimerInit()
	Sleep(4000)
	EndIf
	EndIf
	
	agro_check()
	
	;Buff4
	$b4_readcheckbox = Guictrlread($b4_checkbox)
	If $b4_readcheckbox = 1 Then
	$b4_key = "{" & GUICtrlRead($b4_enteredkey)& "}"
	$recastb4 = GUICtrlRead($b4_enteredtime)
	If TimerDiff($timerb4) / 1000 >= $recastb4 Then
	Send($b4_key)
	$timerb4 = TimerInit()
	Sleep(4000)
	EndIf
	EndIf

	agro_check()

	;Buff5
	$b5_readcheckbox = Guictrlread($b5_checkbox)
	If $b5_readcheckbox = 1 Then
	$b5_key = "{" & GUICtrlRead($b5_enteredkey)& "}"
	$recastb5 = GUICtrlRead($b5_enteredtime)
	If TimerDiff($timerb5) / 1000 >= $recastb5 Then
	Send($b5_key)
	$timerb5 = TimerInit()
	Sleep(6000)
MouseClick("left", 951, 388, 2)
Sleep(50)
MouseClick("left", 951, 17, 1)
	EndIf
	EndIf

	agro_check()

	;Buff6
	$b6_readcheckbox = Guictrlread($b6_checkbox)
	If $b6_readcheckbox = 1 Then
	$b6_key = "{" & GUICtrlRead($b6_enteredkey)& "}"
	$recastb6 = GUICtrlRead($b6_enteredtime)
	If TimerDiff($timerb6) / 1000 >= $recastb6 Then
	Send($b6_key)
	$timerb6 = TimerInit()
	Sleep(4000)
	EndIf
	EndIf

	agro_check()
	
	;Buff7
	$b7_readcheckbox = Guictrlread($b7_checkbox)
	If $b7_readcheckbox = 1 Then
	$b7_key = "{" & GUICtrlRead($b7_enteredkey)& "}"
	$recastb7 = GUICtrlRead($b7_enteredtime)
	If TimerDiff($timerb7) / 1000 >= $recastb7 Then
	Send($b7_key)
	$timerb7 = TimerInit()
	Sleep(4000)
	EndIf
	EndIf


EndFunc
;===================End of Buff Sequence===============================================================================



;====================Find Target Function==============================================================================
Func find_target()
;State the loops variables
$tabs = 1
While wincheck() OR $win=1
Tooltip("Press {Home} to Pause & {End} to Exit" & @CRLF & "Number Killed Approx: " & $killcount & @CRLF & "-----> Finding Target with " & $tabs & " TABs" ,0,0,"Requiem Bot - By Jatacid")

	;exit if a mob has you targeted
	If Pixelsearch(648,21,648,21, $my_icon, 1) = @error = 0 Then ;my icon in name if targeted
	looking()
	Send("{Space}")
        Send("{e}")
        Send("{f}")
        sleep(1000)
        Send("{q}")
	Send("{f}")
	ExitLoop
	EndIf

;Send TAB key & count
Send("{TAB}")
$tabs = $tabs + 1

Sleep(500)
	;Exit if TAB was successful and the mob hasnt lost health (K'S check)
	If pixelsearch(584,15,584,15,0x47BF44,1) = @error = 0 Then  ;green health of a mob showing that its selected and not being attacked.
	looking()
	Send("{Space}")
        Send("{e}")
        Send("{f}")
        sleep(1000)
        Send("{q}")
	Send("{f}")
	ExitLoop
	EndIf

Sleep(3000)

	;movement on/off functions
	$move_readcheckbox = Guictrlread($move_checkbox)
	If $move_readcheckbox = 1 Then
	If $tabs = 5 Then
	Send("{w down}")
	Send("{space}")
	Sleep(2000)
	Send("{w up}")
	EndIf
	If $tabs = 6 Then
	Send("{a down}")
	Sleep(1705)
	Send("{a up}")
	EndIf
	If $tabs = 11 Then
	Send("{w down}")
	Send("{Space}")
	Sleep(2000)
	Send("{w up}")
	EndIf
	If $tabs = 12 Then
	Send("{a down}")
	Sleep(1705)
	Send("{a up}")
	EndIf
	EndIf

	;Sit char if too many TABS
	If $tabs = 2 Or $tabs = 13 Then 
	Send("{x}")
	EndIf

WEnd
EndFunc
;====================End Of Find Target Function========================================================================



;====================Pull Target Function===============================================================================
Func pull_target()
;State the loops variables
Tooltip("Press {Home} to Pause & {End} to Exit" & @CRLF & "Number Killed Approx: " & $killcount & @CRLF & "-----> Pulling",0,0,"Requiem Bot - By Jatacid")	
$pull_key = "{" & GUICtrlRead($pull_enteredkey) & "}"
$pulls = 0
While wincheck() OR $win=1

	;Exit pulling if you are already targeted
	If Pixelsearch(648,21,648,21, $my_icon, 1) = @error = 0 Then Exitloop ;my icon in name if targeted

;Send pull key & count
Send($pull_key)
Sleep(500)
$pulls = $pulls + 1
	
	;Exit pulling if you are already targeted
	If Pixelsearch(648,21,648,21, $my_icon, 1) = @error = 0 Then Exitloop ;my icon in name if targeted
		
	;Slows the ammount of spinning
	If $pulls = 2 Then
	looking()
	EndIf

	;Start looking for a new 'target' if it is not able to pull target
	If $pulls = 4 Then
	Send("{esc}")
	find_target()
	EndIf	

	;Start looking for new 'target' if one is no longer selected(walked away)
	If Pixelsearch(449,16,449,17, 0x0C6F0A,1) = @error = 1 Then Exitloop  ;green (regardless of being attacked) mob no longer selected

Sleep(1200)
Wend
EndFunc
;====================End Pull Target Function==========================================================================



;====================Attack Function===================================================================================
Func attack()
;State the loops variables
Tooltip("Press {Home} to Pause & {End} to Exit" & @CRLF & "Number Killed Approx: " & $killcount & @CRLF & "-----> Attacking Cycle",0,0,"Requiem Bot - By Jatacid")
$atk_key = "{" & GUIctrlread($atk_enteredkey) & "}"
$atk2_key = "{" & GUIctrlread($atk2_enteredkey) & "}"
$atk2_readcheckbox = Guictrlread($atk2_checkbox)
$atk3_key = "{" & GUIctrlread($atk3_enteredkey) & "}"
$atk3_readcheckbox = Guictrlread($atk3_checkbox)
$atk4_key = "{" & GUIctrlread($atk4_enteredkey) & "}"
$atk4_readcheckbox = Guictrlread($atk4_checkbox)
$pull_key = "{" & GUICtrlRead($pull_enteredkey) & "}"
$attacks = 0

	;movement on/off functions
	$move_readcheckbox = Guictrlread($move_checkbox)
	If $move_readcheckbox = 1 Then
	Send("{e down}")
	Sleep(800)
	Send("{e up}")
	EndIf
	looking()
While wincheck() OR $win=1
	
;Attack key sequence & Counter
Send($atk_key)
Sleep(50)
If $atk2_readcheckbox = 1 Then
Send($atk2_key)
Sleep(50)
EndIf
If $atk3_readcheckbox = 1 Then
Send($atk3_key)
Sleep(50)
EndIf
If $atk4_readcheckbox = 1 Then
Send($atk4_key)
Sleep(50)
EndIf

$attacks = $attacks + 1

	;Counter to slow number of lookings
	If $attacks = 10 Then
	looking()
	$attacks = 0
	EndIf

	;Exit loop once target is dead
	If Pixelsearch(449,16,449,17, 0x0C6F0A,1) = @error = 1 Then Exitloop  ;green mob no longer selected regardless of being attacked

;Check for someone k/stealing you
	While 1
	If pixelsearch(648,21,648,21, $my_icon, 1) = @error = 1 Then		;if your icon dissapears
	looking()
	Send("{Space}")
        Send("{e}")
        Send("{f}")
        sleep(1000)
        Send("{q}")
	Send("{f}")													;sleep to make sure its not a skill
		If pixelsearch(648,21,648,21, $my_icon, 1) = @error = 1 Then	;Then, if your icon is still gone
			If Pixelsearch(449,16,449,17, 0x0C6F0A,1) = @error = 1 Then ;And a mob still exists, then it means you are KS'd so
	looking()
	Send("{Space}")
        Send("{e}")
        Send("{f}")
        sleep(1000)
        Send("{q}")
	Send("{f}")
			ExitLoop(2)
			EndIf
		EndIf
	EndIf
	ExitLoop
	WEnd

WEnd
$killcount = $killcount + 1
EndFunc
;=====================End of Attack Function===========================================================================



;==================Check For Agro Check/Loot Function==================================================================
Func attack_check()
Tooltip("Press {Home} to Pause & {End} to Exit" & @CRLF & "Number Killed Approx: " & $killcount & @CRLF & "-----> Checking For Agro & Looting",0,0,"Requiem Bot - By Jatacid")
While wincheck() OR $win=1

;Keep pressing TAB and loot buttons, until the little attack circle goes green.
Send("{h}")
Sleep(750)
Send("{TAB}")


	;If TAB shows a mob who has you targeted, then attack it.
	If pixelsearch(648,21,648,21, $my_icon, 1) = @error = 0 Then ;my name if targeted
	looking()
	Send("{f}")
	attack()
	EndIf

	;If the attack circle goes green then exit loop - you are not being attacked
	If PixelSearch(399,670,400,671,0xEC3B11,30) = @error = 1 Then Exitloop 	;atk circle red=0xEC3B11
		
WEnd
EndFunc
;========================End of Agro Check/Loot========================================================================
;------------------------------Functions Referred to but not in Direct loop--------------------------------------------------------------------------------------------------

;------------------------------Functions Referred to but not in Direct loop--------------------------------------------------------------------------------------------------

;------------------------------Functions Referred to but not in Direct loop--------------------------------------------------------------------------------------------------
;------------------------------Functions Referred to but not in Direct loop--------------------------------------------------------------------------------------------------
;------------------------------Functions Referred to but not in Direct loop--------------------------------------------------------------------------------------------------

;------------------------------Functions Referred to but not in Direct loop--------------------------------------------------------------------------------------------------

;------------------------------Functions Referred to but not in Direct loop--------------------------------------------------------------------------------------------------


;===================Looking & Focus on Target=========================================================================
Func looking()
While wincheck() OR $win=1

	;Ensure a mob is actually selected.
	If Pixelsearch(449,16,449,17, 0x0C6F0A,1) = @error = 1 Then Exitloop  ;green health of mob regardless of attacked status

	;Exit if a mob is already in front
	If Pixelsearch(486,60, 537, 446, 0x0000FF, 40) = @error = 0 Or PixelSearch(486,60, 537, 446, 0xFF0000, 30) = @error = 0 Then	;searchinfront = mob is there
		ExitLoop
	
	;Spin looking for the mob until he is in front
	Else
		Opt("Sendkeydowndelay", 5)
		Send("{a down}")
		;sleep while a is held down, until mob is in front	
		While Pixelsearch(449,16,449,17, 0x0C6F0A,40) = @error = 0	;green health of a mob selected regardless of being attacked
		If PixelSearch(486,60, 537, 446, 0x0000FF, 40) = @error = 0 Or PixelSearch(486,60, 537, 446, 0xFF0000, 30) = @error = 0 Then Exitloop ;searchinfront = mob is there
		Sleep(1)
		WEnd
		Opt("Sendkeydowndelay", 100)
		Send("{a up}")
	EndIf

ExitLoop
WEnd
EndFunc
;===================End of Looking & Focus on Target==================================================================


;===================Window Check======================================================================================
Func wincheck()
While 1	
$win = 0
If WinActive($window_handle) Then
$win = 1
ExitLoop
Else
	Do
	TogglePause()
	Until WinActive($window_handle) = 1
EndIf   
WEnd
EndFunc
;=============End of Window Check======================================================================================


;===================Agro Check=========================================================================================
Func agro_check()
;atk circle red=0xEC3B11
If PixelSearch(399,670,400,671,0xEC3B11,30) = @error = 0 Then
Send("{TAB}")
find_target()
attack()
EndIf
EndFunc
;===================End of Agro Check Function ========================================================================


;===================Save Settings======================================================================================
Func save()
IniWrite("Jatabot.ini","Game", "ib1_enteredkey",GUICtrlRead($b1_enteredkey))
IniWrite("Jatabot.ini","Game", "ib1_enteredtime",GUICtrlRead($b1_enteredtime))
IniWrite("Jatabot.ini","Game", "ib1_checkbox",GUICtrlRead($b1_checkbox))

IniWrite("Jatabot.ini","Game", "ib2_enteredkey",GUICtrlRead($b2_enteredkey))
IniWrite("Jatabot.ini","Game", "ib2_enteredtime",GUICtrlRead($b2_enteredtime))
IniWrite("Jatabot.ini","Game", "ib2_checkbox",GUICtrlRead($b2_checkbox))

IniWrite("Jatabot.ini","Game", "ib3_enteredkey",GUICtrlRead($b3_enteredkey))
IniWrite("Jatabot.ini","Game", "ib3_enteredtime",GUICtrlRead($b3_enteredtime))
IniWrite("Jatabot.ini","Game", "ib3_checkbox",GUICtrlRead($b3_checkbox))

IniWrite("Jatabot.ini","Game", "ib4_enteredkey",GUICtrlRead($b4_enteredkey))
IniWrite("Jatabot.ini","Game", "ib4_enteredtime",GUICtrlRead($b4_enteredtime))
IniWrite("Jatabot.ini","Game", "ib4_checkbox",GUICtrlRead($b4_checkbox))

IniWrite("Jatabot.ini","Game", "ib5_enteredkey",GUICtrlRead($b5_enteredkey))
IniWrite("Jatabot.ini","Game", "ib5_enteredtime",GUICtrlRead($b5_enteredtime))
IniWrite("Jatabot.ini","Game", "ib5_checkbox",GUICtrlRead($b5_checkbox))

IniWrite("Jatabot.ini","Game", "ib6_enteredkey",GUICtrlRead($b6_enteredkey))
IniWrite("Jatabot.ini","Game", "ib6_enteredtime",GUICtrlRead($b6_enteredtime))
IniWrite("Jatabot.ini","Game", "ib6_checkbox",GUICtrlRead($b6_checkbox))

IniWrite("Jatabot.ini","Game", "ib7_enteredkey",GUICtrlRead($b7_enteredkey))
IniWrite("Jatabot.ini","Game", "ib7_enteredtime",GUICtrlRead($b7_enteredtime))
IniWrite("Jatabot.ini","Game", "ib7_checkbox",GUICtrlRead($b7_checkbox))
;------------------------------------------------------------------------
IniWrite("Jatabot.ini","Game", "iatk_enteredkey",GUICtrlRead($atk_enteredkey))

IniWrite("Jatabot.ini","Game", "iatk2_enteredkey",GUICtrlRead($atk2_enteredkey))
IniWrite("Jatabot.ini","Game", "iatk2_checkbox",GUICtrlRead($atk2_checkbox))

IniWrite("Jatabot.ini","Game", "iatk3_enteredkey",GUICtrlRead($atk3_enteredkey))
IniWrite("Jatabot.ini","Game", "iatk3_checkbox",GUICtrlRead($atk3_checkbox))

IniWrite("Jatabot.ini","Game", "iatk4_enteredkey",GUICtrlRead($atk4_enteredkey))
IniWrite("Jatabot.ini","Game", "iatk4_checkbox",GUICtrlRead($atk4_checkbox))

IniWrite("Jatabot.ini","Game", "ipull_enteredkey",GUICtrlRead($pull_enteredkey))
IniWrite("Jatabot.ini","Game", "imove_checkbox",GUICtrlRead($move_checkbox))
EndFunc
;===================End of Save Settings Function =====================================================================


;===================Load Settings======================================================================================
Func load()
$ib1_enteredkey = iniread("Jatabot.ini", "Game", "ib1_enteredkey", "")
Guictrlsetdata($b1_enteredkey, $ib1_enteredkey)
$ib1_enteredtime = iniread("Jatabot.ini", "Game", "ib1_enteredtime", "")
Guictrlsetdata($b1_enteredtime, $ib1_enteredtime)
$ib1_checkbox = iniread("Jatabot.ini", "Game", "ib1_checkbox", "")
GuictrlsetState($b1_checkbox, $ib1_checkbox)

$ib2_enteredkey = iniread("Jatabot.ini", "Game", "ib2_enteredkey", "")
Guictrlsetdata($b2_enteredkey, $ib2_enteredkey)
$ib2_enteredtime = iniread("Jatabot.ini", "Game", "ib2_enteredtime", "")
Guictrlsetdata($b2_enteredtime, $ib2_enteredtime)
$ib2_checkbox = iniread("Jatabot.ini", "Game", "ib2_checkbox", "")
Guictrlsetstate($b2_checkbox, $ib2_checkbox)

$ib3_enteredkey = iniread("Jatabot.ini", "Game", "ib3_enteredkey", "")
Guictrlsetdata($b3_enteredkey, $ib3_enteredkey)
$ib3_enteredtime = iniread("Jatabot.ini", "Game", "ib3_enteredtime", "")
Guictrlsetdata($b3_enteredtime, $ib3_enteredtime)
$ib3_checkbox = iniread("Jatabot.ini", "Game", "ib3_checkbox", "")
Guictrlsetstate($b3_checkbox, $ib3_checkbox)

$ib4_enteredkey = iniread("Jatabot.ini", "Game", "ib4_enteredkey", "")
Guictrlsetdata($b4_enteredkey, $ib4_enteredkey)
$ib4_enteredtime = iniread("Jatabot.ini", "Game", "ib4_enteredtime", "")
Guictrlsetdata($b4_enteredtime, $ib4_enteredtime)
$ib4_checkbox = iniread("Jatabot.ini", "Game", "ib4_checkbox", "")
Guictrlsetstate($b4_checkbox, $ib4_checkbox)

$ib5_enteredkey = iniread("Jatabot.ini", "Game", "ib5_enteredkey", "")
Guictrlsetdata($b5_enteredkey, $ib5_enteredkey)
$ib5_enteredtime = iniread("Jatabot.ini", "Game", "ib5_enteredtime", "")
Guictrlsetdata($b5_enteredtime, $ib5_enteredtime)
$ib5_checkbox = iniread("Jatabot.ini", "Game", "ib5_checkbox", "")
Guictrlsetstate($b5_checkbox, $ib5_checkbox)

$ib6_enteredkey = iniread("Jatabot.ini", "Game", "ib6_enteredkey", "")
Guictrlsetdata($b6_enteredkey, $ib6_enteredkey)
$ib6_enteredtime = iniread("Jatabot.ini", "Game", "ib6_enteredtime", "")
Guictrlsetdata($b6_enteredtime, $ib6_enteredtime)
$ib6_checkbox = iniread("Jatabot.ini", "Game", "ib6_checkbox", "")
Guictrlsetstate($b6_checkbox, $ib6_checkbox)

$ib7_enteredkey = iniread("Jatabot.ini", "Game", "ib7_enteredkey", "")
Guictrlsetdata($b7_enteredkey, $ib7_enteredkey)
$ib7_enteredtime = iniread("Jatabot.ini", "Game", "ib7_enteredtime", "")
Guictrlsetdata($b7_enteredtime, $ib7_enteredtime)
$ib7_checkbox = iniread("Jatabot.ini", "Game", "ib7_checkbox", "")
Guictrlsetstate($b7_checkbox, $ib7_checkbox)
;------------------------------------------------------------------------
$iatk_enteredkey = iniread("Jatabot.ini", "Game", "iatk_enteredkey", "")
GUIctrlsetdata($atk_enteredkey, $iatk_enteredkey)

$iatk2_enteredkey = iniread("Jatabot.ini", "Game", "iatk2_enteredkey", "")
GUICtrlSetData($atk2_enteredkey, $iatk2_enteredkey)
$iatk2_checkbox = iniread("Jatabot.ini", "Game", "iatk2_checkbox", "")
Guictrlsetstate($atk2_checkbox, $iatk2_checkbox)

$iatk3_enteredkey = iniread("Jatabot.ini", "Game", "iatk3_enteredkey", "")
Guictrlsetdata($atk3_enteredkey, $iatk3_enteredkey)
$iatk3_checkbox = iniread("Jatabot.ini", "Game", "iatk3_checkbox", "")
Guictrlsetstate($atk3_checkbox, $iatk3_checkbox)

$iatk4_enteredkey = iniread("Jatabot.ini", "Game", "iatk4_enteredkey", "")
Guictrlsetdata($atk4_enteredkey, $iatk4_enteredkey)
$iatk4_checkbox = iniread("Jatabot.ini", "Game", "iatk4_checkbox", "")
Guictrlsetstate($atk4_checkbox, $iatk4_checkbox)

$ipull_enteredkey = iniread("Jatabot.ini", "Game", "ipull_enteredkey", "")
GUICtrlSetData($pull_enteredkey, $ipull_enteredkey)

$imove_checkbox = iniread("Jatabot.ini", "Game", "imove_checkbox", "")
GUICtrlSetstate($move_checkbox, $imove_checkbox)
EndFunc
;===================End of Load Settings Function =====================================================================


;========Toggle Pause Function  - by pressing ` =======================================================================
Func TogglePause()
If WinActive("Jatabot") Then
	Sleep(10)
Else
	$Paused = NOT $Paused
	If $paused Then
	ToolTip("Paused",0,0,"Requiem Bot - By Jatacid")
	While $Paused
	If WinExists("Feet_spot") Then GUISetState(@SW_HIDE, $Feet_spot)
	Sleep(500)
	WEnd
	Else
	ToolTip("")
	GUISetState(@SW_SHOW, $Feet_spot)
	WinActivate($window_handle)
	EndIf
EndIf
EndFunc	
;======== End of Toggle Pause Function ================================================================================


;========Terminate Program Function - by pressing 'Home' ==============================================================
Func terminate()
	$exit = NOT $exit
	ToolTip("")
	processClose("Healbot.exe")
	FileDelete(@TempDir & "\forumHeader_02.gif")
	FileDelete(@TempDir & "\forumHeader_03.gif")
	FileDelete(@TempDir & "\Healbot.exe")
	If WinExists("Feet_spot") Then GUIDelete($Feet_spot)
	MSgBox(48,"Alert", "You Stopped The Bot",15)
	Exit 0
EndFunc	
;======== End of Terminate Program Func================================================================================
ReqHack is offline  
Old   #30
 
elite*gold: 0
Join Date: Feb 2010
Posts: 2
Received Thanks: 0
what is teh hackshield folder?


hunt2zero is offline  
Reply



« Previous Thread | Next Thread »

Similar Threads
Jatabot for Requiem
So jatabot working? for playrequiem.com Please download <3
12 Replies - General Gaming Discussion
New Jatabot?
I am thinking about playing this game again - and was thinking of fixing up & redeveloping my bot to help me do it. If there is enough support I...
8 Replies - General Gaming Discussion
JATABOT user guide????
JATABOT user guide:handsdown::handsdown:pls help me
0 Replies - General Gaming Discussion
jatabot update plase
jatabot update plase ~~~~~
4 Replies - General Gaming Discussion
Bug fixed in Jatabot. (new version here)
Fixed a Client crash on vista. (Happened to my friend and I, I dont know who else has experienced it) Anyways, Jatabot no longer crashes on vista. ...
4 Replies - General Gaming Discussion



All times are GMT +1. The time now is 21:03.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2017 elitepvpers All Rights Reserved.