采用了怪物掉落自动拾取判断
原则上还是拾取判断,但是是系统拾取,非手动拾取。还是有区别的
手动拾取无效,怪物死亡掉落符合物品进入背包,同时触发首爆
前提背包是有空余格子的
--怪死亡爆物品时,启用直接进玩家包前回调(返回值决定是否物品直接进包裹)
--actor:死亡对像 killActor:击杀者对像 item:物品对像
function On_GetShowitem(actor, killActor, item)
local actorname = actor:getCharName()
local itemName = item:getName()--名称
local killname = killActor:getCharName()
if s.share.checkListText("..\\Envir\\QuestDiary\\华联数据\\首爆物品.txt",itemName) == 1 then
s.share.delTextList("..\\Envir\\QuestDiary\\华联数据\\首爆物品.txt",itemName, 0)
killActor:setVal_S(5, ""..itemName.."")
killActor:runScript("@首爆")
print(killname.."杀死["..actorname.."]死亡爆出物品["..itemName.."]直接进玩家包前回调")
return true
end
return false
end
QF脚本
[@首爆]
#if
CHECKCONTAINSTEXTLIST <$STR(S5)> ..\QuestDiary\华联数据\装备首爆\掉落判断.txt
CheckTextList <$STR(S5)> ..\QuestDiary\华联数据\装备首爆\装备.txt 0 N0
#act
MOV S43 <$STR(S5)>
GetRandomName ..\QuestDiary\华联数据\装备首爆\元宝.txt S11 <$STR(N0)>
GetRandomName ..\QuestDiary\华联数据\装备首爆\积分.txt S12 <$STR(N0)>
DelTextList <$STR(S43)> ..\QuestDiary\华联数据\装备首爆\掉落判断.txt
AddTextListEX <$MAPNAME> ..\QuestDiary\华联数据\装备首爆\地图.txt <$STR(N0)> 0
AddTextListEX <$DATE><$TIME> ..\QuestDiary\华联数据\装备首爆\时间.txt <$STR(N0)> 0
AddTextListEX <$USERNAME> ..\QuestDiary\华联数据\装备首爆\人物.txt <$STR(N0)> 0
AddTextListEX 剩余数量:0 ..\QuestDiary\华联数据\装备首爆\数量.txt <$STR(N0)> 0
DelTextList 暂无 ..\QuestDiary\华联数据\装备首爆\地图.txt 0 <$STR(N0)>
DelTextList 暂无 ..\QuestDiary\华联数据\装备首爆\时间.txt 0 <$STR(N0)>
DelTextList 暂无 ..\QuestDiary\华联数据\装备首爆\人物.txt 0 <$STR(N0)>
DelTextList 剩余数量:1 ..\QuestDiary\华联数据\装备首爆\数量.txt 0 <$STR(N0)>
GAMEGOLD + <$str(S11)>
GAMEGIRD + <$str(S12)>
SendCenterMsg 251 249 物品:<$STR(S43)>首次在地图[<$MAPNAME>]被[<$USERNAME>]获得首爆奖励 1 10 1
BREAK
不想购买的,复制上面的也可以完成!
卖个100金币 合理吧
补充内容 (2021-1-29 11:37):
2楼放出图片!! |