传奇休息挂机脚本

传奇服务端

(@@InPutInteger)
[@main]
欢迎光临:私家地下赌场，你所拥有的元宝：【<$GAMEGOLD>】\
庄家姓名：【<$STR(A82)>】　庄家成本数：【<$STR(G86)>】\
╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗\
┊<查看说明/@Help>┊┊<开始坐庄/@@InPutInteger40>┊┊<下注押大/@@InPutInteger41>┊┊<下注押小/@@InPutInteger42>┊┊<返回土城/@Over>┊\
╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝\
押大总金额：【<$STR(G84)>】　　　　　　　　　　　剩余时间：<$STR(G87)>\
押小总金额：【<$STR(G85)>】\
你的下注情况：你下注【<$STR(M43)>】元宝押【<$STR(S23)>】　　<刷新/@MAIN>\
<网监提示：猜点数游戏仅供娱乐，禁止进行赌博和违法的金币交易！>\

[@InPutInteger40]
#If
CheckLevelEx > 0
#Act
mov m40 <$str(n40)>
Goto @Integer40
[@Integer40]
#IF
LARGE G80 60
#ACT
MESSAGEBOX [提示]：抢庄时间已经结束。请等待开局！
MOV M40 0
GOTO @MAIN
BREAK




#IF
SMALL M40 100
#ACT
MESSAGEBOX [提示]：请输入100以上的数值！
MOV M40 0
GOTO @MAIN
BREAK




#IF
EQUAL A82 <$USERNAME>
#ACT
MOV M40 0
MESSAGEBOX [提示]：你目前已经是庄家，无法重复坐庄。
GOTO @MAIN
BREAK


#IF
EQUAL M45 2
#ACT
MOV M40 0
MESSAGEBOX [提示]：你已经下注押了大，无法坐庄！
GOTO @MAIN
BREAK


#IF
EQUAL M45 3
#ACT
MOV M40 0
MESSAGEBOX [提示]：你已经下注押了小，无法坐庄！
GOTO @MAIN
BREAK


#IF
CHECKGAMEGOLD < <$STR(M40)>
#ACT
MESSAGEBOX [提示]：你身上的元宝不足。
MOV M40 0
GOTO @MAIN
BREAK

#IF
LARGE M40 <$STR(G86)>
#ACT
GMEXECUTE 元宝 <$STR(A82)> + <$STR(G86)>
GAMEGOLD - <$STR(M40)>
MOV G86 <$STR(M40)>
SendMSG 4 %s使用<$STR(M40)>个元宝坐庄。
MOV A82 <$USERNAME>
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(M40)>】个元宝坐庄。
BREAK


#ELSEACT
MESSAGEBOX [提示]：你必需出多于【<$STR(G86)>】个元宝才能抢庄。
MOV M40 0
GOTO @MAIN
BREAK


[@InPutInteger41]
#If
CheckLevelEx > 0
#Act
mov m41 <$str(n41)>
MOVR M92 4
INC M92 2
Goto @Integer41
[@Integer41]
#IF
LARGE G80 120
#ACT
MESSAGEBOX [提示]：下注时间已经结束。请等待开局！
MOV M41 0
GOTO @MAIN
BREAK


#IF
SMALL G80 61
#ACT
MESSAGEBOX [提示]：下注时间还没到，现在是抢庄时间。
MOV M41 0
GOTO @MAIN
BREAK




#IF
SMALL M41 10
#ACT
MESSAGEBOX [提示]：请输入10以上的数值！
MOV M41 0
GOTO @MAIN
BREAK

#IF
EQUAL A82 <$USERNAME>
#ACT
MOV M40 0
MESSAGEBOX [提示]：你目前已经是庄家，无法重复坐庄。
GOTO @MAIN
BREAK

#IF
EQUAL M45 2
#ACT
MOV M41 0
MESSAGEBOX [提示]：你已经下注押了大，无法重复下注！
GOTO @MAIN
BREAK


#IF
EQUAL M45 3
#ACT
MOV M41 0
MESSAGEBOX [提示]：你已经下注押了小，无法重复下注！
GOTO @MAIN
BREAK

