扑克牌传奇脚本支持目前主流引擎分享！

本帖最后由 y7zj7 于 2009-8-3 12:53 编辑

占用变量

织梦好，好织梦

全局 G8

copyright dedecms

个人 N 类  P类

内容来自dedecms

如果命令符 small 无效 可以全部换成  large 内容来自dedecms

  织梦内容管理系统

2009-8-3 12:53

dedecms.com

1：随便找个NPC，在对应的脚本顶部添加 (@@InPutInteger @@InPutString)
2：将下面的脚本内容复制进去。
[@Pok]
#IF
EQUAL N6 0
#SAY
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)> 　　UU<$STR(N98)> 　　UU<扑克说明)> 　　UU<$STR(N96)> 　　U
U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<愿赌服输/SCOLOR=243>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　 <$STR(N99)>UU　　 <$STR(N98)>UU<下注>UU<开始>UU　　 <$STR(N97)>UU　　 <$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：★　　　　　<返回>　　　　　你的点数：★
#ELSESAY
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)> 　　UU<$STR(N98)> 　　UU<扑克说明)> 　　UU<$STR(N96)> 　　U

内容来自dedecms

U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<愿赌服输/SCOLOR=243>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　 <$STR(N99)>UU　　 <$STR(N98)>UU<下注>UU<开始>UU　　 <$STR(N97)>UU　　 <$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：★　　　　　<返回>　　　　　你的点数：★

织梦好，好织梦

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

内容来自dedecms

#IF
LARGE N6 100
#ACT
MESSAGEBOX [提示]：最多只能下100注。
MOV N6 0
GOTO @Pok
BREAK copyright dedecms

#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 P2  10
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
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)> 　　UU<$STR(N98)> 　　UU<扑克说明)> 　　UU<$STR(N96)> 　　U
U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<愿赌服输/SCOLOR=243>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　 <$STR(N99)>UU　　 <$STR(N98)>UU<下注>UU<发牌>UU　　 <$STR(N97)>UU　　 <$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：<$STR(P1)>点　　　　　　　　　　　请点击发牌继续

内容来自dedecms

#IF
LARGE P1 0
SMALL P1 10
#ACT
BREAK
#SAY
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)> 　　UU<$STR(N98)> 　　UU<扑克说明)> 　　UU<$STR(N96)> 　　U
U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<愿赌服输/SCOLOR=243>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　 <$STR(N99)>UU　　 <$STR(N98)>UU<下注>UU<发牌>UU　　 <$STR(N97)>UU　　 <$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：<$STR(P1)>点　　　　　　　　　　　请点击发牌继续 织梦内容管理系统

以下内容需要回复才能看到
#IF
EQUAL P1
10
#SAY
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)>
　　UU<$STR(N98)> 　　UU<扑克说明)>
　　UU<$STR(N96)>
　　U
U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<**获胜/SCOLOR=250>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　
<$STR(N99)>UU　　
<$STR(N98)>UU<下注>UU<继续>UU　　
<$STR(N97)>UU　　
<$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：10点　　　　<返回>　　　　**小会直接获胜
#ACT
INC G8 N6
MOV N6 0
MOV P1 0
MOV P2 0
MOV P3 0
MOV P4
0
BREAK
#ELSEACT
GOTO @Pok
BREAK copyright dedecms

[@Pok_2_2]
#IF
LARGE
N6 0
LARGE P1 0
#ACT
MOVR P3  10
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
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)>
　　UU<$STR(N98)> 　　UU<扑克说明)>
　　UU<$STR(N96)> 　　U
U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<你
赢 了/SCOLOR=253>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　
<$STR(N99)>UU　　
<$STR(N98)>UU<下注>UU<开始>UU　　
<$STR(N97)>UU　　
<$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：<$STR(N95)>点　　　　
<返回>　　　　　你的点数：<$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
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)>
　　UU<$STR(N98)> 　　UU<扑克说明)>
　　UU<$STR(N96)> 　　U
U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<你
输 了/SCOLOR=250>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　
<$STR(N99)>UU　　
<$STR(N98)>UU<下注>UU<开始>UU　　
<$STR(N97)>UU　　
<$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：<$STR(N95)>点　　　　
<返回>　　　　　你的点数：<$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
XTTT[XTTT[XTTTTTT[XTTT[XTTT[
U<$STR(N99)>
　　UU<$STR(N98)> 　　UU<扑克说明)>
　　UU<$STR(N96)> 　　U
U　　　UU　　　U^TTTTTTaU　　　UU　　　U
U　◆　UU　◆　U　　<你
输 了/SCOLOR=250>　　U　◆　UU　◆　U
U　　　UU　　　UXTT[XTT[U　　　UU　　　U
U　　
<$STR(N99)>UU　　
<$STR(N98)>UU<下注>UU<开始>UU　　
<$STR(N97)>UU　　
<$STR(N96)>U
^TTTa^TTTa^TTa^TTa^TTTa^TTTa
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=250>
　　**点数：<$STR(N95)>点　　　　
<返回>　　　　　你的点数：<$STR(N94)>点 织梦好，好织梦

#ELSEACT
GOTO
@TXPok_2_4
GOTO @Pok
BREAK dedecms.com

[@TXPok_2_4]
#IF
#ACT
MOV N6
0
MOV P1 0
MOV P2 0
MOV P3 0
MOV P4
0
BREAK

内容来自dedecms

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

dedecms.com

—-想了解更多的游戏运维脚本怎么编写请关注<计算机技术网(www.ctvol.com)!!>