收藏本站
 
武易好服 | 武易传奇发布网| 武易传奇家族| 传奇辅助下载| 技术文章| 登陆器下载| | 客户端下载
彩票中奖系统 - 武易好服官方网站!
彩票中奖系统
文章作者:游龙 文章来源:好游戏 更新时间:2008/1/9 12:42:22 

(@@InPutString @@InPutInteger )
[@main]
#if
#act
#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
break
goto @准备开奖

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

[@确认支付]
#if
#act
goto @产生结果
#ELSESAY
对不起你的元宝不够!\
<关闭/@EXIT>

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

转载请注明出自:武易好服
浏览次数:2201
最新文章
· 武易传奇(武易前传)未来和明天是否还会有新的开始!...
· 从仿武易到前传到武易好服。...
· 我本沉默传奇,嘟嘟传奇的曾经,你有过这些记忆吗?...
· 麦兜定律加名言-很准的哦。...
· 玩着仿武易传奇-看看这经典话语。...
· 真三国无双-后记...
· 真三国无双-第二十章(不是结局的结局)...
· 真三国无双-第十九章(最后的决战)...
· 真三国无双-第十八章(现实是残酷的)...
· 真三国无双-第十七章(必须面对的惨白)...
热门文章
· 我本沉默传奇,嘟嘟传奇的曾经,你有过这些记忆吗?...
· 玩着仿武易传奇-看看这经典话语。...
· 真三国无双-第二十章(不是结局的结局)...
· 自己创造新怪物-DIY怪物DATA文件.........
· 真三国无双-后记...
· 改游戏怪物爆率...
· 麦兜定律加名言-很准的哦。...
· 真三国无双-第十九章(最后的决战)...
· 天翼武易传奇祖玛阁升级脚本。...
· 真三国无双-第十六章(真爱让我化险为夷)...

免责声明 | 百度搜索 | 武易传奇发布网 | 设为首页 | 收藏本站
Copyright © 2010-2012 《武易传奇Www.51okf.Com (注:武易传奇发布网只投放仿武易传奇官网区域代理传奇)

粤ICP备11018081号 程序设计:武易好服