#IF
LARGE M41 <$STR(G81)>
#ACT
MOV M41 0
MESSAGEBOX [提示]：对不起，庄家的成本已达到上限不够赔了。\　　　　\目前你只可以下注【<$STR(G81)>】以下的元宝！
GOTO @MAIN
BREAK


#IF
CHECKGAMEGOLD > <$STR(M41)>
EQUAL M92 1
#ACT
ClearDelayGoto
MOV M92 0
MOV M45 2
MOV S23 大
GAMEGOLD - <$STR(M41)>
MOV M43 <$STR(M41)>
INC G84 <$STR(M43)>
SendMSG 4 %s使用<$STR(M41)>个元宝下注押大。
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(M41)>】个元宝下注押大。
MOV M41 0
BREAK

#IF
CHECKGAMEGOLD > <$STR(M41)>
#ACT
DEC M92 1。
Delaygoto 1 @Integer41
BREAK

#ELSEACT
MESSAGEBOX [提示]：你身上的元宝不足。
MOV M41 0
GOTO @MAIN
BREAK




[@InPutInteger42]
#If
CheckLevelEx > 0
#Act
mov m42 <$str(n42)>
MOVR M92 4
INC M92 2
Goto @Integer42
[@Integer42]
#IF
LARGE G80 120
#ACT
MESSAGEBOX [提示]：下注时间已经结束。请等待开局！
MOV M42 0
GOTO @MAIN
BREAK


#IF
SMALL G80 61
#ACT
MESSAGEBOX [提示]：下注时间还没到，现在是抢庄时间。
MOV M42 0
GOTO @MAIN
BREAK




#IF
SMALL M42 10
#ACT
MESSAGEBOX [提示]：请输入10以上的数值！
MOV M42 0
GOTO @MAIN
BREAK

#IF
EQUAL A82 <$USERNAME>
#ACT
MOV M40 0
MESSAGEBOX [提示]：你目前已经是庄家，无法重复坐庄。
GOTO @MAIN
BREAK


#IF
EQUAL M45 2
#ACT
MOV M42 0
MESSAGEBOX [提示]：你已经下注押了大，无法重复下注！
GOTO @MAIN
BREAK




#IF
EQUAL M45 3
#ACT
MOV M42 0
MESSAGEBOX [提示]：你已经下注押了小，无法重复下注！
GOTO @MAIN
BREAK




#IF
LARGE M42 <$STR(G82)>
#ACT
MOV M42 0
MESSAGEBOX [提示]：对不起，庄家的成本已达到上限不够赔了。\5 u w l.net　　　　\目前你只可以下注【<$STR(G82)>】以下的元宝！
GOTO @MAIN
BREAK


#IF
CHECKGAMEGOLD > <$STR(M42)>
EQUAL M92 1
#ACT
ClearDelayGoto
MOV M92 0
MOV M45 3
MOV S23 小
GAMEGOLD - <$STR(M42)>
MOV M43 <$STR(M42)>
INC G85 <$STR(M43)>
SendMSG 4 %s使用<$STR(M42)>个元宝下注押小。
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(M42)>】个元宝下注押小。
MOV M42 0
BREAK




#IF
CHECKGAMEGOLD > <$STR(M41)>
#ACT
DEC M92 1
Delaygoto 1 @Integer42
BREAK


#ELSEACT
MESSAGEBOX [提示]：你身上的元宝不足。
MOV M42 0
GOTO @MAIN
BREAK


[@Over]
#IF
#ACT
MapMove 3 330 330
BREAK




[@Help]
猜点游戏规则：\
1)庄家坐庄后，其他玩家可下注，两分钟后三个骰子随机泛起，\
　点数总和小于11代表小，点数总和大于10代表大，三个点数相\
　同代表豹子。\
2)押大赢大，押小赢小，豹子通吃，系统每次收取5%税务\
3)正在坐庄或已下注的玩家如下线将被视做弃权，损失下注元宝\
4)玩家下注数不能超过庄家坐庄的元宝总和。\
<返回/@MAIN>　　<离开/@EXIT>\

[@IsInFilterList]
#ACT
MESSAGEBOX [错误]：输入数据中包含了非法字符，请重新编纂!

福是传奇

谢谢分享，十分感谢。