私服一条龙实现GM在线给玩家装备和取走玩家狂雷装备的脚本

以下脚本放在处理变量

VARStringGLOBALZ11
VARStringGLOBALZ12
VARStringGLOBALZ13
VARStringGLOBALZ14
LOADVARGLOBALZ11..\QuestDiary\数据文件\zsave.txt
LOADVARGLOBALZ12..\QuestDiary\数据文件\zsave.txt
LOADVARGLOBALZ13..\QuestDiary\数据文件\zsave.txt
LOADVARGLOBALZ14..\QuestDiary\数据文件\zsave.txt

=================================

以下脚本放在NPC里面，最好放GM地图NPC里面，防止被非法利用

[@拿走玩家东西]
#ACT
queryvalue清除玩家身上物品：请输入你想清除的玩家名字220629
break

[@getstring629]
#ACT
GetstringS1
goto@清除的1
break

[@清除的1]
#ACT
queryvalue请输入玩家身上装备的名字[必是穿戴在身上的物品]220630
break

[@getstring630]
#ACT
GetstringS2
CALCVARGLOB七彩皓月传奇ALZ11=$STR(S2)
SAVEVARGLOBALZ11..\QuestDiary\数据文件\ZSave.txt
goto@清除的2
break

[@清除的2]
#IF
CHECKONLINE$STR(s1)
#ACT
hcall$STR(S1)@拿传奇1 76补丁走物品
SENDMSG7清除[$STR(s1)]玩家身上佩带的物品[$GLOBAL(Z11)]成功...
goto@main
break
#ELSEACT
SENDMSG7玩家$STR(s1)当前不在线...
break

[@交易玩家东西]
#ACT
q传奇传说ueryvalue请输入你想给玩家的[装备名字]220411
break

[@getstring411]
#ACT
GetstringS1
goto@装备数量1
break

[@装备数量1]
#ACT
queryvalue请输入你想给玩家的[装备数量]220412
break

[@getstring412]
#ACT
GetstringS2
goto@玩家的名字1
break

[@玩家的名字1]
#ACT
queryvalue请输入你想给的玩家的[人物名字]220413
break

[@getstring413]
#ACT
GetstringS3
goto@发送物品1
break

[@发送物品1]
#IF
CHECKONLINE$STR(s3)
#ACT
CALCVARGLOBALZ12=$STR(S1)
CALCVARGLOBALZ13=$STR(S2)
SAVEVARGLOBALZ12..\QuestDiary\数据文件\ZSave.txt
SAVEVARGLOBALZ13..\QuestDiary\数据文件\ZSav仿传奇网页e.txt
hcall$STR(S3)@给与物品
SENDMSG7发送物品成功...
goto@main
break
#ELSEACT
messagebox你所输入的玩家当前不在线\
break


============================

以下脚本放在QManage.txt里

[@拿走物品]
#ACT
take$GLOBAL(Z11)1
takew$GLOBAL(Z11)1
messagebox你的物品:$GLOBAL(Z11)　已经被[系统]强制收取
SENDMSG7你的物品:$GLOBAL(Z11)　已经被[系统]强制收取
SENDMSG7你的物品:$GLOBAL(Z11)　已经被[系统]强制收取
break
[@给与物品]
#ACT
give$GLOBAL(Z12)$GLOBAL(Z13)
SENDMSG7收到来自[系统]发送的物品5uwl.net:$GLOBA传奇私服补丁L(Z12)　数量:$GLOBAL(Z13)个
messagebox收到来自[系统]发送的物品:$GLOBAL(Z12)　数量:$GLOBAL(Z13)个
break