Guest User

Untitled

a guest
Aug 18th, 2019
71
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. ColorIs:=0
  18. loop
  19. {
  20.     ToolTip, Solo Healing is %Toggle% l healing now %IsHealing% l color is %ColorIs%, 0, 0
  21.     If not Toggle
  22.         break
  23.     if WinActive("Dragon Crusade - Connected To Queenk") {
  24.         PixelGetColor, mouseColor, 211, 65 ;124, 669
  25.         Red:="0x" SubStr(mouseColor,7,2)
  26.         Red:=Red+0
  27.         ColorIs:=Red
  28.         if (Red < 142) {
  29.             ControlSend,, {F1},Dragon Crusade - Connected To QueenSa
  30.             IsHealing:=true
  31.         } else {
  32.             Sleep, 50
  33.             IsHealing:=false
  34.         }
  35.     }
  36.     ToolTip
  37. }
  38. return
  39.  
  40. ;MULTI HEAL MODE
  41. +Home::
  42. Toggle := !Toggle
  43. ToolTip, Multi Healing is %Toggle%, 0, 0
  44. loop
  45. {
  46.     If not Toggle
  47.         break
  48.     if WinActive("Dragon Crusade - Connected To Queenk") {
  49.         NumberInParty := 4
  50.         PixelGetColor, mouseColor, 127, % (NumberInParty-1)*34+510 ;start: 127, 510
  51.         Red:="0x" SubStr(mouseColor,7,2)
  52.         Red:=Red+0
  53.         if (Red > 243) {
  54.             ControlSend,, {F1},Dragon Crusade - Connected To QueenSa
  55.         } else {
  56.             Sleep, 50
  57.         }
  58.     }
  59. }
  60. return
  61.  
  62. Home::
  63. Toggle := false
  64. ToolTip
  65. return
RAW Paste Data