GM016论坛

 找回密码
 注册
查看: 15699|回复: 195

通用的_拉斯维加斯赌博_系统_单双_大中小_一点二点三点四点五点六点_完整脚本可下载

  [复制链接]
发表于 2012-7-19 15:51:14 | 显示全部楼层 |阅读模式
通用的_拉斯维加斯赌 博_系统_单双_大中小_一点二点三点四点五点六点_完整脚本可下载

(@@InPutInteger @@InPutString )
[@main]
#IF
ISADMIN
#say
尊敬的管理员:<$USERNAME>  <赌城管理/@赌城管理>\
<假如中奖的话,要扣掉5%佣金。><你拥有元宝数量>:<$GAMEGOLD>\
下面按你的指示选择你要下注的选项。\
赔率2倍:【<单/@单>】   【<双/@双>】\
赔率3倍:【<大/@大>】   【<中/@中>】   【<小/@小>】\
赔率6倍:【<一点/@一点>】 【<二点/@二点>】 【<三点/@三点>】 【<四点/@四点>】 【<五点/@五点>】 【<六点/@六点>】\ \
离开局时间还剩下<$STR(G77)>秒,请抓紧时间下注!\
<熟悉规则/@熟悉规则>     <查看下注情况/@查看下注情况>             <返回盟重/@返回到盟重>  <关闭窗口/@exit>

#ELSESAY
亲爱的玩家:<$USERNAME>\
<假如中奖的话,要扣掉5%佣金。。><你拥有元宝数量>:<$GAMEGOLD>\
按下面提示选择你要下注的选项\
赔率2倍:【<单/@单>】   【<双/@双>】\
赔率3倍:【<大/@大>】   【<中/@中>】   【<小/@小>】\
赔率6倍:【<一点/@一点>】 【<二点/@二点>】 【<三点/@三点>】 【<四点/@四点>】 【<五点/@五点>】 【<六点/@六点>】\ \
离开局时间还剩下<$STR(G77)>秒,请抓紧时间下注!\
<熟悉规则/@熟悉规则>     <查看下注情况/@查看下注情况>             <返回盟重/@返回到盟重>  <关闭窗口/@exit>

[@赌城管理]
#IF
  ISADMIN
#say
一共有:<$STR(G75)>人次参与了赌  博,吃进:<$STR(G74)>元宝,赔出<$STR(G73)>元宝\ \


【<输入你想开的点数/@@InPutInteger71>】   <清空赌场数据/@清空赌场数据>       <开启关闭赌城/@开启赌城> \
【<赢多少元宝以上出红字/@@InPutInteger70>】:<$STR(G70)> 【<还有多少秒投骰子/@@InPutInteger77>】:<$STR(G77)>\<赌场参数查看/@测试> \ \ \ \
                                                    <返回/@main>
#elseact
messagebox 对不起!!!你不是管理员!!!快点闪开!!!!

[@清空赌场数据]
#IF
  ISADMIN
#act
MOV G73 0
MOV G74 0
MOV G75 0
MOV G78 0
MOV G79 0
MOV G80 0
MOV G81 0
MOV G82 0
MOV G83 0
MOV G84 0
MOV G85 0
MOV G86 0
MOV G87 0
MOV G88 0
MOV G89 0
MOV G90 0
MOV G91 0
MOV G92 0
MOV G93 0
MOV G94 0
MOV G95 0
MOV G96 0
MOV G97 0
MOV G98 0
MOV G99 0
messagebox 清空赌场数据成功!

[@开启赌城]
#if
equal G76 1
#ACT
#SAY
赌城状况为:开启\ \
<关闭赌城/@guanducn>      <返回/@赌城管理>
#ELSESAY
赌城状况为:关闭\ \
<开启赌城/@kaiducn>      <返回/@赌城管理>
[@guanducn]
#if
ISADMIN
#ACT
mov G76 0
#ACT
SENDMSG 0 赌城已关闭,请各位玩家等待下次活动时间!
SENDMSG 0 赌城已关闭,请各位玩家等待下次活动时间!
SENDMSG 0 赌城已关闭,请各位玩家等待下次活动时间!
SENDMSG 0 赌城已关闭,请各位玩家等待下次活动时间!
SENDMSG 0 赌城已关闭,请各位玩家等待下次活动时间!
#ELSEACT
MESSAGEBOX 只有管理员才能使用此功能!
[@kaiducn]
#if
ISADMIN
#ACT
mov G76 1
#ACT
mov G77 60
SENDMSG 0  拉斯维加斯赌城开启!
SENDMSG 0  拉斯维加斯赌城开启!
SENDMSG 0  拉斯维加斯赌城开启!
SENDMSG 0  拉斯维加斯赌城开启!
SENDMSG 0  拉斯维加斯赌城开启!
SENDMSG 0  拉斯维加斯赌城开启!
#ELSEACT
MESSAGEBOX 只有管理员才能使用此功能!

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

