Advertisement
Guest User

Untitled

a guest
Jun 23rd, 2017
60
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 1.79 KB | None | 0 0
  1. #include <GUIConstantsEx.au3>
  2. #include <ProgressConstants.au3>
  3. #include <WindowsConstants.au3>
  4. #include <nomadmemory.au3>
  5.  
  6. #Region ### START Koda GUI section ### Form=
  7. $Form1 = GUICreate("Form1", 500, 400, 192, 124)
  8. ;===========================================================================
  9. GUICtrlCreateLabel("Heal when hp is ", 5, 5, 80,12)
  10. $danger_notice = GUICtrlCreateInput("100", 85,0,50,20)
  11. GUICtrlCreateLabel("or lower.",140,5,40,12)
  12. ;=HP Button===
  13. GUICtrlCreateLabel("HP Slot", 300, 25, 50, 12)
  14. $HP_Slot_Number = GUICtrlCreateInput("=", 340, 20, 15, 20)
  15. ;===========================================================================
  16. GUICtrlCreateLabel("Your Characters Max HP ", 300, 5, 117,12)
  17. $Max_HP_Insert = GUICtrlCreateInput("", 420, 0, 50, 20)
  18.  
  19. $progressbar1 = GUICtrlCreateProgress(5, 40, 200, 15,$PBS_SMOOTH)
  20.  
  21. $HP_Bar  = GUICtrlCreateLabel("????", 215, 41, 500, 15)
  22. $btn = GUICtrlCreateButton("START", 300, 50 , 50, 20)
  23. GUISetState(@SW_SHOW)
  24. #EndRegion ### END Koda GUI section ###
  25. global $pid = ProcessExists("cabalhelix.exe")
  26. global $Value = ("0x0E1ECA54")
  27.  
  28. While 1
  29.         $data_to_set = GUICtrlSetData($HP_Bar, Read_currenthealthbytomasz($pid, $value))
  30.         GUICtrlSetData($progressbar1, (((Read_currenthealthbytomasz($pid, $value))/1494())*100))
  31.         If Read_currenthealthbytomasz($pid, $value) <GUICtrlRead($danger_notice) Then
  32.             WinActivate("CABAL", "CABAL")
  33.             Send(GUICtrlRead($HP_Slot_Number))
  34.         EndIf
  35.         $Msg = GUIGetMsg()
  36.         Switch $Msg
  37.     Case $GUI_EVENT_CLOSE
  38.         Exit
  39.     Case $btn
  40.         Auto_Healing()
  41.     EndSwitch
  42. WEnd
  43.  
  44.  
  45.  
  46.  
  47. ;==============================
  48. Func Read_currenthealthbytomasz($pid, $value)
  49.     $openmem = _MemoryOpen($pid)
  50.     $Value = _MemoryRead(0x0E1ECA54, $openmem)
  51.     _MemoryClose($openmem)
  52.     Return $Value
  53. EndFunc ;==> Created by CE table converter!
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement