立即注册

Zenity Fargo

查看: 1221|回复: 0

Mangos server scripts and macro

[复制链接]

89

主题

186

帖子

1145

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1145
发表于 2020-6-13 11:53:00 | 显示全部楼层 |阅读模式
  1. local _,Name = BeeGetShapeshiftId();
  2. local tlzd = BeeUnitBuffList("player");
  3. local tbl = BeeUnitBuffList("target");
  4. local ttbl = BeeUnitBuffList("targettarget");
  5. local yhs = 1; -- 月火
  6. local luaunlock = 0;
  7. local autoshift=1;
  8. local qsmouse=1;
  9. local shroom=0;
  10. local manapotion = 0; --1: 神效法力,  2:炼金师回春
  11. local ningjing = BeeStringFind("宁静", BeeUnitCastSpellName("player"));
  12. local GCD=GetSpellCooldown("治疗之触");
  13. local InRangeT = IsSpellInRange("愤怒","target");
  14. local grouptype="party";
  15. if GetNumRaidMembers()>0 then
  16.     grouptype="raid"
  17. end
  18. if GetNumPartyMembers()>0 and not GetNumRaidMembers() then
  19.     grouptype="party"
  20. end
  21. local MeleeRange;
  22. if IsSpellInRange("裂伤","target")==nil or IsSpellInRange("裂伤","target")==0 then
  23.     MeleeRange = false
  24. elseif  IsSpellInRange("裂伤","target")==1 then
  25.     MeleeRange = true
  26. end
  27. local ActionRange
  28. if CheckInteractDistance("target", 3)==nil or CheckInteractDistance("target", 3)==0 then
  29.     ActionRange = false
  30. elseif  CheckInteractDistance("target", 3)==1 then
  31.     ActionRange = true
  32. end

  33. ---manual cast
  34. if BeeCastSpellFast() then
  35.     return true;
  36. end
  37. --Must Dispell
  38. if not Name and not IsStealthed() and BeeStringFind("精灵之火,精灵虫群,虚空风暴,炎爆术,活体炸弹,瘫痪药膏,减速药膏,燃烧,猎人印记,寒冰炸弹,元素诅咒",tlzd) and BeeIsRun("自然之愈","player") and not UnitChannelInfo("player") and GCD==0 then
  39.     BeeRun("自然之愈","player");
  40.     return;
  41. end

  42. --Powershift
  43. if Name and BeeStringFind("冰霜新星,冰冻术,冰冻,震荡射击,冻疮,断筋,寒冰锁链,寒冰陷阱,险境求生,霜火之箭,寒冰箭,刺耳怒吼,枯萎凋零,冰锥术,罪状负担,感染伤口,蛛网,寒冰结界,迟滞,纠缠根须,陷地,减速药膏,精神鞭挞,冰霜吐息,公正圣印,台风,诱捕,寒冰宝珠,群体缠绕,冰霜震击",tlzd) then  BeeRun("Powershift");
  44.     return;
  45. end
  46. if not Name and not UnitChannelInfo("player") and not BeeUnitCastSpellName("player") and BeeStringFind("冰霜新星,冰冻术,断筋,寒冰锁链,险境求生,刺耳怒吼,冰锥术,蛛网,寒冰结界,迟滞,纠缠根须,陷地,冰霜吐息,诱捕,群体缠绕",tlzd) and BeeIsRun("猎豹形态","nogoal") then
  47.     BeeRun("猎豹形态","nogoal")
  48.     return;
  49. end

  50. if SpellIsTargeting() and luaunlock==1 then  
  51.     CameraOrSelectOrMoveStart()  
  52.     CameraOrSelectOrMoveStop()
  53.     return;
  54. end
  55. if BeeIsRun("法力回复","nogoal") and not name and BeeUnitMana("player","%",0)<70 then
  56.     BeeRun("法力回复","nogoal");
  57. end

  58. --在飞行中,不施法 Feral
  59. if IsMounted("player")==1 or BeeGetShapeshiftFormInfo(2) or SpellIsTargeting() or UnitChannelInfo("player") or BeeUnitCastSpellName("player") or IsStealthed() or UnitInVehicle("player") then
  60.     return;
  61. end

  62. --combat survival
  63. if not Name and not IsStealthed() and BeePlayerBuffTime("反射之盾")<3 and BeeUnitHealth(player,"%")<95 and BeeUnitAffectingCombat() and BeeIsRun("反射之盾","nogoal") and BeeUnitMana("player","%",0)>50 then
  64.     BeeRun("反射之盾","nogoal")
  65.     return;
  66. end
  67. if not Name and not IsStealthed() and BeePlayerBuffTime("圣盾术")<0 and BeeUnitHealth(player,"%")<25 and BeeUnitAffectingCombat() and BeeIsRun("圣盾术","nogoal") then
  68.     BeeRun("圣盾术","nogoal")
  69.     return;
  70. end
  71. if not Name and not IsStealthed() and BeeUnitHealth(player,"%")<95 and BeeUnitAffectingCombat() and BeeIsRun("自然之握","nogoal") and BeeUnitBuff("回春术","player")>1 and GCD==0 then
  72.     BeeRun("自然之握","nogoal")
  73.     return;
  74. end
  75. if not IsStealthed() and BeeGetShapeshiftFormInfo(3)==1 and BeeIsRun("潜行","nogoal") then
  76.     BeeRun("潜行","nogoal");
  77. end
  78. if BeeStringFind("影遁", tlzd) and BeeGetShapeshiftFormInfo(3)==1 and BeeIsRun("潜行","nogoal") then
  79.     BeeRun("潜行","nogoal");end
  80. --buff
  81. if not IsFalling() and BeeIsRun("野性印记","player") and  BeePlayerBuffTime("野性印记")<600 and not Name and GCD==0 or not IsFalling() and not BeeStringFind("野性印记",tlzd) and not Name and GCD==0 then
  82.     BeeRun("野性印记","player")
  83.     return;
  84. end
  85. if not IsFalling() and BeeIsRun("荆棘术","player") and  BeePlayerBuffTime("荆棘术")<60 and not Name and GCD==0 or not IsFalling() and not BeeStringFind("荆棘术",tlzd) and not Name and GCD==0 then
  86.     BeeRun("荆棘术","player")
  87.     return;
  88. end
  89. if BeeRangeR("mouseover")<=30 and not UnitIsDead("mouseover") and BeeIsRun("野性印记","mouseover") and not Name and BeePlayerBuffTime("喝水")<1  and BeeUnitBuff("野性印记","mouseover")<1 and (BeeUnitPlayerControlled("mouseover") or UnitIsUnit("pet","mouseover")==1) and GCD==0 then
  90.     BeeRun("野性印记","mouseover");
  91. end
  92. if BeeRangeR("mouseover")<=30 and not UnitIsDead("mouseover") and BeeIsRun("荆棘术","mouseover") and not Name and BeePlayerBuffTime("喝水")<1  and BeeUnitBuff("荆棘术","mouseover")<1 and (BeeUnitPlayerControlled("mouseover") or UnitIsUnit("pet","mouseover")==1) and GCD==0 then
  93.     BeeRun("荆棘术","mouseover");
  94. end

  95. --autofocus&targetfocus
  96. if BeeUnitAffectingCombat() and (UnitName("focus")==nil or UnitIsDead("focus")) then
  97.     BeeRun("/focus player");
  98. end
  99. if BeeUnitAffectingCombat() and UnitName("target")==nil or UnitIsDead("target") and BeeUnitAffectingCombat() then
  100.     BeeRun("/target focus");
  101. end
  102. if UnitName("focus") and UnitCanAssist("player","focus") and IsSpellInRange("治疗之触","focus")==0 then
  103.     BeeRun("/clearfocus")
  104.     --EuiAlertRun("失去焦点",0.1,1,0.1)
  105.     return;
  106. end
  107. if UnitName("focus") and GetRaidTargetIndex("focustarget")==nil and BeeUnitCanAttack("focustarget") and GetNumPartyMembers() and not GetNumRaidMembers() then
  108.     SetRaidTarget("focustarget", 8)
  109.     return;
  110. end

  111. ---triggers bear
  112. if BeeGetShapeshiftFormInfo(1) and BeeUnitAffectingCombat() and GCD==0 then   
  113.     if  BeeIsRun("重殴") and BeeUnitMana()>30 then
  114.         BeeRun("重殴") ;
  115.         return;
  116.     end   
  117. end

  118. --healer job
  119. if not Name and BeePlayerBuffTime("喝水")<1 and not UnitChannelInfo("player") and GCD==0 then     
  120.     local HC = BeeGroupMinScript('BeeIsRun("回春术",unit) and BeeUnitHealth(unit,"%")<90 and BeeUnitBuff("回春术",unit)<1 and UnitCanAssist("player",unit) and not UnitIsDeadOrGhost(unit) and IsSpellInRange("回春术",unit)',"BeeUnitHealth(unit)",grouptype)
  121.     if HC and BeeIsRun("回春术",HC) then
  122.         BeeRun("回春术",HC);
  123.         return;
  124.     end
  125.     if BeeIsRun("回春术","focus") and BeeUnitBuff("回春术","focus")<1 and BeeUnitHealth("focus","%")<90 and IsSpellInRange("回春术","focus") then
  126.         BeeRun("回春术","focus");
  127.         return;
  128.     end
  129.     if BeeIsRun("回春术","mouseover") and BeeUnitBuff("回春术","mouseover")<1 and BeeUnitHealth("mouseover","%")<80 and IsSpellInRange("回春术","mouseover") then
  130.         BeeRun("回春术","mouseover");
  131.         return;
  132.     end
  133.     local YHP = BeeGroupMinScript('BeeIsRun("愈合",unit) and BeeUnitHealth(unit,"%")<75 and BeeUnitBuff("愈合",unit)<1 and UnitCanAssist("player",unit) and not UnitIsDeadOrGhost(unit) and IsSpellInRange("愈合",unit)',"BeeUnitHealth(unit)",grouptype)
  134.     if YHP and BeeIsRun("愈合",YHP) then
  135.         BeeRun("愈合",YHP);
  136.         return;
  137.     end
  138.     if BeeIsRun("回春术","pet") and BeeUnitBuff("回春术","pet")<1 and BeeUnitHealth("pet","%")<90 and IsSpellInRange("回春术","pet") then
  139.         BeeRun("回春术","pet");
  140.         return;
  141.     end
  142.     if BeeIsRun("回春术","focus") and BeeUnitBuff("反射之盾","focus")<1 and BeeUnitHealth("focus","%")<50 and IsSpellInRange("回春术","focus") and BeeUnitAffectingCombat() then
  143.         BeeRun("focusdef");
  144.         return;
  145.     end
  146.     if BeeIsRun("回春术","pet") and BeeUnitBuff("反射之盾","pet")<1 and BeeUnitHealth("pet","%")<80 and IsSpellInRange("回春术","pet") and BeeUnitAffectingCombat() then
  147.         BeeRun("petdeflect");
  148.         return;
  149.     end
  150.     if BeeIsRun("召唤古雷罗","nogoal") and UnitName("pet")==nil and BeeUnitAffectingCombat() then
  151.         BeeRun("召唤古雷罗","nogoal");
  152.         return;
  153.     end
  154.     if BeeUnitBuffInfo("mouseover",0,"Curse",0)>0 and BeeIsRun("解除诅咒","mouseover") then
  155.         BeeRun("解除诅咒","mouseover");
  156.         return;
  157.     end
  158.     if BeeUnitBuffInfo("mouseover",0,"Poison",0)>0 and BeeIsRun("驱毒术","mouseover") then
  159.         BeeRun("驱毒术","mouseover");
  160.         return;
  161.     end
  162.     if BeeUnitBuffInfo("player",0,"Poison",0)>0 and BeeIsRun("驱毒术","player") then
  163.         BeeRun("驱毒术","player");
  164.         return;
  165.     end
  166.     if BeeIsRun("野性印记","pet") and BeeUnitBuff("野性印记","pet")<1 and IsSpellInRange("野性印记","pet") and not BeeUnitAffectingCombat() then
  167.         BeeRun("野性印记","pet");
  168.         return;
  169.     end
  170.     if BeeIsRun("荆棘术","pet") and BeeUnitBuff("荆棘术","pet")<1 and IsSpellInRange("荆棘术","pet") and not BeeUnitAffectingCombat() then
  171.         BeeRun("荆棘术","pet");
  172.         return;
  173.     end
  174.    
  175.     --offensive
  176.     if BeeIsRun("月火术") and BeeUnitBuff("月火术","target",2)<0 and BeeUnitAffectingCombat() and not BeeStringFind("纠缠根须,法术反射,圣盾术,寒冰屏障,",tbl) and not BeeUnitPlayerControlled() and yhs==1 and InRangeT and not UnitIsDeadOrGhost("target") then
  177.         BeeRun("月火术")
  178.         return;
  179.     end
  180.     if BeeIsRun("愤怒") and BeeUnitAffectingCombat() and not BeeUnitPlayerControlled() and yhs==1 and BeeRangeR() and not BeeStringFind("纠缠根须,法术反射,圣盾术,寒冰屏障,",tbl) and BeeUnitHealth("player","%")>85 and BeeUnitMana()>70 and not UnitIsDeadOrGhost("target") then
  181.         BeeRun("愤怒")
  182.         return;
  183.     end   
  184. end
