|
|
[@main]
#IF
#ACT
GOTO @测试初始化
#SAY
<>\
<>\
<> <测试打到的积分以及拾取到的积分都可以记录到新区/FCOLOR=249> \
<> <测试打到的积分以及拾取到的积分都可以记录到新区/FCOLOR=249> \
<> <当前测试区获取的RMB点数量【/FCOLOR=253><$GAMEGLORY><】/FCOLOR=253> <正式开区50%领取！【<$STR(N$记录金额)>】/FCOLOR=255>\
<> <当前测试区获取的RMB点数量【/FCOLOR=253><$GAMEGLORY><】/FCOLOR=253> <正式开区50%领取！【<$STR(N$记录金额)>】/FCOLOR=255>\
<>\
<$STR(S$按钮领取)> \
<>\
<> <当前测试区已记录的RMB点数量【/FCOLOR=253>:<$STR(S$记录金额)><】/FCOLOR=253> \
<>\
<> <记录无限制，可多次记录---充值的RMB点不可记录---只记录游戏内获得的RMB点数量>\
[@测试区RMB111]
#IF
CHECKGAMEGLORY > 1
#ACT
CLEARNAMELIST ..\QuestDiary\测试记录元宝\账户记录\<$USERID>.txt
AddTextListEx ..\QuestDiary\测试记录元宝\账户记录\<$USERID>.txt <$GAMEGLORY>
GOTO @main
MessageBox 记录成功！
#ELSEACT
MessageBox 不够2个，无法记录！
BREAK
[@领取测试区RMB222]
#IF
#ACT
GetRandomText ..\QuestDiary\测试记录元宝\账户记录\<$USERID>.txt S$记录金额
MOV N$记录金额 <$STR(S$记录金额)>
DIV N$记录金额 2
#IF
LARGE N$记录金额 0
#ACT
GAMEGLORY + <$STR(N$记录金额)>
CLEARNAMELIST ..\QuestDiary\测试记录元宝\账户记录\<$USERID>.txt
MOV S$记录金额
MOV N$记录金额 0
GOTO @main
MessageBox 领取成功！
#ELSEACT
MessageBox 没有在测试区记录到你的信息！
BREAK
[@测试初始化]
#IF
NOT CHECKTEXTLIST ..\QuestDiary\测试记录元宝\测试账户.txt <$USERID>
#ACT
AddTextListEx ..\QuestDiary\测试记录元宝\测试账户.txt <$USERID>
AddTextListEx ..\QuestDiary\测试记录元宝\账户记录\<$USERID>.txt 0
#IF
CheckContainsText <$SERVERNAME> 测试
#ACT
MOV S$按钮领取 <点击记录测试区积分/@测试区RMB111>
#ELSEACT
MOV S$按钮领取 <领取测试区积分记录/@领取测试区RMB222>
#IF
#ACT
GetRandomText ..\QuestDiary\测试记录元宝\账户记录\<$USERID>.txt S$记录金额
MOV N$记录金额 <$STR(S$记录金额)>
DIV N$记录金额 2
|
上一篇：传奇开区一条龙增加战力众神塔地图，需检测人物战力斗才能进入。下一篇：传奇一条龙设置无限等级的方法，灵剑心法可抵御部分伤害教程。
|
发表于 2021-1-4 17:28:52
发表于 2021-1-8 15:10:51
