论坛 › 传奇脚本自由交易 › 传奇脚本 拉斯维⒑加斯论坛脚本 任何引擎都使用

腾飞论坛 发表于 2012-5-23 18:52:33

传奇脚本 拉斯维⒑加斯论坛脚本 任何引擎都使用

[@**开始]
#IF
ISONMAP TXDGA
#ACT
SENDMSG 6 [美女服务生]：现在开始**，**本钱必须超过1000元宝。
BREAK
[@移动**]
#IF
EQUAL A34 <$USERNAME>
EQUAL G12 59
#ACT
MAPMOVE TXDGA 8 10
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MAPMOVE TXDGA 5 11
BREAK
[@**结束]
#IF
ISONMAP TXDGA
#ACT
SENDMSG 6 ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
SENDMSG 6 [美女服务生]：**已结束。现在是下注时间，押定离手了。
SENDMSG 6 ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
SENDMSG 6 **姓名：【<$STR(A34)>】　**本钱数：【<$STR(G29)>】
SENDMSG 6 ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
BREAK
[@下注开始]
#IF
ISONMAP TXDGA
#ACT
SENDMSG 6 [美女服务生]：现在开始下注了，**本钱共有<$STR(G29)>个元宝。
BREAK
[@下注结束]
#IF
ISONMAP TXDGA
LARGE M43 0
#ACT
SENDMSG 7 [提示]：你下注【<$STR(M43)>】元宝押【<$STR(S23)>】
BREAK
[@猜点开始]
#IF
ISONMAP TXDGA
LARGE M43 0
#ACT
MOV D0 <$STR(G42)>
MOV D1 <$STR(G43)>
MOV D2 <$STR(G44)>
PLAYDICE 3 @ZZNEW
#SAY
　\
╔═══════════════╗你所拥有的元宝数：【<$GAMEGOLD>】\
║┏━━━┓┏━━━┓┏━━━┓║\
║┃●　●┃┃●　●┃┃●　●┃║**姓名：【<$STR(A34)>】\
║┃●　●┃┃●　●┃┃●　●┃║\
║┃●　●┃┃●　●┃┃●　●┃║**本钱数：【<$STR(G29)>】\
║┗━━━┛┗━━━┛┗━━━┛║\
╚═══════════════╝你下注【<$STR(M43)>】元宝押【<$STR(S23)>】\
　\
[@ZZNEW]
#IF
EQUAL G42 <$STR(G43)>
EQUAL G42 <$STR(G44)>
#ACT
SENDMSG 7 [美女服务生]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【豹子】
BREAK
#IF
SMALL G45 11
#ACT
SENDMSG 7 [美女服务生]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【小】
BREAK
#IF
LARGE G45 10
#ACT
SENDMSG 7 [美女服务生]：骰子掷出了【<$STR(G42)>】【<$STR(G43)>】【<$STR(G44)>】点【大】
BREAK
[@论坛结帐]
#IF
ISONMAP TXDGA
EQUAL A15 豹子
EQUAL A34 <$USERNAME>
#ACT
INC G11 <$STR(G29)>
MOV M44 <$STR(G11)>
DIV M44 0
DEC G11 <$STR(M44)>
INC G47 <$STR(M44)>
GAMEGOLD + <$STR(G11)>
SENDMSG 0 [美女服务生]：**【<$USERNAME>】赢得了【<$STR(G11)>】个元宝。
BREAK
#IF
ISONMAP TXDGA
EQUAL A15 大
EQUAL A34 <$USERNAME>
#ACT
INC G29 <$STR(G14)>
DEC G29 <$STR(G13)>
MOV M44 <$STR(G29)>
DIV M44 20
DEC G29 <$STR(M44)>
INC G47 <$STR(M44)>
GAMEGOLD + <$STR(G29)>
SENDMSG 0 [美女服务生]：**【<$USERNAME>】收回了【<$STR(G29)>】个元宝。
BREAK
#IF
ISONMAP TXDGA
EQUAL A15 小
EQUAL A34 <$USERNAME>
#ACT
INC G29 <$STR(G13)>
DEC G29 <$STR(G14)>
MOV M44 <$STR(G29)>
DIV M44 20
DEC G29 <$STR(M44)>
INC G47 <$STR(M44)>
GAMEGOLD + <$STR(G29)>
SENDMSG 0 [美女服务生]：**【<$USERNAME>】收回了【<$STR(G29)>】个元宝。
BREAK
#IF
ISONMAP TXDGA
EQUAL A15 豹子
LARGE M43 0
#ACT
SENDMSG 6 **【<$USERNAME>】掷出了【<$STR(A15)>】，你损失了【<$STR(M43)>】个元宝注金。
MOV M43 0
MOV S23 无
BREAK
#IF
ISONMAP TXDGA
EQUAL A15 大
EQUAL S23 大
#ACT
INC M43 <$STR(M43)>
MOV M44 <$STR(M43)>
DIV M44 20
DEC M43 <$STR(M44)>
INC G47 <$STR(M44)>
GAMEGOLD + <$STR(M43)>
SENDMSG 6 **【<$USERNAME>】掷出了【<$STR(A15)>】，你赢得了【<$STR(M43)>】个元宝注金。
MOV M43 0
MOV S23 无
BREAK
#IF
ISONMAP TXDGA
EQUAL A15 小
EQUAL S23 小
#ACT
INC M43 <$STR(M43)>
MOV M44 <$STR(M43)>
DIV M44 20
DEC M43 <$STR(M44)>
INC G47 <$STR(M44)>
GAMEGOLD + <$STR(M43)>
SENDMSG 6 **【<$USERNAME>】掷出了【<$STR(A15)>】，你赢得了【<$STR(M43)>】个元宝注金。
MOV M43 0
MOV S23 无
BREAK
#IF
ISONMAP TXDGA
LARGE M43 0
#ACT
SENDMSG 6 **【<$USERNAME>】掷出了【<$STR(A15)>】，你损失了【<$STR(M43)>】个元宝注金。

