传奇坐庄赌博脚本

(@@InPutString @@InPutInteger)
[@MAIN]
#IF
ISADMIN
CHECKVAR GLOBAL 赌城开关检测 < 1
#ACT
GOTO @赌城管理
BREAK
#IF
CHECKVAR GLOBAL 赌城开关检测 < 1
CHECKVAR GLOBAL 庄家名字 =
#SAY
赌城关闭中...请等待开启...
　
#ACT
BREAK
#IF
CHECKVAR GLOBAL 赌城开关检测 < 1
#SAY
赌城关闭中...请等待开启...

#ACT
BREAK
#IF
#ACT
OpenBigDialogBox 43
MOV N30 0
DIV N30 100
#SAY

#IF
ISADMIN
#SAY
　　　　　　　　                                 
#ELSESAY
　　　　　　　　　　　　　　                              
#IF
#SAY

　　　　　　　　：
　　　　　　　　：{/SCOLOR=249}元宝
#IF
CHECKVAR GLOBAL 庄家名字 =
#SAY
　　　　　　　　　　　　　　　
#ELSESAY

#IF
#SAY
　　　　　　　　　　　　　
　　　　　　　　　{/SCOLOR=5}点


　　　　　　　　　　　　　　　　　　　　　　　　　　　　　共 {/SCOLOR=249} 元宝
　　　　　　　　　　　　　　　　　　　　　　　　　共 {/SCOLOR=249} 元宝
{/SCOLOR=5}点　　　　　　　　　{/SCOLOR=5}点
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　共 {/SCOLOR=254} 元宝
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　共 {/SCOLOR=254} 元宝
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　共 {/SCOLOR=254} 元宝
　　　　　　　　　　　　　
　　　　　　　　　{/SCOLOR=5}点
{掉线、小退都将无法结算         每局收取赢家%的手续费!/SCOLOR=249}
{/SCOLOR=250}元宝 {/SCOLOR=250}元宝 {/SCOLOR=250}元宝
[@CALLInPutInteger30]
#IF
CHECKVAR GLOBAL 庄家名字 =
#ACT
#ELSEACT
GOTO @MAIN
BREAK
#IF
CHECKVAR GLOBAL 赌博计时 > 46
#ACT
MESSAGEBOX 开庄时间无法取回...
MOV N30 0
GOTO @MAIN
BREAK
#IF
CHECKVAR GLOBAL 赌博计时 > 30
CHECKVAR GLOBAL 赌博计时 < 47
#ACT
#ELSEACT
GOTO @下注取回检测
BREAK
#IF
LARGE N30 0
#ACT
#ELSEACT
MESSAGEBOX 请输入大于0的数字
MOV N30 0
GOTO @MAIN
BREAK
#IF
LARGE N30
#ACT
MESSAGEBOX 你的本钱只有()元宝.无法取回你所输入的()元宝,请重新输入
MOV N30 0
GOTO @MAIN
BREAK
#IF
EQUAL N30
#ACT
GAMEGOLD +
SENDMSG 7 取回成功,你共取回了()本钱并放弃了庄家位置...
SENDMSG 0 『%S』共取回了()本钱并放弃了庄家位置...
MAPMOVE TXDGA 12 10
CALCVAR GLOBAL 庄家名字 =
CALCVAR GLOBAL 庄家检测 = 0
CALCVAR GLOBAL 庄家本钱 = 0
CALCVAR GLOBAL 庄家本钱1 = 0
CALCVAR GLOBAL 庄家本钱2 = 0
SAVEVAR GLOBAL 庄家名字 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CLEARNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
GOTO @MAIN
BREAK
#ELSEACT
MOV N31
DEC N31
#IF
SMALL N31 1000
#ACT
MOV N31 0
MOV N30 0
SENDMSG 5 庄家本钱最少预留1000元宝以上,请重新输入,如果你想撤销庄家位置,请输入现有的所有本钱...
GOTO @MAIN
BREAK
#ELSEACT
GAMEGOLD +
CALCVAR GLOBAL 庄家本钱 -
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱1 =
CALCVAR GLOBAL 庄家本钱2 =
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 取回成功,你共取回了()本钱...
GOTO @MAIN
BREAK
[@下注取回检测]
#IF
CHECKVAR GLOBAL 庄家名字 =
#ACT
#ELSEACT
GOTO @MAIN
BREAK
#IF
CHECKVAR GLOBAL 赌博计时 > 46
#ACT
MESSAGEBOX 开庄时间无法取回...
MOV N30 0
GOTO @MAIN
BREAK
#IF
CHECKVAR GLOBAL 赌博计时 > 0
CHECKVAR GLOBAL 赌博计时 < 31
#ACT
#ELSEACT
GOTO @MAIN
BREAK
#IF
LARGE N30 0
#ACT
#ELSEACT
MESSAGEBOX 请输入大于0的数字
MOV N30 0
GOTO @MAIN
BREAK
#IF
LARGE N30
#ACT
MESSAGEBOX 目前已经是下注时间,你最高只能取回()元宝.无法取回你所输入的()元宝,请重新输入
MOV N30 0
GOTO @MAIN
BREAK
#IF
EQUAL N30
CHECKVAR GLOBAL 庄家本钱 =
#ACT
GAMEGOLD +
SENDMSG 7 取回成功,你共取回了()本钱并放弃了庄家位置...
SENDMSG 0 『%S』共取回了()本钱并放弃了庄家位置...
MAPMOVE TXDGA 12 10
CALCVAR GLOBAL 庄家名字 =
CALCVAR GLOBAL 庄家检测 = 0
SAVEVAR GLOBAL 庄家名字 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱 = 0
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱1 = 0
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱2 = 0
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 赌博计时 = 46
SAVEVAR GLOBAL 赌博计时 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CLEARNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
MOV N30 0
GOTO @MAIN
BREAK
#IF
CHECKVAR GLOBAL 总体下注数 > 999
#ACT
GAMEGOLD +
CALCVAR GLOBAL 庄家本钱 -
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱2 -
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 取回成功,你共取回了()本钱...
MOV N30 0
GOTO @MAIN
BREAK
#ELSEACT
MOV N31 1000
DEC N31
MOV N32
DEC N32
#IF
LARGE N30
#ACT
MESSAGEBOX 目前已经有玩家下注,你最高只能取回()元宝.无法取回你所输入的()元宝,请重新输入
MOV N31 0
MOV N30 0
MOV N32 0
GOTO @MAIN
BREAK
#ELSEACT
GAMEGOLD +
CALCVAR GLOBAL 庄家本钱 -
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
CALCVAR GLOBAL 庄家本钱2 -
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 取回成功,你共取回了()本钱...
MOV N31 0
MOV N30 0
GOTO @MAIN
BREAK
[@赌城管理]
#IF
ISADMIN
#ACT
MOV N17 0
MOV N18 0
MOV N19 0
MOV N20 0
MOV N21 0
MOV N22 0
MOV N23 0
MOV N24 0
MOV N25 0
MOV N26 0
MOV N27 0
MOV N28 0
MOV N29 0
MOV N30 0
DIV N30 100
OpenBigDialogBox
#SAY




　　　　　　　

