Advertisement
Guest User

Untitled

a guest
Aug 23rd, 2019
85
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.73 KB | None | 0 0
  1. ClearFishes() {
  2. Loop, 5 {
  3. fishLBS_%A_Index% := 0
  4. fishName_%A_Index% := "empty"
  5. }
  6. return
  7. }
  8. SyncFishes() {
  9. SendChat("/cooked")
  10. sleep 200
  11. index := 5
  12. Loop, 5 {
  13. GetChatLine(A_Index,chat)
  14. if(InStr(chat,"**") && InStr(chat,"LBS") && InStr(chat,"Hergestellt")) {
  15. RegExMatch(chat,"Hergestellt: (.*) (.*) LBS",reg)
  16. StringTrimLeft, reg2, reg2, 1
  17. fishLBS_%index% := reg2
  18. fishName_%index% := reg1
  19. index -= 1
  20. }
  21. }
  22. Loop, 5 {
  23. LBS := fishLBS_%A_Index%
  24. name := fishName_%A_Index%
  25. AddChatMessage("{" ChatFarbe "}" ChatVar " {FFFFFF}: Fisch " . A_Index . " = " . name . " " . LBS . "")
  26. }
  27. AddChatMessage("{" ChatFarbe "}" ChatVar " {FFFFFF}: Fische synchronisiert.")
  28. return
  29. }
  30. ~!1::
  31. ClearFishes()
  32. SyncFishes()
  33. return
  34. ~!2::
  35. Loop, 5 {
  36. LBS := fishLBS_%A_Index%
  37. AddChatMessage("{" ChatFarbe "}" ChatVar " {FFFFFF}: Fisch " . A_Index . " - " . LBS . "")
  38. }
  39. return
  40. ~!x::
  41. if (autoHeal) {
  42. addChatMessage(" {" ChatFarbe "}" ChatVar " {FFFFFF}: Automatisches Heilen deaktiviert.")
  43. SetTimer, healTimer, off
  44. SendInput ^a{delete}{enter}
  45. }
  46. else {
  47. paket := 1
  48. canConsumeDrugs := 0
  49. ClearFishes()
  50. SyncFishes()
  51. addChatMessage(" {" ChatFarbe "}" ChatVar " {FFFFFF}: Automatisches Heilen aktiviert.")
  52. SetTimer, healTimer, 500
  53. }
  54. autoHeal := !autoHeal
  55. return
  56. healTimer:
  57. if(getPlayerHealth() == 0) {
  58. SetTimer, healTimer, off
  59. autoHeal := 0
  60. addChatMessage(" {" ChatFarbe "}" ChatVar " {FFFFFF}: Automatisches Heilen deaktiviert.")
  61. return
  62. }
  63. Loop, 5 {
  64. LBS := fishLBS_%A_Index%
  65. check := getPlayerHealth()
  66. check += Round(LBS / 3)
  67. if(check <= 90 && LBS != 0) {
  68. SendChat("/eat " . A_Index . "")
  69. fishLBS_%A_Index% := 0
  70. return
  71. }
  72. }
  73. if(getPlayerHealth() <= 50.0) {
  74. if(paket) {
  75. SendChat("/erstehilfe")
  76. paket := 0
  77. DestroyAllVisual()
  78. Reload
  79. return
  80. }
  81. }
  82. return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement