HERO引擎充值排行榜完整脚本

[@main]
#ACT
goto @读取已领取
#SAY
<> \
<第1位充值100元/SCOLOR=250>  <$STR(S1)>  <送120等级卷+100充值点/SCOLOR=146>\
<第2位充值100元/SCOLOR=250>  <$STR(S2)>  <送120等级卷+ 80充值点/SCOLOR=146>\
<第3位充值100元/SCOLOR=250>  <$STR(S3)>  <送120等级卷+ 50充值点/SCOLOR=146>\
<第4位充值100元/SCOLOR=250>  <$STR(S4)>  <送120等级卷+ 30充值点/SCOLOR=146>\
<第5位充值100元/SCOLOR=250>  <$STR(S5)>  <送120等级卷+ 20充值点/SCOLOR=146>\
;你当前已充值<$HUMAN(消费积分)>\
\ \
<领取奖励/@领取奖励>              
;<测试清理/@测试清理>        




[@测试清理]
#ACT
MOV G91 0
MOV A91
MOV A92
MOV A93
MOV A94
MOV A95
ClearNameList ..\QuestDiary\每日充值\领取名单.txt
ClearNameList ..\QuestDiary\每日充值\每日清理.txt
GMEXECUTE 开始提问 @日常清理在线
GOTO @MAIN



[@读取已领取]
#IF
equal A91
#ACT
MOV S1 无人领取
#ELSEACT
MOV S1 <$STR(A91)>

#IF
equal A92
#ACT
MOV S2 无人领取
#ELSEACT
MOV S2 <$STR(A92)>

#IF
equal A93
#ACT
MOV S3 无人领取
#ELSEACT
MOV S3 <$STR(A93)>

#IF
equal A94
#ACT
MOV S4 无人领取
#ELSEACT
MOV S4 <$STR(A94)>

#IF
equal A95
#ACT
MOV S5 无人领取
#ELSEACT
MOV S5 <$STR(A95)>


#IF
#ACT
SetStringBlank S1 15 0
SetStringBlank S2 15 0
SetStringBlank S3 15 0
SetStringBlank S4 15 0
SetStringBlank S5 15 0



[@领取奖励]
#IF
LARGE G91 4
#ACT
MESSAGEBOX 已被领取完。
BREAK

#IF
CHECKTEXTLIST .\QuestDiary\每日充值\领取名单.txt <$USERNAME>
#ACT
MESSAGEBOX 领取失败，可能是以下原因。\　\1.今日充值未达到100\　\2.名额已经没有了\　\3.已经领取过了
BREAK

#IF
equal G91 0
CHECKVAR HUMAN 消费积分 > 99
#ACT
INC G91 1
MOV A91 <$USERNAME>
AddTextList .\QuestDiary\每日充值\领取名单.txt <$USERNAME>
GIVE 120等级卷 1
GAMEDIAMOND + 100
MESSAGEBOX 领取成功，你是第一位，送120等级卷+100充值
GOTO @MAIN
BREAK

#IF
equal G91 1
CHECKVAR HUMAN 消费积分 > 99
#ACT
INC G91 1
MOV A92 <$USERNAME>
AddTextList .\QuestDiary\每日充值\领取名单.txt <$USERNAME>
GIVE 120等级卷 1
GAMEDIAMOND + 80
MESSAGEBOX 领取成功，你是第二位，送120等级卷+80充值
GOTO @MAIN
BREAK

#IF
equal G91 2
CHECKVAR HUMAN 消费积分 > 99
#ACT
INC G91 1
MOV A93 <$USERNAME>
AddTextList .\QuestDiary\每日充值\领取名单.txt <$USERNAME>
GIVE 120等级卷 1
GAMEDIAMOND + 50
MESSAGEBOX 领取成功，你是第二位，送120等级卷+50充值
GOTO @MAIN
BREAK

#IF
equal G91 3
CHECKVAR HUMAN 消费积分 > 99
#ACT
INC G91 1
MOV A94 <$USERNAME>
AddTextList .\QuestDiary\每日充值\领取名单.txt <$USERNAME>
GIVE 120等级卷 1
GAMEDIAMOND + 30
MESSAGEBOX 领取成功，你是第二位，送120等级卷+30充值
GOTO @MAIN
BREAK

#IF
equal G91 4
CHECKVAR HUMAN 消费积分 > 99
#ACT
INC G91 1
MOV A95 <$USERNAME>
AddTextList .\QuestDiary\每日充值\领取名单.txt <$USERNAME>
GIVE 120等级卷 1
GAMEDIAMOND + 20
MESSAGEBOX 领取成功，你是第二位，送120等级卷+20充值
GOTO @MAIN
BREAK

#ELSEACT
MESSAGEBOX 领取失败，可能是以下原因。\　\1.今日充值未达到100\　\2.名额已经没有了\　\3.已经领取过了
BREAK




注册会员回复下载：

游客，如果您要查看本帖隐藏内容请回复

1

楼主威武

66666666666666666666666666666

0

hhhhhhhhhhhhh

1232144

       
参与/回复主题关闭
RE: HERO引擎充值排行榜完整脚本 [修改]

.

qqqqqqqqqqqqqqqqqqqqqqqq

AASADsdfd帝王色热无若翁认为我二无

不错

到手的撒多撒

1111111111111111111111

grey荣华富贵徽杭古道钧达股份几个