传奇扑克牌脚本-64GM论坛 - Powered by Discuz! Archiver

忆安373 发表于 2023-10-12 08:56:54

传奇扑克牌脚本

许多GM都很希望自己的游戏里面有许多新的玩法。如果在传奇中能和现实生活一样打扑克，你想一下有多吸引人。并且可以赢取玩家的元宝。这样的脚本多好啊。所以在这里宇皓数据给大家发出了一个关于传奇赌博脚本。
把一下的脚本在游戏中新建一个NPC。然后，把一下脚本复制进去就可以了。但是头顶一定加上 (@@InPutInteger @@InPutString)一个输入字符和数字的头顶注释！
赶快加上游戏上试试吧！看看效果！
(@@InPutInteger @@InPutString)
2：将下面的脚本内容复制进去。
[@Pok]
#IF
EQUAL N6 0
#SAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)> 　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)> 　　║║<$STR(N96)> 　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<愿赌服输/SCOLOR=243>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　 <$STR(N99)>║║　　 <$STR(N98)>║║<下注/@@InPutInteger6>║║<开始>║║　　 <$STR(N97)>║║　　 <$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：★　　　　　<返回/@MAIN>　　　　　你的点数：★\
#ELSESAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)> 　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)> 　　║║<$STR(N96)> 　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<愿赌服输/SCOLOR=243>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　 <$STR(N99)>║║　　 <$STR(N98)>║║<下注>║║<开始/@Pok_2>║║　　 <$STR(N97)>║║　　 <$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：★　　　　　<返回/@MAIN>　　　　　你的点数：★\

[@InPutInteger6]
#ACT
MOV N6 N0
GOTO @kaishi
[@kaishi]
#IF
SMALL N6 1
#ACT
MESSAGEBOX [提示]：最少下1注。
MOV N6 0
GOTO @Pok
BREAK

#IF
LARGE N6 100
#ACT
MESSAGEBOX [提示]：最多只能下100注。
MOV N6 0
GOTO @Pok
BREAK
#IF
CHECKGAMEGOLD > N6
#ACT
GAMEGOLD - N6
SendMSG 6 成功下注<$STR(N6)>个元宝，当前拥有元宝：<$GAMEGOLD>
GOTO @Pok
#ELSEACT
MESSAGEBOX [提示]：你的元宝不足<$STR(N6)>个。
MOV N6 0
GOTO @Pok
BREAK

[@Pok_2]
#IF
LARGE N6 0
#ACT
MOVR P1 10
MOV N99 P1
MOVR P210
MOV N98 P2
INC P1 P2
GOTO @Pok_2_1
BREAK
#ELSEACT
GOTO @Pok
BREAK

[@Pok_2_1]
#IF
LARGE P1 10
#ACT
DEC P1 10
BREAK
#SAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)> 　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)> 　　║║<$STR(N96)> 　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<愿赌服输/SCOLOR=243>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　 <$STR(N99)>║║　　 <$STR(N98)>║║<下注>║║<发牌/@Pok_2_2>║║　　 <$STR(N97)>║║　　 <$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：<$STR(P1)>点　　　　　　　　　　　请点击发牌继续\
#IF
LARGE P1 0
SMALL P1 10
#ACT
BREAK
#SAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)> 　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)> 　　║║<$STR(N96)> 　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<愿赌服输/SCOLOR=243>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　 <$STR(N99)>║║　　 <$STR(N98)>║║<下注>║║<发牌/@Pok_2_2>║║　　 <$STR(N97)>║║　　 <$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：<$STR(P1)>点　　　　　　　　　　　请点击发牌继续\
以下内容需要回复才能看到
#IF
EQUAL P1
10
#SAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)>
　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)>
　　║║<$STR(N96)>
　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<**获胜/SCOLOR=250>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　
<$STR(N99)>║║　　
<$STR(N98)>║║<下注/@@InPutInteger6>║║<继续>║║　　
<$STR(N97)>║║　　
<$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：10点　　　　<返回/@MAIN>　　　　**小会直接获胜\
#ACT
INC G8 N6
MOV N6 0
MOV P1 0
MOV P2 0
MOV P3 0
MOV P4
0
BREAK
#ELSEACT
GOTO @Pok
BREAK
[@Pok_2_2]
#IF
LARGE
N6 0
LARGE P1 0
#ACT
MOVR P310
MOV N97 P3
MOVR P4
10
MOV N96 P4
INC P3 P4
GOTO
@Pok_2_3
BREAK
[@Pok_2_3]
#IF
LARGE P3 10
#ACT
DEC P3
10
#IF
LARGE P1 0
LARGE P3 P1
#ACT
DEC G8 N6
MOV N95
P1
MOV N94 P3
INC N6 N6
GAMEGOLD + N6
SENDMSG 0
恭喜[%s]玩扑克游戏赢得了<$STR(N6)>个元宝！
GOTO
@TXPok_2_4
BREAK
#SAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)>
　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)>
　　║║<$STR(N96)> 　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<你
赢了/SCOLOR=253>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　
<$STR(N99)>║║　　
<$STR(N98)>║║<下注/@@InPutInteger6>║║<开始>║║　　
<$STR(N97)>║║　　
<$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：<$STR(N95)>点　　　　
<返回/@MAIN>　　　　　你的点数：<$STR(N94)>点\