[@InPutInteger70]
#IF
ISADMIN
#Act
DelayGoto 1 ~InPutInteger70
#ELSEsay
嘿嘿,你是骗子吗?
[~InPutInteger70]
#IF
ISADMIN
LARGE N70 0
SMALL N70 10000000
#Act
mov G70 <$STR(N70)>
#say
设置成功!        <返回/@赌城管理>
#ELSEact
messagebox 输入1-10000000之间的数字,输入其他数字操作失败!!
goto @main
break

[@InPutInteger77]
#IF
ISADMIN
#Act
DelayGoto 1 ~InPutInteger77
#ELSEsay
嘿嘿,你是骗子吗?
[~InPutInteger77]
#IF
ISADMIN
LARGE N77 0
SMALL N77 60
#Act
mov G77 <$STR(N77)>
#say
设置成功!        <返回/@赌城管理>
#ELSEact
messagebox 输入1-60之间的数字,输入其他数字操作失败!!
goto @main
break

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

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

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

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

[~InPutInteger89]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N89)>
LARGE N89 1
small N89 10000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N89)>
mov N78 <$STR(N89)>
mov P66 3
MUL N78 <$STR(N78)> <$STR(P66)>
MOV P78 <$STR(N78)>
dec P78 <$STR(N89)>
MUL P78 <$STR(P78)> 5
DIV P78 <$STR(P78)> 100
dec 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(P66)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N78)>的元宝\
当前选择【<大>】的玩家一共有:<$STR(G78)>人\
当前选择【<大>】的赌注一共有:<$STR(G89)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!


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

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

[~InPutInteger90]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N90)>
small N90 10000001
LARGE N90 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N90)>
mov N79 <$STR(N90)>
mov P65 3
MUL N79 <$STR(N79)> <$STR(P65)>
MOV P79 <$STR(N79)>
dec P79 <$STR(N90)>
MUL P79 <$STR(P79)> 5
DIV P79 <$STR(P79)> 100
dec N79 <$STR(P79)>
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(P65)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N79)>的元宝\
当前选择【<中>】的玩家一共有:<$STR(G79)>人\
当前选择【<中>】的赌注一共有:<$STR(G90)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!



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

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

[~InPutInteger91]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N91)>
small N91 10000001
LARGE N91 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N91)>
mov N80 <$STR(N91)>
mov P64 3
MUL N80 <$STR(N80)> <$STR(P64)>
MOV P80 <$STR(N80)>
dec P80 <$STR(N91)>
MUL P80 <$STR(P80)> 5
DIV P80 <$STR(P80)> 100
dec N80 <$STR(P80)>
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(P64)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N80)>的元宝\
当前选择【<小>】的玩家一共有:<$STR(G80)>人\
当前选择【<小>】的赌注一共有:<$STR(G91)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!

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

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

[~InPutInteger92]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N92)>
LARGE N92 1
small N92 10000001
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N92)>
mov N81 <$STR(N92)>
mov P74 2
MUL N81 <$STR(N81)> <$STR(P74)>
MOV P81 <$STR(N92)>
MUL P81 <$STR(P81)> 5
DIV P81 <$STR(P81)> 100
dec N81 <$STR(P81)>
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(P74)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N81)>的元宝\
当前选择【<单>】的玩家一共有:<$STR(G81)>人\
当前选择【<单>】的赌注一共有:<$STR(G92)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!


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

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

[~InPutInteger93]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N93)>
small N93 10000001
LARGE N93 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N93)>
mov N82 <$STR(N93)>
mov P73 2
MUL N82 <$STR(N82)> <$STR(P73)>
MOV P82 <$STR(N93)>
MUL P82 <$STR(P82)> 5
DIV P82 <$STR(N82)> 100
dec N82 <$STR(P82)>
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(P73)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N82)>的元宝\
当前选择【<双>】的玩家一共有:<$STR(G82)>人\
当前选择【<双>】的赌注一共有:<$STR(G93)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!


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

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

