Guest User

Untitled

a guest
Aug 18th, 2019
66
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
  2. ; #Warn  ; Enable warnings to assist with detecting common errors.
  3. SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
  4. SetKeyDelay, 0, 200
  5.  
  6. !b::
  7. SetKeyDelay, 1000, 500
  8. ControlSend,, 2{F1}{F2}{F3}{F4}{F5}{F6}{F7}{F8}{F9}3{F1}{F2}{F3}{F4}1,Dragon Crusade - Connected To QueenSa
  9. SetKeyDelay, 0, 200
  10. return
  11.  
  12. ;SOLO HEAL MODE
  13. #MaxThreadsPerHotkey 2
  14. !Home::
  15. Toggle := !Toggle
  16. IsHealing:=false
  17. loop
  18. {
  19.     ToolTip, Solo Healing is %Toggle% l healing now %IsHealing%, 0, 0
  20.     If not Toggle
  21.         break
  22.     if WinActive("Dragon Crusade - Connected To Queenk") {
  23.         PixelGetColor, mouseColor, 211, 65 ;124, 669
  24.         Red:="0x" SubStr(mouseColor,7,2)
  25.         Red:=Red+0
  26.         if (Red < 142) {
  27.             ControlSend,, {F1},Dragon Crusade - Connected To QueenSa
  28.             IsHealing:=true
  29.         } else {
  30.             Sleep, 50
  31.             IsHealing:=false
  32.         }
  33.     }
  34.     ToolTip
  35. }
  36. return
  37.  
  38. ;MULTI HEAL MODE
  39. +Home::
  40. Toggle := !Toggle
  41. ToolTip, Multi Healing is %Toggle%, 0, 0
  42. loop
  43. {
  44.     If not Toggle
  45.         break
  46.     if WinActive("Dragon Crusade - Connected To Queenk") {
  47.         NumberInParty := 4
  48.         PixelGetColor, mouseColor, 127, % (NumberInParty-1)*34+510 ;start: 127, 510
  49.         Red:="0x" SubStr(mouseColor,7,2)
  50.         Red:=Red+0
  51.         if (Red > 243) {
  52.             ControlSend,, {F1},Dragon Crusade - Connected To QueenSa
  53.         } else {
  54.             Sleep, 50
  55.         }
  56.     }
  57. }
  58. return
  59.  
  60. Home::
  61. Toggle := false
  62. ToolTip
  63. return
RAW Paste Data