GM016论坛

 找回密码
 注册
查看: 1597|回复: 9

传奇游戏内老虎机脚本

[复制链接]
发表于 2013-10-18 15:28:28 | 显示全部楼层 |阅读模式
[@main]
#IF
EQUAL D60 0
#ACT
MOV D60 1
MOV S60 ★
MOV S61 ★
MOV S62 ★
#SAY
╔┄┄┄┄╗┄┄┄┄┄┄┄┄<游戏老虎机>┄┄┄┄┄┄┄┄┄\
┆<熟悉规则/@熟悉规则>┆ 你有元宝:<$GAMEGOLD>\
┆<积 奖 池/@积奖池>┆ 投币数量:<$STR(D55)>\
┆< 投  币 /@投币>┆ 胜利场数:<$STR(D60)>\
┆< 取  币 /@取币>┆ 积奖总池:<$STR(G93)>\
┆< 退  币 /@退币>┆\
┆<开始旋转/@开始旋转>┆        <$STR(S60)>          <$STR(S61)>          <$STR(S62)>\
┆< 离  开 /@离开>┆\
╚┄┄┄┄╝┄┄┄<赌博有风险            投注请谨慎>┄┄┄\
#ELSESAY
╔┄┄┄┄╗┄┄┄┄┄┄┄┄<游戏老虎机>┄┄┄┄┄┄┄┄┄\
┆<熟悉规则/@熟悉规则>┆ 你有元宝:<$GAMEGOLD>\
┆<积 奖 池/@积奖池>┆ 投币数量:<$STR(D55)>\
┆< 投  币 /@投币>┆ 胜利场数:<$STR(D60)>\
┆< 取  币 /@取币>┆ 积奖总池:<$STR(G93)>\
┆< 退  币 /@退币>┆\
┆<开始旋转/@开始旋转>┆        <$STR(S60)>          <$STR(S61)>          <$STR(S62)>\
┆< 离  开 /@离开>┆\
╚┄┄┄┄╝┄┄┄<赌博有风险            投注请谨慎>┄┄┄\
[@熟悉规则]
#IF
#ACT
messagebox 点击投币投入1元宝,可多次投币,最多允许投入3元宝。如果投入过多,\可点击取币取回。点击开始旋转即摇动轮盘,当轮盘上

出现同样的三个\图案,玩家可获得相当投币5倍的奖金。如果三个图案不一致,玩家所\投币将不做返还。玩家获胜后可选择退币即可取得先

前的奖金,或者继续\点击开始旋转进行下一轮游戏,奖金继续做为投注,如获胜奖金继续乘\以5 倍,最多可连续玩三场,理论最高奖金为

1500元宝。\玩家游戏过程中不可强行退出,强行退出会导致已\投注及奖金无法返还。
[@游戏界面]
╔┄┄┄┄╗┄┄┄┄┄┄┄┄<游戏老虎机>┄┄┄┄┄┄┄┄┄\
┆<熟悉规则/@熟悉规则>┆ 你有元宝:<$GAMEGOLD>\
┆<积 奖 池/@积奖池>┆ 投币数量:<$STR(D55)>\
┆< 投  币 /@投币>┆ 胜利场数:<$STR(D60)>\
┆< 取  币 /@取币>┆ 积奖总池:<$STR(G93)>\
┆< 退  币 /@退币>┆\
┆<开始旋转/@开始旋转>┆        <$STR(S60)>          <$STR(S61)>          <$STR(S62)>\
┆< 离  开 /@离开>┆\
╚┄┄┄┄╝┄┄┄<赌博有风险            投注请谨慎>┄┄┄\
[@投币]
#if
checkgamegold > 1
#act
#elseact
messagebox 元宝不足,无法继续游戏。
break

