传奇最新赌场风云脚本完整版

释、怀

(@@InPutInteger @@InPutString )
[@main]
#IF
ISADMIN
#say
尊敬的管理员：<$USERNAME>
<这是一个赌博游戏，未满18岁的玩家请离场。><你拥有元宝数量>：<$GAMEGOLD>
下面按你的指示选择你要下注的选项。【<输入你想开的点数/@@InPutInteger71>】
赔率2倍：【<单/@单>】  【<双/@双>】
赔率3倍：【<大/@大>】  【<中/@中>】  【<小/@小>】
赔率6倍：【<一点/@一点>】 【<二点/@二点>】 【<三点/@三点>】 【<四点/@四点>】 【<五点/@五点>】 【<六点/@六点>】
离开局时间还剩下<$STR(G77)>秒，请抓紧时间下注！
<熟悉规则/@熟悉规则>    <查看下注情况/@查看下注情况>            <返回盟重/@返回到盟重>  <关闭窗口/@exit>

#ELSEsay
亲爱的玩家：<$USERNAME>
<这是一个赌博游戏，未满18岁的玩家请离场。><你拥有元宝数量>：<$GAMEGOLD>
按下面提示选择你要下注的选项
赔率2倍：【<单/@单>】  【<双/@双>】
赔率3倍：【<大/@大>】  【<中/@中>】  【<小/@小>】
赔率6倍：【<一点/@一点>】 【<二点/@二点>】 【<三点/@三点>】 【<四点/@四点>】 【<五点/@五点>】 【<六点/@六点>】
离开局时间还剩下<$STR(G77)>秒，请抓紧时间下注！
<熟悉规则/@熟悉规则>    <查看下注情况/@查看下注情况>            <返回盟重/@返回到盟重>  <关闭窗口/@exit>

[@InPutInteger71]
#IF
ISADMIN
#Act
DelayCall 1 ~InPutInteger71
#ELSEsay
嘿嘿，你是骗子吗？
[~InPutInteger71]
#IF
ISADMIN
LARGE N71 0
SMALL N71 7
#Act
mov G71 <$STR(N71)>
#say
设置成功!        <返回/@main>
#ELSEact
messagebox 输入1-6之间的数字正常作弊，输入其他数字作弊失败！！
goto @main
break

[@熟悉规则]
#IF
#ACT
messagebox 点击押大中小单双123456输入你想押下的元宝数量等其他玩家赌注全部下好，由我摇动骰子！中奖后玩家可获得相应赌注奖金如果开出的点数和玩家下的点数不一致,赌注将不做返还玩家获胜后系统自动把奖金增加到人物身上，玩家游戏过程中不可强行退出,也不可以切换地图不然会导致已投注及奖金无法返还,为了增加中奖率,希望您记住每次开的数字研究后然后再慎重下赌注！小赌怡情，娱乐为本，祝愿大家金玉满堂！
[@查看下注情况]
当前这局选择【<大>】的玩家一共有：<$STR(G78)>人，一共有：<$STR(G89)>注
当前这局选择【<中>】的玩家一共有：<$STR(G79)>人，一共有：<$STR(G90)>注
当前这局选择【<小>】的玩家一共有：<$STR(G80)>人，一共有：<$STR(G91)>注
当前这局选择【<单>】的玩家一共有：<$STR(G81)>人，一共有：<$STR(G92)>注
当前这局选择【<双>】的玩家一共有：<$STR(G82)>人，一共有：<$STR(G93)>注
当前这局选择【<一点>】的玩家一共有：<$STR(G83)>人，一共有：<$STR(G94)>注
当前这局选择【<二点>】的玩家一共有：<$STR(G84)>人，一共有：<$STR(G95)>注          <返回/@main>
当前这局选择【<三点>】的玩家一共有：<$STR(G85)>人，一共有：<$STR(G96)>注
当前这局选择【<四点>】的玩家一共有：<$STR(G86)>人，一共有：<$STR(G97)>注
当前这局选择【<五点>】的玩家一共有：<$STR(G87)>人，一共有：<$STR(G98)>注
当前这局选择【<六点>】的玩家一共有：<$STR(G88)>人，一共有：<$STR(G99)>注

　
[@返回到盟重]
#IF
#ACT
mapmove 3 330 330
break

[@大]
当前选择【<大>】的玩家一共有：<$STR(G78)>人
当前选择【<大>】的赌注一共有：<$STR(G89)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押大下注的元宝数量/@@InPutInteger89>  

　                                                    <返回/@main>
[@InPutInteger89]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger89
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger89]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N89)>
small N89 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N89)>
mov N78 <$STR(N89)>
mov P78 3
MUL N78 <$STR(P78)>
inc G78 1
inc G89 <$STR(N89)>
inc G75 1
inc G74 <$STR(N89)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N89)>注【大】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N89)>注【大】，
赔率<$STR(P78)>倍，假如中奖的话你可以获得<$STR(N78)>的元宝
当前选择【<大>】的玩家一共有：<$STR(G78)>人
当前选择【<大>】的赌注一共有：<$STR(G89)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！


