腾飞论坛 发表于 2012-12-19 12:32:24

传奇元宝做庄脚本

    (@@InPutInteger)
    [@MAIN]
    欢迎光临,这里是猜点数游戏,你所拥有的元宝:【<$GAMEGOLD>】\
    **姓名:【<$STR(A34)>】 **本钱数:【<$STR(G29)>】\
    ╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗\
    ┊<查看说明/@Help>┊┊<开始坐庄/@@InPutInteger40>┊┊<下注押大/@@InPutInteger41>┊┊<下注押小/@@InPutInteger42>┊┊<返回土城/@Over>┊\
    ╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝\
    押大总金额:【<$STR(G13)>】           剩余时间:<$STR(G8)>\
    押小总金额:【<$STR(G14)>】\
    你的下注情况:你下注【<$STR(M43)>】元宝押【<$STR(S23)>】  <刷新/@MAIN>\
    <网监提示:猜点数游戏仅供娱乐,禁止进行论坛和违法的金币交易!>\
    [@InPutInteger40]
    #If
    CheckLevelEx > 0
    #Act
    DelayGoto 1 ~InPutInteger40
    [~InPutInteger40]
    #IF
    LARGE G12 60
    #ACT
    MESSAGEBOX [提示]:**时间已经结束。请等待开局!
    MOV N40 0
    GOTO @MAIN
    BREAK
    #IF
    SMALL N40 1000
    #ACT
    MESSAGEBOX [提示]:请输入1000以上的数值!
    MOV N40 0
    GOTO @MAIN
    BREAK
    #IF
    EQUAL A34 <$USERNAME>
    #ACT
    MOV N40 0
    MESSAGEBOX [提示]:你目前已经是**,无法重复坐庄。
    GOTO @MAIN
    BREAK
    #IF
    EQUAL M45 2
    #ACT
    MOV N40 0
    MESSAGEBOX [提示]:你已经下注押了大,无法坐庄!
    GOTO @MAIN
    BREAK
    #IF
    EQUAL M45 3
    #ACT
    MOV N40 0
    MESSAGEBOX [提示]:你已经下注押了小,无法坐庄!
    GOTO @MAIN
    BREAK
    #IF
    CHECKGAMEGOLD < <$STR(N40)>
    #ACT
    MESSAGEBOX [提示]:你身上的元宝不足。
    MOV N40 0
    GOTO @MAIN
    BREAK
    #IF
    LARGE N40 <$STR(G29)>
    #ACT
    GMEXECUTE 调整元宝 <$STR(A34)> + <$STR(G29)>
    GAMEGOLD - <$STR(N40)>
    MOV G29 <$STR(N40)>
    SendMSG 4 %s使用<$STR(N40)>个元宝坐庄。
    MOV A34 <$USERNAME>
    GOTO @MAIN
    MESSAGEBOX [提示]:使用【<$STR(N40)>】个元宝坐庄。
    BREAK
    #ELSEACT
    MESSAGEBOX [提示]:你必须出多于【<$STR(G29)>】个元宝才能**。
    MOV N40 0
    GOTO @MAIN
    BREAK
    [@InPutInteger41]
    #If
    CheckLevelEx > 0
    #Act
    MOVR M62 4
    INC M62 2
    DelayGoto 1 ~InPutInteger41
    [~InPutInteger41]
    #IF
    LARGE G12 120
    #ACT
    MESSAGEBOX [提示]:下注时间已经结束。请等待开局!
    MOV N41 0
    GOTO @MAIN
    BREAK
    #IF
    SMALL G12 61
    #ACT
    MESSAGEBOX [提示]:下注时间还没到,现在是**时间。
    MOV N41 0
    GOTO @MAIN
    BREAK
    #IF
    SMALL N41 10
    #ACT
    MESSAGEBOX [提示]:请输入10以上的数值!
    MOV N41 0
    GOTO @MAIN
    BREAK
    #IF
    EQUAL A34 <$USERNAME>
    #ACT
    MOV M40 0
    MESSAGEBOX [提示]:你目前已经是**,无法重复坐庄。
    GOTO @MAIN
    BREAK
    #IF
    EQUAL M45 2
    #ACT
    MOV N41 0
    MESSAGEBOX [提示]:你已经下注押了大,无法重复下注!
    GOTO @MAIN
    BREAK
    #IF
    EQUAL M45 3
    #ACT
    MOV N41 0
    MESSAGEBOX [提示]:你已经下注押了小,无法重复下注!
    GOTO @MAIN
    BREAK
    #IF
    LARGE N41 <$STR(G9)>
    #ACT
    MOV N41 0
    MESSAGEBOX [提示]:对不起,**的本钱已达到上限不够赔了。\    \目前你只可以下注【<$STR(G9)>】以下的元宝!
    GOTO @MAIN
    BREAK
    #IF
    CHECKGAMEGOLD > <$STR(N41)>
    EQUAL M62 1
    #ACT
    ClearDelayGoto
    MOV M62 0
    MOV M45 2
    MOV S23 大
    GAMEGOLD - <$STR(N41)>
    MOV M43 <$STR(N41)>
    INC G13 <$STR(M43)>
    SendMSG 4 %s使用<$STR(N41)>个元宝下注押大。
    GOTO @MAIN
    MESSAGEBOX [提示]:使用【<$STR(N41)>】个元宝下注押大。
    MOV N41 0
    BREAK
    #IF
    CHECKGAMEGOLD > <$STR(N41)>
    #ACT
    DEC M62 1
    SendMSG 5 [提示]:使用【<$STR(N41)>】个元宝下注押大,将在【<$STR(M62)>】秒后开始执行。
    DelayCall 1000 ~InPutInteger41
    BREAK
    #ELSEACT
    MESSAGEBOX [提示]:你身上的元宝不足。
    MOV N41 0
    GOTO @MAIN
    BREAK
    [@InPutInteger42]
    #If
    CheckLevelEx > 0
    #Act
    MOVR M62 4
    INC M62 2
    DelayGoto 1 ~InPutInteger42
    [~InPutInteger42]
    #IF
    LARGE G12 120
    #ACT
    MESSAGEBOX [提示]:下注时间已经结束。请等待开局!
    MOV N42 0
    GOTO @MAIN
    BREAK
    #IF
    SMALL G12 61
    #ACT
    MESSAGEBOX [提示]:下注时间还没到,现在是**时间。
    MOV N42 0
    GOTO @MAIN
    BREAK
    #IF
    SMALL N42 10
    #ACT
    MESSAGEBOX [提示]:请输入10以上的数值!
    MOV N42 0
    GOTO @MAIN
    BREAK
    #IF
    EQUAL A34 <$USERNAME>
    #ACT
    MOV M40 0
    MESSAGEBOX [提示]:你目前已经是**,无法重复坐庄。
    GOTO @MAIN
    BREAK
    #IF
    EQUAL M45 2
    #ACT
    MOV N42 0
    MESSAGEBOX [提示]:你已经下注押了大,无法重复下注!
    GOTO @MAIN
    BREAK
    #IF
    EQUAL M45 3
    #ACT
    MOV N42 0
    MESSAGEBOX [提示]:你已经下注押了小,无法重复下注!
    GOTO @MAIN
    BREAK
    #IF
    LARGE N42 <$STR(G10)>
    #ACT
    MOV N42 0
    MESSAGEBOX [提示]:对不起,**的本钱已达到上限不够赔了。\    \目前你只可以下注【<$STR(G10)>】以下的元宝!
    GOTO @MAIN
    BREAK
    #IF
    CHECKGAMEGOLD > <$STR(N42)>
    EQUAL M62 1
    #ACT
    ClearDelayGoto
    MOV M62 0
    MOV M45 3
    MOV S23 小
    GAMEGOLD - <$STR(N42)>
    MOV M43 <$STR(N42)>
    INC G14 <$STR(M43)>
    SendMSG 4 %s使用<$STR(N42)>个元宝下注押小。
    GOTO @MAIN
    MESSAGEBOX [提示]:使用【<$STR(N42)>】个元宝下注押小。
    MOV N42 0
    BREAK
    #IF
    CHECKGAMEGOLD > <$STR(N41)>
    #ACT
    DEC M62 1
    SendMSG 5 [提示]:使用【<$STR(N42)>】个元宝下注押小,将在【<$STR(M62)>】秒后开始执行。
    DelayCall 1000 ~InPutInteger42
    BREAK
    #ELSEACT
    MESSAGEBOX [提示]:你身上的元宝不足。
    MOV N42 0
    GOTO @MAIN
    BREAK
    [@Over]
    #IF
    #ACT
    MapMove 3 330 330
    BREAK
    [@Help]
    猜点游戏规则:
    1)**坐庄后,其他玩家可下注,两分钟后三个骰子随机出现,\
     点数总和小于11代表小,点数总和大于10代表大,三个点数相同\
     代表豹子。
    2)押大赢大,押小赢小,豹子通吃,系统每次收取10%税务。\
    3)正在坐庄或已下注的玩家如下线将被视做弃权,损失下注元宝。\
    4)玩家下注数不能超过**坐庄的元宝总和。\
    <返回/@MAIN>  <离开/@EXIT>\
    [@IsInFilterList]
    #ACT
    MESSAGEBOX [错误]:输入数据中包含了非法字符,请重新编辑!
    论坛一条龙

郑武斌 发表于 2014-5-30 11:02:04

楼主的帖子越来越有深度了!

郑武斌 发表于 2014-5-30 10:46:35

今天皮痒了?

巨根 发表于 2014-5-30 10:54:37

帖子很有深度!

独自漫步 发表于 2014-5-30 10:57:34

大神好强大!

huhu662 发表于 2014-5-30 10:50:00

每天顶顶贴,一身轻松啊!

田尹俊 发表于 2014-6-1 12:01:54

强,我和我的小伙伴们都惊呆了!

轻狂书生 发表于 2014-6-1 12:21:38

楼主是我最崇拜的人!

沈阳小良 发表于 2014-6-1 12:36:44

收藏了,很不错的内容!

何必自欺欺人 发表于 2014-6-1 11:47:03

看帖回帖一条路!
页: [1] 2 3
查看完整版本: 传奇元宝做庄脚本