#if
SMALL D55 3
#ACT
GAMEGOLD - 1
INC D55 1
SENDMSG 6 投入元宝1枚。
GOTO @游戏界面
#ELSEACT
messagebox 最多只能投入3枚元宝。
[@取币]
#if
EQUAL D55 0
#ACT
messagebox 你还未往机内投入元宝。
break
#if
SMALL D55 4
#ACT
DEC D55 1
GAMEGOLD + 1
SENDMSG 6 取回元宝1枚。
GOTO @游戏界面
break
#if
LARGE D55 3
#ACT
messagebox 游戏获胜取得元宝可通过“退币”取出。\
[@退币]
#if
EQUAL D55 0
#ACT
messagebox 机内没有元宝。
break
#if
#ACT
MOV D60 1
SENDMSG 6 取回元宝<$STR(D55)>枚。
GAMEGOLD + D55
MOV D55 0
GOTO @游戏界面
[@离开]
#if
EQUAL D55 0
#ACT
close
break
#if
#ACT
SENDMSG 6 取回元宝<$STR(D55)>枚。
GAMEGOLD + D55
MOV D55 0
close
[@积奖池]
#if
#ACT
messagebox 所有玩家每赢一场游戏,所得奖金其中十分之一将积累到积奖池中,\当有玩家连续三盘赢得游戏,除会获得相当投注额100倍奖

金外,\还会获得积奖池中奖金分红。\投入1元宝最高可获得100元宝分红,投入2元宝最高可获得200元宝分红\投入3元宝最高可获得500元宝

分红
[@开始旋转]
#if
EQUAL D55 0
#ACT
messagebox 请向机内投入元宝在进行游戏。
break
#if
EQUAL D60 4
#ACT
messagebox 你已经连胜三局,请点击退币后再进行游戏。
break

#if
EQUAL D60 1
#ACT
INC D60 1
MOVR N33 3
MOVR N43 3
MOVR N53 3
GOTO @继续旋转
break
#if
EQUAL D60 2
#ACT
INC D60 1
MOVR N33 3
MOVR N43 3
MOVR N53 3
GOTO @继续旋转
break
#if
EQUAL D60 3
#ACT
INC D60 1
MOVR N33 3
MOVR N43 3
MOVR N53 3
GOTO @继续旋转
break
[@继续旋转]
#if
EQUAL N33 0
#ACT
MOV S60 ★
#if
EQUAL N33 1
#ACT
MOV S60 ⊙
#if
EQUAL N33 2
#ACT
MOV S60 ●
#if
EQUAL N33 3
#ACT
MOV S60 △
#if
EQUAL N33 4
#ACT
MOV S60 ▲
#if
EQUAL N33 5
#ACT
MOV S60 ■
#if
EQUAL N33 6
#ACT
MOV S60 ☆
#if
EQUAL N43 0
#ACT
MOV S61 ★
#if
EQUAL N43 1
#ACT
MOV S61 ⊙
#if
EQUAL N43 2
#ACT
MOV S61 ●
#if
EQUAL N43 3
#ACT
MOV S61 △
#if
EQUAL N43 4
#ACT
MOV S60 ▲
#if
EQUAL N43 5
#ACT
MOV S60 ■
#if
EQUAL N43 6
#ACT
MOV S60 ☆
#if
EQUAL N53 0
#ACT
MOV S62 ★
#if
EQUAL N53 1
#ACT
MOV S62 ⊙
#if
EQUAL N53 2
#ACT
MOV S62 ●
#if
EQUAL N53 3
#ACT
MOV S62 △
#if
EQUAL N53 4
#ACT
MOV S60 ▲
#if
EQUAL N53 5
#ACT
MOV S60 ■
#if
EQUAL N53 6
#ACT
MOV S60 ☆
#if
EQUAL N33 0
#ACT
MOV S60 ★
#if
EQUAL N33 1
#ACT
MOV S60 ⊙
#if
EQUAL N33 2
#ACT
MOV S60 ●
#if
EQUAL N33 3
#ACT
MOV S60 △
#if
EQUAL N33 4
#ACT
MOV S60 ▲
#if
EQUAL N33 5
#ACT
MOV S60 ■
#if
EQUAL N33 6
#ACT
MOV S60 ☆
#if
EQUAL N43 0
#ACT
MOV S61 ★
#if
EQUAL N43 1
#ACT
MOV S61 ⊙
#if
EQUAL N43 2
#ACT
MOV S61 ●
#if
EQUAL N43 3
#ACT
MOV S61 △
#if
EQUAL N43 4
#ACT
MOV S60 ▲
#if
EQUAL N43 5
#ACT
MOV S60 ■
#if
EQUAL N43 6
#ACT
MOV S60 ☆
#if
EQUAL N53 0
#ACT
MOV S62 ★
#if
EQUAL N53 1
#ACT
MOV S62 ⊙
#if
EQUAL N53 2
#ACT
MOV S62 ●
#if
EQUAL N53 3
#ACT
MOV S62 △
#if
EQUAL N53 4
#ACT
MOV S60 ▲
#if
EQUAL N53 5
#ACT
MOV S60 ■
#if
EQUAL N53 6
#ACT
MOV S60 ☆


