以下脚本放在处理变量VAR String GLOBAL Z11VAR String GLOBAL Z12VAR String GLOBAL Z13VAR String GLOBAL Z14LOADVAR GLOBAL Z11 ..QuestDiary数据文件zsave.txtLOADVAR GLOBAL Z12 ..QuestDiary数据文件zsave.txtLOADVAR GLOBAL Z13 ..QuestDiary数据文件zsave.txtLOADVAR GLOBAL Z14 ..QuestDiary数据文件zsave.txt=================================以下脚本放在NPC里面，合适放GM地图NPC里面，防止被非法利用[@拿走玩家东西]#ACTqueryvalue 清除玩家身上物品：请输入在你清除的玩家名字 2 20 629break[@getstring629]#ACTGetstring S1goto @清除的1break[@清除的1]#ACTqueryvalue 请输入玩家身上装备的名字[必是穿戴在身上和物品] 2 20 630break[@getstring630]#ACTGetstring S2CALCVAR GLOBAL Z11 = $STR(S2)SAVEVAR GLOBAL Z11 ..QuestDiary数据文件ZSave.txtgoto @清除的2break[@清除的2]#IFCHECKONLINE $STR(s1)#ACThcall $STR(S1) @拿走物品SENDMSG 7 清除[<$STR(s1)>]玩家身上佩带的物品[<$GLOBAL(Z11)>]成功...goto @mainbreak#ELSEACTSENDMSG 7 玩家<$STR(s1)>当前我不在线...break[@交易玩家东西]#ACTqueryvalue 请输入在你给玩家的[装备名字] 2 20 411break[@getstring411]#ACTGetstring S1goto @装备数量1break[@装备数量1]#ACTqueryvalue 请输入在你给玩家的[装备数量] 2 20 412break[@getstring412]#ACTGetstring S2goto @玩家的名字1break[@玩家的名字1]#ACTqueryvalue 请输入在你给的玩家的[人物名字] 2 20 413break[@getstring413]#ACTGetstring S3goto @发送物品1break[@发送物品1]#IFCHECKONLINE $STR(s3)#ACTCALCVAR GLOBAL Z12 = $STR(S1)CALCVAR GLOBAL Z13 = $STR(S2)SAVEVAR GLOBAL Z12 ..QuestDiary数据文件ZSave.txtSAVEVAR GLOBAL Z13 ..QuestDiary数据文件ZSave.txthcall $STR(S3) @予以物品SENDMSG 7 发送物品成功...goto @mainbreak#ELSEACTmessagebox 你所输入的玩家当前我不在线break============================以下脚本放在QManage.txt里[@拿走物品]#ACTtake $GLOBAL(Z11) 1takew $GLOBAL(Z11) 1messagebox 你的物品:<$GLOBAL(Z11)> 已是的被[系统]强制收取SENDMSG 7 你的物品:<$GLOBAL(Z11)> 已是的被[系统]强制收取SENDMSG 7 你的物品:<$GLOBAL(Z11)> 已是的被[系统]强制收取break[@予以物品]#ACTgive $GLOBAL(Z12) $GLOBAL(Z13)SENDMSG 7 收到来自[系统]发送的物品5uwl.net:<$GLOBAL(Z12)> 数量:<$GLOBAL(Z13)>个messagebox 收到来自[系统]发送的物品:<$GLOBAL(Z12)> 数量:<$GLOBAL(Z13)>个break