[~InPutInteger94]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N94)>
small N94 10000001
LARGE N94 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N94)>
mov N83 <$STR(N94)>
mov P72 6
MUL N83 <$STR(N83)> <$STR(P72)>
MOV P83 <$STR(N83)>
dec P83 <$STR(N94)>
MUL P83 <$STR(P83)> 5
DIV P83 <$STR(P83)> 100
dec N83 <$STR(P83)>
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(P72)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N83)>的元宝\
当前选择【<一点>】的玩家一共有:<$STR(G83)>人\
当前选择【<一点>】的赌注一共有:<$STR(G94)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!



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

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

[~InPutInteger95]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N95)>
small N95 10000001
LARGE N95 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N95)>
mov N84 <$STR(N95)>
mov P71 6
MUL N84 <$STR(N84)> <$STR(P71)>
MOV P84 <$STR(N84)>
dec P84 <$STR(N95)>
MUL P84 <$STR(P84)> 5
DIV P84 <$STR(P84)> 100
dec N84 <$STR(P84)>
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(P71)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N84)>的元宝\
当前选择【<二点>】的玩家一共有:<$STR(G84)>人\
当前选择【<二点>】的赌注一共有:<$STR(G95)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!



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

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

[~InPutInteger96]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N96)>
small N96 10000001
LARGE N96 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N96)>
mov N85 <$STR(N96)>
mov P70 6
MUL N85 <$STR(N85)> <$STR(P70)>
MOV P85 <$STR(N85)>
dec P85 <$STR(N96)>
MUL P85 <$STR(P85)> 5
DIV P85 <$STR(P85)> 100
dec N85 <$STR(P85)>
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(P70)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N85)>的元宝\
当前选择【<三点>】的玩家一共有:<$STR(G85)>人\
当前选择【<三点>】的赌注一共有:<$STR(G96)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!




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

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

[~InPutInteger97]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N97)>
small N97 10000001
LARGE N97 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N97)>
mov N86 <$STR(N97)>
mov P69 6
MUL N86 <$STR(N86)> <$STR(P69)>
MOV P86 <$STR(N86)>
dec P86 <$STR(N97)>
MUL P86 <$STR(P86)> 5
DIV P86 <$STR(P86)> 100
dec N86 <$STR(P86)>
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(P69)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N86)>的元宝\
当前选择【<四点>】的玩家一共有:<$STR(G86)>人\
当前选择【<四点>】的赌注一共有:<$STR(G97)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!



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

                                                     <返回/@main>
[@InPutInteger98]
#If#ELSEAct
MessageBox 你的元宝数量不足!请冲值。

[~InPutInteger98]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N98)>
small N98 10000001
LARGE N98 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N98)>
mov N87 <$STR(N98)>
mov P68 6
MUL N87 <$STR(N87)> <$STR(P68)>
MOV P87 <$STR(N87)>
dec P87 <$STR(N98)>
MUL P87 <$STR(P87)> 5
DIV P87 <$STR(P87)> 100
dec N87 <$STR(P87)>
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(P68)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N87)>的元宝\
当前选择【<五点>】的玩家一共有:<$STR(G87)>人\
当前选择【<五点>】的赌注一共有:<$STR(G98)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!



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

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

[~InPutInteger99]
#If
Check [65] 0
CHECKGAMEGOLD > <$STR(N99)>
small N99 10000001
LARGE N99 1
#Act
Set [65] 1
CLEARDELAYGOTO
GameGold - <$STR(N99)>
mov N88 <$STR(N99)>
mov P67 6
MUL N88 <$STR(N88)> <$STR(P67)>
MOV P88 <$STR(N88)>
dec P88 <$STR(N99)>
MUL P88 <$STR(P88)> 5
DIV P88 <$STR(P88)> 100
dec N88 <$STR(P88)>
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(P67)>倍,假如中奖的话,扣掉了5%佣金后,你还可以获得<$STR(N88)>的元宝\
当前选择【<六点>】的玩家一共有:<$STR(G88)>人\
当前选择【<六点>】的赌注一共有:<$STR(G99)>注\
你剩余的元宝数量:<$GAMEGOLD>\
<返回/@main>
#ELSEsay
下注的元宝数量应该在2-10000000之间,你可能元宝数量不足,或你\已经下过注!