#if
EQUAL N53 N33
EQUAL N53 N43
#ACT
SENDMSG 6 恭喜你赢了这局游戏。
SENDMSG 7 提示:%s恭喜你赢了这局游戏,获得奖金<$STR(D55)>0元宝。
INC G93 D55
GOTO @轮盘停止
break
#if
#ACT
MOV D60 1
MOV D55 0
SENDMSG 6 请再接再励。
GOTO @游戏界面
break
[@轮盘停止]
#if
EQUAL D55 1
#ACT
MOV D55 5
GOTO @游戏界面
break
#if
EQUAL D55 2
#ACT
MOV D55 10
GOTO @游戏界面
break
#if
EQUAL D55 3
#ACT
MOV D55 15
GOTO @游戏界面
break
#if
EQUAL D55 10
#ACT
MOV D55 50
GOTO @游戏界面
break
#if
EQUAL D55 20
#ACT
MOV D55 100
GOTO @游戏界面
break
#if
EQUAL D55 30
#ACT
MOV D55 150
GOTO @游戏界面
break

#if
EQUAL D55 10
SMALL G93 1001
#ACT
MOV D55 500
INC D55 G93
MOV G93 0
SENDMSG 7 提示:%s恭喜你赢了游戏,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
GOTO @游戏界面
break

#if
EQUAL D55 10
LARGE G93 500
#ACT
MOV D55 50
INC D55 50
DEC G93 50
SENDMSG 7 提示:%s恭喜你赢了游戏,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
GOTO @游戏界面
break

#if
EQUAL D55 20
SMALL G93 2001
#ACT
MOV D55 1000
INC D55 G93
MOV G93 0
SENDMSG 7 提示:%s恭喜你赢了游戏,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
GOTO @游戏界面
break

#if
EQUAL D55 20
LARGE G93 1000
#ACT
MOV D55 1000
INC D55 1000
DEC G93 1000
SENDMSG 7 提示:%s恭喜你赢了游戏,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
GOTO @游戏界面
break

#if
EQUAL D55 30
SMALL G93 5001
#ACT
MOV D55 1500
INC D55 1500
DEC G93 1500
SENDMSG 7 提示:%s恭喜你赢了游戏,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
SENDMSG 7 提示:恭喜%s赢得Jackpot大奖,获得奖金<$STR(D55)>元宝。
GOTO @游戏界面
break
发表于 2013-10-18 15:28:33 | 显示全部楼层
没看完~~~~~~ 先顶,好同志
发表于 2013-10-18 15:28:37 | 显示全部楼层
其实我想给你说一句我心里话,我想睡觉....
发表于 2013-10-18 15:28:45 | 显示全部楼层
不错 支持下
发表于 2013-10-18 15:29:08 | 显示全部楼层
我是来刷分的,嘿嘿
发表于 2013-10-18 15:29:43 | 显示全部楼层
好好 学习了 确实不错
发表于 2013-10-18 15:30:09 | 显示全部楼层
相当不错,感谢无私分享精神!
发表于 2020-3-22 13:14:08 | 显示全部楼层
支持玩私服吧论坛wan458.com

每日更新大量开区免费版本。群服,大服等等。
回复 支持 反对

使用道具 举报

发表于 2020-4-6 04:39:16 | 显示全部楼层
支持玩私服吧论坛wan458.com

每日更新大量开区免费版本。群服,大服等等。
回复 支持 反对

使用道具 举报

发表于 2020-4-27 13:23:46 | 显示全部楼层
支持玩私服吧论坛wan458.com

每日更新大量开区免费版本。群服,大服等等。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长QQ282630674|传奇服务端|GM基地|鲁ICP备16023424号-4|GM016论坛

GMT+8, 2024-12-28 03:20 , Processed in 1.187500 second(s), 16 queries .

Powered by GM基地 X3.4

© 免责声明:本站所有资源均来至网络,仅供学习交流,严禁用于商业用途,请于24小时内删除!

快速回复 返回顶部 返回列表