当前位置 : 主页>技术研究>传奇技术>

怎么在传奇服务端添加双色球活动

来源: 作者: 点击:
[@MAIN]

#IF
CHECKTEXTLIST ..\QuestDiary\数据库\双色球\开奖时间.txt <$HOUR>
SMALL <$MINUTE> 5
#SAY
双色球销售:\
  双色球正在开奖,不能查阅和购买!\
请在<$HOUR>点05分后再试!\ \
<○/FCOLOR=103><知道了/@EXIT>\
#ACT
break

#IF
EQUAL S$查询显示
#ACT
GetRandomText ..\QuestDiary\数据库\双色球\查询.txt S$查询显示 0

#IF
#ACT
MOV S$显示双色 <$STR(A127)>
ANSIREPLACETEXT S$显示双色 第[ <第[/FCOLOR=250>
ANSIREPLACETEXT S$显示双色 ]期 <]期/FCOLOR=250>
ANSIREPLACETEXT S$显示双色 红球 <红球/FCOLOR=249>
ANSIREPLACETEXT S$显示双色 蓝球 <蓝球/FCOLOR=154>
#SAY
双色球销售:\
  我是恒古大陆双色球销售员,客官买两注吧!一注只要200就有机会\
中的10万大奖!您投注元宝就得元宝,投注元宝就得元宝\
 \
<上期开奖号码/FCOLOR=250>   <Img:680:17:-2:14> <Img:680:17:0:14> <Img:680:17:-5:14>    <Img:681:17:-3:14>\
<$STR(S$显示双色)> 奖池:<$STR(G120)>\
<头奖:3红球+蓝球全中 奖金:/FCOLOR=250>100000< 元宝或元宝/FCOLOR=250>\
<二奖:3红球全中 奖金:/FCOLOR=250>10000 < 元宝或元宝/FCOLOR=250>\
<三奖:只中蓝球 奖金:/FCOLOR=250>200 < 元宝或元宝/FCOLOR=250>\
<○/FCOLOR=103><购买彩票/@买> <○/FCOLOR=103><查询中奖/@查询> <○/FCOLOR=103><历届中奖/@询问2> <○/FCOLOR=103><双色球规则|<$STR(S$查询显示)>/@>\
[@询问2]
#ACT
GetRandomText ..\QuestDiary\数据文件\历届中奖.txt S$中奖查询0 0
GetRandomText ..\QuestDiary\数据文件\历届中奖.txt S$中奖查询1 1
GetRandomText ..\QuestDiary\数据文件\历届中奖.txt S$中奖查询2 2
GetRandomText ..\QuestDiary\数据文件\历届中奖.txt S$中奖查询3 3
GetRandomText ..\QuestDiary\数据文件\历届中奖.txt S$中奖查询4 4

#IF
EQUAL S$中奖查询0
#ACT
MOV S$中奖查询0 暂无

#IF
EQUAL S$中奖查询1
#ACT
MOV S$中奖查询1 暂无

#IF
EQUAL S$中奖查询2
#ACT
MOV S$中奖查询2 暂无

#IF
EQUAL S$中奖查询3
#ACT
MOV S$中奖查询3 暂无

#IF
EQUAL S$中奖查询4
#ACT
MOV S$中奖查询4 暂无

#IF
#SAY
双色球销售:\
  以下是历届中奖名单(最新5名),已经兑奖的才会显示!\
<序号  信息/FCOLOR=254>\
1. <$STR(S$中奖查询0)>\
2. <$STR(S$中奖查询1)>\
3. <$STR(S$中奖查询2)>\
4. <$STR(S$中奖查询3)>\
5. <$STR(S$中奖查询4)>\
 \
<○/FCOLOR=103><购买彩票/@买> <○/FCOLOR=103><查询中奖/@查询> <○/FCOLOR=103><历届中奖/FCOLOR=230> <○/FCOLOR=103><双色球规则|<$STR(S$查询显示)>/@>\

