数字彩票

[复制链接]
查看945 | 回复0 | 2017-10-11 09:52:47 | 显示全部楼层 |阅读模式
(@@InPutString @@InPutInteger  )
100%
[@彩票]
{
#if
#act
MOV M0 2
MOV M1 0
MOV M2 0
MOV N1
MOV N2
MOV N3
mov S1 <①√>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
#say
 ╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
 ┆                  <中奖系统>                  ┆\
 ╚┄┄┄┄┄┄┄┄┬┄┄┄┄┬┄┄┄┄┄┄┄┄╝\
                   ┆<立即投注/@开始选号>┆\
 ╔┄┄┄┄┄┄┄┄┴┄┄┄┄┴┄┄┄┄┄┄┄┄╗\
 ┆ <1.>花2元宝购买彩票,轻松赢取1000元!      ┆\
 ┆ <2.>从100~999中选一个三位数投注,奖金1000元┆\
 ┆ <3.>即时开奖,大奖着您!                    ┆\
 ╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\


[@开始选号]
  每次投注:2元宝   彩票奖金:1000元宝\
  <注:>最终根据选择的倍数收取元宝,和发放奖金!\
 ╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
 ┆你的选号:┆               <输入选号/@@InPutInteger1>   <随机选号/@随机选号>  ┆\
 ╟┄┄┄┄┄┴┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\
 ┆选择倍数:┆   ①.②.③.④.⑤.⑥.⑦.⑧.⑨.⑩   ┆\
 ╚┄┄┄┄┄┴┄┄┄┄╔┄┄┄┄┄╗┄┄┄┄┄┄┄╝\
                ┆ 确认选号 ┆\
                       ╚┄┄┄┄┄╝\

[@InPutInteger1]
#if
large N1 99
SMALL N1 1000
#say
  每次投注:2元宝   彩票奖金:1000元宝\
  <注:>最终根据选择的倍数收取元宝,和发放奖金!\
 ╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
 ┆你的选号:┆ <$STR(N1)>           <输入选号/@@InPutInteger1>   <随机选号/@随机选号>  ┆<$STR(M0)>\
 ╟┄┄┄┄┄┴┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\
 ┆选择倍数:┆   <$STR(S1)> ┆\
 ╚┄┄┄┄┄┴┄┄┄┄╔┄┄┄┄┄╗┄┄┄┄┄┄┄╝\
                ┆ <确认选号/@确认选号> ┆\
                       ╚┄┄┄┄┄╝\
#ELSESAY
请输入100~999之间数字作为选号!\ \
<重新输入汇款金额/@开始选号>\
<退出/@exit>

[@随机选号]
#if
#act
movr N1 100 1000
#say
  每次投注:2元宝   彩票奖金:1000元宝\
  <注:>最终根据选择的倍数收取元宝,和发放奖金!\
 ╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
 ┆你的选号:┆ <$STR(N1)>           <输入选号/@@InPutInteger1>   <随机选号/@随机选号>  ┆<$STR(M0)>\
 ╟┄┄┄┄┄┴┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\
 ┆选择倍数:┆   <$STR(S1)> ┆\
 ╚┄┄┄┄┄┴┄┄┄┄╔┄┄┄┄┄╗┄┄┄┄┄┄┄╝\
                ┆ <确认选号/@确认选号> ┆\
                       ╚┄┄┄┄┄╝\

[@翻倍]
  每次投注:2元宝   彩票奖金:1000元宝\
  <注:>最终根据选择的倍数收取元宝,和发放奖金!\
 ╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
 ┆你的选号:┆ <$STR(N1)>           <输入选号/@@InPutInteger1>   <随机选号/@随机选号>  ┆<$STR(M0)>\
 ╟┄┄┄┄┄┴┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╢\
 ┆选择倍数:┆   <$STR(S1)> ┆\
 ╚┄┄┄┄┄┴┄┄┄┄╔┄┄┄┄┄╗┄┄┄┄┄┄┄╝\
                ┆ <确认选号/@确认选号> ┆\
                       ╚┄┄┄┄┄╝\
;游龙- 原创 技术交流QQ:57168666

[@确认选号]
#IF
#act
MOV M2 <$STR(M0)>
DEC M2 1
MOV M1 1000
MOVR N2 100 1000
MUL N3 <$STR(M0)> <$str(M1)>
break
goto @准备开奖

[@准备开奖]
你的选号:<$STR(N1)>\
选择倍数:<$STR(M0)>\
需要支付:<$STR(M0)>元宝\ \
<确认支付/@确认支付>\

[@确认支付]
#if
CHECKGAMEGOLD > <$str(M2)>
#act
GAMEGOLD - <$STR(M0)>
goto @产生结果
#ELSESAY
对不起你的元宝不够!\
<关闭/@EXIT>

[@产生结果]
#if
EQUAL N1 <$STR(N2)>
#act
GAMEGOLD + <$STR(N3)>
SENDMSG 0 恭喜【%s】中奖,彩票选号:[<$STR(N1)>] 倍数:[<$STR(M0)>] 奖金:[<$STR(N3)>]
#SAY
产生奖号:<$STR(N2)>\ \
您的选号:<$STR(N1)>  倍数:<$STR(M0)>\
恭喜你中得:<$STR(N3)>个元宝,即时到帐....\
增加:<$STR(N3)>个元宝,你当前的元宝总数<$GAMEGOLD>\ \
<返回/@游戏介绍>
#ELSESAY
非常遗憾,未中奖!\
本期彩票号码:<$STR(N2)>\
您的彩票选号:<$STR(N1)>\
<返回/@游戏介绍>
;游龙- 原创 技术交流QQ:57168666

[@翻1]
#act
MOV M0 1
mov S1 <①√>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍

[@翻2]
#act
MOV M0 2
mov S1 <①/@翻1>.<②√>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍

[@翻3]
#act
MOV M0 3
mov S1 <①/@翻1>.<②/@翻2>.<③√>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍

[@翻4]
#act
MOV M0 4
mov S1 <①/@翻1>.<②/@翻2>.<③/@翻3>.<④√>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍

[@翻5]
#act
MOV M0 5
mov S1 <①/@翻1>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤√>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍

[@翻6]
#act
MOV M0 6
mov S1 <①/@翻1>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥√>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍


[@翻7]
#act
MOV M0 7
mov S1 <①/@翻1>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦√>.<⑧/@翻8>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍


[@翻8]
#act
MOV M0 8
mov S1 <①/@翻1>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧√>.<⑨/@翻9>.<⑩/@翻10>
break
GOTO @翻倍

[@翻9]
#act
MOV M0 9
mov S1 <①/@翻1>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨√>.<⑩/@翻10>
break
GOTO @翻倍

[@翻10]
#act
MOV M0 10
mov S1 <①/@翻1>.<②/@翻2>.<③/@翻3>.<④/@翻4>.<⑤/@翻5>.<⑥/@翻6>.<⑦/@翻7>.<⑧/@翻8>.<⑨/@翻9>.<⑩√>
break
GOTO @翻倍
}

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则