第一步:
在Mir200\Envir\QuestDiary\数据文件中创建两个文件:自动拾取数据.txt ,可叠加物品.txt(如果本来有的话,就看要不要加物品)
然后,用GameLoad DB Manager修改物品:勾上怪物掉落触发!!
第二步:
在随身回收卡或NPC上,添加全屏回收开关
代码:
[@全屏拾取开关]
#IF
CHECK [777] 0
#ACT
MOV S1 <@@!PIC2#323,1201>
#ELSEACT
MOV S1 <@@!PIC2#323,1202>
#IF
TRUE
#SAY
\\\
<全屏拾取/@TIGER开启1><$STR(S1)>\
[@TIGER开启1]
#IF
CHECK [777] 0
#ACT
SET [777] 1
SENDMSG 5 成功开启全屏拾取!
GOTO @全屏拾取开关
BREAK
#ELSEACT
SET [777] 0
SENDMSG 5 成功关闭全屏拾取!
GOTO @全屏拾取开关
BREAK
第三步:
RobotManage文件添加代码:
[@_物品掉落触发]
#IF
$PARAM(7).CHECK [777] 0
#ACT
BREAK
#IF
$PARAM(7).!CHECKBAGSIZE 1
#ACT
BREAK
#IF
CHECKVARLIST $PARAM(5) ..\QUESTDIARY\数据文件\自动拾取数据.TXT
#ACT
$PARAM(7).GIVE $PARAM(5) 1
$PARAM(7).SETPARAM 23 11
$PARAM(7).SETPARAM 24 $PARAM(3)
$PARAM(7).SETPARAM 21 $HUMANINFO[$PARAM(7)].$PARAM(10)
$PARAM(7).SETPARAM 22 $PARAM(5)
$PARAM(7).GOTO @TIGER拾取物品
$PARAM(7).MOV S188 $PARAM(0)
$PARAM(7).DELAYGOTO 50 @TIGER清理
BREAK
[@TIGER清理]
#IF
TRUE
#ACT
CLEARMAPITEM $STR(S188)
MOV S188
BREAK
;-------------------结合每个版本不同的QF里面 [@拾取物品]复制到此标签下
[@TIGER拾取物品]
#IF
SMALL $PARAM(23) 10
#ACT
BREAK
#IF
CHECKVARLIST $PARAM(22) ..\QuestDiary\数据文件\广播物品.txt
#ACT
SENDMSG 1 勇士<%S>在<%M>击杀{<$PARAM(24)>}获得了{<$PARAM(22)>},让我们恭喜他吧!
#IF
CheckVarList $PARAM(22) ..\QuestDiary\数据文件\可叠加物品.txt
#ACT
MOV S1 $PARAM(22)
TAKE $STR(S1) 9999
MOV P15 $PARAM(12)
GIVE $STR(S1) $STR(P15)
写到这里就可以实现功能了,要完美点的,在登陆脚本加入
#IF
TRUE
#ACT
SET [777] 0