测试区元宝脚本，测试区打元宝新区领取

测试区元宝脚本，特别开放测试区打元宝新区领取,给予玩家更多的福利只能记录一次，你在测试区记录元宝正式区能领取你记录的百分之50%元宝，你的元宝一旦记录,背包的元宝会被清空请注意元宝多时记录


[@MAIN]
#IF
CheckContainsText <$SERVERNAME> 测试
#act
OPENMERCHANTBIGDLG 0 1048 1 4 60 -70 0
#SAY
\ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<ImgEx:0:878:878:878:410:-40/@EXIT>\
　　<亲爱的<$USERNAME>你好/AUTOCOLOR=251>  <欢迎来到:/SCOLOR=154>{<$SERVERNAME>/SCOLOR=70}\ \

　　<特别开放测试区打元宝新区领取,给予玩家更多的福利【只能记录一次】/AUTOCOLOR=250>\ \

　　<特别说明:你在测试区记录元宝正式区能领取你记录的百分之50%元宝【只能记录一次】/AUTOCOLOR=242> \ \

　　<特别说明:你的元宝一旦记录,背包的元宝会被清空请注意元宝多时记录【只能记录一次】/AUTOCOLOR=254> \ \

　　　　　　　　　　　<我考虑好了需要记录当前元宝/@1>\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
#ELSEACT



#IF
#act
OPENMERCHANTBIGDLG 0 1048 1 4 60 -70 0
#SAY
\ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<ImgEx:0:878:878:878:410:-40/@EXIT>\
　　<亲爱的<$USERNAME>你好/AUTOCOLOR=251>  <欢迎来到:/SCOLOR=154>{<$SERVERNAME>/SCOLOR=70}\ \

　　<当前为正式区模式,可以领你在测试区中记录的元宝/AUTOCOLOR=250>\ \

　　<特别说明:一个帐号只能领一次/AUTOCOLOR=242> \ \

　　　　　　　　　<我需要领取我记录元宝/@2>


[@1]
#IF
CHECKGAMEGOLD > 0
#ELSEACT
MESSAGEBOX 兄弟,你都没有元宝怎么记录?
BREAK

#if
CHECKACCOUNTLIST  ..\QuestDiary\数据文件\测试区元宝帐号.txt
#act
messagebox 对不起你已经记录过一次了!
BREAK

#IF
#ACT
AddTextListEx  ..\QuestDiary\数据文件\测试区元宝帐号.txt <$USERID> 0
AddTextListEx  ..\QuestDiary\数据文件\测试区元宝.txt <$USERID>:<$GAMEGOLD>
AddTextListEx  ..\QuestDiary\数据文件\测试区元宝记录.txt 帐号:<$USERID>　元宝:<$GAMEGOLD>　　时间:<$DATETIME>
MESSAGEBOX 　\　\　\　\当前记录的帐号:<$USERID>\　\　\当前记录的元宝:<$GAMEGOLD>
GAMEGOLD = 0

[@2]
#if
CHECKACCOUNTLIST  ..\QuestDiary\数据文件\测试区元宝帐号.txt
#ACT
GetStringPos ..\QuestDiary\数据文件\测试区元宝帐号.txt <$USERID>
GetListString ..\QuestDiary\数据文件\测试区元宝.txt <$STR(N0)> S$测试号 N$测试元宝
DELACCOUNTLIST ..\QuestDiary\数据文件\测试区元宝帐号.txt
DelTextList ..\QuestDiary\数据文件\测试区元宝.txt <$USERID>:<$STR(N$测试元宝)>
DIV N$测试元宝 2
GAMEGOLD + <$STR(N$测试元宝)>
MESSAGEBOX 　\　\　\　\取回的元宝数量:<$STR(N$测试元宝)>
#ELSEACT
MESSAGEBOX 对不起你测试区没有记录,或者已经领取元宝!
BREAK

版权声明

1、本站所有内容均由互联网收集整理、网友上传，仅供大家参考、学习研究使用，不存在任何商业目的与商业用途。

2、论坛的所有内容都不保证其准确性，完整性，有效性，因本站内容因误导等因素而造成的损失本站不承担连带责任。

3、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则：为了学习和研究软件内含的设计思想和原理，通过安装、显示、传输或者存储软件等方式使用软件的，可以不经软件著作权人许可，若有用户需要商用本站资源，请务必联系版权方购买正版授权！

这个帖子不回对不起自己！

传奇论坛里面相对来说比较好的一个！

谢谢.脚本收到.很好用

谢谢楼主！

谢谢.脚本收到.很好用

这个帖子不回对不起自己！

感谢站长分享传奇脚本，让我学习到很多知识。

比较全的传奇脚本分享网站，站长辛苦了。

这个帖子不回对不起自己！