• 网站首页
  • 传奇技术
  • 传世技术
  • 奇迹技术
  • 魔兽技术
  • 魔域技术
  • 江湖技术
  • 其他技术
  • 传三技术
  • 完美技术
  • 诛仙技术
  • 游戏程序

    • 软件文章

    您当前的位置：首页 > 传奇技术

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

    本文出处：网游动力作者：本站发布时间：2015-08-12阅读次数：

     [@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 @查询
     
    热门文章
    热门标签
    传奇引擎版本网络开区最新服务脚本服务端1.76英雄科技商业职业地图HERO元素1.80合击中变极品方法连击1.85完美轻变数据教程一条龙传世登陆全新完整免费仿盛大登陆器技能传说经典系统特色攻略更新配置网站玩家激情升级GOM火爆玩法
    Copyright © 2008-2016 网游动力. All Rights Reserved.
    Powered by：SF5.Net
    辽ICP备17007188号
    关于本站 | 网站帮助 | 广告合作 | 发布软件 | 下载声明 | 网站地图