复制代码
Macros below
  1. ##focusdef
  2. /target focus
  3. .aura 41475
  4. ##petdeflect
  5. /target pet
  6. .aura 41475
  7. ##petmorph
  8. /target pet
  9. .aura 72461
  10. ##buff
  11. //.aura 72461
  12. //.aura 17467
  13. //.aura 68022 holy dmg
  14. .aura 26662
  15. ##demongirl
  16. .cast 38604
  17. ##dmgshield
  18. .aura 25059
  19. ##goname
  20. .goname rosa
  21. ##invincible
  22. .aura 40733
  23. //.aura 50161
  24. //.aura 39872
  25. //.aura 52982
  26. ##mor'ladin
  27. .cast 29066
  28. ##mount
  29. //.aura 32242 //flying graphon
  30. //.aura 23243 //raptor
  31. //.aura 55531 //hog
  32. //.aura 61425 //elephant
  33. ##namego
  34. .namego rosa
  35. ##revive
  36. /gu .revive
  37. ##shield
  38. .aura 41475
  39. ##soulflame
  40. .aura 23272
  41. ##stun
  42. .aura 41592
  43. ##summon
  44. .cast 260
  45. ##uberheal
  46. .cast 1908
  47. ##wolfie
  48. .cast 50736
  49. /target pet
复制代码
  1. ##hoverheal
  2. #showtooltip
  3. /cast [target=mouseover,help,nodead][help][target=player] 回春术
  4. ##powershift
  5. /cast [stance:3] !猎豹形态;
  6. /cast [stance:1] !熊形态;
  7. /cast [stance:4] !旅行形态;
  8. /cast [stance:4] !枭兽形态;
复制代码


回复

使用道具 举报

游客
回复
您需要登录后才可以回帖 登录 | 立即注册

Lust|手机版|小黑屋|Archiver| Zenity Fargo

GMT+8, 2021-12-9 20:32 , Processed in 0.016428 second(s), 18 queries .

Powered by Lust Gang!

© 2019 Innerpeace.

快速回复 返回顶部 返回列表