[@机选]
#IF
#ACT
MOV S$选数1 <Img:690:17:0:-3/@1>
MOV S$选数2 <Img:691:17:0:-3/@2>
MOV S$选数3 <Img:692:17:0:-3/@3>
MOV S$选数4 <Img:693:17:0:-3/@4>
MOV S$选数5 <Img:694:17:0:-3/@5>
MOV S$选数6 <Img:695:17:0:-3/@6>
MOV S$选数7 <Img:696:17:0:-3/@7>
MOV S$选数8 <Img:697:17:0:-3/@8>
MOV S$选数9 <Img:698:17:0:-3/@9>
MOV S$选数10 <Img:699:17:0:-3/@10>
MOV S$选数11 <Img:700:17:0:-2/@11>
MOV S$选数12 <Img:701:17:0:-2/@12>
MOV S$选数13 <Img:702:17:0:-2/@13>
MOV S$选数14 <Img:703:17:0:-2/@14>
MOV S$选数15 <Img:704:17:0:-2/@15>
MOV S$选数16 <Img:705:17:0:-2/@16>
MOV S$选数Ns1 <Img:730:17:0:-1/@lq1>
MOV S$选数Ns2 <Img:731:17:0:-1/@lq2>
MOV S$选数Ns3 <Img:732:17:0:-1/@lq3>
MOV S$选数Ns4 <Img:733:17:0:-1/@lq4>
MOV S$选数Ns5 <Img:734:17:0:-1/@lq5>
MOV S$选数Ns6 <Img:735:17:0:-1/@lq6>
MOV S$选数Ns7 <Img:736:17:0:-1/@lq7>
MOV S$选数Ns8 <Img:737:17:0:-1/@lq8>
MOV S$选数Ns9 <Img:738:17:0:-1/@lq9>
MOV S$选数Ns10 <Img:739:17:0:-1/@lq10>
MOV S$选号s1 --
MOV S$选号s2 --
MOV S$选号s3 --
MOV S$选号s4 --
MOVR N$选号s1 1 17
MOVR N$选号s2 1 17
MOVR N$选号s3 1 17
MOVR N$选号s4 1 11
GOTO @机选2

[@机选2]
#IF
EQUAL N$选号s2 <$STR(N$选号s1)>
#ACT
MOVR N$选号s2 1 17
GOTO @机选2
break
#ELSEACT
GOTO @机选3

[@机选3]
#OR
EQUAL N$选号s3 <$STR(N$选号s1)>
EQUAL N$选号s3 <$STR(N$选号s2)>
#ACT
MOVR N$选号s3 1 17
GOTO @机选3
break
#IF
#ACT
GOTO @<$STR(N$选号s1)>
GOTO @<$STR(N$选号s2)>
GOTO @<$STR(N$选号s3)>
GOTO @lq<$STR(N$选号s4)>


[@买]
#ACT
MOV S$选数1 <Img:690:17:0:-3/@1>
MOV S$选数2 <Img:691:17:0:-3/@2>
MOV S$选数3 <Img:692:17:0:-3/@3>
MOV S$选数4 <Img:693:17:0:-3/@4>
MOV S$选数5 <Img:694:17:0:-3/@5>
MOV S$选数6 <Img:695:17:0:-3/@6>
MOV S$选数7 <Img:696:17:0:-3/@7>
MOV S$选数8 <Img:697:17:0:-3/@8>
MOV S$选数9 <Img:698:17:0:-3/@9>
MOV S$选数10 <Img:699:17:0:-3/@10>
MOV S$选数11 <Img:700:17:0:-2/@11>
MOV S$选数12 <Img:701:17:0:-2/@12>
MOV S$选数13 <Img:702:17:0:-2/@13>
MOV S$选数14 <Img:703:17:0:-2/@14>
MOV S$选数15 <Img:704:17:0:-2/@15>
MOV S$选数16 <Img:705:17:0:-2/@16>
MOV S$选数Ns1 <Img:730:17:0:-1/@lq1>
MOV S$选数Ns2 <Img:731:17:0:-1/@lq2>
MOV S$选数Ns3 <Img:732:17:0:-1/@lq3>
MOV S$选数Ns4 <Img:733:17:0:-1/@lq4>
MOV S$选数Ns5 <Img:734:17:0:-1/@lq5>
MOV S$选数Ns6 <Img:735:17:0:-1/@lq6>
MOV S$选数Ns7 <Img:736:17:0:-1/@lq7>
MOV S$选数Ns8 <Img:737:17:0:-1/@lq8>
MOV S$选数Ns9 <Img:738:17:0:-1/@lq9>
MOV S$选数Ns10 <Img:739:17:0:-1/@lq10>
MOV N$倍率 1
MOV S$选号s1 --
MOV S$选号s2 --
MOV S$选号s3 --
MOV S$选号s4 --
#SAY
双色球销售:\
  请您选择号码!\

第[<$STR(A126)>]期 红球 -- -- -- 蓝球 -- 倍率:1 <○/FCOLOR=103><加注/@@InPutInteger4(请输入购买的倍率1-9999:每注需200元宝或元宝)>\
         <Img:680:17:-2:-18> <Img:680:17:0:-18> <Img:680:17:-5:-18>    <Img:681:17:-3:-18>\