{【西家】　　【】/SCOLOR=250}点　　 『』　　{【】/SCOLOR=250}点　　 『』　　{【】/SCOLOR=250}点　　 『』

{【南家】　　【】/SCOLOR=253}点　　 『』　　{【】/SCOLOR=253}点　　 『』　　{【】/SCOLOR=253}点　　 『』

{【东家】　　【】/SCOLOR=254}点　　 『』　　{【】/SCOLOR=254}点　　 『』　　{【】/SCOLOR=254}点　　 『』

{【庄家】　　【】/SCOLOR=249}点　　 『』　　{【】/SCOLOR=249}点　　 『』　　{【】/SCOLOR=249}点　　 『』

目前税收比例为【{%/SCOLOR=249}】　　 税收比例设置为【{/SCOLOR=250}】　 『』

#IF
ISADMIN
CHECKVAR GLOBAL 赌城开关检测 = 0
#SAY
目前赌城状态为【】   你是管理员,可以『』『』        『』
#IF
ISADMIN
CHECKVAR GLOBAL 赌城开关检测 > 0
#SAY
目前赌城状态为【】   你是管理员,可以『』『』        『』
[@开启]
#IF
ISADMIN
#ACT
#ELSEACT
Close
BREAK
#IF
CHECKVAR GLOBAL 赌城开关检测 = 0
#ACT
CALCVAR GLOBAL 赌博计时 = 46
CALCVAR GLOBAL 赌城开关检测 = 1
SAVEVAR GLOBAL 赌博计时 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 赌城开关检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 6 尊敬的管理员,赌城开启完毕...
GOTO @赌城管理
BREAK
#ELSEACT
CALCVAR GLOBAL 赌博计时 = 47
CALCVAR GLOBAL 赌城开关检测 = 0
SAVEVAR GLOBAL 赌博计时 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 赌城开关检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 6 尊敬的管理员,赌城关闭完毕...
GOTO @赌城管理
BREAK
[@CALLInPutInteger17]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N17 0
SMALL N17 7
#ACT
MOV I88
CALCVAR GLOBAL 控制检测西家 + 1
SAVEVAR GLOBAL 控制检测西家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『西家一号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger18]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N18 0
SMALL N18 7
#ACT
MOV I89
CALCVAR GLOBAL 控制检测西家 + 1
SAVEVAR GLOBAL 控制检测西家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『西家二号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger19]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N19 0
SMALL N19 7
#ACT
MOV I90
CALCVAR GLOBAL 控制检测西家 + 1
SAVEVAR GLOBAL 控制检测西家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『西家三号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger20]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N20 0
SMALL N20 7
#ACT
MOV I94
CALCVAR GLOBAL 控制检测东家 + 1
SAVEVAR GLOBAL 控制检测东家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『东家一号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger21]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N21 0
SMALL N21 7
#ACT
MOV I95
CALCVAR GLOBAL 控制检测东家 + 1
SAVEVAR GLOBAL 控制检测东家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『东家二号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger22]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N22 0
SMALL N22 7
#ACT
MOV I96
CALCVAR GLOBAL 控制检测东家 + 1
SAVEVAR GLOBAL 控制检测东家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『东家三号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger23]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N23 0
SMALL N23 7
#ACT
MOV I91
CALCVAR GLOBAL 控制检测南家 + 1
SAVEVAR GLOBAL 控制检测南家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『南家一号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger24]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N24 0
SMALL N24 7
#ACT
MOV I92
CALCVAR GLOBAL 控制检测南家 + 1
SAVEVAR GLOBAL 控制检测南家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『南家二号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger25]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N25 0
SMALL N25 7
#ACT
MOV I93
CALCVAR GLOBAL 控制检测南家 + 1
SAVEVAR GLOBAL 控制检测南家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『南家三号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger26]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N26 0
SMALL N26 7
#ACT
MOV I97
CALCVAR GLOBAL 控制检测庄家 + 1
SAVEVAR GLOBAL 控制检测庄家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『庄家一号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger27]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N27 0
SMALL N27 7
#ACT
MOV I98
CALCVAR GLOBAL 控制检测庄家 + 1
SAVEVAR GLOBAL 控制检测庄家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『庄家二号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger28]
#IF
ISADMIN
#ACT
#ELSEACT
BREAK
#IF
LARGE N28 0
SMALL N28 7
#ACT
MOV I99
CALCVAR GLOBAL 控制检测庄家 + 1
SAVEVAR GLOBAL 控制检测庄家 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 5 设定『庄家三号骰子』点数成功.点数设置为点...
GOTO @赌城管理
BREAK
#ELSEACT
GOTO @赌城管理
SENDMSG 5 设定点数必须在1-6点...
BREAK
[@CALLInPutInteger29]
#IF
ISADMIN
#ACT
CALCVAR GLOBAL 税收比例 =
SAVEVAR GLOBAL 税收比例 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
DIV N30 100
SENDMSG 5 设定『税收比例』成功.比例设置为%...
MOV N29 0
MOV N30 0
GOTO @赌城管理
BREAK
[@CALLInPutString15]
#IF
EQUAL S15
#ACT
SENDMSG 7 无法邀请自己
MOV S15
GOTO @MAIN
BREAK
#IF
CheckOnline
#ACT
CALCVAR GLOBAL 邀请人 =
SAVEVAR GLOBAL 邀请人 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
HCALL  @赌城邀请
MOV S15
GOTO @MAIN
SENDMSG 6 邀请信已经发出!
BREAK
#ELSEACT
SENDMSG 7 你要邀请的玩家不在线，无法邀请
MOV S15
GOTO @MAIN
BREAK
[@返回土城]
#IF
#ACT
MapMove 3 330 330
BREAK
[@CALLInPutInteger11]
#IF
CHECKVAR GLOBAL 赌博计时 > 30
CHECKVAR GLOBAL 赌博计时 < 47
#ACT
#ELSEACT
MOV N11 0
MESSAGEBOX 抢庄时间已经结束,请等待开局......
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
#ACT
MOV N11 0
MESSAGEBOX 你目前已经是庄家,无法重复坐庄......
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博西家名单.TXT
#ACT
MOV N11 0
MESSAGEBOX 你已经下注压西家了,无法坐庄......
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博东家名单.TXT
#ACT
MOV N11 0
MESSAGEBOX 你已经下注压东家了,无法坐庄......
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博南家名单.TXT
#ACT
MOV N11 0
MESSAGEBOX 你已经下注压南家了,无法坐庄......
GOTO @MAIN
BREAK
#IF
SMALL N11 150
#ACT
MOV N11 0
MESSAGEBOX 坐庄最少需要150元宝以上......
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD <
#ACT
MOV N11 0
MESSAGEBOX 你身上的元宝不足......
GOTO @MAIN
BREAK
#IF
CHECKVAR GLOBAL 庄家本钱 = 0
#ACT
GAMEGOLD -
MAPMOVE TXDGA 9 10
CALCVAR GLOBAL 庄家检测 = 1
CALCVAR GLOBAL 庄家名字 =
CALCVAR GLOBAL 庄家本钱 =
CALCVAR GLOBAL 庄家本钱1 =
CALCVAR GLOBAL 庄家本钱2 =
SAVEVAR GLOBAL 庄家检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家名字 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
AddNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
SENDMSG 4 『%S』使用()个元宝坐庄成功......
MESSAGEBOX 使用()个元宝坐庄成功......
MOV N11 0
GOTO @MAIN
BREAK
#IF
LARGE N11
#ACT
#ELSEACT
MESSAGEBOX 你必须出多于()个元宝才能抢庄成功......
MOV N11 0
GOTO @MAIN
BREAK
#IF
CheckOnline
#ACT
GMEXECUTE 调整元宝  +
CLEARNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
GAMEGOLD -
MOV S11
S11.MAPMOVE TXDGA 12 10
MAPMOVE TXDGA 9 10
MOV S11
CALCVAR GLOBAL 庄家检测 = 1
CALCVAR GLOBAL 庄家名字 =
CALCVAR GLOBAL 庄家本钱 =
CALCVAR GLOBAL 庄家本钱1 =
CALCVAR GLOBAL 庄家本钱2 =
SAVEVAR GLOBAL 庄家检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家名字 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
AddNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
SENDMSG 4 『%S』使用()个元宝抢庄成功......
MESSAGEBOX 使用()个元宝抢庄成功......
MOV N11 0
GOTO @MAIN
BREAK
#IF
CheckTextList .QuestDiaryzwb坐庄赌博离线庄家名单.txt
#ACT
CLEARNAMELIST ..QuestDiaryzwb坐庄赌博离线庄家记录.txt
AddTextListex .QuestDiaryzwb坐庄赌博离线庄家记录.txt  0
CLEARNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
MAPMOVE TXDGA 9 10
CALCVAR GLOBAL 庄家检测 = 1
CALCVAR GLOBAL 庄家名字 =
CALCVAR GLOBAL 庄家本钱 =
CALCVAR GLOBAL 庄家本钱1 =
CALCVAR GLOBAL 庄家本钱2 =
SAVEVAR GLOBAL 庄家检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家名字 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
AddNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
SENDMSG 4 『%S』使用()个元宝抢庄成功......
MESSAGEBOX 使用()个元宝抢庄成功......
MOV N11 0
GOTO @MAIN
BREAK
#ELSEACT
AddTextListex .QuestDiaryzwb坐庄赌博离线庄家名单.txt
CreateFile QuestDiaryzwb坐庄赌博离线庄家记录.txt
AddTextListex .QuestDiaryzwb坐庄赌博离线庄家记录.txt  0
CLEARNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
MAPMOVE TXDGA 9 10
CALCVAR GLOBAL 庄家检测 = 1
CALCVAR GLOBAL 庄家名字 =
CALCVAR GLOBAL 庄家本钱 =
CALCVAR GLOBAL 庄家本钱1 =
CALCVAR GLOBAL 庄家本钱2 =
SAVEVAR GLOBAL 庄家检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家名字 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 庄家本钱2 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
AddNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
SENDMSG 4 『%S』使用()个元宝抢庄成功......
MESSAGEBOX 使用()个元宝抢庄成功......
MOV N11 0
GOTO @MAIN
BREAK
[@CALLInPutInteger12]
#IF
CHECKVAR GLOBAL 赌博计时 > 0
CHECKVAR GLOBAL 赌博计时 < 31
#ACT
#ELSEACT
MOV N12 0
MESSAGEBOX 现在不是下注时间,请稍后......
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
#ACT
MOV N12 0
MESSAGEBOX 你目前已将是庄家了,无法下注西家......
GOTO @MAIN
BREAK
#IF
SMALL N12 50
#ACT
MOV N12 0
MESSAGEBOX 下注西家最少需要50元宝以上......
GOTO @MAIN
BREAK
#ELSEACT
MOV N15 9381
MOVR N16 500 2000
DelayCall  @下注西家
BREAK
[@下注西家]
#IF
EQUAL N15 9381
#ACT
MOV N15 0
#ELSEACT
MOV N12 0
MESSAGEBOX 请离开,本游戏不欢迎作弊者...
GOTO @MAIN
BREAK
#IF
LARGE N12
#ACT
MOV N12 0
MESSAGEBOX 下注总金额已经达到庄家本钱上限目前你只可以下注()以下的元宝...
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博西家名单.TXT
CHECKGAMEGOLD >
#ACT
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
GAMEGOLD -
INC M18
CALCVAR GLOBAL 西家总下注 +
CALCVAR GLOBAL 总体下注数 +
CALCVAR GLOBAL 下注检测 = 1
SAVEVAR GLOBAL 下注检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 西家总下注 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 总体下注数 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 4 『%S』追加()个元宝下注西家.
MESSAGEBOX 你使用()个元宝追加下注西家.
MOV N12 0
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD >
#ACT
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
GAMEGOLD -
MOV M18
CALCVAR GLOBAL 西家总下注 +
CALCVAR GLOBAL 总体下注数 +
CALCVAR GLOBAL 下注检测 = 1
SAVEVAR GLOBAL 下注检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 西家总下注 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 总体下注数 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
AddNAMELIST ..QuestDiaryzwb坐庄赌博西家名单.TXT
SENDMSG 4 『%S』使用()个元宝下注西家.
MESSAGEBOX 你使用()个元宝下注西家.
MOV N12 0
GOTO @MAIN
BREAK
#ELSEACT
MESSAGEBOX 你身上的元宝不足.
MOV N12 0
GOTO @MAIN
BREAK
[@CALLInPutInteger13]
#IF
CHECKVAR GLOBAL 赌博计时 > 0
CHECKVAR GLOBAL 赌博计时 < 31
#ACT
#ELSEACT
MOV N13 0
MESSAGEBOX 现在不是下注时间,请稍后......
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
#ACT
MOV N13 0
MESSAGEBOX 你目前已将是庄家了,无法下注东家......
GOTO @MAIN
BREAK
#IF
SMALL N13 50
#ACT
MOV N13 0
MESSAGEBOX 下注西家最少需要50元宝以上......
GOTO @MAIN
BREAK
#ELSEACT
MOV N15 9381
MOVR N16 500 2000
DelayCall  @下注东家
BREAK
[@下注东家]
#IF
EQUAL N15 9381
#ACT
MOV N15 0
#ELSEACT
MOV N13 0
MESSAGEBOX 请离开,本游戏不欢迎作弊者...
GOTO @MAIN
BREAK
#IF
LARGE N13
#ACT
MOV N13 0
MESSAGEBOX 下注总金额已经达到庄家本钱上限目前你只可以下注()以下的元宝...
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博东家名单.TXT
CHECKGAMEGOLD >
#ACT
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
GAMEGOLD -
INC M13
CALCVAR GLOBAL 东家总下注 +
CALCVAR GLOBAL 总体下注数 +
CALCVAR GLOBAL 下注检测 = 1
SAVEVAR GLOBAL 下注检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 东家总下注 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 总体下注数 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 4 『%S』追加()个元宝下注东家.
MESSAGEBOX 你使用()个元宝追加下注东家.
MOV N13 0
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD >
#ACT
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
GAMEGOLD -
MOV M13
CALCVAR GLOBAL 东家总下注 +
CALCVAR GLOBAL 总体下注数 +
CALCVAR GLOBAL 下注检测 = 1
SAVEVAR GLOBAL 下注检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 东家总下注 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 总体下注数 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
AddNAMELIST ..QuestDiaryzwb坐庄赌博东家名单.TXT
SENDMSG 4 『%S』使用()个元宝下注东家.
MESSAGEBOX 你使用()个元宝下注东家.
MOV N13 0
GOTO @MAIN
BREAK
#ELSEACT
MESSAGEBOX 你身上的元宝不足.
MOV N13 0
GOTO @MAIN
BREAK
[@CALLInPutInteger14]
#IF
CHECKVAR GLOBAL 赌博计时 > 0
CHECKVAR GLOBAL 赌博计时 < 31
#ACT
#ELSEACT
MOV N14 0
MESSAGEBOX 现在不是下注时间,请稍后......
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博庄家名单.TXT
#ACT
MOV N14 0
MESSAGEBOX 你目前已将是庄家了,无法下注南家......
GOTO @MAIN
BREAK
#IF
SMALL N14 50
#ACT
MOV N14 0
MESSAGEBOX 下注西家最少需要50元宝以上......
GOTO @MAIN
BREAK
#ELSEACT
MOV N15 9381
MOVR N16 500 2000
DelayCall  @下注南家
BREAK
[@下注南家]
#IF
EQUAL N15 9381
#ACT
MOV N15 0
#ELSEACT
MOV N14 0
MESSAGEBOX 请离开,本游戏不欢迎作弊者...
GOTO @MAIN
BREAK
#IF
LARGE N14
#ACT
MOV N14 0
MESSAGEBOX 下注总金额已经达到庄家本钱上限目前你只可以下注()以下的元宝...
GOTO @MAIN
BREAK
#IF
CheckNAMELIST ..QuestDiaryzwb坐庄赌博南家名单.TXT
CHECKGAMEGOLD >
#ACT
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
GAMEGOLD -
INC M14
CALCVAR GLOBAL 南家总下注 +
CALCVAR GLOBAL 总体下注数 +
CALCVAR GLOBAL 下注检测 = 1
SAVEVAR GLOBAL 下注检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 南家总下注 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 总体下注数 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SENDMSG 4 『%S』追加()个元宝下注南家.
MESSAGEBOX 你使用()个元宝追加下注南家.
MOV N14 0
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD >
#ACT
CALCVAR GLOBAL 庄家本钱1 -
SAVEVAR GLOBAL 庄家本钱1 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
GAMEGOLD -
MOV M14
CALCVAR GLOBAL 南家总下注 +
CALCVAR GLOBAL 总体下注数 +
CALCVAR GLOBAL 下注检测 = 1
SAVEVAR GLOBAL 下注检测 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 南家总下注 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
SAVEVAR GLOBAL 总体下注数 ..QuestDiaryzwb坐庄赌博自定义全局变量数据.txt
AddNAMELIST ..QuestDiaryzwb坐庄赌博南家名单.TXT
SENDMSG 4 『%S』使用()个元宝下注南家.
MESSAGEBOX 你使用()个元宝下注南家.
MOV N14 0
GOTO @MAIN
BREAK
#ELSEACT
MESSAGEBOX 你身上的元宝不足.
MOV N14 0
GOTO @MAIN
BREAK
[@IsInFilterList]
#IF
#ACT
MESSAGEBOX [错误]：输入数据中包含了非法字符，请重新编辑！

我是个凑数的。。。

传说中的沙发？？？哇卡卡

楼下的接上

啊啊啊啊啊啊啊啊啊啊啊

路过的帮顶

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

看起来不错

高手云集 果断围观

LZ敢整点更有创意的不？兄弟们等着围观捏~