实现GM在线给玩家装备和取走玩家装备的脚本

admin

以下脚本放在处理变量
VAR String GLOBAL Z11
VAR String GLOBAL Z12
VAR String GLOBAL Z13
VAR String GLOBAL Z14
LOADVAR GLOBAL Z11 ..QuestDiary数据文件zsave.txt
LOADVAR GLOBAL Z12 ..QuestDiary数据文件zsave.txt
LOADVAR GLOBAL Z13 ..QuestDiary数据文件zsave.txt
LOADVAR GLOBAL Z14 ..QuestDiary数据文件zsave.txt  内容来自dedecms

=================================  织梦好，好织梦

以下脚本放在NPC里面，最好放GM地图NPC里面，防止被非法利用  织梦好，好织梦
[@拿走玩家东西]
#ACT
queryvalue 清除玩家身上物品：请输入你想清除的玩家名字 2 20 629
break  本文来自织梦
[@getstring629]
#ACT
Getstring S1
goto @清除的1
break  织梦内容管理系统
[@清除的1]
#ACT
queryvalue 请输入玩家身上装备的名字[必是穿戴在身上的物品] 2 20 630
break  本文来自织梦

[@getstring630]
#ACT
Getstring S2
CALCVAR GLOBAL Z11 = $STR(S2)
SAVEVAR GLOBAL Z11 ..QuestDiary数据文件ZSave.txt
goto @清除的2
break  本文来自织梦

[@清除的2]
#IF
CHECKONLINE $STR(s1)
#ACT
hcall $STR(S1) @拿走物品
SENDMSG 7 清除[]玩家身上佩带的物品[]成功...
goto @main
break
#ELSEACT
SENDMSG 7 玩家当前不在线...
break  内容来自dedecms
[@交易玩家东西]
#ACT
queryvalue 请输入你想给玩家的[装备名字] 2 20 411
break  dedecms.com

[@getstring411]
#ACT
Getstring S1
goto @装备数量1
break  本文来自织梦

[@装备数量1]
#ACT
queryvalue 请输入你想给玩家的[装备数量] 2 20 412
break  内容来自dedecms

[@getstring412]
#ACT
Getstring S2
goto @玩家的名字1
break  内容来自dedecms

[@玩家的名字1]
#ACT
queryvalue 请输入你想给的玩家的[人物名字] 2 20 413
break  内容来自dedecms
[@getstring413]
#ACT
Getstring S3
goto @发送物品1
break  织梦好，好织梦

[@发送物品1]
#IF
CHECKONLINE $STR(s3)
#ACT
CALCVAR GLOBAL Z12 = $STR(S1)
CALCVAR GLOBAL Z13 = $STR(S2)
SAVEVAR GLOBAL Z12 ..QuestDiary数据文件ZSave.txt
SAVEVAR GLOBAL Z13 ..QuestDiary数据文件ZSave.txt
hcall $STR(S3) @给与物品
SENDMSG 7 发送物品成功...
goto @main
break
#ELSEACT
messagebox 你所输入的玩家当前不在线
break  dedecms.com


============================  copyright dedecms
以下脚本放在QManage.txt里  织梦内容管理系统
[@拿走物品]
#ACT
take $GLOBAL(Z11) 1
takew $GLOBAL(Z11) 1
messagebox 你的物品:　已经被[系统]强制收取
SENDMSG 7 你的物品:　已经被[系统]强制收取
SENDMSG 7 你的物品:　已经被[系统]强制收取
break
[@给与物品]
#ACT
give $GLOBAL(Z12) $GLOBAL(Z13)
SENDMSG 7 收到来自[系统]发送的物品:　数量:个
messagebox 收到来自[系统]发送的物品:　数量:个
break 织梦好，好织梦