MOV M43 0
MOV S23 无
BREAK
[@论坛清零]
#IF
ISONMAP TXDGA
#ACT
MOV M40 0
MOV M41 0
MOV M42 0
MOV M43 0
MOV M44 0
MOV M45 0
MOV S23 无
BREAK
[@挑战结束111]
#IF
LARGE M50 0
EQUAL S33 <$STR(A42)>
#ACT
INC M50 <$STR(M50)>
MOV M53 <$STR(M50)>
GAMEGOLD + <$STR(M50)>
SENDMSG 5 挑战结束擂主【<$STR(A42)>】了，你押擂主【<$STR(A42)>】，获得了【<$STR(M50)>】元宝奖金。
MOV M49 0
MOV M50 0
MOV S33
BREAK
#IF
LARGE M50 0
#ACT
SENDMSG 5 挑战结束擂主【<$STR(A42)>】了，你押擂主【<$STR(S33)>】，输了【<$STR(M50)>】元宝金。
MOV M49 0
MOV M50 0
MOV S33
BREAK
[@挑战完结]
#IF
EQUAL A43 <$USERNAME>
#Act
GIVE <$STR(A47)> 1
MAPMOVE 3 330 330
BREAK
#IF
EQUAL A45 <$USERNAME>
#Act
GIVE <$STR(A47)> 1
MAPMOVE 3 330 330
BREAK
[@挑战终结]
#IF
EQUAL A43 <$USERNAME>
ISONMAP DTPK
#Act
MOV A42 赢
GIVE <$STR(A47)> 2
MAPMOVE 3 330 330
MOV A48 暂停
MOV G52 0
SendMsg 0 擂台挑战者<$STR(A45)>吓跑了，离开擂台，<$STR(A43)>获胜！
GMEXECUTE 开始提问 @挑战结束
MOV A43 无
MOV A44 无
MOV A45 无
MOV A46 无
MOV A47 无
MOV G49 0
MOV G50 0
MOV G51 0
MOV G53 0
MOV G54 0
MOV G55 0
MOV G56 0
BREAK
#IF
EQUAL A45 <$USERNAME>
ISONMAP DTPK
#Act
MOV A42 输
GIVE <$STR(A47)> 2
MAPMOVE 3 330 330
MOV A48 暂停
MOV G52 0
SendMsg 0 擂台擂主<$STR(A43)>吓跑了，离开擂台，<$STR(A45)>获胜！
GMEXECUTE 开始提问 @挑战结束
MOV A43 无
MOV A44 无
MOV A45 无
MOV A46 无
MOV A47 无
MOV G49 0
MOV G50 0
MOV G51 0
MOV G53 0
MOV G54 0
MOV G55 0
MOV G56 0
BREAK


