全自动砸罐宏改进版 解决对话框的问题

xiaoqiang1949 同学的宏很好用。只是剑3是一个很卡的游戏。

于是有时间一卡对话框就点不掉。与是我加了一个事件。来点对话框

使用：

1.小银锤子放到背包第1行第2格。

2.打开宏

3.站罐子堆里。

4.自动砸

5.分差不多了 把小金垂 扔第1行第2格 就是了。

PS：如果你不喜欢自动砸请用第2个宏。他只管选罐子 和点对话框。你只需要把锤子扔技能栏。按就是了。适合喜欢控制分的童鞋！

宏1：自带砸

/script btgOn = btgOn or false
tgRegok =tgRegok or false
if not btgOn then
Output("开启")
btgOn = true
else
Output("关闭")
btgOn = false
end
if not tgRegok then
RegisterEvent("NPC_ENTER_SCENE", function()
if btgOn then
tgRegok = true
if GetNpc(arg0).szName == "年兽陶罐" and GetCharacterDistance(GetClientPlayer().dwID,arg0) / 64 <= 4 then
SetTarget(3,arg0)
OnUseItem(1,1)
end
cmbc()
end
end)
RegisterEvent("RENDER_FRAME_UPDATE",function() if btgOn then         if GetLogicFrameCount() % 2 == 0 then cmbc() end end end)
end
function cmbc()
local frame = Station.Lookup("Topmost/MB_PlayerMessageBoxCommon")
if frame then
local btn = frame:Lookup("Wnd_All/Btn_Option1")
if btn and btn:IsEnabled() then
btn.fnAction(1)
CloseMessageBox('PlayerMessageBoxCommon')
end
end
end

宏2.只管点对话框和选罐子

/script btgOn = btgOn or false
tgRegok =tgRegok or false
if not btgOn then
Output("开启")
btgOn = true
else
Output("关闭")
btgOn = false
end
if not tgRegok then
RegisterEvent("NPC_ENTER_SCENE", function()
if btgOn then
tgRegok = true
if GetNpc(arg0).szName == "年兽陶罐" and GetCharacterDistance(GetClientPlayer().dwID,arg0) / 64 <= 4 then
SetTarget(3,arg0)
end
end
end)
RegisterEvent("RENDER_FRAME_UPDATE",function() if btgOn then         if GetLogicFrameCount() % 2 == 0 then cmbc() end end end)
end
function cmbc()
local frame = Station.Lookup("Topmost/MB_PlayerMessageBoxCommon")
if frame then
local btn = frame:Lookup("Wnd_All/Btn_Option1")
if btn and btn:IsEnabled() then
btn.fnAction(1)
CloseMessageBox('PlayerMessageBoxCommon')
end
end
end