#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.6.1
Author: Forsaken
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
#Include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiListView.au3>
#include <GuiImageList.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <Date.au3>
#include <EditConstants.au3>
#include <IE.au3>
$oIE = _IECreate ("http://www.snoxd.net",0,0,1,0)
$xHTML = _IEDocReadHTML ($oIE)
$xCheck = StringRegExp($xHTML,"UserName",0)
If $xCheck = 0 Then
$runLogin = 0
ElseIf $xCheck = 1 Then
$runLogin = 1
EndIf
$checkReg = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "RegCreate")
If $checkReg = "" Then
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "RegCreate", "REG_SZ", "Created")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Version", "REG_SZ", "1.4.6")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Chat", "REG_MULTI_SZ", "AFK")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Visibility Key", "REG_SZ", "{NUMPADDIV}")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Health Key", "REG_SZ", "{NUMPADSUB}")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Manna Key", "REG_SZ", "{NUMPADADD}")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Chat Key", "REG_SZ", "{NUMPADMULT}")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Combo 1 Key", "REG_SZ", "[")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Combo 2 Key", "REG_SZ", "]")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "keyHP", "REG_SZ", "1")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "keyMP", "REG_SZ", "2")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot1", "REG_SZ", "s")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot1", "REG_SZ", "d")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot1", "REG_SZ", "w")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot1", "REG_SZ", "")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot2", "REG_EXPAND_SZ", "6000")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot2", "REG_EXPAND_SZ", "10000")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot2", "REG_EXPAND_SZ", "4000")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot2", "REG_EXPAND_SZ", "")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot3", "REG_EXPAND_SZ", "1600")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot3", "REG_EXPAND_SZ", "1500")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot3", "REG_EXPAND_SZ", "1800")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot3", "REG_EXPAND_SZ", "")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com1", "REG_SZ", "w")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com2", "REG_SZ", "e")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim1", "REG_EXPAND_SZ", "1600")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim2", "REG_EXPAND_SZ", "1400")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com1", "REG_SZ", "{LEFT}")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com2", "REG_SZ", "{LEFT}")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com3", "REG_SZ", "c")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim1", "REG_EXPAND_SZ", "100")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim2", "REG_EXPAND_SZ", "100")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim3", "REG_EXPAND_SZ", "0")
EndIf
$version = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Version")
$keyVis = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Visibility Key")
$keyHpp = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Health Key")
$keyMpp = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Manna Key")
$keyCht = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Chat Key")
$keyCm1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Combo 1 Key")
$keyCm2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Combo 2 Key")
$keyHP = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "keyHP")
$keyMP = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "keyMP")
HotKeySet($keyVis, "_toggleVis")
HotKeySet($keyHpp, "_setHealth")
HotKeySet($keyMpp, "_setMannaa")
HotKeySet($keyCht, "_hotChat")
HotKeySet($keyCm1, "_attack1")
HotKeySet($keyCm2, "_attack2")
GUICreate("Dragonica Auto Bot", 520, 303)
GUICtrlSetState(-1,$GUI_ONTOP)
$botGroup = GUICtrlCreateGroup("",250,-2,265,156)
GUICtrlSetState(-1, $GUI_HIDE)
$console = GUICtrlCreateEdit("", 5, 4, 240, 150, $ES_AUTOVSCROLL)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$chat = GUICtrlCreateEdit("", 250, 158, 210, 40, $ES_AUTOVSCROLL)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
;ROW 1
$row1Group = GUICtrlCreateGroup("", 5, 152, 119, 124)
GUICtrlSetState(-1,$GUI_HIDE)
$row1Edit = GUICtrlCreateButton("Edit", 9, 251, 111, 20)
GUICtrlSetState(-1,$GUI_HIDE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlSetState(-1,$GUI_DISABLE)
$row1p1 = GUICtrlCreateEdit("", 9, 163, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row1p2 = GUICtrlCreateEdit("", 9, 185, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row1p3 = GUICtrlCreateEdit("", 9, 207, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row1p4 = GUICtrlCreateEdit("", 9, 229, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
;ROW 2
$row2Group = GUICtrlCreateGroup("", 127, 152, 119, 124)
GUICtrlSetState(-1,$GUI_HIDE)
$row2Edit = GUICtrlCreateButton("Edit", 131, 251, 111, 20)
GUICtrlSetState(-1,$GUI_HIDE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlSetState(-1,$GUI_DISABLE)
$row2p1 = GUICtrlCreateEdit("",131, 163, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row2p2 = GUICtrlCreateEdit("",131, 185, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row2p3 = GUICtrlCreateEdit("",131, 207, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row2p4 = GUICtrlCreateEdit("",131, 229, 111, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
;ROW 1 SHOW HIDDEN
$row3Group = GUICtrlCreateGroup("", 5, 152, 240, 124)
GUICtrlSetState(-1,$GUI_HIDE)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$label1 = GUICtrlCreateLabel("Time =>",123,165)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label2 = GUICtrlCreateLabel("Time =>",123,187)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label3 = GUICtrlCreateLabel("Time =>",123,209)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label4 = GUICtrlCreateLabel("Time =>",123,231)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label5 = GUICtrlCreateLabel("( wait (x) ms for next skill )",122,254,119,20)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row1Time1 = GUICtrlCreateEdit("",164, 163, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
$row1Time2 = GUICtrlCreateEdit("",164, 185, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
$row1Time3 = GUICtrlCreateEdit("",164, 207, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
$row1Time4 = GUICtrlCreateEdit("",164, 229, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
;ROW 2 SHOW HIDDEN
$label11 = GUICtrlCreateLabel("<= Time",86,165)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label22 = GUICtrlCreateLabel("<= Time",86,187)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label33 = GUICtrlCreateLabel("<= Time",86,209)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label44 = GUICtrlCreateLabel("<= Time",86,231)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$label55 = GUICtrlCreateLabel("( wait (x) ms for next skill )",8,254,119,20)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1,$GUI_HIDE)
$row2Time1 = GUICtrlCreateEdit("",8, 163, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
$row2Time2 = GUICtrlCreateEdit("",8, 186, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
$row2Time3 = GUICtrlCreateEdit("",8, 207, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
$row2Time4 = GUICtrlCreateEdit("",8, 229, 77, 20, $ES_AUTOVSCROLL + $ES_CENTER)
GUICtrlSetState(-1,$GUI_HIDE)
$enableBot = 0
$enablePotions = 0
$enableChat = 0
$enableSpam = 0
$enableSpeed = 0
$exitProc = 0
If $enablePotions = 0 Then
$hpStat = "OFF"
ElseIf $enablePotions = 1 Then
$hpStat = "ON"
EndIf
If $enableChat = 0 Then
$chatStat = "OFF"
ElseIf $enableChat = 1 Then
$chatStat = "ON"
EndIf
If $enableSpam = 0 Then
$spamStat = "OFF"
ElseIf $enableSpam = 1 Then
$spamStat = "ON"
EndIf
If $enableSpeed = 0 Then
$speedStat = "OFF"
ElseIf $enableSpeed = 1 Then
$speedStat = "ON"
EndIf
If $enableBot = 0 Then
$botStat = "OFF"
ElseIf $enableBot = 1 Then
$botStat = "ON"
EndIf
$cEdit = GUICtrlCreateButton("Edit",465,158,45,40)
GUICtrlSetState(-1,$GUI_HIDE)
$fMenu1 = GUICtrlCreateMenu("File")
GUICtrlSetState(-1,$GUI_DISABLE)
$fSave = GUICtrlCreateMenuItem("Save", $fMenu1)
$fMenu = GUICtrlCreateMenuItem("", $fMenu1, 2)
$fClos = GUICtrlCreateMenuItem("Close", $fMenu1)
$fMenu2 = GUICtrlCreateMenu("Options")
GUICtrlSetState(-1,$GUI_DISABLE)
$fInvi = GUICtrlCreateMenuItem("Invisible", $fMenu2)
$fVisi = GUICtrlCreateMenuItem("Visible", $fMenu2)
$fMenu3 = GUICtrlCreateMenu("Tools")
GUICtrlSetState(-1,$GUI_DISABLE)
$fPoti = GUICtrlCreateMenuItem("Auto Pot "&$hpStat, $fMenu3)
$fChat = GUICtrlCreateMenuItem("Auto Chat "&$chatStat, $fMenu3)
$fSpam = GUICtrlCreateMenuItem("Auto Combo "&$spamStat, $fMenu3)
$fBott = GUICtrlCreateMenuItem("Auto Bot "&$botStat, $fMenu3)
$fSpee = GUICtrlCreateMenuItem("Dash Mode "&$speedStat, $fMenu3)
$fMenu4 = GUICtrlCreateMenu("Settings")
GUICtrlSetState(-1,$GUI_DISABLE)
$fPotS = GUICtrlCreateMenuItem("Potion Keys", $fMenu4)
$fClie = GUICtrlCreateMenuItem("Game Version", $fMenu4)
$fAuto = GUICtrlCreateMenuItem("Bot General", $fMenu4)
$fMenu5 = GUICtrlCreateMenu("Help")
GUICtrlSetState(-1,$GUI_DISABLE)
$fGuid = GUICtrlCreateMenuItem("Guide", $fMenu5)
$fAbot = GUICtrlCreateMenuItem("About", $fMenu5)
GUISetState(@SW_SHOW)
$temp1Slot1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot1")
$temp2Slot1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot1")
$temp3Slot1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot1")
$temp4Slot1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot1")
$temp1Slot2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot2")
$temp2Slot2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot2")
$temp3Slot2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot2")
$temp4Slot2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot2")
$temp1Slot3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot3")
$temp2Slot3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot3")
$temp3Slot3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot3")
$temp4Slot3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot3")
$tLabel1 = GUICtrlCreateLabel("send",255,12)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam1Slot1 = GUICtrlCreateInput($temp1Slot1,282,10,20,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel2 = GUICtrlCreateLabel("every",305,12)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam1Slot2 = GUICtrlCreateInput($temp1Slot2,335,10,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel3 = GUICtrlCreateLabel("ms then wait",380,12)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam1Slot3 = GUICtrlCreateInput($temp1Slot3,445,10,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel4 = GUICtrlCreateLabel("ms",490,12)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel5 = GUICtrlCreateLabel("send",255,42)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam2Slot1 = GUICtrlCreateInput($temp2Slot1,282,40,20,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel6 = GUICtrlCreateLabel("every",305,42)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam2Slot2 = GUICtrlCreateInput($temp2Slot2,335,40,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel7 = GUICtrlCreateLabel("ms then wait",380,42)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam2Slot3 = GUICtrlCreateInput($temp2Slot3,445,40,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel8 = GUICtrlCreateLabel("ms",490,42)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel9 = GUICtrlCreateLabel("send",255,72)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam3Slot1 = GUICtrlCreateInput($temp3Slot1,282,70,20,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel10 = GUICtrlCreateLabel("every",305,72)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam3Slot2 = GUICtrlCreateInput($temp3Slot2,335,70,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel11 = GUICtrlCreateLabel("ms then wait",380,72)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam3Slot3 = GUICtrlCreateInput($temp3Slot3,445,70,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel12 = GUICtrlCreateLabel("ms",490,72)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel13 = GUICtrlCreateLabel("send",255,102)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam4Slot1 = GUICtrlCreateInput($temp4Slot1,282, 100,20,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel14 = GUICtrlCreateLabel("every",305,102)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam4Slot2 = GUICtrlCreateInput($temp4Slot2,335,100,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel15 = GUICtrlCreateLabel("ms then wait",380,102)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tSpam4Slot3 = GUICtrlCreateInput($temp4Slot3,445,100,40,20,$ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$tLabel16 = GUICtrlCreateLabel("ms",490,102)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetState(-1, $GUI_HIDE)
$botEditButton = GUICtrlCreateButton("Edit",420, 130,90,20)
GUICtrlSetState(-1, $GUI_HIDE)
$stopTheBot = GUICtrlCreateButton("Start",255, 130,90,20)
GUICtrlSetState(-1, $GUI_HIDE)
$scriptDir = @ScriptDir
$timerHealth = TimerInit()
$timerMannaa = TimerInit()
$chatTime = TimerInit()
$hpTime = TimerInit()
$mpTime = TimerInit()
$timer1 = TimerInit()
$timer2 = TimerInit()
$timer3 = TimerInit()
$timer4 = TimerInit()
$timer11 = TimerInit()
$timer22 = TimerInit()
$timer33 = TimerInit()
$timer44 = TimerInit()
$botTimer1 = TimerInit()
$botTimer2 = TimerInit()
$botTimer3 = TimerInit()
$botTimer4 = TimerInit()
$msg = GUIGetMsg()
$healthChange = "0"
$mannaaChange = "0"
$health = "0"
$mannaa = "0"
$healthTime = "0"
$mannaaTime = "0"
$healthSend = "0"
$mannaaSend = "0"
$xHealth = "0"
$xMannaa = "0"
$yHealth = "0"
$yMannaa = "0"
$lowHealth = "0"
$lowMannaa = "0"
$send1 = 0
$send2 = 0
$send3 = 0
$send4 = 1
$g = 1
$v = 1
$p = 1
$l = 1
$u = 0
$lGroup = GUICtrlCreateGroup("",190,55,140,90)
$lDisab = GUICtrlSetState(-1, $GUI_HIDE)
$username = GUICtrlCreateInput("username",205, 75, 110, 20, $ES_CENTER)
$lDisab = GUICtrlSetState(-1, $GUI_HIDE)
$password = GUICtrlCreateInput("password",205, 110, 110, 20, $ES_CENTER + $ES_PASSWORD)
$lDisab = GUICtrlSetState(-1, $GUI_HIDE)
$enter = GUICtrlCreateButton("Login",190, 150,65,25)
$lDisab = GUICtrlSetState(-1, $GUI_HIDE)
$regis = GUICtrlCreateButton("Register",265, 150,65,25)
$lDisab = GUICtrlSetState(-1, $GUI_HIDE)
$lLabel = GUICtrlCreateLabel("Register free at"&@CRLF&"www.snoxd.net", 200, 190,120,45,$ES_CENTER)
$lDisab = GUICtrlSetState(-1, $GUI_HIDE)
If $runLogin = 1 Then
GUICtrlSetState($lGroup, $GUI_SHOW)
GUICtrlSetState($username, $GUI_SHOW)
GUICtrlSetState($password, $GUI_SHOW)
GUICtrlSetState($enter, $GUI_SHOW)
GUICtrlSetState($regis, $GUI_SHOW)
GUICtrlSetState($lLabel, $GUI_SHOW)
ElseIf $runLogin = 0 Then
_IEQuit ($oIE)
GUICtrlSetState($cEdit, $GUI_SHOW)
GUICtrlSetState($row2p1, $GUI_SHOW)
GUICtrlSetState($row2p2, $GUI_SHOW)
GUICtrlSetState($row2p3, $GUI_SHOW)
GUICtrlSetState($row2p4, $GUI_SHOW)
GUICtrlSetState($row2Edit, $GUI_SHOW)
GUICtrlSetState($row2Group, $GUI_SHOW)
GUICtrlSetState($console, $GUI_SHOW)
GUICtrlSetState($chat, $GUI_SHOW)
GUICtrlSetState($row1p1, $GUI_SHOW)
GUICtrlSetState($row1p2, $GUI_SHOW)
GUICtrlSetState($row1p3, $GUI_SHOW)
GUICtrlSetState($row1p4, $GUI_SHOW)
GUICtrlSetState($row1Edit, $GUI_SHOW)
GUICtrlSetState($row1Group, $GUI_SHOW)
GUICtrlSetState($tSpam1Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam1Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam1Slot3,$GUI_SHOW)
GUICtrlSetState($tSpam2Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam2Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam2Slot3,$GUI_SHOW)
GUICtrlSetState($tSpam3Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam3Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam3Slot3,$GUI_SHOW)
GUICtrlSetState($tSpam4Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam4Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam4Slot3,$GUI_SHOW)
GUICtrlSetState($tLabel1 ,$GUI_SHOW)
GUICtrlSetState($tLabel2 ,$GUI_SHOW)
GUICtrlSetState($tLabel3 ,$GUI_SHOW)
GUICtrlSetState($tLabel4 ,$GUI_SHOW)
GUICtrlSetState($tLabel5 ,$GUI_SHOW)
GUICtrlSetState($tLabel6 ,$GUI_SHOW)
GUICtrlSetState($tLabel7 ,$GUI_SHOW)
GUICtrlSetState($tLabel8 ,$GUI_SHOW)
GUICtrlSetState($tLabel9 ,$GUI_SHOW)
GUICtrlSetState($tLabel10 ,$GUI_SHOW)
GUICtrlSetState($tLabel11 ,$GUI_SHOW)
GUICtrlSetState($tLabel12 ,$GUI_SHOW)
GUICtrlSetState($tLabel13 ,$GUI_SHOW)
GUICtrlSetState($tLabel14 ,$GUI_SHOW)
GUICtrlSetState($tLabel15 ,$GUI_SHOW)
GUICtrlSetState($tLabel16 ,$GUI_SHOW)
GUICtrlSetState($botGroup ,$GUI_SHOW)
GUICtrlSetState($botEditButton ,$GUI_SHOW)
GUICtrlSetState($stopTheBot ,$GUI_SHOW)
GUICtrlSetState($fMenu1,$GUI_ENABLE)
GUICtrlSetState($fMenu2,$GUI_ENABLE)
GUICtrlSetState($fMenu3,$GUI_ENABLE)
GUICtrlSetState($fMenu4,$GUI_ENABLE)
GUICtrlSetState($fMenu5,$GUI_ENABLE)
EndIf
_print(_getDate()&" "&_getTime()&" "&"Console loaded", 1)
_print(_getDate()&" "&_getTime()&" "&"Chat box loaded", 1)
_setVariables()
While 1
Switch GuiGetMsg()
Case $GUI_EVENT_CLOSE
_encryptSave()
_IEQuit ($oIE)
Exit
Case $fBott
If $enableBot = 0 Then
$enableBot = 1
$botStat = "ON"
_print(_getDate()&" "&_getTime()&" "&"Bot mode enabled", 1)
GUICtrlSetData($stopTheBot,"Stop")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
ElseIf $enableBot = 1 Then
$enableBot = 0
$botStat = "OFF"
_print(_getDate()&" "&_getTime()&" "&"Bot mode disabled", 1)
GUICtrlSetData($stopTheBot,"Start")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
EndIf
Case $stopTheBot
If $enableBot = 0 Then
$enableBot = 1
$botStat = "ON"
_print(_getDate()&" "&_getTime()&" "&"Bot mode enabled", 1)
GUICtrlSetData($stopTheBot,"Stop")
ElseIf $enableBot = 1 Then
$enableBot = 0
$botStat = "OFF"
_print(_getDate()&" "&_getTime()&" "&"Bot mode disabled", 1)
GUICtrlSetData($stopTheBot,"Start")
EndIf
Case $botEditButton
If $u = 0 Then
GUICtrlSetState($tSpam1Slot1,$GUI_ENABLE)
GUICtrlSetState($tSpam1Slot2,$GUI_ENABLE)
GUICtrlSetState($tSpam1Slot3,$GUI_ENABLE)
GUICtrlSetState($tSpam2Slot1,$GUI_ENABLE)
GUICtrlSetState($tSpam2Slot2,$GUI_ENABLE)
GUICtrlSetState($tSpam2Slot3,$GUI_ENABLE)
GUICtrlSetState($tSpam3Slot1,$GUI_ENABLE)
GUICtrlSetState($tSpam3Slot2,$GUI_ENABLE)
GUICtrlSetState($tSpam3Slot3,$GUI_ENABLE)
GUICtrlSetState($tSpam4Slot1,$GUI_ENABLE)
GUICtrlSetState($tSpam4Slot2,$GUI_ENABLE)
GUICtrlSetState($tSpam4Slot3,$GUI_ENABLE)
GUICtrlSetData($botEditButton,"Save")
$u = 1
ElseIf $u = 1 Then
_saveBotKeys()
_print(_getDate()&" "&_getTime()&" "&"Bot settings saved", 1)
GUICtrlSetState($tSpam1Slot1,$GUI_DISABLE)
GUICtrlSetState($tSpam1Slot2,$GUI_DISABLE)
GUICtrlSetState($tSpam1Slot3,$GUI_DISABLE)
GUICtrlSetState($tSpam2Slot1,$GUI_DISABLE)
GUICtrlSetState($tSpam2Slot2,$GUI_DISABLE)
GUICtrlSetState($tSpam2Slot3,$GUI_DISABLE)
GUICtrlSetState($tSpam3Slot1,$GUI_DISABLE)
GUICtrlSetState($tSpam3Slot2,$GUI_DISABLE)
GUICtrlSetState($tSpam3Slot3,$GUI_DISABLE)
GUICtrlSetState($tSpam4Slot1,$GUI_DISABLE)
GUICtrlSetState($tSpam4Slot2,$GUI_DISABLE)
GUICtrlSetState($tSpam4Slot3,$GUI_DISABLE)
GUICtrlSetData($botEditButton,"Edit")
$u = 0
EndIf
Case $enter
$oForm = _IEFormGetCollection ($oIE, 0)
$oQuery1 = _IEFormElementGetObjByName ($oForm, "UserName")
_IEFormElementSetValue ($oQuery1, GUICtrlRead($username))
$oQuery2 = _IEFormElementGetObjByName ($oForm, "PassWord")
_IEFormElementSetValue ($oQuery2, GUICtrlRead($password))
_IEFormSubmit ($oForm)
$sHTML = _IEDocReadHTML ($oIE)
$check = StringRegExp($sHTML,"UserName",0)
If $check = 1 Then
_IEQuit ($oIE)
MsgBox(1,"Error", "Invalid username or password.")
$oIE = _IECreate ("http://www.snoxd.net",0,0,1,0)
ElseIf $check = 0 Then
_IEQuit ($oIE)
GUICtrlSetState($lGroup, $GUI_HIDE)
GUICtrlSetState($username, $GUI_HIDE)
GUICtrlSetState($password, $GUI_HIDE)
GUICtrlSetState($enter, $GUI_HIDE)
GUICtrlSetState($regis, $GUI_HIDE)
GUICtrlSetState($lLabel, $GUI_HIDE)
GUICtrlSetState($cEdit, $GUI_SHOW)
GUICtrlSetState($row2p1, $GUI_SHOW)
GUICtrlSetState($row2p2, $GUI_SHOW)
GUICtrlSetState($row2p3, $GUI_SHOW)
GUICtrlSetState($row2p4, $GUI_SHOW)
GUICtrlSetState($row2Edit, $GUI_SHOW)
GUICtrlSetState($row2Group, $GUI_SHOW)
GUICtrlSetState($console, $GUI_SHOW)
GUICtrlSetState($chat, $GUI_SHOW)
GUICtrlSetState($row1p1, $GUI_SHOW)
GUICtrlSetState($row1p2, $GUI_SHOW)
GUICtrlSetState($row1p3, $GUI_SHOW)
GUICtrlSetState($row1p4, $GUI_SHOW)
GUICtrlSetState($row1Edit, $GUI_SHOW)
GUICtrlSetState($row1Group, $GUI_SHOW)
GUICtrlSetState($tSpam1Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam1Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam1Slot3,$GUI_SHOW)
GUICtrlSetState($tSpam2Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam2Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam2Slot3,$GUI_SHOW)
GUICtrlSetState($tSpam3Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam3Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam3Slot3,$GUI_SHOW)
GUICtrlSetState($tSpam4Slot1,$GUI_SHOW)
GUICtrlSetState($tSpam4Slot2,$GUI_SHOW)
GUICtrlSetState($tSpam4Slot3,$GUI_SHOW)
GUICtrlSetState($tLabel1 ,$GUI_SHOW)
GUICtrlSetState($tLabel2 ,$GUI_SHOW)
GUICtrlSetState($tLabel3 ,$GUI_SHOW)
GUICtrlSetState($tLabel4 ,$GUI_SHOW)
GUICtrlSetState($tLabel5 ,$GUI_SHOW)
GUICtrlSetState($tLabel6 ,$GUI_SHOW)
GUICtrlSetState($tLabel7 ,$GUI_SHOW)
GUICtrlSetState($tLabel8 ,$GUI_SHOW)
GUICtrlSetState($tLabel9 ,$GUI_SHOW)
GUICtrlSetState($tLabel10 ,$GUI_SHOW)
GUICtrlSetState($tLabel11 ,$GUI_SHOW)
GUICtrlSetState($tLabel12 ,$GUI_SHOW)
GUICtrlSetState($tLabel13 ,$GUI_SHOW)
GUICtrlSetState($tLabel14 ,$GUI_SHOW)
GUICtrlSetState($tLabel15 ,$GUI_SHOW)
GUICtrlSetState($tLabel16 ,$GUI_SHOW)
GUICtrlSetState($botGroup ,$GUI_SHOW)
GUICtrlSetState($botEditButton ,$GUI_SHOW)
GUICtrlSetState($fMenu1,$GUI_ENABLE)
GUICtrlSetState($fMenu2,$GUI_ENABLE)
GUICtrlSetState($fMenu3,$GUI_ENABLE)
GUICtrlSetState($fMenu4,$GUI_ENABLE)
GUICtrlSetState($fMenu5,$GUI_ENABLE)
EndIf
Case $cEdit
If $g = 1 Then
_print(_getDate()&" "&_getTime()&" "&"Chat in edit mode", 1)
GUICtrlSetData($cEdit,"Save")
GUICtrlSetState($chat,$GUI_ENABLE)
$g = 2
ElseIf $g = 2 Then
_print(_getDate()&" "&_getTime()&" "&"Chat data saved", 1)
GUICtrlSetData($cEdit,"Edit")
GUICtrlSetState($chat,$GUI_DISABLE)
$g = 1
EndIf
Case $regis
ShellExecute("http://snoxd.net/index.php?act=Reg&CODE=00")
Case $fGuid
ShellExecute("http://dragonica.snoxd.net/index.php?showtopic=54356")
Case $row1Edit
If $p = 1 Then
_print(_getDate()&" "&_getTime()&" "&"Combo 1 edit mode", 1)
GUICtrlSetData($row1Edit,"Save")
GUICtrlSetState($row1p1,$GUI_ENABLE)
GUICtrlSetState($row1p2,$GUI_ENABLE)
GUICtrlSetState($row1p3,$GUI_ENABLE)
GUICtrlSetState($row1p4,$GUI_ENABLE)
GUICtrlSetState($row2p1,$GUI_HIDE)
GUICtrlSetState($row2p2,$GUI_HIDE)
GUICtrlSetState($row2p3,$GUI_HIDE)
GUICtrlSetState($row2p4,$GUI_HIDE)
GUICtrlSetState($row1Group,$GUI_HIDE)
GUICtrlSetState($row2Group,$GUI_HIDE)
GUICtrlSetState($row2Edit,$GUI_HIDE)
GUICtrlSetState($row3Group,$GUI_SHOW)
GUICtrlSetState($label1,$GUI_SHOW)
GUICtrlSetState($label2,$GUI_SHOW)
GUICtrlSetState($label3,$GUI_SHOW)
GUICtrlSetState($label4,$GUI_SHOW)
GUICtrlSetState($label5,$GUI_SHOW)
GUICtrlSetState($row1Time1,$GUI_SHOW)
GUICtrlSetState($row1Time2,$GUI_SHOW)
GUICtrlSetState($row1Time3,$GUI_SHOW)
GUICtrlSetState($row1Time4,$GUI_SHOW)
$p = 2
ElseIf $p = 2 Then
_print(_getDate()&" "&_getTime()&" "&"Combo 1 data saved", 1)
GUICtrlSetData($row1Edit,"Edit")
GUICtrlSetState($row1p1,$GUI_DISABLE)
GUICtrlSetState($row1p2,$GUI_DISABLE)
GUICtrlSetState($row1p3,$GUI_DISABLE)
GUICtrlSetState($row1p4,$GUI_DISABLE)
GUICtrlSetState($row2p1,$GUI_SHOW)
GUICtrlSetState($row2p2,$GUI_SHOW)
GUICtrlSetState($row2p3,$GUI_SHOW)
GUICtrlSetState($row2p4,$GUI_SHOW)
GUICtrlSetState($row1Group,$GUI_SHOW)
GUICtrlSetState($row2Group,$GUI_SHOW)
GUICtrlSetState($row2Edit,$GUI_SHOW)
GUICtrlSetState($row3Group,$GUI_HIDE)
GUICtrlSetState($label1,$GUI_HIDE)
GUICtrlSetState($label2,$GUI_HIDE)
GUICtrlSetState($label3,$GUI_HIDE)
GUICtrlSetState($label4,$GUI_HIDE)
GUICtrlSetState($label5,$GUI_HIDE)
GUICtrlSetState($row1Time1,$GUI_HIDE)
GUICtrlSetState($row1Time2,$GUI_HIDE)
GUICtrlSetState($row1Time3,$GUI_HIDE)
GUICtrlSetState($row1Time4,$GUI_HIDE)
$p = 1
EndIf
Case $row2Edit
If $l = 1 Then
_print(_getDate()&" "&_getTime()&" "&"Combo 2 edit mode", 1)
GUICtrlSetData($row2Edit,"Save")
GUICtrlSetState($row2p1,$GUI_ENABLE)
GUICtrlSetState($row2p2,$GUI_ENABLE)
GUICtrlSetState($row2p3,$GUI_ENABLE)
GUICtrlSetState($row2p4,$GUI_ENABLE)
GUICtrlSetState($row1p1,$GUI_HIDE)
GUICtrlSetState($row1p2,$GUI_HIDE)
GUICtrlSetState($row1p3,$GUI_HIDE)
GUICtrlSetState($row1p4,$GUI_HIDE)
GUICtrlSetState($row1Group,$GUI_HIDE)
GUICtrlSetState($row2Group,$GUI_HIDE)
GUICtrlSetState($row1Edit,$GUI_HIDE)
GUICtrlSetState($row3Group,$GUI_SHOW)
GUICtrlSetState($label11,$GUI_SHOW)
GUICtrlSetState($label22,$GUI_SHOW)
GUICtrlSetState($label33,$GUI_SHOW)
GUICtrlSetState($label44,$GUI_SHOW)
GUICtrlSetState($label55,$GUI_SHOW)
GUICtrlSetState($row2Time1,$GUI_SHOW)
GUICtrlSetState($row2Time2,$GUI_SHOW)
GUICtrlSetState($row2Time3,$GUI_SHOW)
GUICtrlSetState($row2Time4,$GUI_SHOW)
$l = 2
ElseIf $l = 2 Then
_print(_getDate()&" "&_getTime()&" "&"Combo 2 data saved", 1)
GUICtrlSetData($row2Edit,"Edit")
GUICtrlSetState($row2p1,$GUI_DISABLE)
GUICtrlSetState($row2p2,$GUI_DISABLE)
GUICtrlSetState($row2p3,$GUI_DISABLE)
GUICtrlSetState($row2p4,$GUI_DISABLE)
GUICtrlSetState($row1p1,$GUI_SHOW)
GUICtrlSetState($row1p2,$GUI_SHOW)
GUICtrlSetState($row1p3,$GUI_SHOW)
GUICtrlSetState($row1p4,$GUI_SHOW)
GUICtrlSetState($row1Group,$GUI_SHOW)
GUICtrlSetState($row2Group,$GUI_SHOW)
GUICtrlSetState($row1Edit,$GUI_SHOW)
GUICtrlSetState($row3Group,$GUI_HIDE)
GUICtrlSetState($label11,$GUI_HIDE)
GUICtrlSetState($label22,$GUI_HIDE)
GUICtrlSetState($label33,$GUI_HIDE)
GUICtrlSetState($label44,$GUI_HIDE)
GUICtrlSetState($label55,$GUI_HIDE)
GUICtrlSetState($row2Time1,$GUI_HIDE)
GUICtrlSetState($row2Time2,$GUI_HIDE)
GUICtrlSetState($row2Time3,$GUI_HIDE)
GUICtrlSetState($row2Time4,$GUI_HIDE)
$l = 1
EndIf
Case $fSpee
If $enableSpeed = 0 Then
_print(_getDate()&" "&_getTime()&" "&"Dash mode enabled", 1)
$enableSpeed = 1
$speedStat = "ON"
HotKeySet("{UP}", "_up")
HotKeySet("{DOWN}", "_down")
HotKeySet("{LEFT}", "_left")
HotKeySet("{RIGHT}", "_right")
GUICtrlSetData($fSpee,"Dash Mode "&$speedStat)
ElseIf $enableSpeed = 1 Then
_print(_getDate()&" "&_getTime()&" "&"Dash mode disabled", 1)
$enableSpeed = 0
$speedStat = "OFF"
GUICtrlSetData($fSpee,"Dash Mode "&$speedStat)
EndIf
Case $fSave
_encryptSave()
Case $fAbot
$x = @DesktopWidth/2 - 200/2
$y = @DesktopHeight/2 - 140/2
GUICreate("Version Settings",200,140, $x, $y, $WS_MINIMIZEBOX + $DS_SETFOREGROUND, BitOR($WS_EX_TOPMOST, $WS_EX_STATICEDGE ))
GUISetState(@SW_SHOW)
GUICtrlCreateLabel("Dragonica Auto Bot for IAH"&@CRLF&"Created by Forsaken for the users at,"&@CRLF&"www.snoxd.net",10,12,175,50, $ES_CENTER)
GUICtrlSetState(-1,$GUI_DISABLE)
$exit = GUICtrlCreateButton("Exit",50, 80, 90, 20)
While 1
Switch GUIgetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $exit
GUIDelete("Version Settings")
ExitLoop
EndSwitch
WEnd
Case $fAuto
$x = @DesktopWidth/2 - 100/2
$y = @DesktopHeight/2 - 100/2
GUICreate("Bot Settings",200,230, $x, $y, $WS_MINIMIZEBOX + $DS_SETFOREGROUND, BitOR($WS_EX_TOPMOST, $WS_EX_STATICEDGE ))
$gui = GUISetState(@SW_SHOW)
GUICtrlCreateLabel("Visibility =>",10,12)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlCreateLabel("Health =>",10,37)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlCreateLabel("Manna =>",10,62)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlCreateLabel("Chat =>",10,87)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlCreateLabel("Combo 1 =>",10,112)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlCreateLabel("Combo 2 =>",10,137)
GUICtrlSetState(-1,$GUI_DISABLE)
$invisKey = GUICtrlCreateInput($keyVis,88,10, 100, 20)
$healtKey = GUICtrlCreateInput($keyHpp,88,35, 100, 20)
$mannaKey = GUICtrlCreateInput($keyMpp,88,60, 100, 20)
$chattKey = GUICtrlCreateInput($keyCht,88,85, 100, 20)
$comb1Key = GUICtrlCreateInput($keyCm1,88,110, 100, 20)
$comb2Key = GUICtrlCreateInput($keyCm2,88,135, 100, 20)
$save = GUICtrlCreateButton("Save",10, 170, 87.5, 20)
$exit = GUICtrlCreateButton("Restart",102.5, 170, 87.5, 20)
While 1
Switch GUIgetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $save
_saveKeys()
Case $exit
GUIDelete("Bot Settings")
$exitProc = 1
ExitLoop
EndSwitch
WEnd
Case $fPotS
$x = @DesktopWidth/2 - 200/2
$y = @DesktopHeight/2 - 120/2
GUICreate("Potion Settings",200,120, $x, $y, $WS_MINIMIZEBOX + $DS_SETFOREGROUND, BitOR($WS_EX_TOPMOST, $WS_EX_STATICEDGE ))
GUISetState(@SW_SHOW)
GUICtrlCreateLabel("Health Key =>",10,12)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlCreateLabel("Manna Key =>",10,37)
GUICtrlSetState(-1,$GUI_DISABLE)
$setHpKey = GUICtrlCreateInput($keyHP,88,10, 100, 20)
$setMpKey = GUICtrlCreateInput($keyMP,88,35, 100, 20)
$save = GUICtrlCreateButton("Save",10, 65, 87.5, 20)
$exit = GUICtrlCreateButton("Exit",102.5, 65, 87.5, 20)
While 1
Switch GUIgetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $save
_savePotions()
Case $exit
GUIDelete("Bot Settings")
$exitProc = 1
ExitLoop
EndSwitch
WEnd
Case $fClie
$x = @DesktopWidth/2 - 200/2/2
$y = @DesktopHeight/2 - 120/2/2
GUICreate("Version Settings",200,90, $x, $y, $WS_MINIMIZEBOX + $DS_SETFOREGROUND, BitOR($WS_EX_TOPMOST, $WS_EX_STATICEDGE ))
GUISetState(@SW_SHOW)
GUICtrlCreateLabel("Game Versin =>",10,12)
GUICtrlSetState(-1,$GUI_DISABLE)
$setVerKey = GUICtrlCreateInput($version,88,10, 100, 20)
$save = GUICtrlCreateButton("Save",10, 40, 87.5, 20)
$exit = GUICtrlCreateButton("Exit",102.5, 40, 87.5, 20)
While 1
Switch GUIgetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $save
_saveVersion()
Case $exit
GUIDelete("Version Settings")
$exitProc = 1
ExitLoop
EndSwitch
WEnd
Case $fClos
_encryptSave()
Exit
Case $fInvi
_setInvisible()
Case $fVisi
_setVisible()
Case $fPoti
If $enablePotions = 0 Then
_print(_getDate()&" "&_getTime()&" "&"Auto pot enabled", 1)
$enablePotions = 1
$hpStat = "ON"
GUICtrlSetData($fPoti,"Auto Pot "&$hpStat)
ElseIf $enablePotions = 1 Then
_print(_getDate()&" "&_getTime()&" "&"Auto pot disabled", 1)
$enablePotions = 0
$hpStat = "OFF"
GUICtrlSetData($fPoti,"Auto Pot "&$hpStat)
EndIf
Case $fChat
If $enableChat = 0 Then
_print(_getDate()&" "&_getTime()&" "&"Chat spam enabled", 1)
$enableChat = 1
$chatStat = "ON"
GUICtrlSetData($fChat,"Auto Chat "&$chatStat)
ElseIf $enableChat = 1 Then
_print(_getDate()&" "&_getTime()&" "&"Chat spam disabled", 1)
$enableChat = 0
$chatStat = "OFF"
GUICtrlSetData($fChat,"Auto Chat "&$chatStat)
EndIf
Case $fSpam
If $enableSpam = 0 Then
_print(_getDate()&" "&_getTime()&" "&"Auto spam enabled", 1)
$enableSpam = 1
$spamStat = "ON"
GUICtrlSetData($fSpam,"Auto Spam "&$spamStat)
ElseIf $enableSpam = 1 Then
_print(_getDate()&" "&_getTime()&" "&"Auto spam disabled", 1)
$enableSpam = 0
$spamStat = "OFF"
GUICtrlSetData($fSpam,"Auto Spam "&$spamStat)
EndIf
EndSwitch
If $exitProc = 1 Then
GUIDelete("Dragonica Auto Bot")
Run(@ScriptDir &"/AutoBot.exe", @ScriptDir)
Exit
EndIf
If $enablePotions = 1 Then
$tHealthDiff = TimerDiff($timerHealth)
$tMannaaDiff = TimerDiff($timerMannaa)
If $tHealthDiff >= 1 AND $healthTime <> "0" Then
_getHealth($xHealth, $yHealth)
$timerHealth = TimerInit()
EndIF
If $tMannaaDiff >= 1 AND $mannaaTime <> "0" Then
_getMannaa($xMannaa, $yMannaa)
$timerMannaa = TimerInit()
EndIF
If $health <> $healthChange AND $healthSend <> "0" AND $healthChange <> "FFFFFF" AND $healthChange <> "000000" Then
$hpTimeDiff = TimerDiff($hpTime)
If $hpTimeDiff >= 10000 Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", $keyHp)
_print(_getDate()&" "&_getTime()&" "&"Health potion used", 1)
$healthSend = "0"
$hpTime = TimerInit()
EndIf
EndIf
If $mannaa <> $mannaaChange AND $mannaaSend <> "0" AND $mannaaChange <> "FFFFFF" AND $mannaaChange <> "000000" Then
$mpTimeDiff = TimerDiff($mpTime)
If $mpTimeDiff >= 10000 Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", $keyMp)
_print(_getDate()&" "&_getTime()&" "&"Manna potion used", 1)
$mannaaSend = "0"
$mpTime = TimerInit()
EndIf
EndIf
EndIf
If $enableChat = 1 Then
$random = Random(3, 6, 1)
$chatTimeDiff = TimerDiff($chatTime)
If $chatTimeDiff >= ($random * 1000) Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", "{ENTER}")
sleep("100")
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($chat))
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", "{ENTER}")
_print(_getDate()&" "&_getTime()&" "&"Message sent", 1)
$chatTime = TimerInit()
EndIf
EndIf
If $enableBot = 1 Then
$botTimerDiff1 = TimerDiff($botTimer1)
$botTimerDiff2 = TimerDiff($botTimer2)
$botTimerDiff3 = TimerDiff($botTimer3)
$botTimerDiff4 = TimerDiff($botTimer4)
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
If $botTimerDiff1 > GUICtrlRead($tSpam1Slot2) AND GUICtrlRead($tSpam1Slot1) <> "" AND $send4 = 1 Then
$send1 = ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($tSpam1Slot1))
$botTimer1 = TimerInit()
$sTimer1 = TimerInit()
Do
Sleep("1")
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $stopTheBot
If $enableBot = 0 Then
$enableBot = 1
$botStat = "ON"
_print(_getDate()&" "&_getTime()&" "&"Bot mode enabled", 1)
GUICtrlSetData($stopTheBot,"Stop")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
ElseIf $enableBot = 1 Then
$enableBot = 0
$botStat = "OFF"
_print(_getDate()&" "&_getTime()&" "&"Bot mode disabled", 1)
GUICtrlSetData($stopTheBot,"Start")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
EndIf
$send1 = 0
$send2 = 0
$send3 = 0
$send4 = 1
EndSwitch
$sTimerDiff1 = TimerDiff($sTimer1)
Until $sTimerDiff1 > GUICtrlRead($tSpam1Slot3)
$send4 = 0
EndIf
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
If $botTimerDiff2 > GUICtrlRead($tSpam2Slot2) AND GUICtrlRead($tSpam2Slot1) <> "" AND $send1 = 1 Then
$send2 = ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($tSpam2Slot1))
$botTimer2 = TimerInit()
$sTimer2 = TimerInit()
Do
Sleep("1")
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $stopTheBot
If $enableBot = 0 Then
$enableBot = 1
$botStat = "ON"
_print(_getDate()&" "&_getTime()&" "&"Bot mode enabled", 1)
GUICtrlSetData($stopTheBot,"Stop")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
ElseIf $enableBot = 1 Then
$enableBot = 0
$botStat = "OFF"
_print(_getDate()&" "&_getTime()&" "&"Bot mode disabled", 1)
GUICtrlSetData($stopTheBot,"Start")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
EndIf
$send1 = 0
$send2 = 0
$send3 = 0
$send4 = 1
EndSwitch
$sTimerDiff2 = TimerDiff($sTimer2)
Until $sTimerDiff2 > GUICtrlRead($tSpam2Slot3)
$send1 = 0
EndIf
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
If $botTimerDiff3 > GUICtrlRead($tSpam3Slot2) AND GUICtrlRead($tSpam3Slot1) <> "" AND $send2 = 1 Then
$send3 = ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($tSpam3Slot1))
$botTimer3 = TimerInit()
$sTimer3 = TimerInit()
Do
Sleep("1")
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $stopTheBot
If $enableBot = 0 Then
$enableBot = 1
$botStat = "ON"
_print(_getDate()&" "&_getTime()&" "&"Bot mode enabled", 1)
GUICtrlSetData($stopTheBot,"Stop")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
ElseIf $enableBot = 1 Then
$enableBot = 0
$botStat = "OFF"
_print(_getDate()&" "&_getTime()&" "&"Bot mode disabled", 1)
GUICtrlSetData($stopTheBot,"Start")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
EndIf
$send1 = 0
$send2 = 0
$send3 = 0
$send4 = 1
EndSwitch
$sTimerDiff3 = TimerDiff($sTimer3)
Until $sTimerDiff3 > GUICtrlRead($tSpam3Slot3)
$send2 = 0
EndIf
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
If $botTimerDiff4 > GUICtrlRead($tSpam4Slot2) AND GUICtrlRead($tSpam4Slot1) <> "" AND $send3 = 1 Then
$send4 = ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($tSpam4Slot1))
$botTimer4 = TimerInit()
$sTimer4 = TimerInit()
Do
Sleep("1")
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $stopTheBot
If $enableBot = 0 Then
$enableBot = 1
$botStat = "ON"
_print(_getDate()&" "&_getTime()&" "&"Bot mode enabled", 1)
GUICtrlSetData($stopTheBot,"Stop")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
ElseIf $enableBot = 1 Then
$enableBot = 0
$botStat = "OFF"
_print(_getDate()&" "&_getTime()&" "&"Bot mode disabled", 1)
GUICtrlSetData($stopTheBot,"Start")
GUICtrlSetData($fbott,"Auto Bot "&$speedStat)
EndIf
$send1 = 0
$send2 = 0
$send3 = 0
$send4 = 1
EndSwitch
$sTimerDiff4 = TimerDiff($sTimer4)
Until $sTimerDiff4 > GUICtrlRead($tSpam4Slot3)
$send3 = 0
EndIf
EndIf
WEnd
Func _attack1()
If $enableSpam = 1 Then
If GUICtrlRead($row1p1) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row1p1))
If GUICtrlRead($row1Time1) <> "" Then
Sleep(GUICtrlRead($row1Time1))
EndIf
EndIf
If GUICtrlRead($row1p2) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row1p2))
If GUICtrlRead($row1Time2) <> "" Then
Sleep(GUICtrlRead($row1Time2))
EndIf
EndIf
If GUICtrlRead($row1p3) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row1p3))
If GUICtrlRead($row1Time3) <> "" Then
Sleep(GUICtrlRead($row1Time3))
EndIf
EndIf
If GUICtrlRead($row1p4) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row1p4))
If GUICtrlRead($row1Time4) <> "" Then
Sleep(GUICtrlRead($row1Time4))
EndIf
EndIf
_print(_getDate()&" "&_getTime()&" "&"Combo 1 executed", 1)
ElseIf $enableSpam = 0 Then
_print(_getDate()&" "&_getTime()&" "&"Enable spam first", 1)
EndIf
EndFunc
Func _attack2()
If $enableSpam = 1 Then
If GUICtrlRead($row2p1) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row2p1))
If GUICtrlRead($row2Time1) <> "" Then
Sleep(GUICtrlRead($row2Time1))
EndIf
EndIf
If GUICtrlRead($row1p2) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row2p2))
If GUICtrlRead($row2Time2) <> "" Then
Sleep(GUICtrlRead($row2Time2))
EndIf
EndIf
If GUICtrlRead($row2p3) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row2p3))
If GUICtrlRead($row2Time3) <> "" Then
Sleep(GUICtrlRead($row2Time3))
EndIf
EndIf
If GUICtrlRead($row2p4) <> "" Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", GUICtrlRead($row2p4))
If GUICtrlRead($row2Time4) <> "" Then
Sleep(GUICtrlRead($row2Time4))
EndIf
EndIf
_print(_getDate()&" "&_getTime()&" "&"Combo 2 executed", 1)
ElseIf $enableSpam = 0 Then
_print(_getDate()&" "&_getTime()&" "&"Enable spam first", 1)
EndIf
EndFunc
Func _print($message, $crlf)
If $crlf = 1 Then
$crlf = @CRLF
Else
$crlf = ""
EndIf
GUICtrlSetData($console, $message & $crlf, 1)
GUICtrlSetFont(-1,9,0,0,"Lucida Console")
EndFunc
Func _setHealth()
$posHel = MouseGetPos()
$health = Hex(PixelGetColor( $posHel[0], $posHel[1]), 6)
$healthChange = $health
$healthTime = "1"
$xHealth = $posHel[0]
$yHealth = $posHel[1]
_print(_getDate()&" "&_getTime()&" "&"Color #"&$health, 1)
_print(_getDate()&" "&_getTime()&" "&"Position " & $yHealth & ", " & $xHealth, 1)
_print(_getDate()&" "&_getTime()&" "&"Health set", 1)
Beep (1000, 100)
EndFunc
Func _setMannaa()
$posMan = MouseGetPos()
$mannaa = Hex(PixelGetColor( $posMan[0], $posMan[1]), 6)
$mannaaChange = $mannaa
$mannaaTime = "1"
$xMannaa = $posMan[0]
$yMannaa = $posMan[1]
_print(_getDate()&" "&_getTime()&" "&"Color #"&$mannaa, 1)
_print(_getDate()&" "&_getTime()&" "&"Position " & $yMannaa & ", " & $xMannaa, 1)
_print(_getDate()&" "&_getTime()&" "&"Manna set", 1)
Beep (1000, 100)
EndFunc
Func _getHealth($x, $y)
$healthChange = Hex(PixelGetColor( $x, $y), 6)
$healthSend = "1"
EndFunc
Func _getMannaa($x, $y)
$mannaaChange = Hex(PixelGetColor( $x, $y), 6)
$mannaaSend = "1"
EndFunc
Func _getTime()
$s = @SEC
$m = @MIN
$h = @HOUR
return($h &":"& $m&":"& $s)
EndFunc
Func _getDate()
$d = @MDAY
$m = @MON
$y = @YEAR
return($m &"-"& $d&"-"& $y)
EndFunc
Func _setInvisible()
_print(_getDate()&" "&_getTime()&" "&"Invisible mode", 1)
GUISetState(@SW_HIDE )
$v = 2
Return
EndFunc
Func _setVisible()
_print(_getDate()&" "&_getTime()&" "&"Visible mode", 1)
GUISetState(@SW_SHOW)
$v = 1
Return
EndFunc
Func _toggleVis()
If $v = 1 Then
_setInvisible()
$v = 2
ElseIf $v = 2 Then
_setVisible()
$v = 1
EndIf
EndFunc
Func _up()
If $enableSpeed = 1 Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", "{UP 2}")
EndIf
EndFunc
Func _down()
If $enableSpeed = 1 Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", "{DOWN 2}")
EndIf
EndFunc
Func _left()
If $enableSpeed = 1 Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", "{LEFT 2}")
EndIf
EndFunc
Func _right()
If $enableSpeed = 1 Then
ControlSend("Dragonica (Client Ver : "&$version&")", "", "", "{RIGHT 2}")
EndIf
EndFunc
Func _hotChat()
If $enableChat = 0 Then
$enableChat = 1
_print(_getDate()&" "&_getTime()&" "&"Chat spam enabled", 1)
ElseIf $enableChat = 1 Then
$enableChat = 0
_print(_getDate()&" "&_getTime()&" "&"Chat spam disabled", 1)
EndIf
EndFunc
Func _encryptSave()
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Chat", "REG_MULTI_SZ", GUICtrlRead($chat))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com1", "REG_SZ", GUICtrlRead($row1p1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com2", "REG_SZ", GUICtrlRead($row1p2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com3", "REG_SZ", GUICtrlRead($row1p3))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com4", "REG_SZ", GUICtrlRead($row1p4))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim1", "REG_EXPAND_SZ", GUICtrlRead($row1Time1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim2", "REG_EXPAND_SZ", GUICtrlRead($row1Time2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim3", "REG_EXPAND_SZ", GUICtrlRead($row1Time3))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim4", "REG_EXPAND_SZ", GUICtrlRead($row1Time4))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com1", "REG_SZ", GUICtrlRead($row2p1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com2", "REG_SZ", GUICtrlRead($row2p2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com3", "REG_SZ", GUICtrlRead($row2p3))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com4", "REG_SZ", GUICtrlRead($row2p4))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim1", "REG_EXPAND_SZ", GUICtrlRead($row2Time1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim2", "REG_EXPAND_SZ", GUICtrlRead($row2Time2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim3", "REG_EXPAND_SZ", GUICtrlRead($row2Time3))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim4", "REG_EXPAND_SZ", GUICtrlRead($row2Time4))
_print(_getDate()&" "&_getTime()&" "&"All variables saved", 1)
EndFunc
Func _saveKeys()
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Visibility Key", "REG_SZ", GUICtrlRead($invisKey))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Health Key", "REG_SZ", GUICtrlRead($healtKey))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Manna Key", "REG_SZ", GUICtrlRead($mannaKey))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Chat Key", "REG_SZ", GUICtrlRead($chattKey))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Combo 1 Key", "REG_SZ", GUICtrlRead($comb1Key))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Combo 2 Key", "REG_SZ", GUICtrlRead($comb2Key))
_print(_getDate()&" "&_getTime()&" "&"All keys saved", 1)
EndFunc
Func _savePotions()
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "keyHP", "REG_SZ", GUICtrlRead($setHpKey))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "keyMP", "REG_SZ", GUICtrlRead($setMpKey))
_print(_getDate()&" "&_getTime()&" "&"All keys saved", 1)
EndFunc
Func _saveVersion()
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Version", "REG_SZ", GUICtrlRead($setVerKey))
EndFunc
Func _setVariables()
$regVers = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Version")
GUICtrlSetData($version, $regVers)
$regChat = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Chat")
GUICtrlSetData($chat, $regChat)
$regR1p1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com1")
GUICtrlSetData($row1p1, $regR1p1)
$regR1p2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com2")
GUICtrlSetData($row1p2, $regR1p2)
$regR1p3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com3")
GUICtrlSetData($row1p3, $regR1p3)
$regR1p4 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Com4")
GUICtrlSetData($row1p4, $regR1p4)
$regR1T1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim1")
GUICtrlSetData($row1Time1, $regR1T1)
$regR1T2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim2")
GUICtrlSetData($row1Time2, $regR1T2)
$regR1T3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim3")
GUICtrlSetData($row1Time3, $regR1T3)
$regR1T4 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row1Tim4")
GUICtrlSetData($row1Time4, $regR1T4)
$regR2p1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com1")
GUICtrlSetData($row2p1, $regR2p1)
$regR2p2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com2")
GUICtrlSetData($row2p2, $regR2p2)
$regR2p3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com3")
GUICtrlSetData($row2p3, $regR2p3)
$regR2p4 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Com4")
GUICtrlSetData($row2p4, $regR2p4)
$regR2T1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim1")
GUICtrlSetData($row2Time1, $regR2T1)
$regR2T2 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim2")
GUICtrlSetData($row2Time2, $regR2T2)
$regR2T3 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim3")
GUICtrlSetData($row2Time3, $regR2T3)
$regR2T4 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "Row2Tim4")
GUICtrlSetData($row2Time4, $regR2T4)
EndFunc
Func _saveBotKeys()
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot1", "REG_SZ", GUICtrlRead($tSpam1Slot1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot1", "REG_SZ", GUICtrlRead($tSpam2Slot1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot1", "REG_SZ", GUICtrlRead($tSpam3Slot1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot1", "REG_SZ", GUICtrlRead($tSpam4Slot1))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot2", "REG_EXPAND_SZ", GUICtrlRead($tSpam1Slot2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot2", "REG_EXPAND_SZ", GUICtrlRead($tSpam2Slot2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot2", "REG_EXPAND_SZ", GUICtrlRead($tSpam3Slot2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot2", "REG_EXPAND_SZ", GUICtrlRead($tSpam4Slot2))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam1Slot3", "REG_EXPAND_SZ", GUICtrlRead($tSpam1Slot3))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam2Slot3", "REG_EXPAND_SZ", GUICtrlRead($tSpam2Slot3))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam3Slot3", "REG_EXPAND_SZ", GUICtrlRead($tSpam3Slot3))
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Dragonica Auto Bot", "$tSpam4Slot3", "REG_EXPAND_SZ", GUICtrlRead($tSpam4Slot3))
EndFunc