以下内容需要回复才能看到
(@@InPutInteger)
[@MAIN]
欢迎光临，这里是猜点数游戏，你所拥有的元宝：【<$GAMEGOLD>】\
**姓名：【<$STR(A34)>】　**本钱数：【<$STR(G29)>】\
╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗╔┈┈┈┈╗\
┊<查看说明/@Help>┊┊<开始坐庄/@@InPutInteger40>┊┊<下注押大/@@InPutInteger41>┊┊<下注押小/@@InPutInteger42>┊┊<返回土城/@Over>┊\
╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝╚┈┈┈┈╝\
押大总金额：【<$STR(G13)>】　　　　　　　　　　　剩余时间：<$STR(G8)>\
押小总金额：【<$STR(G14)>】\
你的下注情况：你下注【<$STR(M43)>】元宝押【<$STR(S23)>】　　<刷新/@MAIN>\
<网监提示：猜点数游戏仅供娱乐，禁止进行论坛和违法的金币交易！>\
[@InPutInteger40]
#If
CheckLevelEx > 0
#Act
DelayGoto 1 ~InPutInteger40
[~InPutInteger40]
#IF
LARGE G12 60
#ACT
MESSAGEBOX [提示]：**时间已经结束。请等待开局！
MOV N40 0
GOTO @MAIN
BREAK
#IF
SMALL N40 1000
#ACT
MESSAGEBOX [提示]：请输入1000以上的数值！
MOV N40 0
GOTO @MAIN
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MOV N40 0
MESSAGEBOX [提示]：你目前已经是**，无法重复坐庄。
GOTO @MAIN
BREAK
#IF
EQUAL M45 2
#ACT
MOV N40 0
MESSAGEBOX [提示]：你已经下注押了大，无法坐庄！
GOTO @MAIN
BREAK
#IF
EQUAL M45 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)>个元宝坐庄。
MOV A34 <$USERNAME>
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(N40)>】个元宝坐庄。
BREAK
#ELSEACT
MESSAGEBOX [提示]：你必须出多于【<$STR(G29)>】个元宝才能**。
MOV N40 0
GOTO @MAIN
BREAK
[@InPutInteger41]
#If
CheckLevelEx > 0
#Act
MOVR M62 4
INC M62 2
DelayGoto 1 ~InPutInteger41
[~InPutInteger41]
#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 10
#ACT
MESSAGEBOX [提示]：请输入10以上的数值！
MOV N41 0
GOTO @MAIN
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MOV M40 0
MESSAGEBOX [提示]：你目前已经是**，无法重复坐庄。
GOTO @MAIN
BREAK
#IF
EQUAL M45 2
#ACT
MOV N41 0
MESSAGEBOX [提示]：你已经下注押了大，无法重复下注！
GOTO @MAIN
BREAK
#IF
EQUAL M45 3
#ACT
MOV N41 0
MESSAGEBOX [提示]：你已经下注押了小，无法重复下注！
GOTO @MAIN
BREAK
#IF
LARGE N41 <$STR(G9)>
#ACT
MOV N41 0
MESSAGEBOX [提示]：对不起，**的本钱已达到上限不够赔了。\　　　　\目前你只可以下注【<$STR(G9)>】以下的元宝！
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD > <$STR(N41)>
EQUAL M62 1
#ACT
ClearDelayGoto
MOV M62 0
MOV M45 2
MOV S23 大
GAMEGOLD - <$STR(N41)>
MOV M43 <$STR(N41)>
INC G13 <$STR(M43)>
SendMSG 4 %s使用<$STR(N41)>个元宝下注押大。
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(N41)>】个元宝下注押大。
MOV N41 0
BREAK
#IF
CHECKGAMEGOLD > <$STR(N41)>
#ACT
DEC M62 1
SendMSG 5 [提示]：使用【<$STR(N41)>】个元宝下注押大，将在【<$STR(M62)>】秒后开始执行。
DelayCall 1000 ~InPutInteger41
BREAK
#ELSEACT
MESSAGEBOX [提示]：你身上的元宝不足。
MOV N41 0
GOTO @MAIN
BREAK
[@InPutInteger42]
#If
CheckLevelEx > 0
#Act
MOVR M62 4
INC M62 2
DelayGoto 1 ~InPutInteger42
[~InPutInteger42]
#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 10
#ACT
MESSAGEBOX [提示]：请输入10以上的数值！
MOV N42 0
GOTO @MAIN
BREAK
#IF
EQUAL A34 <$USERNAME>
#ACT
MOV M40 0
MESSAGEBOX [提示]：你目前已经是**，无法重复坐庄。
GOTO @MAIN
BREAK
#IF
EQUAL M45 2
#ACT
MOV N42 0
MESSAGEBOX [提示]：你已经下注押了大，无法重复下注！
GOTO @MAIN
BREAK
#IF
EQUAL M45 3
#ACT
MOV N42 0
MESSAGEBOX [提示]：你已经下注押了小，无法重复下注！
GOTO @MAIN
BREAK
#IF
LARGE N42 <$STR(G10)>
#ACT
MOV N42 0
MESSAGEBOX [提示]：对不起，**的本钱已达到上限不够赔了。\　　　　\目前你只可以下注【<$STR(G10)>】以下的元宝！
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD > <$STR(N42)>
EQUAL M62 1
#ACT
ClearDelayGoto
MOV M62 0
MOV M45 3
MOV S23 小
GAMEGOLD - <$STR(N42)>
MOV M43 <$STR(N42)>
INC G14 <$STR(M43)>
SendMSG 4 %s使用<$STR(N42)>个元宝下注押小。
GOTO @MAIN
MESSAGEBOX [提示]：使用【<$STR(N42)>】个元宝下注押小。
MOV N42 0
BREAK
#IF
CHECKGAMEGOLD > <$STR(N41)>
#ACT
DEC M62 1
SendMSG 5 [提示]：使用【<$STR(N42)>】个元宝下注押小，将在【<$STR(M62)>】秒后开始执行。
DelayCall 1000 ~InPutInteger42
BREAK
#ELSEACT
MESSAGEBOX [提示]：你身上的元宝不足。
MOV N42 0
GOTO @MAIN
BREAK
[@Over]
#IF
#ACT
MapMove 3 330 330
BREAK
[@Help]
猜点游戏规则：
1)**坐庄后，其他玩家可下注，两分钟后三个骰子随机出现，\
　点数总和小于11代表小，点数总和大于10代表大，三个点数相同\
　代表豹子。
2)押大赢大，押小赢小，豹子通吃，系统每次收取10%税务。\
3)正在坐庄或已下注的玩家如下线将被视做弃权，损失下注元宝。\
4)玩家下注数不能超过**坐庄的元宝总和。\
<返回/@MAIN>　　<离开/@EXIT>\
[@IsInFilterList]
#ACT
MESSAGEBOX [错误]：输入数据中包含了非法字符，请重新编辑！

一个故事 发表于 2012-5-31 17:56:56

11111111111111111111111111111

一个故事 发表于 2012-6-3 17:31:06

1111111111

帅可威 发表于 2012-8-6 12:47:00

::(111111111111111111111111111111111111111111111111

香干泥 发表于 2014-2-28 17:20:17

勤奋灌水，天天向上！

中富投资 发表于 2014-2-28 16:29:23

论坛的帖子越来越有深度了！

一览件更 发表于 2014-2-28 16:48:34

看了这么多帖子，第一次看到这么经典的！

西北汉子 发表于 2014-2-28 17:11:13

看帖不回帖的人就是耍流氓，我回复了！

辣椒 发表于 2014-2-28 17:19:20

很有品味！

查看完整版本: 传奇脚本 拉斯维⒑加斯论坛脚本 任何引擎都使用