红球号码:<$STR(S$选数1)> <$STR(S$选数2)> <$STR(S$选数3)> <$STR(S$选数4)> <$STR(S$选数5)> <$STR(S$选数6)> <$STR(S$选数7)> <$STR(S$选数8)> <$STR(S$选数9)> <$STR(S$选数10)>\

     <$STR(S$选数11)> <$STR(S$选数12)> <$STR(S$选数13)> <$STR(S$选数14)> <$STR(S$选数15)> <$STR(S$选数16)> \

蓝球号码:<$STR(S$选数Ns1)> <$STR(S$选数Ns2)> <$STR(S$选数Ns3)> <$STR(S$选数Ns4)> <$STR(S$选数Ns5)> <$STR(S$选数Ns6)> <$STR(S$选数Ns7)> <$STR(S$选数Ns8)> <$STR(S$选数Ns9)> <$STR(S$选数Ns10)>\
 \
<○/FCOLOR=103><选取号码/FCOLOR=230> <○/FCOLOR=103><机选一组/@机选> <○/FCOLOR=103><返回/@MAIN>\

[@1]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 01
MOV S$选数1 <Img:710:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 01
MOV S$选数1 <Img:710:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 01
MOV S$选数1 <Img:710:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!

[@2]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 02
MOV S$选数2 <Img:711:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 02
MOV S$选数2 <Img:711:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 02
MOV S$选数2 <Img:711:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@3]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 03
MOV S$选数3 <Img:712:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 03
MOV S$选数3 <Img:712:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 03
MOV S$选数3 <Img:712:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@4]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 04
MOV S$选数4 <Img:713:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 04
MOV S$选数4 <Img:713:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 04
MOV S$选数4 <Img:713:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@5]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 05
MOV S$选数5 <Img:714:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 05
MOV S$选数5 <Img:714:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 05
MOV S$选数5 <Img:714:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@6]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 06
MOV S$选数6 <Img:715:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 06
MOV S$选数6 <Img:715:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 06
MOV S$选数6 <Img:715:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@7]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 07
MOV S$选数7 <Img:716:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 07
MOV S$选数7 <Img:716:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 07
MOV S$选数7 <Img:716:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@8]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 08
MOV S$选数8 <Img:717:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 08
MOV S$选数8 <Img:717:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 08
MOV S$选数8 <Img:717:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@9]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 09
MOV S$选数9 <Img:718:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 09
MOV S$选数9 <Img:718:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 09
MOV S$选数9 <Img:718:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@10]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 10
MOV S$选数10 <Img:719:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 10
MOV S$选数10 <Img:719:17:0:-3>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 10
MOV S$选数10 <Img:719:17:0:-3>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@11]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S11 11
MOV S$选数11 <Img:720:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 11
MOV S$选数11 <Img:720:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 11
MOV S$选数11 <Img:720:17:0:-2>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@12]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 12
MOV S$选数12 <Img:721:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 12
MOV S$选数12 <Img:721:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 12
MOV S$选数12 <Img:721:17:0:-2>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@13]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 13
MOV S$选数13 <Img:722:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 13
MOV S$选数13 <Img:722:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 13
MOV S$选数13 <Img:722:17:0:-2>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@14]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 14
MOV S$选数14 <Img:723:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 14
MOV S$选数14 <Img:723:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 14
MOV S$选数14 <Img:723:17:0:-2>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@15]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 15
MOV S$选数15 <Img:724:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 15
MOV S$选数15 <Img:724:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 15
MOV S$选数15 <Img:724:17:0:-2>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@16]
#IF
EQUAL S$选号S1 --
#ACT
MOV S$选号S1 16
MOV S$选数16 <Img:725:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S2 --
#ACT
MOV S$选号S2 16
MOV S$选数16 <Img:725:17:0:-2>
GOTO @结算
break
#IF
EQUAL S$选号S3 --
#ACT
MOV S$选号S3 16
MOV S$选数16 <Img:725:17:0:-2>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示:你已经取了足够的红色球,请不要再点击红球了!
break
[@lq1]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 01
MOV S$选数Ns1 <Img:710:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq2]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 02
MOV S$选数Ns2 <Img:711:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq3]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 03
MOV S$选数Ns3 <Img:712:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq4]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 04
MOV S$选数Ns4 <Img:713:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq5]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 05
MOV S$选数Ns5 <Img:714:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq6]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 06
MOV S$选数Ns6 <Img:715:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq7]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 07
MOV S$选数Ns7 <Img:716:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq8]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 08
MOV S$选数Ns8 <Img:717:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq9]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 09
MOV S$选数Ns9 <Img:718:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@lq10]
#IF
EQUAL S$选号S4 --
#ACT
MOV S$选号S4 10
MOV S$选数Ns10 <Img:719:17:0:-1>
GOTO @结算
break
#IF
#ACt
SENDMSG 5 错误提示你已经取了足够的蓝色球,请不要再点击蓝球了!
break
[@结算]
#IF
NOT EQUAL S$选号S1 --
NOT EQUAL S$选号S2 --
NOT EQUAL S$选号S3 --
NOT EQUAL S$选号S4 --
#SAY
双色球销售:\
  请您选择号码!\

