收藏本站
设为首页
 
您现在的位置: 天马网络 >> 文章 >> 游戏脚本 >> 正文

传奇开区一条龙实现GM在线给玩家装备和取走玩家装备的脚本

作者:admin 来源:本站原创 点击数: 更新时间:2013-4-15 19:21:59
实现GM在线给玩家装备和取走玩家装备的脚本

以下脚本放在处理变量  
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 收到来自[系统]发送的物品5uwl.net:〈$GLOBAL(Z12)〉 数量:〈$GLOBAL(Z13)〉个  
messagebox 收到来自[系统]发送的物品:〈$GLOBAL(Z12)〉 数量:〈$GLOBAL(Z13)〉个  
break

  • 上一篇文章:

  • 下一篇文章: 没有了
  • 站内导航
     
    开区套餐|广告代理|游戏版本|游戏网站|登陆器|游戏引擎|产品定做|服务器|技术文章|GM工具|新闻咨询|投诉建议
    Copyright 2004-2010 HttP://www.ah20.cn All Rights Reserved 版权所有:天马网络
    ☆ 建议使用:1024×768 分辨率 Windows2000 Internet Explorer V5.0 or higher ☆