#IF
LARGE P1 0
SMALL
P3 P1
#ACT
INC G8 N6
MOV N95 P1
MOV N94 P3
GOTO
@TXPok_2_4
BREAK
#SAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)>
　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)>
　　║║<$STR(N96)> 　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<你
输了/SCOLOR=250>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　
<$STR(N99)>║║　　
<$STR(N98)>║║<下注/@@InPutInteger6>║║<开始>║║　　
<$STR(N97)>║║　　
<$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：<$STR(N95)>点　　　　
<返回/@MAIN>　　　　　你的点数：<$STR(N94)>点\
#IF
LARGE P1 0
EQUAL
P3 P1
#ACT
INC G8 N6
MOV N95 P1
MOV N94 P3
GOTO
@TXPok_2_4
BREAK
#SAY
╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\
║<$STR(N99)>
　　║║<$STR(N98)> 　　║║<扑克游戏说明/@Pok_HELP>║║<$STR(N97)>
　　║║<$STR(N96)> 　　║\
║　　　║║　　　║╚══════╝║　　　║║　　　║\
║　◆　║║　◆　║　　<你
输了/SCOLOR=250>　　║　◆　║║　◆　║\
║　　　║║　　　║╔══╗╔══╗║　　　║║　　　║\
║　　
<$STR(N99)>║║　　
<$STR(N98)>║║<下注/@@InPutInteger6>║║<开始>║║　　
<$STR(N97)>║║　　
<$STR(N96)>║\
╚═══╝╚═══╝╚══╝╚══╝╚═══╝╚═══╝\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>\
　　**点数：<$STR(N95)>点　　　　
<返回/@MAIN>　　　　　你的点数：<$STR(N94)>点\
#ELSEACT
GOTO
@TXPok_2_4
GOTO @Pok
BREAK
[@TXPok_2_4]
#IF
#ACT
MOV N6
0
MOV P1 0
MOV P2 0
MOV P3 0
MOV P4
0
BREAK

[@Pok_HELP]
#IF
#ACT
MESSAGEBOX
[提示]：使用元宝下注，最少下注1元宝，最高下注100元宝。\　　　　玩家和**各摸两张牌，相加后超过10点将减去10点。\　　　　不超过则按实际点数计算，谁大谁赢。\　　　　如果玩家和**的点数一样，则算**获胜。\　　　　如果出现10点则为小会，直接获胜。
GOTO@Pok
BREAK

牛家村专属 发表于 2023-11-20 18:29:57

这东西我收了！

专属沉默 发表于 2023-11-20 22:02:05

很多架设问题在这里可以找到，真是太好啦。

龙牌沉默 发表于 2023-11-21 02:47:43

新手上路不用愁，碰到传奇架设问题可以来这搜索。

羽国沉默 发表于 2023-11-21 08:30:41

传奇论坛里面相对来说比较好的一个！感谢站长分享的技术教程。

勇敢牛牛 发表于 2023-11-21 12:53:38

谢谢楼主！喜欢这里的东西，方便又好用！

青妖专属 发表于 2023-11-21 15:11:36

感谢站长分享传奇教程，让我学习到很多知识。

雄霸屠龙 发表于 2023-11-21 20:30:11

感谢站长分享传奇教程，让我学习到很多知识。

天天宠物 发表于 2023-11-21 23:13:05

感谢楼主提供这么好的论坛！

鸿蒙神器 发表于 2023-11-22 01:58:16

新手上路不用愁，碰到传奇架设问题可以来这搜索。

页: [1] 2 3 4

传奇版本_GM基地_传奇一条龙_单机服务端下载-64GM论坛's Archiver

传奇扑克牌脚本