第[<$STR(A126)>]期 红球 <$STR(S$选号S1)> <$STR(S$选号S2)> <$STR(S$选号S3)> 蓝球 <$STR(S$选号S4)> 倍率:<$STR(N$倍率)> <○/FCOLOR=103><加注/@@InPutInteger4(请输入购买的倍率1-9999:每注需200元宝或元宝)>\
         <Img:680:17:-2:-18> <Img:680:17:0:-18> <Img:680:17:-5:-18>    <Img:681:17:-3:-18>\
红球号码:<$STR(S$选数1)> <$STR(S$选数2)> <$STR(S$选数3)> <$STR(S$选数4)> <$STR(S$选数5)> <$STR(S$选数6)> <$STR(S$选数7)> <$STR(S$选数8)> <$STR(S$选数9)> <$STR(S$选数10)>\

     <$STR(S$选数11)> <$STR(S$选数12)> <$STR(S$选数13)> <$STR(S$选数14)> <$STR(S$选数15)> <$STR(S$选数16)> \

蓝球号码:<$STR(S$选数Ns1)> <$STR(S$选数Ns2)> <$STR(S$选数Ns3)> <$STR(S$选数Ns4)> <$STR(S$选数Ns5)> <$STR(S$选数Ns6)> <$STR(S$选数Ns7)> <$STR(S$选数Ns8)> <$STR(S$选数Ns9)> <$STR(S$选数Ns10)>\
 \
<○/FCOLOR=103><打印彩票/@打印> <○/FCOLOR=103><重置归零/@买> <○/FCOLOR=103><重新机选/@机选> <○/FCOLOR=103><返回/@MAIN>\
<[请点击打印彩票,并按照提示进行操作,完成打印。]/FCOLOR=250>
#ACT
break

#IF
#SAY
双色球销售:\
  请您选择号码!\

第[<$STR(A126)>]期 红球 <$STR(S$选号S1)> <$STR(S$选号S2)> <$STR(S$选号S3)> 蓝球 <$STR(S$选号S4)> 倍率:<$STR(N$倍率)> <○/FCOLOR=103><加注/@@InPutInteger4(请输入购买的倍率1-9999:每注需200元宝或元宝)>\
         <Img:680:17:-2:-18> <Img:680:17:0:-18> <Img:680:17:-5:-18>    <Img:681:17:-3:-18>\
红球号码:<$STR(S$选数1)> <$STR(S$选数2)> <$STR(S$选数3)> <$STR(S$选数4)> <$STR(S$选数5)> <$STR(S$选数6)> <$STR(S$选数7)> <$STR(S$选数8)> <$STR(S$选数9)> <$STR(S$选数10)>\

     <$STR(S$选数11)> <$STR(S$选数12)> <$STR(S$选数13)> <$STR(S$选数14)> <$STR(S$选数15)> <$STR(S$选数16)> \

蓝球号码:<$STR(S$选数Ns1)> <$STR(S$选数Ns2)> <$STR(S$选数Ns3)> <$STR(S$选数Ns4)> <$STR(S$选数Ns5)> <$STR(S$选数Ns6)> <$STR(S$选数Ns7)> <$STR(S$选数Ns8)> <$STR(S$选数Ns9)> <$STR(S$选数Ns10)>\
 \
<○/FCOLOR=103><继续选号/FCOLOR=230> <○/FCOLOR=103><重置归零/@买> <○/FCOLOR=103><重新机选/@机选> <○/FCOLOR=103><返回/@MAIN>\

[@InPutInteger4]
#IF
EQUAL N4 0
#ACT
MESSAGEBOX 请输入0以上的数字!
break
#IF
LARGE N4 9999
#ACT
MESSAGEBOX 倍率过大,请重新 !!
break
#IF
#ACT
MOV N$倍率 <$STR(N4)>
GOTO @结算
break


