测试区元宝脚本，特别开放测试区打元宝新区领取,给予玩家更多的浮力只能记录一次，你在测试区记录元宝正式区能领取你记录的百分之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