[@中]
当前选择【<中>】的玩家一共有：<$STR(G79)>人
当前选择【<中>】的赌注一共有：<$STR(G90)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押中下注的元宝数量/@@InPutInteger90>  

　                                                    <返回/@main>
[@InPutInteger90]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger90
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger90]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N90)>
small N90 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N90)>
mov N79 <$STR(N90)>
mov P79 3
MUL N79 <$STR(P79)> <$STR(N90)>
inc G79 1
inc G90 <$STR(N90)>
inc G75 1
inc G74 <$STR(N90)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N90)>注【中】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N90)>注【中】，
赔率<$STR(P79)>倍，假如中奖的话你可以获得<$STR(N79)>的元宝
当前选择【<中>】的玩家一共有：<$STR(G79)>人
当前选择【<中>】的赌注一共有：<$STR(G90)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！



[@小]
当前选择【<小>】的玩家一共有：<$STR(G80)>人
当前选择【<小>】的赌注一共有：<$STR(G91)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押小下注的元宝数量/@@InPutInteger91>  

　                                                    <返回/@main>
[@InPutInteger91]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger91
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger91]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N91)>
small N91 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N91)>
mov N80 <$STR(N91)>
mov P80 3
MUL N80 <$STR(P80)> <$STR(N91)>
inc G80 1
inc G91 <$STR(N91)>
inc G75 1
inc G74 <$STR(N91)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N91)>注【小】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N91)>注【小】，
赔率<$STR(P80)>倍，假如中奖的话你可以获得<$STR(N80)>的元宝
当前选择【<小>】的玩家一共有：<$STR(G80)>人
当前选择【<小>】的赌注一共有：<$STR(G91)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！

[@单]
当前选择【<单>】的玩家一共有：<$STR(G81)>人
当前选择【<单>】的赌注一共有：<$STR(G92)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押单下注的元宝数量/@@InPutInteger92>  

　                                                    <返回/@main>
[@InPutInteger92]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger92
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger92]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N92)>
small N92 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N92)>
mov N81 <$STR(N92)>
mov P81 2
MUL N81 <$STR(P81)> <$STR(N92)>
inc G81 1
inc G92 <$STR(N92)>
inc G75 1
inc G74 <$STR(N92)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N92)>注【单】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N92)>注【单】，
赔率<$STR(P81)>倍，假如中奖的话你可以获得<$STR(N81)>的元宝
当前选择【<单>】的玩家一共有：<$STR(G81)>人
当前选择【<单>】的赌注一共有：<$STR(G92)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！


[@双]
当前选择【<双>】的玩家一共有：<$STR(G82)>人
当前选择【<双>】的赌注一共有：<$STR(G93)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押双下注的元宝数量/@@InPutInteger93>  

　                                                    <返回/@main>
[@InPutInteger93]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger93
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger93]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N93)>
small N93 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N93)>
mov N82 <$STR(N93)>
mov P82 2
MUL N82 <$STR(P82)> <$STR(N93)>
inc G82 1
inc G93 <$STR(N93)>
inc G75 1
inc G74 <$STR(N93)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N93)>注【双】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N93)>注【双】，
赔率<$STR(P82)>倍，假如中奖的话你可以获得<$STR(N82)>的元宝
当前选择【<双>】的玩家一共有：<$STR(G82)>人
当前选择【<双>】的赌注一共有：<$STR(G93)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！


[@一点]
当前选择【<一点>】的玩家一共有：<$STR(G83)>人
当前选择【<一点>】的赌注一共有：<$STR(G94)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押一点下注的元宝数量/@@InPutInteger94>  

　                                                    <返回/@main>
[@InPutInteger94]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger94
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger94]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N94)>
small N94 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N94)>
mov N83 <$STR(N94)>
mov P83 6
MUL N83 <$STR(P83)> <$STR(N94)>
inc G83 1
inc G94 <$STR(N94)>
inc G75 1
inc G74 <$STR(N94)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N94)>注【一点】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N94)>注【一点】，
赔率<$STR(P83)>倍，假如中奖的话你可以获得<$STR(N83)>的元宝
当前选择【<一点>】的玩家一共有：<$STR(G83)>人
当前选择【<一点>】的赌注一共有：<$STR(G94)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！



[@二点]
当前选择【<二点>】的玩家一共有：<$STR(G84)>人
当前选择【<二点>】的赌注一共有：<$STR(G95)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押二点下注的元宝数量/@@InPutInteger95>  

　                                                    <返回/@main>
[@InPutInteger95]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger95
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger95]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N95)>
small N95 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N95)>
mov N84 <$STR(N95)>
mov P84 6
MUL N84 <$STR(P84)> <$STR(N95)>
inc G84 1
inc G95 <$STR(N95)>
inc G75 1
inc G74 <$STR(N95)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N95)>注【二点】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N95)>注【二点】，
赔率<$STR(P84)>倍，假如中奖的话你可以获得<$STR(N84)>的元宝
当前选择【<二点>】的玩家一共有：<$STR(G84)>人
当前选择【<二点>】的赌注一共有：<$STR(G95)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！