[@测试]
#if
Check [65] 0
#say
65=0\
G78:<$STR(G78)>|G79:<$STR(G79)>|G80:<$STR(G80)>|G81:<$STR(G81)>|G82:<$STR(G82)>|G83:<$STR(G83)>|G84:<$STR(G84)>|G85:<$STR(G85)>|G86:<$STR(G86)>|\
G87:<$STR(G87)>|G88:<$STR(G88)>|G89:<$STR(G89)> G90:<$STR(G90)>|G91:<$STR(G91)>|G92:<$STR(G92)>|G93:<$STR(G93)>|G94:<$STR(G94)>|G95:<$STR(G95)>|\
G96:<$STR(G96)>|G97:<$STR(G97)>|G98:<$STR(G98)>|G99:<$STR(G99)>|N71:<$STR(N71)>|N78:<$STR(N78)>|N79:<$STR(N79)>|N80:<$STR(N80)>|N81:<$STR(N81)>|\
N82:<$STR(N82)>|N83:<$STR(N83)>|N84:<$STR(N84)>|N85:<$STR(N85)>|N86:<$STR(N86)>|N87:<$STR(N87)>|N88:<$STR(N78)>|N89:<$STR(N89)>|N90:<$STR(N90)>|\
N91:<$STR(N91)>|N92:<$STR(N92)>|N93:<$STR(N93)>|N94:<$STR(N94)>|N95:<$STR(N95)>|N96:<$STR(N96)>|N97:<$STR(N97)>|N98:<$STR(N98)>|N99:<$STR(N99)>|\
#if
Check [65] 1
#say
65=1\
N78:<$STR(G78)>|G79:<$STR(G79)>|G80:<$STR(G80)>|G81:<$STR(G81)>|G82:<$STR(G82)>|G83:<$STR(G83)>|G84:<$STR(G84)>|G85:<$STR(G85)>|G86:<$STR(G86)>|\
G87:<$STR(G87)>|G88:<$STR(G78)>|G89:<$STR(G89)> G90:<$STR(G90)>|G91:<$STR(G91)>|G92:<$STR(G92)>|G93:<$STR(G93)>|G94:<$STR(G94)>|G95:<$STR(G95)>|\
G96:<$STR(G96)>|G97:<$STR(G97)>|G98:<$STR(G98)>|G99:<$STR(G99)>|N71:<$STR(N71)>|N78:<$STR(N78)>|N79:<$STR(N79)>|N80:<$STR(N80)>|N81:<$STR(N81)>|\
N82:<$STR(N82)>|N83:<$STR(N83)>|N84:<$STR(N84)>|N85:<$STR(N85)>|N86:<$STR(N86)>|N87:<$STR(N87)>|N88:<$STR(N78)>|N89:<$STR(N89)>|N90:<$STR(N90)>|\
N91:<$STR(N91)>|N92:<$STR(N92)>|N93:<$STR(N93)>|N94:<$STR(N94)>|N95:<$STR(N95)>|N96:<$STR(N96)>|N97:<$STR(N97)>|N98:<$STR(N98)>|N99:<$STR(N99)>|\
<65=0/@65=0>

[@65=0]
#act
set [65] 0
messagebox 65=0.
break

CHECKGAMEGOLD > 1
#Act
DelayGoto 1 ~InPutInteger98

回复可以见下载地址
游客,如果您要查看本帖隐藏内容请回复


本帖子中包含更多资源

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

x
发表于 2012-7-20 14:27:51 | 显示全部楼层
88888888888888888888888
发表于 2012-7-26 11:09:40 | 显示全部楼层
看看看是什么样的东西。。
发表于 2012-7-26 18:07:17 | 显示全部楼层
11111111111111111111111
发表于 2012-7-26 18:18:41 | 显示全部楼层
好东西 支持下  哦也
发表于 2012-7-30 20:32:16 | 显示全部楼层
支持下版主~~~~~
发表于 2012-8-4 18:17:04 | 显示全部楼层
!!!!!!!!!!!!!!!!!!
发表于 2012-9-27 13:16:06 | 显示全部楼层

!!!!!!!!!!!!!!!!!!
发表于 2012-9-30 09:54:32 | 显示全部楼层
sadasddsafdsafsdf
发表于 2012-10-4 15:06:50 | 显示全部楼层
顶顶顶顶顶顶
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长QQ282630674|传奇服务端|GM基地|鲁ICP备16023424号-4|GM016论坛

GMT+8, 2024-12-28 03:45 , Processed in 1.234375 second(s), 21 queries .

Powered by GM基地 X3.4

© 免责声明:本站所有资源均来至网络,仅供学习交流,严禁用于商业用途,请于24小时内删除!

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