传奇GM脚本 数字彩票
(@@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 @翻倍
}