传奇版本

传奇元宝做庄脚本

[复制链接]
查看94211 | 回复20 | 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 | 显示全部楼层
看帖回帖一条路!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则