[GOM]新区预存奖池活动脚本

爱上版本库

[@main]
#IF
EQUAL G30 1
#ACT
OpenBigDialogBox
#SAY
　\
　　　 　　　 　　　 <福利大派送/AUTOCOLOR=254>　 　　　　\
　<-----------------------------------------------------------/AUTOCOLOR=240>\
　<活动名称：新区福利大派送，.奖池金额为20000000/SCOLOR=151>\
　<活动时间：正式开区30分钟自动结束.活动结束领取50%利息/SCOLOR=224> \
　<活动规则：/SCOLOR=254><点击预存.输入元宝数量.最高每次5W元宝.不限次数./SCOLOR=243>\
<每个玩家都有机会,奖池总共2千万.预存若是没满2千万30分钟活动也自动结束/SCOLOR=243>\
　　<活动结束.玩家直接点击“领取奖池元宝”就可以获得相应的元宝./SCOLOR=249> \
　　　　<当前预存总数为：/SCOLOR=253>{<$STR(G32)>/SCOLOR=254}       <当前预存数还差：/SCOLOR=253>{<$STR(G33)>/SCOLOR=254}\
　<★/SCOLOR=250>　<★/SCOLOR=254>　<开始预存奖池元宝/@@InPutInteger1>　<★/SCOLOR=254>　<★/SCOLOR=254>　<领取奖池元宝/@领取奖池元宝>　<★/SCOLOR=250>　<★/SCOLOR=254>\ \
<☆──→/AUTOCOLOR=254> <新人攻略:建议上线充值一定数量元宝然后全部预存奖池./AUTOCOLOR=250> <←──☆/AUTOCOLOR=254>\
<☆──→/AUTOCOLOR=254> <接着进行泡点，大概五分钟可参加充值爵位活动，然后30/AUTOCOLOR=250> <←──☆/AUTOCOLOR=254>\
<☆──→/AUTOCOLOR=254> <分钟活动结束即可领取1.5倍收益，总收益估算200%左右./AUTOCOLOR=250> <←──☆/AUTOCOLOR=254>\
<☆──→/AUTOCOLOR=254>　　<进行科学合理的投资，即可快人一步，先人一等../AUTOCOLOR=249>　　<←──☆/AUTOCOLOR=254>\
#ELSEACT
MOV G30 1
MOV G31 20000000
MOV G32 0
MOV G33 20000000
GOTO @MAIN

[@@InPutInteger1]
#ACT
DELAYGOTO 1 @InPutInteger1-1
[@InPutInteger1-1]
#if
EQUAL G34 1
#ACT
MESSAGEBOX 活动已经结束，请等待新区开放。
break

#IF
EQUAL N1 0
#ACT
MESSAGEBOX 输入数据等于0，请重新输入。
break

#IF
LARGE N1 50000
#ACT
MESSAGEBOX 单次最多预存5W元宝，请重新输入。
break

#IF
LARGE N1 <$STR(G33)>
#ACT
MESSAGEBOX 输入数据超出了还差的预存数，请重新输入。
break

#IF
CHECKGAMEGOLD < <$STR(N1)>
#ACT
MessageBox 对不起，你的元宝不足当前输入的数值！
break

#if
#act
GAMEGOLD - <$STR(N1)>
inc G32 <$STR(N1)>
MOV M12 <$STR(G31)>
DEC M12 <$STR(G32)>
MOV G33 <$STR(M12)>
CALCVAR HUMAN 融资数 + <$STR(N1)>
SAVEVAR HUMAN 融资数 ..\QuestDiary\爱上版本库名单专用\福利派送\融资数.txt
SendCenterMsg 255 154 系统:〖%s〗在福利派送成功预存了<$STR(N1)>个元宝，当前预存总数还差<$STR(G33)>个~~ 1 5
SendCenterMsg 255 154 系统:〖%s〗在福利派送成功预存了<$STR(N1)>个元宝，当前预存总数还差<$STR(G33)>个~~ 1 5
GuildNoticeMsg 255 154 系统:〖%s〗在福利派送成功预存了<$STR(N1)>个元宝，当前预存总数还差<$STR(G33)>个~~
GuildNoticeMsg 255 154 系统:〖%s〗在福利派送成功预存了<$STR(N1)>个元宝，当前预存总数还差<$STR(G33)>个~~
DelayCall 3000 @jiance
Close
break

[@jiance]
#if
EQUAL G32 <$STR(G31)>
#ACT
MOV G34 1
GuildNoticeMsg 70 144 ┏┄┄┄┄┄┄┄┄┓
GuildNoticeMsg 70 144 ┏┄┄┄┄┄┄┄┄┄┄▓福利派送活动结束▓┄┄┄┄┄┄┄┄┄┄┓
GuildNoticeMsg 70 144 ┆┗┄┄┄┄┄┄┄┄┛┆
GuildNoticeMsg 70 144 ┆福利派送活动正式结束,请预存过元宝的玩家前往领取福利奖励 ┆
GuildNoticeMsg 70 144 ┆福利派送活动正式结束,请预存过元宝的玩家前往领取福利奖励 ┆
GuildNoticeMsg 70 144 ┆福利派送活动正式结束,请预存过元宝的玩家前往领取福利奖励 ┆
GuildNoticeMsg 70 144 ┗┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┛
SendCenterMsg 249 0 福利派送活动正式结束,请预存过元宝的玩家前往领取福利奖励! 1 5
SendCenterMsg 249 0 福利派送活动正式结束,请预存过元宝的玩家前往领取福利奖励! 1 5
SendCenterMsg 249 0 福利派送活动正式结束,请预存过元宝的玩家前往领取福利奖励! 1 5
break

[@领取奖池元宝]
#if
CHECKVAR HUMAN 融资数 = 0
#act
MESSAGEBOX 失败：您暂未预存过元宝，或者您已经领取。
break

#if
EQUAL G34 1
#ACT
MOV M13 <$HUMAN(融资数)>
MUL M13 <$STR(M13)> 150
DIV M13 <$STR(M13)> 100
GAMEGOLD + <$STR(M13)>
CALCVAR HUMAN 融资数 = 0
SAVEVAR HUMAN 融资数 ..\QuestDiary\爱上版本库名单专用\福利派送\融资数.txt
SendCenterMsg 249 135 系统:《%s》成功领取福利派对奖励，共计[<$STR(M13)>]元宝,如果您也预存过元宝，请赶快领取吧 1 5
SendCenterMsg 249 135 系统:《%s》成功领取福利派对奖励，共计[<$STR(M13)>]元宝,如果您也预存过元宝，请赶快领取吧 1 5
GuildNoticeMsg 249 135 系统:《%s》成功领取福利派对奖励，共计[<$STR(M13)>]元宝,如果您也预存过元宝，请赶快领取吧
GuildNoticeMsg 249 135 系统:《%s》成功领取福利派对奖励，共计[<$STR(M13)>]元宝,如果您也预存过元宝，请赶快领取吧
#ELSEact
MESSAGEBOX 活动暂未结束，无法领取福利奖励。
break

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