传奇***论坛脚本

显示全部楼层 · 2012-11-2 00:10:02

[@MAIN]
#IF
check [366] 0
#ACT
BREAK
#SAY
1.最少两名玩家可以开始游戏,最多九名一起玩！\
2.牌型：炸弹>同花顺>同花>顺子>对子>单张！相同按点数分大小！\
3.点数：13>12>11>10>9>8>7>6>5>4>3>2>1！相同按花型区分大小！\
4.花型：▲黑桃>●红桃>★梅花>◆方块！玩法与现实中一样！\
5.参与玩家打底元宝50个！赢家交纳10%税收！5%作为超级奖金！\
6.<超级奖金>用于奖励炸弹和同花顺炸弹奖励超级资金池的80%,\
　同花顺奖励超级奖金池的40%，<炸弹和同花顺放弃是没有奖励>\
7.桌面超过10万元宝、玩家元宝不足、只剩一个玩家时都自动开牌！\
　<当前超级奖金池>：〖<$STR(G89)>〗<个元宝>！　←<同意规则马上开始游戏/@游戏比赛>\

#IF
check [366] 1
#act
BREAK
#SAY
<①号玩家>：<$STR(A81)><②号玩家>：<$STR(A82)><③号玩家>：<$STR(A83)>\
<④号玩家>：<$STR(A84)><⑤号玩家>：<$STR(A85)><⑥号玩家>：<$STR(A86)>\
<⑦号玩家>：<$STR(A87)><⑧号玩家>：<$STR(A88)><⑨号玩家>：<$STR(A89)>\
台面总下注：【<$STR(I32)>】当前<暗>注：【<$STR(I34)>】当前<明>注：【<$STR(I35)>】\
自己【<$STR(M84)>号】：【<$STR(S90)>】←<已放弃牌>←<放弃此局>←<我要开牌>\
╔┈┈┈┳┈┈┈┳┈┈┈┳┈┈┈┳┈┈┈╗当前超级奖金：【<$STR(G89)>】个\
┊<跟注>┊<加一百>┊<加五百>┊<加一千>┊<加五千>┊←<此为暗注数量>\
╚┈┈┈┻┈┈┈┻┈┈┈┻┈┈┈┻┈┈┈╝你当前的元宝：【<$GAMEGOLD>】个\
轮到【<$STR(I77)>】号玩家下注！剩余<$STR(I40)>秒！

#IF
EQUAL M84 <$STR(I77)>
#act
BREAK
#SAY
<自己下注了，请抓紧时间！>\

[@游戏比赛]
#IF
check [366] 1
#ACT
MESSAGEBOX [提示]：你已经报名参加了!
BREAK

#IF
LARGE I80 8
#ACT
MESSAGEBOX [提示]：此局已有九名玩家参与！暂时不能参加,请稍等!
BREAK

#IF
LARGE I26 2
check [372] 0
#ACT
SET [372] 1
INC I33 1
MESSAGEBOX [提示]：局进行中,请稍等!
BREAK

#IF
LARGE I26 2
#ACT
MESSAGEBOX [提示]：局进行中,请稍等!
BREAK

#IF
LARGE I33 0
#ELSEACT
MOV I33 1

#IF
CHECKGAMEGOLD < 150
#ACT
MESSAGEBOX [提示]：至少150元宝才能开始游戏!
BREAK
#IF
CHECKGAMEGOLD > 149
#ACT
GAMEGOLD - 50
INC I32 50
SET [366] 1
SET [367] 0
SET [368] 1
SET [370] 0
SET [371] 0
INC I80 1
MOV S1 A8<$STR(I80)>
MOV <$STR(S1)> 『未看牌』
MOV M84 <$STR(I80)>
MOV M81 0
MOV M82 0
MOV M83 0
MOV M85 0
MOV M86 0
MOV M87 0
MOV M88 0
MOV M89 0
MOV M90 0
MOV M91 0
MOV M92 0
MOV M93 0
MOV M94 0
MOV S89
MOV S90
MESSAGEBOX [提示]：成功参加，请等待其它玩家加入游戏开始! \开始游戏后不能离开房间或小退！

#IF
LARGE I80 <$STR(I33)>
#ACT
MOV I26 2
SENDMSG 5 〖炸金花〗游戏马上开始，请注意。。。 250 0 10
break

#IF
LARGE I80 0
#ACT
MOV I26 1
SENDMSG 5 〖炸金花〗恭喜你参加游戏成功。。。扣除打底元宝50颗。。。无人参与将退回元宝。。。
SENDMSG 5 〖炸金花〗已有玩家开始游戏，正在等待玩家加入。%t秒内无人加入将结束此局。 250 0 120 @无人参与
SENDMSG 0 〖炸金花〗已有玩家开始游戏，正在等待玩家加入。%t秒内无人加入将结束此局。 250 0 120
break

[@无人参与]
#IF
SMALL I80 2
check [366] 1
#ACT
SET [366] 0
SET [368] 0
MOV I80 0
MOV I26 0
GAMEGOLD + 50
SENDMSG 5 〖炸金花〗120秒内没有人参与。。退回打底元宝50颗。。。
SENDMSG 0 〖炸金花〗此局只有一位玩家参与，无法游戏，此局结束。新的局等你开启。。。 250 0 10
break

#IF
SMALL I80 <$STR(I33)>
LARGE I80 1
#ACT
DEC I33 1
break
#ELSEACT
break

论坛一条龙