335战斗贼优化输出

15wow

本人对贼不太精通，会玩的可以自行再度优化！~

1. if UnitIsDeadOrGhost("player") then BeeRun("/目标 灵魂医者");RepopMe()RetrieveCorpse()AcceptResurrect()AcceptXPLoss()return;end
   
2. if IsSpellInRange("刺骨")~=1 and BeeUnitCanAttack("target")==1 then ClearTarget()end
   
3. BeeRun("/targetenemy [noharm][dead]")
   
4. BeeRun("/startattack")
   
5. ----------------------------------------------全局变量----------------------------------------
   
6. local a = "target"
   
7. local b = "player"
   
8. local Tbl = BeeUnitBuffList(a)
   
9. local buff = BeeUnitBuffList(b)
   
10. local d = (IsShiftKeyDown() or IsAltKeyDown() or IsControlKeyDown())
    
11. local jineng= "灼热烈焰,低沉咆哮,暗影烈焰,沉默,恢复,治疗结界,强效治疗结界,野性回复,恐吓尖啸,双生相协,女王之吻,治疗之环,卡兹洛加印记,地狱火,死亡凋零,暗影新星,睡眠术,低沉咆哮,暴风雪,火焰之雨,圣光术,恐惧术,生命吸取,恐惧,快速治疗,强效治疗术,治疗之触,愈合,地狱烈焰,飓风,滋养,次级治疗波,苦修,变形术,烈焰风暴"--------此为需要打断的技能
    
12. local i = BeeStringFind(jineng,BeeUnitCastSpellName(a))
    
13. local time , Castingtime= BeeUnitCastSpellTime(a)
    
14. local t = "致盲,凿击,昏迷,变形术,闷棍,致盲,圣盾术,保护之手"-----此为判定目标身上BUFF停手
    
15. local joylau = "寒冰之握,寒冰陷阱,邪恶毒气,烈焰波,低沉咆哮,上古绝望,恐慌,恐吓咆哮,蛛网喷射,蛛网爆炸,困惑,死亡缠绕,恐惧,心灵尖啸,昏迷,肾击,震荡射击,陷地,制裁之锤,深度冻结,突袭,暗影之怒,冲击波,胁迫,挤压,战争践踏,火焰冲撞,震荡波,震荡猛击,疲劳诅咒,冰冻陷阱,冰霜陷阱,冰霜新星,地缚术,断筋,蛛网,残废术,寒冰屏障,减速"---解控
    
16. local c = "猛踢,假死,机械路霸,X-53型观光火箭,奥的灰烬,点心,进食,喝水"-----坐骑和自身有BUFF停手
    
17. local f = UnitCreatureType(a)
    
18. local e = BeeStringFind(f,"亡灵,恶魔,人型生物")
    
19. local n = "多彩混乱"--宁神
    
20. local j = "钓鱼,学习,乱射,暴风雪,炉石,潜行,偷窃,开启,打开,开锁,枯萎凋零,凛风冲击,寒冬号角"-----读条停手
    
21. local h = BeeUnitCastSpellName(b)==j
    
22. local g = UnitExists(a)==1 and not UnitIsDeadOrGhost(a) ------------单位存在且不是尸体
    
23. 
    
24. ------------------------------------------------脚本正文-----------------------------------
    
25. --运行前提
    
26. if BeeStringFind(t,Tbl) or BeeStringFind(c,buff) or h then
    
27.     return
    
28. end
    
29. 
    
30. --打断
    
31. if i and Castingtime - time >1 and time >1 then
    
32.     if BeeIsRun("/cast 脚踢",a) and BeeSpellCD("脚踢")==0 and IsSpellInRange("脚踢",a)==1 then
    
33.         BeeRun("脚踢",a)
    
34.         return
    
35.     end
    
36.     if BeeIsRun("/cast 致盲",a) and BeeSpellCD("致盲")==0 and IsSpellInRange("致盲",a)==1 and BeeSpellCD("脚踢")>0 then
    
37.         BeeRun("致盲",a)
    
38.         return
    
39.     end
    
40. end
    
41. 
    
42. --潜行
    
43. --if not BeeUnitAffectingCombat(b) and not BeeStringFind("潜行",buff) and BeeIsRun("/cast 潜行") and BeeSpellCD("潜行")==0 then BeeRun("潜行")return;end
    
