传奇版本

传奇扑克牌传奇服务端脚本支持目前主流引擎

[复制链接]
查看37046 | 回复21 | 2012-10-28 01:04:46 | 显示全部楼层 |阅读模式
:随便找个NPC,在对应的脚本顶部添加 (@@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 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

╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\

║<$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 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

╔═══╗╔═══╗╔══════╗╔═══╗╔═══╗\

║<$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
复制代码
论坛一条龙
刀疯 | 2012-10-31 19:43:44 | 显示全部楼层
2222222222222222222222222
我爱龙 | 2014-3-6 10:34:10 | 显示全部楼层
楼主,您提前出院了?
吴龙伟 | 2014-3-6 10:37:06 | 显示全部楼层
看帖、回帖、拿分、走人
手机卖 | 2014-3-6 10:55:22 | 显示全部楼层
管它三七二十一!
小良 | 2014-3-6 11:11:36 | 显示全部楼层
紫陌红尘 | 2014-3-6 10:37:07 | 显示全部楼层
感觉不错!
友军 | 2014-6-1 11:00:21 | 显示全部楼层
我裤子脱了,纸都准备好了,你就给我看这个?
成林 | 2014-6-1 10:44:54 | 显示全部楼层
这么好的帖子,应该加精华!
残阳如血 | 2014-6-1 11:11:36 | 显示全部楼层
收藏了,改天让朋友看看!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则