[@三点]
当前选择【<三点>】的玩家一共有：<$STR(G85)>人
当前选择【<三点>】的赌注一共有：<$STR(G96)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押三点下注的元宝数量/@@InPutInteger96>  

　                                                    <返回/@main>
[@InPutInteger96]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger96
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger96]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N96)>
small N96 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N96)>
mov N85 <$STR(N96)>
mov P85 6
MUL N85 <$STR(P85)> <$STR(N96)>
inc G85 1
inc G96 <$STR(N96)>
inc G75 1
inc G74 <$STR(N96)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N96)>注【三点】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N96)>注【三点】，
赔率<$STR(P85)>倍，假如中奖的话你可以获得<$STR(N85)>的元宝
当前选择【<三点>】的玩家一共有：<$STR(G85)>人
当前选择【<三点>】的赌注一共有：<$STR(G96)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！




[@四点]
当前选择【<四点>】的玩家一共有：<$STR(G86)>人
当前选择【<四点>】的赌注一共有：<$STR(G97)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押四点下注的元宝数量/@@InPutInteger97>  

　                                                    <返回/@main>
[@InPutInteger97]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger97
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger97]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N97)>
small N97 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N97)>
mov N86 <$STR(N97)>
mov P86 6
MUL N86 <$STR(P86)> <$STR(N97)>
inc G86 1
inc G97 <$STR(N97)>
inc G75 1
inc G74 <$STR(N97)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N97)>注【四点】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N97)>注【四点】，
赔率<$STR(P86)>倍，假如中奖的话你可以获得<$STR(N86)>的元宝
当前选择【<四点>】的玩家一共有：<$STR(G86)>人
当前选择【<四点>】的赌注一共有：<$STR(G97)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！



[@五点]
当前选择【<五点>】的玩家一共有：<$STR(G87)>人
当前选择【<五点>】的赌注一共有：<$STR(G98)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押五点下注的元宝数量/@@InPutInteger98>  

　                                                    <返回/@main>
[@InPutInteger98]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger98
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger98]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N98)>
small N98 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N98)>
mov N87 <$STR(N98)>
mov P87 6
MUL N87 <$STR(P87)> <$STR(N98)>
inc G87 1
inc G98 <$STR(N98)>
inc G75 1
inc G74 <$STR(N98)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N98)>注【五点】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N98)>注【五点】，
赔率<$STR(P87)>倍，假如中奖的话你可以获得<$STR(N87)>的元宝
当前选择【<五点>】的玩家一共有：<$STR(G87)>人
当前选择【<五点>】的赌注一共有：<$STR(G98)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！



[@六点]
当前选择【<六点>】的玩家一共有：<$STR(G88)>人
当前选择【<六点>】的赌注一共有：<$STR(G99)>注
你拥有元宝数量：<$GAMEGOLD>
<点击输入你要选择押六点下注的元宝数量/@@InPutInteger99>  

　                                                    <返回/@main>
[@InPutInteger99]
#If
CHECKGAMEGOLD > 0
#Act
DelayCall 1 ~InPutInteger99
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。

[~InPutInteger99]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N99)>
small N99 2000000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N99)>
mov N88 <$STR(N99)>
mov P88 6
MUL N88 <$STR(P88)> <$STR(N99)>
inc G88 1
inc G99 <$STR(N99)>
inc G75 1
inc G74 <$STR(N99)>
addnamelist ..QuestDiary重要数据压注名单.txt
SENDMSG 4 [%s]押了：<$STR(N99)>注【六点】，买定离手！
#SAY
恭喜你下注成功！
你押了：<$STR(N99)>注【六点】，
赔率<$STR(P88)>倍，假如中奖的话你可以获得<$STR(N88)>的元宝
当前选择【<六点>】的玩家一共有：<$STR(G88)>人
当前选择【<六点>】的赌注一共有：<$STR(G99)>注
你剩余的元宝数量：<$GAMEGOLD>
<返回/@main>
#ELSEsay
下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！

注：这个脚本一下就提示“下注的元宝数量应该在1-2000000000之间，你可能元宝数量不足，或你已经下过注！”真高手指教那错了！俺是莱鸟看不懂。

诚丰电器

支持，楼下的跟上哈~

Camille5

回个帖子，下班咯~

sosadsohappy

众里寻他千百度，蓦然回首在这里！

youku0ew

看起来好像不错的样子

芳儿儿

支持你哈...................................

晴天的L

发发呆，回回帖，工作结束~

石头的故乡

锄禾日当午，发帖真辛苦。谁知坛中餐，帖帖皆辛苦！

红la4efp

LZ是天才，坚定完毕

淡淡的心

无论是不是沙发都得回复下