GM控制赌博点数脚本
(@@InPutInteger)[@MAIN]
#if
EQUAL S23
#act
MOV S23 无
#If
#Act
MOV N47 2
#SAY
<欢迎光临，这里是抢庄赌场，你所拥有的元宝：/SCOLOR=103><【/SCOLOR=103>{<$GAMEGOLD>/SCOLOR=254}<】/SCOLOR=103>\
<庄家姓名：/SCOLOR=103><【/SCOLOR=103>{<$STR(A34)>/SCOLOR=250}<】/SCOLOR=103> <庄家本钱数：/SCOLOR=103><【/SCOLOR=103>{<$STR(G29)>/SCOLOR=250}<】/SCOLOR=103>\
<╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗/SCOLOR=103>\
<┊/SCOLOR=103><查看说明/@Help><┊┊/SCOLOR=103><开始抢庄/@@InPutInteger40><┊┊/SCOLOR=103><下注押大/@@InPutInteger41><┊┊/SCOLOR=103><下注押小/@@InPutInteger42><┊/SCOLOR=103>\
<╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝/SCOLOR=103>\
<押大总金额：/SCOLOR=103><【/SCOLOR=103>{<$STR(G13)>/SCOLOR=250}<】/SCOLOR=103> <剩余时间：/SCOLOR=103><$STR(G15)>\
<押小总金额：/SCOLOR=103><【/SCOLOR=103>{<$STR(G14)>/SCOLOR=250}<】/SCOLOR=103>
#if
isadmin
#say
<ＧＭ控制/@控制>\
#elsesay
\
#if
checklevelex > 0
#say
<你的下注情况：你下注/SCOLOR=103><【/SCOLOR=103>{<$STR(N43)>/SCOLOR=254}<】/SCOLOR=103><元宝押/SCOLOR=103><【/SCOLOR=103>{<$STR(S23)>/SCOLOR=254}<】/SCOLOR=103> <刷新/@MAIN>\
<提示:下注成功后请玩家远离其他活动,以免造成掉线系统不负责/SCOLOR=70>\
[@控制]
#if
isadmin
#act
MOV N40 <$STR(G42)>
INC N40 <$STR(G43)>
INC N40 <$STR(G44)>
#if
SMALL N40 11
#act
MOV S40 小
#if
LARGE N40 10
#act
MOV S40 大
#if
EQUAL G42 <$STR(G43)>
EQUAL G42 <$STR(G44)>
#act
MOV S40 豹子
#if
EQUAL G42 0
EQUAL G43 0
EQUAL G44 0
#act
MOV S40 未知
#if
checklevelex > 0
#say
请选择每个骰子的点数:快捷控制: <大/@大> <小/@小> <豹/@豹子>\
<注:三个骰子必须得都选择,如果有一个不选择则会出错!/SCOLOR=140>\
当前骰子点数为:<$STR(G42)> <$STR(G43)> <$STR(G44)> 结算后为:<$STR(S40)>\ \
第一个骰子要<1/@1_1> <2/@1_2> <3/@1_3> <4/@1_4> <5/@1_5> <6/@1_6>点\
第二个骰子要<1/@2_1> <2/@2_2> <3/@2_3> <4/@2_4> <5/@2_5> <6/@2_6>点\
第三个骰子要<1/@3_1> <2/@3_2> <3/@3_3> <4/@3_4> <5/@3_5> <6/@3_6>点\ \
<返回首页/@main> <清除选择/@清除> <刷新时间/@控制>剩余时间:<$STR(G15)>
[@大]
#if
isadmin
#act
MOVR G42 6
INC G42 1
MOVR G43 6
INC G43 1
MOVR G44 6
INC G44 1
#if
checklevelex > 0
#act
MOV N40 <$STR(G42)>
INC N40 <$STR(G43)>
INC N40 <$STR(G44)>
#if
SMALL N40 11
#act
goto @大
break
#if
EQUAL G42 <$STR(G43)>
EQUAL G42 <$STR(G44)>
#act
goto @大
#elseact
GmExeCute 开始提问 @赌博控制
goto @控制
[@小]
#if
isadmin
#act
MOVR G42 6
INC G42 1
MOVR G43 6
INC G43 1
MOVR G44 6
INC G44 1
#if
checklevelex > 0
#act
MOV N40 <$STR(G42)>
INC N40 <$STR(G43)>
INC N40 <$STR(G44)>
#if
LARGE N40 10
#act
goto @小
break
#if
EQUAL G42 <$STR(G43)>
EQUAL G42 <$STR(G44)>
#act
goto @小
#elseact
GmExeCute 开始提问 @赌博控制
goto @控制
[@豹子]
#if
isadmin
#act
MOVR N11 7
MOV G42 <$STR(N11)>
MOV G43 <$STR(N11)>
MOV G44 <$STR(N11)>
#if
EQUAL G42 0
#act
goto @豹子
#elseact
GmExeCute 开始提问 @赌博控制
goto @控制
[@清除]
#if
large G15 15
#act
MOV G42 0
MOV G43 0
MOV G44 0
sendmsg 5 提示:清除成功!
goto @控制
#elseact
sendmsg 5 提示:剩余大于15秒后才能清除.
[@1_1]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G42 1
goto @控制
[@1_2]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G42 2
goto @控制
[@1_3]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G42 3
goto @控制
[@1_4]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G42 4
goto @控制
[@1_5]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G42 5
goto @控制
[@1_6]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G42 6
goto @控制
[@2_1]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G43 1
goto @控制
[@2_2]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G43 2
goto @控制
[@2_3]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G43 3
goto @控制
[@2_4]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G43 4
goto @控制
[@2_5]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G43 5
goto @控制
[@2_6]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G43 6
goto @控制
[@3_1]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G44 1
goto @控制
[@3_2]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G44 2
goto @控制
[@3_3]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G44 3
goto @控制
[@3_4]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G44 4
goto @控制
[@3_5]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G44 5
goto @控制
[@3_6]
#if
large G15 15
#elseact
sendmsg 5 提示:此局马上就要开局,请在剩余时间大于15秒之前做控制.
break
#if
isadmin
#act
MOV G44 6
goto @控制
[@CallInPutInteger40]
#IF
LARGE G12 60
#ACT
MESSAGEBOX [提示]：抢庄时间已经结束。请等待开局！
MOV N40 0
GOTO @MAIN
BREAK
#IF
SMALL N40 10000
#ACT
MESSAGEBOX [提示]：请输入10以上的数值！
MOV N40 0
GOTO @MAIN
BREAK
#IF
LARGE N40 100000000
#ACT
MESSAGEBOX [提示]：请输入100000000以下的数值！
MOV N40 0
GOTO @MAIN
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MOV N40 0
MESSAGEBOX [提示]：你目前已经是庄家，无法重复坐庄。
GOTO @MAIN
BREAK
#IF
EQUAL N45 2
#ACT
MOV N40 0
MESSAGEBOX [提示]：你已经下注押了大，无法坐庄！
GOTO @MAIN
BREAK
#IF
EQUAL N45 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)>个元宝坐庄。
sendmsg 0 赌庄肥妞：玩家【%s】使用【<$STR(N40)>】个元宝坐庄。
MOV A34 <$USERNAME>
MOV N43 <$STR(N40)>
MOV S23 庄家
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(N40)>】个元宝坐庄。
BREAK
#ELSEACT
MESSAGEBOX [提示]：你必须出多于【<$STR(G29)>】个元宝才能抢庄。
MOV N40 0
GOTO @MAIN
BREAK
[@CallInPutInteger41]
#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 1
#ACT
MESSAGEBOX [提示]：请输入1以上的数值！
MOV N41 0
GOTO @MAIN
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MOV N40 0
MESSAGEBOX [提示]：你目前已经是庄家，无法下注。
GOTO @MAIN
BREAK
#IF
EQUAL N45 2
#ACT
MOV N41 0
MESSAGEBOX [提示]：你已经下注押了大，无法重复下注！
GOTO @MAIN
BREAK
#IF
EQUAL N45 3
#ACT
MOV N41 0
MESSAGEBOX [提示]：你已经下注押了小，无法重复下注！
GOTO @MAIN
BREAK
#IF
LARGE N41 <$STR(G16)>
#ACT
MOV N41 0
MESSAGEBOX [提示]：对不起，庄家的本钱已达到上线不够赔了。\ \目前你只可以下注【<$STR(G16)>】以下的元宝！
GOTO @MAIN
BREAK
#IF
EQUAL G18 1
#ACT
MOV N40 0
MESSAGEBOX [提示]：请重新输入。
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD > <$STR(N41)>
#ACT
MOV G18 1
MOV N45 2
MOV S23 大
GAMEGOLD - <$STR(N41)>
MOV N43 <$STR(N41)>
INC G13 <$STR(N43)>
SendMSG 4 %s使用<$STR(N41)>个元宝下注押大。
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(N41)>】个元宝下注押大。
MOV N41 0
BREAK
#ELSEACT
MESSAGEBOX [提示]：你身上的元宝不足。
MOV N41 0
GOTO @MAIN
BREAK
[@CallInPutInteger42]
#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 1
#ACT
MESSAGEBOX [提示]：请输入1以上的数值！
MOV N42 0
GOTO @MAIN
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MOV N40 0
MESSAGEBOX [提示]：你目前已经是庄家，无法重复坐庄。
GOTO @MAIN
BREAK
#IF
EQUAL N45 2
#ACT
MOV N42 0
MESSAGEBOX [提示]：你已经下注押了大，无法重复下注！
GOTO @MAIN
BREAK
#IF
EQUAL N45 3
#ACT
MOV N42 0
MESSAGEBOX [提示]：你已经下注押了小，无法重复下注！
GOTO @MAIN
BREAK
#IF
LARGE N42 <$STR(G17)>
#ACT
MOV N42 0
MESSAGEBOX [提示]：对不起，庄家的本钱已达到上线不够赔了。\ \目前你只可以下注【<$STR(G17)>】以下的元宝！
GOTO @MAIN
BREAK
#IF
EQUAL G19 1
#ACT
MOV N40 0
MESSAGEBOX [提示]：请重新输入。
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD > <$STR(N42)>
#ACT
MOV G19 1
MOV N45 3
MOV S23 小
GAMEGOLD - <$STR(N42)>
MOV N43 <$STR(N42)>
INC G14 <$STR(N43)>
SendMSG 4 %s使用<$STR(N42)>个元宝下注押小。
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(N42)>】个元宝下注押小。
MOV N42 0
BREAK
#ELSEACT
MESSAGEBOX [提示]：你身上的元宝不足。
MOV N42 0
GOTO @MAIN
BREAK
[@Over]
#IF
#ACT
MapMove 3 330 330
BREAK
[@Help]
<猜点游戏规则:本系统限制最多使用20000元宝抢庄!/SCOLOR=103>\
<(1)庄家坐庄后，其他玩家可下注，两分钟后三个骰子由庄家掷出，/SCOLOR=103>\
?<骰子点数随机出现点数总和小于11代表小，点数总和大于10代表/SCOLOR=103>\
?<大，三个点数相同代表豹子/SCOLOR=103>\
<(2)押大赢大，押小赢小，豹子通吃！本游戏系统不收取税金/SCOLOR=103>\
<(3)正在坐庄或已下注的玩家如下线将被视做弃权，损失下注元宝/SCOLOR=103>\
<(4)玩家下注数不能超过庄家坐庄的元宝总和/SCOLOR=103>\ \
<返回/@MAIN> \
[@IsInFilterList]
#ACT
MESSAGEBOX [错误]：输入数据中包含了非法字符，请重新编辑！
完整脚本下载：
学习了，谢谢分享、、、 帮你顶下哈！！ 嘘，低调。 确实不错，顶先 OMG！介是啥东东！！！ 边撸边过 1v1飘过 占位编辑。。广告位出租~~~ 一直在看