44. 
    
45. --解控
    
46. if BeeStringFind(joylau,buff) then
    
47.     if BeeIsRun("/cast 自利") and BeeSpellCD("自利")==0 then
    
48.         BeeRun("自利")
    
49.         return
    
50.     end
    
51.     if BeeIsRun("/cast 疾跑") and BeeSpellCD("疾跑")==0 and BeeSpellCD("自利")>1 then
    
52.         BeeRun("疾跑")
    
53.         return
    
54.     end
    
55. end
    
56. 
    
57. --保命加血
    
58. if BeeUnitAffectingCombat(b) then
    
59.     if BeeUnitHealth(b,"%")<=50 and BeeIsRun("/cast 闪避") and BeeSpellCD("闪避")==0 then
    
60.         BeeRun("闪避")
    
61.         return
    
62.     end
    
63. end
    
64. 
    
65. --爆发菊花茶
    
66. if BeeUnitAffectingCombat(a) and IsSpellInRange("影袭")==1 and UnitHealthMax(a)>50000 and BeeUnitHealth(a,"%")<=90 then
    
67.     if BeeIsRun("/cast 冲动") and BeeSpellCD("冲动")==0 then
    
68.         BeeRun("冲动")
    
69.     end
    
70.     if BeeIsRun("/cast 冷血") and BeeStringFind("冲动",buff) and BeeSpellCD("冷血")==0 then
    
71.         BeeRun("冷血")
    
72.     end
    
73.     if BeeIsRun("/cast 剑刃乱舞") and BeeStringFind("冲动",buff) and BeeSpellCD("剑刃乱舞")==0 then
    
74.         BeeRun("剑刃乱舞")
    
75.     end
    
76.     if BeePlayerBuffTime("冲动")<3 and BeeUnitMana(b)<=20 and BeeIsRun("/use 菊花茶") and GetItemCooldown("菊花茶")==0 then
    
77.         BeeRun("/use 菊花茶")
    
78.     end
    
79. end
    
80. 
    
81. --Ctrl闷棍
    
82. if g and not BeeUnitAffectingCombat(a) and BeeStringFind("潜行",buff) and IsControlKeyDown() and IsSpellInRange("闷棍")==1 and BeeIsRun("/cast 闷棍",a) and BeeUnitMana(b)>=65 and BeeSpellCD("闷棍")==0 and e then
    
83.     BeeRun("闷棍",a)
    
84.     return
    
85. end
    
86. 
    
87. --Shift刀扇
    
88. if IsShiftKeyDown() and BeeUnitMana(b)>=50 and BeeIsRun("/cast 刀扇") then BeeRun("刀扇")return;end
    
89. 
    
90. --Ctrl消失
    
91. if IsControlKeyDown() and BeeSpellCD("潜行")==0 and BeeIsRun("/cast 潜行") then BeeRun("潜行")return;end
    
92. 
    
93. --ALT缴械
    
94. if g and BeeUnitAffectingCombat(a) and IsAltKeyDown() and IsSpellInRange("拆卸")==1 and BeeIsRun("/cast 拆卸",a) and BeeSpellCD("拆卸")==0 and BeeUnitMana(b)>=25 and e then
    
95.     BeeRun("拆卸",a)
    
96.     return
    
97. end
    
98. 
    
99. 
    
100. ---自动偷袭
     
101. if g and BeeIsRun("/cast 偷袭",a) and BeeSpellCD("偷袭")==0 and BeeUnitCanAttack and IsSpellInRange("偷袭")==1 and BeeStringFind("潜行",buff) and BeeUnitMana(b)>=60 and not e then
     
102.     BeeRun("/cast 偷袭\n/cast 背刺",a)
     
103.     return
     
104. end
     
105. 
     
106. --偷窃
     
107. if g and BeeIsRun("/cast 偷窃",a) and BeeSpellCD("偷窃")==0 and e and BeeUnitCanAttack and IsSpellInRange("偷窃")==1 and BeeStringFind("潜行",buff) and not BeeUnitAffectingCombat(a) then
     
108.     BeeRun("偷窃")
     
109.     BeeUnitCastSpellDelay("偷窃",3,a)
     
110.     return
     
111. end
     
