RWind = Plugin.Window.Find("KGWin32App", "剑侠情缘网络版叁")
MessageBox(RWind)
UserVar GCD=DropList{"存在":"1500"|"不存在":"0"}=0 "判断技能公共CD是否存在"
UserVar KillsNumber=2 "技能使用次数设定"
UserVar KillsCDTime=0 "技能释放调息时间,(按照游戏设定设置)"
KillsCDTime=KillsCDTime+500
KillsNumber = KillsNumber - 1
NumberX = KillsNumber
If KetBorder = "" Then
MessageBox "因总裁提示您:请点击确定后,设定一个技能输出键(不可为组合键!)"
KeyBorder = WaitKey()
String1 = "因总裁提示您:已获得技能输出键位信息。您设定了:"
String4="键,为技能释放键。点击确定后即将开始!"
String3=chr(KeyBorder)
MessageBox String1 & String3 & String4
Call Plugin.Window.Active(RWind)
End If
For (KillsNumber)
Delay (GCD)
Delay (KillsCDTime)
SetSimMode 2
KeyPress (KeyBorder), 1
NumberX = NumberX - 1
If NumberX=0 Then
NumberZ=NumberX*0
End If
Next
If (NumberZ) = 0 Then
Delay (GCD)
Delay (KillsCDTime)
SetSimMode 2
KeyPress (KeyBorder), 1
String2="因总裁提示您:技能已完成训练,请查看!谢谢您的使用再见!"
MessageBox String2
EndScript
End If