[@打印]
#IF
CHECKTEXTLIST ..\QuestDiary\数据库\双色球\开奖时间.txt <$HOUR>
SMALL <$MINUTE> 5
#SAY
双色球销售:\
  双色球正在开奖,不能查阅和购买!\
请在<$HOUR>点05分后再试!\ \
<○/FCOLOR=103><知道了/@EXIT>\
#ACT
break
#IF
#ACT
ReturnBoxItem 0
ReturnBoxItem 1
GIVE 双色球彩票[未打印] 1
#SAY
双色球销售:   <Img:680:17:-2:30> <Img:680:17:0:30> <Img:680:17:-5:30>    <Img:681:17:-3:30>\
  下面是您选择的号码,请将彩票放入框内打印!\
第[<$STR(A126)>]期 红球 <$STR(S$选号S1)> <$STR(S$选号S2)> <$STR(S$选号S3)> 蓝球 <$STR(S$选号S4)> 倍率:<$STR(N$倍率)>\ \
 <ITEMBOX:0:17:397:0:-3:33:30:42:请将背包内的彩票放进来> <请在这里放入彩票进行打印/FCOLOR=250>\
     <彩票就在你背包里!/FCOLOR=250>\ \
<○/FCOLOR=103><打印彩票/@买1> <○/FCOLOR=103><机选一组/@机选> <○/FCOLOR=103><返回/@MAIN>\ \
<元宝买的票所中就是元宝]/FCOLOR=250>



[@ItemIntoBox0]
#IF
EQUAL <$BOXITEM[0].NAME> 双色球彩票[未打印]
NOT EQUAL <$BOXITEM[0].NAME_G> 双色球彩票[未打印]
#ACT
UNALLOWITEMINTOBOX
MESSAGEBOX 该彩票已经被打印过了!
break

#IF
EQUAL <$BOXITEM[0].NAME> 双色球彩票[未打印]
#ELSEACT
UNALLOWITEMINTOBOX
MESSAGEBOX 请放入双色球彩票,不要放入杂物!
break
#IF
#SAY
双色球销售:   <Img:680:17:-2:30> <Img:680:17:0:30> <Img:680:17:-5:30>    <Img:681:17:-3:30>\
  下面是您选择的号码,请将彩票放入框内打印!\
第[<$STR(A126)>]期 红球 <$STR(S$选号S1)> <$STR(S$选号S2)> <$STR(S$选号S3)> 蓝球 <$STR(S$选号S4)> 倍率:<$STR(N$倍率)>\ \
 <ITEMBOX:0:17:397:0:-3:33:30:42:请将背包内的彩票放进来> <已经放入了彩票/FCOLOR=250>\
     <请选择打印方式/FCOLOR=250>\ \
<○/FCOLOR=103><元宝打印/@买s2> <○/FCOLOR=103><返回/@MAIN>\ \


[@买s1]
#IF
#ACT
MUL N$彩金额 <$STR(N$倍率)> 200

#IF
CHECKGAMEGOLD < <$STR(N$彩金额)>
#ACT
MESSAGEBOX 费用不足:\元宝不足[<$STR(N$彩金额)>]颗,无法以元宝进行支付打印!
GOTO @结算
break

#IF
CHECKBAGSIZE 1
#ACT
GAMEGOLD - <$STR(N$彩金额)>
INC G120 <$STR(N$彩金额)>
CREATEFILE ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt <$STR(N$倍率)>:元宝 0
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S1)>-<$STR(S$选号S2)>-<$STR(S$选号S3)>+<$STR(S$选号S4)> 1
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S1)>-<$STR(S$选号S3)>-<$STR(S$选号S2)>+<$STR(S$选号S4)> 2
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S2)>-<$STR(S$选号S1)>-<$STR(S$选号S2)>+<$STR(S$选号S4)> 3
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S2)>-<$STR(S$选号S3)>-<$STR(S$选号S1)>+<$STR(S$选号S4)> 4
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S3)>-<$STR(S$选号S2)>-<$STR(S$选号S1)>+<$STR(S$选号S4)> 5
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S3)>-<$STR(S$选号S1)>-<$STR(S$选号S2)>+<$STR(S$选号S4)> 6
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期+<$STR(S$选号S4)> 7
SetUpgradeItem 0
ChangeItemName -1 第<$STR(A126)>期双色球<$STR(N$倍率)>倍-元宝
UpDateBoxItem 0
ReturnBoxItem 0
#SAY
双色球销售:\
  您的彩票号码和相关信息已经打印好了!开奖后可凭此票进行兑奖!\ \
<○/FCOLOR=103><返回/@MAIN>
#ACT
break


[@买s2]
#IF
#ACT
MUL N$彩金额 <$STR(N$倍率)> 200

