当前位置: > 新闻动态 > 文章内容


[@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=250100000 元宝或元宝/FCOLOR=250\
二奖:3红球全中 奖金:/FCOLOR=25010000 元宝或元宝/FCOLOR=250\
三奖:只中蓝球 奖金:/FCOLOR=250200 元宝或元宝/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变态传奇65535$选号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:30Img: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:30Img: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$期号)]期 红球 -- -- -- 蓝球 -- \
 ITEMB英雄连击传奇私服OX: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:30Img: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 @查询

相关文章