可能有人会象我一样，把包里的蓝色鱼直接卖NPC以后才发现，在每周的帮会钓鱼活动开启期间（40Min）上交蓝色鱼类给李霖（钓鱼商）可以换取个人资金和帮会发展点（每交一条给5金和5发展点）。
现在帮会丹房工房任务材料较贵，发展点对小帮会来说比较紧缺。每周上交蓝色鱼类换取发展点每个帮会上限是200条（即1000发展点），手动交200条鱼的话得费些时间。
所以写了这宏与大家分享，愿大家早日开出里飞沙。
宏用途：自动上交背包里的蓝色鱼类。
使用说明：
按一下宏开启，再按一下关闭。
宏开启后，还需手动右击李霖（钓鱼商），每点一次NPC自动交一次。
PS：此宏类似于自动对话插件功能，区别于包里有蓝色鱼时才会自动选相应对话框选项。
/script FSwt=FSwt or false
if FSwt
then
FSwt=false;OutputMessage("MSG_SYS","交鱼-关\n")
else
FSwt=true;OutputMessage("MSG_SYS","交鱼-开\n")
end
local
FNo=0
local P=GetClientPlayer()
local
fList={{"六斤一两的鲤鱼",0},{"四斤二两四钱的草鱼",1},{"四斤一两的鲫鱼",2},{"三十斤九钱的青鱼",3},{"二十斤一两的鲢鱼",4},{"二十八斤八两的鲈鱼",5}}
local
function ff()
for i=1,5 do
for j=0,P.GetBoxSize(i)-1 do
local
itm=P.GetItem(i,j)
if itm and itm.szName then
for l=1,#fList do
if
itm.szName==fList[l][1] then
return
l
end
end
end
end
end
return
0
end
RegisterEvent("OPEN_WINDOW",function()
if FSwt and
(string.find(arg1,"上交以下鱼类")) then
local FNo=ff()
if FNo>0
then
P.WindowSelect(arg0,fList[FNo][2])
OutputMessage("MSG_SYS","[已交]-"..fList[FNo][1].."\n")
else
OutputMessage("MSG_SYS","包里没有蓝色鱼\n")
end
end
end)
RegisterEvent("OPEN_WINDOW",function()
if
FSwt and (string.find(arg1,"我想用鱼换取"))
then
P.WindowSelect(arg0,0)
end
end)