#IF
CHECKGAMEGOLD < <$STR(N$彩金额)>
#ACT
MESSAGEBOX 费用不足:\元宝不足[<$STR(N$彩金额)>],无法以元宝进行支付打印!
GOTO @结算
break

#IF
CHECKBAGSIZE 1
#ACT
GAMEGOLD - <$STR(N$彩金额)>
INC G120 <$STR(N$彩金额)>
CREATEFILE ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt <$STR(N$倍率)>:元宝 0
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S1)>-<$STR(S$选号S2)>-<$STR(S$选号S3)>+<$STR(S$选号S4)> 1
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S1)>-<$STR(S$选号S3)>-<$STR(S$选号S2)>+<$STR(S$选号S4)> 2
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S2)>-<$STR(S$选号S1)>-<$STR(S$选号S2)>+<$STR(S$选号S4)> 3
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S2)>-<$STR(S$选号S3)>-<$STR(S$选号S1)>+<$STR(S$选号S4)> 4
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S3)>-<$STR(S$选号S2)>-<$STR(S$选号S1)>+<$STR(S$选号S4)> 5
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期<$STR(S$选号S3)>-<$STR(S$选号S1)>-<$STR(S$选号S2)>+<$STR(S$选号S4)> 6
AddTextListEx ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[0].MAKEINDEX>.txt 第<$STR(A126)>期+<$STR(S$选号S4)> 7
SetUpgradeItem 0
ChangeItemName -1 第<$STR(A126)>期双色球<$STR(N$倍率)>倍-元宝
UpDateBoxItem 0
ReturnBoxItem 0
#SAY
双色球销售:\
  您的彩票号码和相关信息已经打印好了!开奖后可凭此票进行兑奖!\ \
<○/FCOLOR=103><返回/@MAIN>
#ACT
break


[@ItemOutBox0]
#ACT
GOTO @结算





[@查询]
#IF
CHECKTEXTLIST ..\QuestDiary\数据库\双色球\开奖时间.txt <$HOUR>
SMALL <$MINUTE> 5
#SAY
双色球销售:\
  双色球正在开奖,不能查阅和购买!\
请在<$HOUR>点05分后再试!\ \
<○/FCOLOR=103><知道了/@EXIT>\
#ACT
break
#IF
#ACT
ReturnBoxItem 0
ReturnBoxItem 1
#SAY
双色球销售:        <Img:680:17:-2:30> <Img:680:17:0:30> <Img:680:17:-5:30>    <Img:681:17:-3:30><Img:680:17:-127:46> <Img:680:17:-125:46> <Img:680:17:-129:46>    <Img:681:17:-127:46>\
彩票投注:倍率:-  投注:--\
彩票号码:第[----]期 红球 -- -- -- 蓝球 --\
当期号码:第[----]期 红球 -- -- -- 蓝球 --\
 <ITEMBOX:1:17:397:0:13:33:30:42:请将需要查询的彩票放入框内>\
     是否中奖:请放入彩票\
     中奖数额:0\ \
<○/FCOLOR=103><请放入彩票/FCOLOR=230> <○/FCOLOR=103><返回/@MAIN> \
<[这里也可以查询是否中奖和查询号码!]/FCOLOR=250>
[@ItemIntoBox1]
#IF
EQUAL <$BOXITEM[1].NAME> 双色球彩票[未打印]
EQUAL <$BOXITEM[1].NAME_G> 双色球彩票[未打印]
#ACT
DELBOXITEM 1
GOTO @查询
MESSAGEBOX 这张彩票没有被打印过,我帮你回收了!
break

#IF
EQUAL <$BOXITEM[1].NAME> 双色球彩票[未打印]
#ELSEACT
DELBOXITEM 1
MESSAGEBOX 请放入彩票不要放入杂物!
break

#IF
#ACT
GetListString ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt 0 N$投倍率 S$彩方式
GetRandomText ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt S$彩验奖1 1
GetRandomText ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt S$彩验奖2 2
GetRandomText ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt S$彩验奖3 3
GetRandomText ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt S$彩验奖4 4
GetRandomText ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt S$彩验奖5 5
GetRandomText ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt S$彩验奖6 6
GetRandomText ..\QuestDiary\数据文件\双色球彩票\<$BOXITEM[1].MAKEINDEX>.txt S$彩验奖7 7
MOV S$期号 <$STR(S$彩验奖1)>
DEC S$期号 6 30
DEC S$期号 1 1
MOV N$期号 <$STR(S$期号)>
MOV S$球号 <$STR(S$彩验奖1)>
DEC S$球号 1 6
ANSIREPLACETEXT S$球号 -  
ANSIREPLACETEXT S$球号 +  蓝球 
MOV S$中奖

