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

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

以下脚本放在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 清除[<$STR(s1)>]玩家身上佩带的物品[<$GLOBAL(Z11)>]成功...
goto @main
break
#ELSEACT
SENDMSG 7 玩家<$STR(s1)>当前不在线...
break

[@交易玩家东西]
#ACT
queryvalue 请输入你想给玩家的[装备名字] 2 20 411
break

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

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

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

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

[@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


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

以下脚本放在QManage.txt里

[@拿走物品]
#ACT
take $GLOBAL(Z11) 1
takew $GLOBAL(Z11) 1
messagebox 你的物品:<$GLOBAL(Z11)>　已经被[系统]强制收取
SENDMSG 7 你的物品:<$GLOBAL(Z11)>　已经被[系统]强制收取
SENDMSG 7 你的物品:<$GLOBAL(Z11)>　已经被[系统]强制收取
break
[@给与物品]
#ACT
give $GLOBAL(Z12) $GLOBAL(Z13)
SENDMSG 7 收到来自[系统]发送的物品17ut.net:<$GLOBAL(Z12)>　数量:<$GLOBAL(Z13)>个
messagebox 收到来自[系统]发送的物品:<$GLOBAL(Z12)>　数量:<$GLOBAL(Z13)>个
break

w123654

6666666666666666666666666

liuyuan8763899

6666666666666666666666666666666

大蛇丸

我看不错噢 谢谢楼主！！

vast0516

我看不错噢 谢谢楼主！奇速论坛越来越好！

深海pc

不知道可以不使用，试用试试！

传奇单机单机

这东西我收了！谢谢楼主！奇速论坛真好！

张杏根

我每天看版本无数,
基本上不回贴。
后来发现这样很傻,
很多比我注册晚的人帮币都比我多,
于是我就把这段文字保存在记事本里,
每看一个好的版本就发一次。
希望大家都发好版本！谢谢 ！

3480419

楼主发贴辛苦了，谢谢楼主分享！我觉得奇速论坛是注册对了！

cbynkje1

楼主发贴辛苦了，谢谢楼主分享！我觉得奇速论坛是注册对了！