#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIListBox.au3>
#include <Memory.au3>
#RequireAdmin
#NoTrayIcon
$ShowLvlAdd = "0x"
$PetHealthAdd = "0x010b12f0"
$AutoPillAdd = "0x010b2934"
$AutoPillHPAdd = "0x010b2938"
$AutoPillMPAdd = "0x010b293C"
$ChargeAdd = "0x010b2bd0"
$HPAdd = "0x010d84d3"
$DamageAdd = "0x010b29e8"
$DefenseAdd = "0x010b29f0"
$ElementalAdd = "0x010b2a08"
$AttackSpeedAdd = "0x010d84f7"
$VitalityAdd = "0x010b124c"
$Version = "12Sky2"
$ID = _MemoryOpen(ProcessExists("TwelveSky2.exe"))
Opt("GUIOnEventMode", 1)
$gui_main = GUICreate($Version, 200, 400, -1, -1)
$AutoPillCheckBox = GUICtrlCreateCheckbox("Auto Pill", 5, 5)
GUICtrlSetOnEvent(-1, "AutoPillOffFunc")
Func AutoPillOfffunc()
If BitAnd(GUICtrlRead($AutoPillCheckBox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
_MemoryWrite($AutoPillAdd,$ID,0)
EndIf
EndFunc
GUICtrlCreateLabel("HP",5,30)
$HPSlider = GUICtrlCreateSlider(25,30,160)
GUICtrlSetOnEvent(-1, "HPSliderFunc")
GUICtrlSetLimit(-1, 5)
GUICtrlCreateLabel("0% 10% 20% 30% 40% 50%",30,50)
Func HPSliderFunc()
if GUICtrlRead($HPSlider , 0) then
_MemoryWrite($AutoPillHPAdd,$ID,0)
EndIf
EndFunc
GUICtrlCreateLabel("Vitality",5,70)
$VitalInput = GUICtrlCreateInput("",40,70,50,20,$ES_NUMBER)
$VitalButton = GUICtrlCreateButton("set",90,70,40,20)
GUICtrlSetOnEvent(-1, "VitalityFunc")
Func VitalityFunc()
_MemoryWrite($VitalityAdd,$ID,GUICtrlRead($VitalIn put))
EndFunc
GUICtrlCreateLabel("MP",5,100)
$MPSlider = GUICtrlCreateSlider(25,100,160)
GUICtrlSetOnEvent(-1, "MPSliderFunc")
GUICtrlSetLimit(-1, 5)
GUICtrlCreateLabel("0% 10% 20% 30% 40% 50%",30,120)
Func MPSliderFunc()
if GUICtrlRead($MPSlider , 0) then
_MemoryWrite($AutoPillMPAdd,$ID,0)
EndIf
EndFunc
GUICtrlCreateCheckbox("HotKey",5,140)
GUICtrlCreateLabel("GameKey",140,140)
$Spam1Hot = GUICtrlCreateInput("",5,160,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$Spam1Box = GUICtrlCreateCheckbox("Spam Key1",40,160)
$Spam1Input = GUICtrlCreateInput(IniRead(@ScriptDir& "\Setting.ini","Setting","AOE Input",""), 140, 160,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$Spam2Hot = GUICtrlCreateInput("",5,180,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$Spam2Box = GUICtrlCreateCheckbox("Spam Key2",40,180)
$Spam2Input = GUICtrlCreateInput(IniRead(@ScriptDir& "\Setting.ini","Setting","Pickup Input",""), 140, 180,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$Buff1Hot = GUICtrlCreateInput("",5,200,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$BS1Checkbox = GUICtrlCreateCheckbox("Buff Skill 1",40,200)
$BS1Combo = GUICtrlCreateCombo("",40,220,70,20,$CBS_DROPDOWNLI ST)
GUICtrlSetData(-1,"||Defense|Damage|Elemental", IniRead(@ScriptDir& "\Setting.ini","Setting","Buff Skill 1 Combo",""))
$BS1Input = GUICtrlCreateInput(IniRead(@ScriptDir& "\Setting.ini","Setting","Buff Skill 1 Input",""), 140, 200,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$Buff2Hot = GUICtrlCreateInput("",5,245,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$BS2Checkbox = GUICtrlCreateCheckbox("Buff Skill 2",40,245)
$BS2Combo = GUICtrlCreateCombo("",40,265,70,20,$CBS_DROPDOWNLI ST)
GUICtrlSetData(-1,"||Defense|Damage|Elemental",IniRead(@ScriptDi r& "\Setting.ini","Setting","Buff Skill 2 Combo",""))
$BS2Input = GUICtrlCreateInput(IniRead(@ScriptDir& "\Setting.ini","Setting","Buff Skill 2 Input",""), 140, 250,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$PPKey = GUICtrlCreateInput("",5,285,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$PPCheckbox = GUICtrlCreateCheckbox("Pet Pill",40,285)
$PPInput = GUICtrlCreateInput(IniRead(@ScriptDir& "\Setting.ini","Setting","Pill Pet Input",""), 140, 285,30,20,$ES_UPPERCASE)
GUICtrlSetLimit(-1,3)
$attackspeed = GUICtrlCreateCheckbox("Attack at 20",5,310)
$stopspam = GUICtrlCreateCheckbox("Stop Spam",5,330)
$showlvl = GUICtrlCreateCheckbox("Show Lvl",5,350)
GUICtrlSetOnEvent(-1, "showlvlfunc")
Func showlvlunc()
If BitAND(GUICtrlRead($showlvl), $GUI_CHECKED) == $GUI_CHECKED Then
_MemoryWrite($ShowLvlAdd,$ID,1)
Else
_MemoryWrite($ShowLvlAdd,$ID,0)
EndIf
EndFunc
$ontopitem = GUICtrlCreateCheckbox("Always On Top",100,310)
GUICtrlSetOnEvent(-1, "ontopitemfunc")
Func glassitemfunc()
If BitAND(GUICtrlRead($glassitem), $GUI_CHECKED) == $GUI_CHECKED Then
WinSetTrans($gui_main, "", 200)
Else
WinSetTrans($gui_main, "", 255)
EndIf
EndFunc
$glassitem = GUICtrlCreateCheckbox("Glass Mode",100,330)
GUICtrlSetOnEvent(-1, "glassitemfunc")
func ontopitemfunc()
if BitAnd(GUICtrlRead($ontopitem), $GUI_CHECKED) == $GUI_CHECKED then
WinSetOnTop($Version,"",1)
Else
WinSetOnTop($Version,"",0)
EndIf
EndFunc
Func HotkeyFunc()
if BitAnd(GUICtrlRead($HotkeyCheckbox), $GUI_CHECKED) == $GUI_CHECKED Then
HotKeySet("{"&GUICtrlRead($AutoPillKey)&"}", "AutoPillKeyFunc")
HotKeySet("{"&GUICtrlRead($AOEKey)&"}", "AOEKeyFunc")
HotKeySet("{"&GUICtrlRead($PickupKey)&"}", "PickupKeyFunc")
HotKeySet("{"&GUICtrlRead($APKey)&"}", "APKeyFunc")
HotKeySet("{"&GUICtrlRead($PillPetKey)&"}", "PillPetKeyFunc")
HotKeySet("{"&GUICtrlRead($BS1Key)&"}", "BS1KeyFunc")
HotKeySet("{"&GUICtrlRead($BS2Key)&"}", "BS2KeyFunc")
Elseif BitAnd(GUICtrlRead($HotkeyCheckbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
HotKeySet("{"&GUICtrlRead($AutoPillKey)&"}")
HotKeySet("{"&GUICtrlRead($AOEKey)&"}")
HotKeySet("{"&GUICtrlRead($PickupKey)&"}")
HotKeySet("{"&GUICtrlRead($APKey)&"}")
HotKeySet("{"&GUICtrlRead($PillPetKey)&"}")
HotKeySet("{"&GUICtrlRead($BS1Key)&"}")
HotKeySet("{"&GUICtrlRead($BS2Key)&"}")
EndIf
EndFunc
Func BS2KeyFunc()
if BitAnd(GUICtrlRead($BS2Checkbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
GUIctrlsetstate($BS2Checkbox, $GUI_CHECKED)
Else
GUIctrlsetstate($BS2Checkbox, $GUI_UNCHECKED)
EndIf
EndFunc
Func BS1KeyFunc()
if BitAnd(GUICtrlRead($BS1Checkbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
GUIctrlsetstate($BS1Checkbox, $GUI_CHECKED)
Else
GUIctrlsetstate($BS1Checkbox, $GUI_UNCHECKED)
EndIf
EndFunc
Func PillPetKeyFunc()
if BitAnd(GUICtrlRead($PPCheckbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
GUIctrlsetstate($PPCheckbox, $GUI_CHECKED)
Else
GUIctrlsetstate($PPCheckbox, $GUI_UNCHECKED)
EndIf
EndFunc
Func APKeyFunc()
if BitAnd(GUICtrlRead($APCheckbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
GUIctrlsetstate($APCheckbox, $GUI_CHECKED)
Else
GUIctrlsetstate($APCheckbox, $GUI_UNCHECKED)
EndIf
EndFunc
Func PickupKeyFunc ()
if BitAnd(GUICtrlRead($PickupCheckbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
GUIctrlsetstate($PickupCheckbox, $GUI_CHECKED)
Else
GUIctrlsetstate($PickupCheckbox, $GUI_UNCHECKED)
EndIf
EndFunc
Func AOEKeyFunc ()
if BitAnd(GUICtrlRead($AOECheckbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
GUIctrlsetstate($AOECheckbox, $GUI_CHECKED)
Else
GUIctrlsetstate($AOECheckbox, $GUI_UNCHECKED)
EndIf
EndFunc
Func AutoPillKeyFunc ()
if BitAnd(GUICtrlRead($AutoPillCheckbox), $GUI_UNCHECKED) == $GUI_UNCHECKED Then
GUIctrlsetstate($AutoPillCheckbox, $GUI_CHECKED)
Else
GUIctrlsetstate($AutoPillCheckbox, $GUI_UNCHECKED)
EndIf
EndFunc
Func Close()
Exit
EndFunc
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "close")
While 1
If BitAnd(GUICtrlRead($AutoPillCheckbox), $GUI_CHECKED) == $GUI_CHECKED then
_MemoryWrite($AutoPillAdd,$ID,1)
EndIf
if GUICtrlRead($HPSlider) > 0 Then
_MemoryWrite($AutoPillHPAdd,$ID,GUICtrlRead($HPSli der))
EndIf
if GUICtrlRead($MPSlider) > 0 Then
_MemoryWrite($AutoPillMPAdd,$ID,GUICtrlRead($MPSli der))
EndIf
If BitAnd(GUICtrlRead($Spam1Box), $GUI_CHECKED) == $GUI_CHECKED Then
Send("{"&GUICtrlRead($Spam1Input)&"}")
EndIf
If BitAnd(GUICtrlRead($Spam2Box), $GUI_CHECKED) == $GUI_CHECKED Then
Send("{"&GUICtrlRead($Spam2Input)&"}")
EndIf
If BitAnd(GUICtrlRead($PPCheckbox), $GUI_CHECKED) == $GUI_CHECKED Then
$AutoPet = _MemoryRead($PetHealthAdd,$ID)
if $AutoPet == 0 Then
Send("{"&GUICtrlRead($PPInput)&"}")
EndIf
EndIf
If BitAnd(GUICtrlRead($BS1Checkbox), $GUI_CHECKED) == $GUI_CHECKED Then
if GUICtrlRead($BS1Combo) == "Defense" Then
$BuffAdd = $DefenseAdd
ElseIf GUICtrlRead($BS1Combo) == "Damage" Then
$BuffAdd = $DamageAdd
Else
$BuffAdd = $ElementalAdd
EndIf
$AutoBuff = _MemoryRead($BuffAdd,$ID)
if $AutoBuff == 0 Then
Send("{"&GUICtrlRead($BS1Input)&"}")
EndIf
EndIf
If BitAnd(GUICtrlRead($BS2Checkbox), $GUI_CHECKED) == $GUI_CHECKED Then
if GUICtrlRead($BS1Combo) == "Defense" Then
$BuffAdd = $DefenseAdd
ElseIf GUICtrlRead($BS1Combo) == "Damage" Then
$BuffAdd = $DamageAdd
Else
$BuffAdd = $ElementalAdd
EndIf
$AutoBuff = _MemoryRead($BuffAdd,$ID)
if $AutoBuff == 0 Then
Send("{"&GUICtrlRead($BS2Input)&"}")
EndIf
EndIf
if BitAnd(GUICtrlRead($attackspeed), $GUI_CHECKED) == $GUI_CHECKED Then
_MemoryWrite($AttackSpeedAdd,$ID,20)
EndIf
if BitAnd(GUICtrlRead($stopspam), $GUI_CHECKED) == $GUI_CHECKED Then
if _MemoryRead($HPAdd,$ID) == 0 Then
Close()
EndIf
EndIf
WEnd
PS: The Hotkey does not work and You need Memory.au3 from nomad