#IF
LARGE N$期号 <$STR(G121)>
#ACT
MOV S$中奖 <尚未开奖/FCOLOR=230>
MOV N$中金额2 0
MOV N$中金额 0
MOV S$领奖图 <返回/@查询>

#OR
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖1)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖2)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖3)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖4)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖5)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖6)>
#ACT
MOV S$中奖 一等奖
MOV N$中金额 100000
MUL N$中金额2 <$STR(N$中金额)> <$STR(N$投倍率)>
MOV S$领奖图 <领奖/@领>

#IF
EQUAL S$中奖
#ACT
DEC S$彩验奖1 14 30
DEC S$彩验奖2 14 30
DEC S$彩验奖3 14 30
DEC S$彩验奖4 14 30
DEC S$彩验奖5 14 30
DEC S$彩验奖6 14 30

#OR
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖1)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖2)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖3)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖4)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖5)>
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球开奖.txt <$STR(S$彩验奖6)>
#ACT
MOV S$中奖 二等奖
MOV N$中金额 10000
MUL N$中金额2 <$STR(N$中金额)> <$STR(N$投倍率)>
MOV S$领奖图 <领奖/@领>

#IF
EQUAL S$中奖
CHECKTEXTLIST ..\QuestDiary\数据文件\双色球蓝球.txt <$STR(S$彩验奖7)>
#ACT
MOV S$中奖 三等奖
MOV N$中金额 200
MUL N$中金额2 <$STR(N$中金额)> <$STR(N$投倍率)>
MOV S$领奖图 <领奖/@领>

#IF
EQUAL S$中奖
#ACT
MOV S$中奖 没中奖!
MOV N$中金额2 0
MOV N$中金额 0
MOV S$领奖图 <销毁彩票/@删>

#IF
EQUAL S$中奖 <尚未开奖/FCOLOR=230>
#ACT
GetRandomText ..\QuestDiary\数据文件\双色球记录.txt S$当期奖 <$STR(N$期号)>
#SAY
双色球销售:        <Img:680:17:-2:30> <Img:680:17:0:30> <Img:680:17:-5:30>    <Img:681:17:-3:30><Img:680:17:-127:46> <Img:680:17:-125:46> <Img:680:17:-129:46>    <Img:681:17:-127:46>\
<彩票投注:/FCOLOR=254>倍率:<$STR(N$投倍率)> 投注:<$STR(S$彩方式)>\
<彩票号码:/FCOLOR=254>第[<$STR(S$期号)>]期 红球 <$STR(S$球号)> \
<当期号码:/FCOLOR=254>第[<$STR(S$期号)>]期 红球 -- -- -- 蓝球 -- \
 <ITEMBOX:1:17:397:0:13:33:30:42:请将需要查询的彩票放入框内>\
     <是否中奖:/FCOLOR=254><$str(S$中奖)>\
     <中奖数额:/FCOLOR=254><$STR(N$中金额2)><$STR(S$彩方式)>\ \
<○/FCOLOR=103><$STR(S$领奖图)>\
<[这里也可以查询是否中奖和查询号码!]/FCOLOR=250>
#ACT
break

#IF
#ACT
GetRandomText ..\QuestDiary\数据文件\双色球记录.txt S$当期奖 <$STR(N$期号)>
#SAY
双色球销售:        <Img:680:17:-2:30> <Img:680:17:0:30> <Img:680:17:-5:30>    <Img:681:17:-3:30><Img:680:17:-127:46> <Img:680:17:-125:46> <Img:680:17:-129:46>    <Img:681:17:-127:46>\
<彩票投注:/FCOLOR=254>倍率:<$STR(N$投倍率)> 投注:<$STR(S$彩方式)>\
<彩票号码:/FCOLOR=254>第[<$STR(S$期号)>]期 红球 <$STR(S$球号)> \
<当期号码:/FCOLOR=254><$STR(S$当期奖)>\
 <ITEMBOX:1:17:397:0:13:33:30:42:请将需要查询的彩票放入框内>\
     <是否中奖:/FCOLOR=254><$str(S$中奖)>\
     <中奖数额:/FCOLOR=254><$STR(N$中金额2)> <$STR(S$彩方式)>\ \
<○/FCOLOR=103><$STR(S$领奖图)>\
<[这里也可以查询是否中奖和查询号码!]/FCOLOR=250>

[@删]
#ACT
DELBOXITEM 1
goto @查询