112. 
     
113. 
     
114. 
     
115. --起手
     
116. if g and BeeUnitCanAttack(a) and IsSpellInRange("伏击")==1 and BeeIsRun("/cast 伏击",a) and BeeUnitMana(b)>=60 and BeeStringFind("潜行",buff) then
     
117.     if UnitHealthMax(a)<50000 then
     
118.         BeeRun("/cast 伏击\n/cast 背刺",a) ---小怪
     
119.     end
     
120.     if UnitHealthMax(a)>50000 then
     
121.         if BeeIsRun("/cast 锁喉",a) and BeeUnitMana(b)>=50 and BeeSpellCD("锁喉")==0 then
     
122.             BeeRun("/cast 锁喉\n/cast 背刺",a)
     
123.             return
     
124.         end
     
125.     end
     
126. end
     
127. 
     
128. --还击
     
129. if g and IsSpellInRange("还击")==1 and BeeIsRun("/cast 还击",a) and BeeSpellCD("还击")==0 and BeeUnitMana(b)>=10 and not BeeStringFind("还击",Tbl) then
     
130.     BeeRun("还击",a)
     
131. end
     
132. 
     
133. --输出循环
     
134. if g and BeeUnitAffectingCombat(a) and IsSpellInRange("影袭")==1 then
     
135.     -----------小怪
     
136.     if UnitHealthMax(a)<=50000 then
     
137.         if BeePlayerBuffTime("切割")<=3 and BeeIsRun("/cast 切割",a) and BeeGetComboPoints()==2 and BeeUnitMana(b)>=25 and BeeSpellCD("切割")==0 then
     
138.             BeeRun("切割",a)
     
139.         end
     
140.         if BeeIsRun("/cast 影袭",a) and BeeGetComboPoints()<3 and BeeUnitMana(b)>=45 and BeeSpellCD("影袭")==0 then
     
141.             BeeRun("影袭",a)
     
142.             BeeUnitCastSpellDelay("影袭",1,a)
     
143.         end
     
144.         if BeeGetComboPoints()>=3 and BeeStringFind("切割",buff) and BeeUnitMana(b)>=35 and BeeIsRun("/cast 刺骨") and BeeSpellCD("刺骨")==0 then
     
145.             BeeRun("刺骨",a)
     
146.         end
     
147.     end
     
148.     --------BOSS
     
149.     if UnitHealthMax(a)>=50000 then
     
150.         if BeePlayerBuffTime("切割")<=3 and BeeIsRun("/cast 切割",a) and BeeGetComboPoints()==5 and BeeUnitMana(b)>=25 and BeeSpellCD("切割")==0 then
     
151.             BeeRun("切割",a)
     
152.         end
     
153.         if BeeGetComboPoints()<5 and BeeUnitMana(b)>=45 and BeeIsRun("/cast 影袭",a) and BeeSpellCD("影袭")==0 then
     
154.             BeeRun("影袭",a)
     
155.             BeeUnitCastSpellDelay("影袭",1,a)
     
156.         end
     
157.         if BeeTargetDeBuffTime("破甲")<=3 and BeePlayerBuffTime("切割")>3 and BeeGetComboPoints()==5 and BeeUnitMana(b)>=15 and BeeIsRun("/cast 破甲",a) and BeeSpellCD("破甲")==0 then
     
158.             BeeRun("破甲",a)
     
159.         end
     
160.         if BeeTargetDeBuffTime("破甲")>=3 and BeePlayerBuffTime("切割")>3 and BeeTargetDeBuffTime("割裂")<=3 and BeeGetComboPoints()==5 and BeeUnitMana(b)>=25 and BeeIsRun("/cast 割裂",a) and BeeSpellCD("割裂")==0 then
     
161.             BeeRun("割裂",a)
     
162.         end
     
163.         if BeeTargetDeBuffTime("破甲")>=3 and BeePlayerBuffTime("切割")>3 and BeeTargetDeBuffTime("割裂")>=3 and BeeGetComboPoints()==5 and BeeUnitMana(b)>=35 and BeeIsRun("/cast 刺骨",a) and BeeSpellCD("刺骨")==0 then
     
164.             BeeRun("刺骨",a)
     
165.         end
     
166.     end
     
167. end
     

复制代码