找回密码
 立即注册
查看: 16594|回复: 72

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

    [复制链接]
  • TA的每日心情
    慵懒
    2021-9-14 16:47
  • 签到天数: 9 天

    连续签到: 1 天

    [LV.3]初领妙道

    343

    主题

    0

    回帖

    1054

    积分

    锋芒毕露

    积分
    1054
    发表于 2019-10-16 17:13:56 | 显示全部楼层 |阅读模式

    马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

    您需要 登录 才可以下载或查看,没有账号?立即注册

    ×

    [@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 @查询


    楼主热帖
  • TA的每日心情
    奋斗
    2019-8-30 10:34
  • 签到天数: 465 天

    连续签到: 7 天

    [LV.9]妙领天机

    5

    主题

    3017

    回帖

    3025

    积分

    声名显赫

    积分
    3025
    发表于 2019-10-16 19:24:51 | 显示全部楼层
    LZ是天才,坚定完毕
    回复

    使用道具 举报

  • TA的每日心情
    奋斗
    2019-8-29 12:48
  • 签到天数: 462 天

    连续签到: 6 天

    [LV.9]妙领天机

    9

    主题

    3106

    回帖

    3123

    积分

    声名显赫

    积分
    3123
    发表于 2019-10-17 12:53:33 | 显示全部楼层
    纯粹路过,没任何兴趣,仅仅是看在老用户份上回复一下
    回复

    使用道具 举报

  • TA的每日心情

    2019-8-30 05:15
  • 签到天数: 478 天

    连续签到: 1 天

    [LV.9]妙领天机

    7

    主题

    3097

    回帖

    3111

    积分

    声名显赫

    积分
    3111
    发表于 2019-10-21 00:15:09 | 显示全部楼层
    看帖要回,回帖才健康,在踩踩,楼主辛苦了!
    回复

    使用道具 举报

  • TA的每日心情
    难过
    2019-8-30 08:19
  • 签到天数: 483 天

    连续签到: 1 天

    [LV.9]妙领天机

    2

    主题

    2985

    回帖

    2989

    积分

    声名显赫

    积分
    2989
    发表于 2019-10-30 02:00:24 | 显示全部楼层
    围观 围观 沙发在哪里!!!
    回复

    使用道具 举报

  • TA的每日心情
    奋斗
    2019-8-30 08:51
  • 签到天数: 471 天

    连续签到: 2 天

    [LV.9]妙领天机

    3

    主题

    3056

    回帖

    3063

    积分

    声名显赫

    积分
    3063
    发表于 2019-11-3 21:43:11 | 显示全部楼层
    看帖要回,回帖才健康,在踩踩,楼主辛苦了!
    回复

    使用道具 举报

  • TA的每日心情
    开心
    2019-8-30 16:37
  • 签到天数: 494 天

    连续签到: 4 天

    [LV.9]妙领天机

    2

    主题

    3067

    回帖

    3070

    积分

    声名显赫

    积分
    3070
    发表于 2019-11-6 04:45:28 | 显示全部楼层
    呵呵,低调,低调!
    回复

    使用道具 举报

  • TA的每日心情

    2019-8-30 20:44
  • 签到天数: 450 天

    连续签到: 5 天

    [LV.9]妙领天机

    1

    主题

    3041

    回帖

    3042

    积分

    声名显赫

    积分
    3042
    发表于 2019-11-8 05:14:05 | 显示全部楼层
    我只是路过,不发表意见
    回复

    使用道具 举报

  • TA的每日心情

    2019-8-30 10:49
  • 签到天数: 470 天

    连续签到: 2 天

    [LV.9]妙领天机

    10

    主题

    2978

    回帖

    2995

    积分

    声名显赫

    积分
    2995
    发表于 2019-11-27 03:51:16 | 显示全部楼层
    是爷们的娘们的都帮顶!大力支持
    回复

    使用道具 举报

  • TA的每日心情
    慵懒
    2019-8-29 23:08
  • 签到天数: 471 天

    连续签到: 1 天

    [LV.9]妙领天机

    7

    主题

    3086

    回帖

    3099

    积分

    声名显赫

    积分
    3099
    发表于 2019-12-2 04:06:10 | 显示全部楼层
    不错 支持下
    回复

    使用道具 举报

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

    本版积分规则

    QQ|Archiver|手机版|小黑屋|任逍遥

    GMT+8, 2024-12-23 22:23 , Processed in 0.078778 second(s), 45 queries .

    Powered by 任逍遥 X3.5

    Copyright © 2001-2024, Rxiaoyao Cloud.

    快速回复 返回顶部 返回列表