[@领]
#IF
CHECKTEXTLIST ..\QuestDiary\数据库\双色球\开奖时间.txt <$HOUR>
SMALL <$MINUTE> 5
#SAY
双色球销售:\
  双色球正在开奖,不能查阅和购买!\
请在<$HOUR>点05分后再试!\ \
<○/FCOLOR=103><知道了/@EXIT>\
#ACT
break
#IF
#ACT
DELBOXITEM 1
AddTextListEx ..\QuestDiary\数据文件\历届中奖.txt ★第[<$STR(S$期号)>]期中奖人:<$USERNAME> <$str(S$中奖)> <$STR(N$投倍率)>倍中<$STR(N$中金额2)><$STR(S$彩方式)> 0

#IF
SMALL G120 <$STR(中金额)>
#ACT
INC G120 <$STR(中金额)>

#IF
EQUAL S$彩方式 元宝
EQUAL S$中奖 一等奖
#ACT
SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
MUL N$中金额 <$STR(N$中金额)> 80
DIV N$中金额 <$STR(N$中金额)> 100
INC U47 <$STR(N$中金额)>
DEC G120 <$STR(N$中金额)>
SENDMSG 7 恭喜您中得<$str(S$中奖)>,税后奖金<$STR(N$投倍率)>倍<$STR(N$中金额)><$STR(S$彩方式)>!已将奖金发往您的银行内,请前往仓库中验收!

#IF
EQUAL S$彩方式 元宝
EQUAL S$中奖 二等奖
#ACT
SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
MUL N$中金额 <$STR(N$中金额)> 80
DIV N$中金额 <$STR(N$中金额)> 100
INC U47 <$STR(N$中金额)>
DEC G120 <$STR(N$中金额)>
SENDMSG 7 恭喜您中得<$str(S$中奖)>,税后奖金<$STR(N$投倍率)>倍<$STR(N$中金额)><$STR(S$彩方式)>!已将奖金发往您的银行内,请前往仓库中验收!

#IF
EQUAL S$彩方式 元宝
EQUAL S$中奖 三等奖
#ACT
SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
INC U47 <$STR(N$中金额)>
DEC G120 <$STR(N$中金额)>
SENDMSG 7 恭喜您中得<$str(S$中奖)>,小奖无税,奖金<$STR(N$投倍率)>倍<$STR(N$中金额)><$STR(S$彩方式)>!已将奖金发往您的银行内,请前往仓库中验收!

#IF
EQUAL S$彩方式 元宝
EQUAL S$中奖 一等奖
#ACT
SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
MUL N$中金额 <$STR(N$中金额)> 80
DIV N$中金额 <$STR(N$中金额)> 100
INC U46 <$STR(N$中金额)>
DEC G120 <$STR(N$中金额)>
SENDMSG 7 恭喜您中得<$str(S$中奖)>,税后奖金<$STR(N$投倍率)>倍<$STR(N$中金额)><$STR(S$彩方式)>!已将奖金发往您的银行内,请前往仓库中验收!

#IF
EQUAL S$彩方式 元宝
EQUAL S$中奖 二等奖
#ACT
SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
MUL N$中金额 <$STR(N$中金额)> 80
DIV N$中金额 <$STR(N$中金额)> 100
INC U46 <$STR(N$中金额)>
DEC G120 <$STR(N$中金额)>
SENDMSG 7 恭喜您中得<$str(S$中奖)>,税后奖金<$STR(N$投倍率)>倍<$STR(N$中金额)><$STR(S$彩方式)>!已将奖金发往您的银行内,请前往仓库中验收!

#IF
EQUAL S$彩方式 元宝
EQUAL S$中奖 三等奖
#ACT
SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
SENDMSG 0 {├|7:0:0}{恭喜[ |103:0:0}{%s|251:0:0}{ ]中得了恒古大陆双色球|103:0:0}{第[<$STR(S$期号)>]期<$str(S$中奖)>|255:0:0}{,获得奖金<$STR(N$投倍率)>倍[ |103:0:0}{<$STR(N$中金额)><$STR(S$彩方式)>|255:0:0}{ ]|103:0:0}
INC U46 <$STR(N$中金额)>
DEC G120 <$STR(N$中金额)>
SENDMSG 7 恭喜您中得<$str(S$中奖)>,小奖无税,奖金<$STR(N$投倍率)>倍<$STR(N$中金额)><$STR(S$彩方式)>!已将奖金发往您的银行内,请前往仓库中验收!

#IF
SMALL G120 500000
#ACT
INC G120 500000

#IF
#ACT
goto @查询
栏目列表