Gom引擎脚本-老虎机

[复制链接]
查看1201 | 回复0 | 2017-9-8 12:38:34 | 显示全部楼层 |阅读模式
[@MAIN]
#IF
#ACT
OPENMERCHANTBIGDLG 4 23 0 0 0 0 1 385 170
close
goto @老虎机88


[@老虎机88]
#ACT
MOV N30 1
MOV N31 1000
MOV N35 0
MOV N21 0
MOV N22 0
MOV N23 0
MOV N25 0
MOV S21 <Img:200:16:3:35>
MOV S22 <Img:200:16:0:19>
MOV S23 <Img:200:16:3:3>
MOV S25
MOV S26
MOV S27
#SAY
\ \
<777幸运老虎机玩法:/FCOLOR=250><打开声音更爽>\
<首先你要选择倍数,然后点击开始按钮就启动啦!(默认倍数是1倍)./FCOLOR=69>\
<如果是1倍的话,每次开动需要1000元宝,2倍需要2000元宝....../FCOLOR=69>\
<点击倍数按钮自动加倍数,最高10倍.当10倍时,再次点击倍数就变成1倍./FCOLOR=69>\
<关于获得奖励./FCOLOR=254>\
<根据幸运机上方给的奖励倍数.奖励倍数 x 开始倍数 = 实际奖励/FCOLOR=69>\
<注意:在开动时玩家如移动或强行关闭将造成当时数据丢失./FCOLOR=249>\
<启动777幸运老虎机/@幸运老虎机>


[@幸运老虎机]
#ACT
MOV S28 <$STR(N31)>
SetStringBlank <$STR(S28)> 5 1
MOV S29 <$STR(N30)>
SetStringBlank <$STR(S29)> 3 1
OPENMERCHANTBIGDLG 16 190 0 4 0 -60 0 0 0
#SAY
                                                     <Img:9:16:3:0/@关闭幸运机>\ \ \ \ \ \ \ \ \ \
      <PlayImg:16:194:4:5000:2:12>\ \


       <$STR(S21)>\
                      <$STR(S22)>\
                                    <$STR(S23)>\ \ \ \ \ \ \


      <Img:193:16:4:10> <Img:193:16:1:10><Img:193:16:4:10>\


<Img:191:16:-14:51/@777倍数>\
                                                        <Img:192:16:1:30/@777开始0>\




             {<$STR(S28)>       <$STR(S29)>         <$STR(N35)>/FCOLOR=249}\ \

                           {<$GAMEGOLD>/FCOLOR=249}\

[@777倍数]
#IF
NOT EQUAL N30 10
#ACT
INC N30 1
MOV N31 1000
MUL N31 <$STR(N30)>
GOTO @幸运老虎机
#ELSEACT
MOV N30 1
MOV N31 1000
MUL N31 <$STR(N30)>
GOTO @幸运老虎机

[@777开始0]
#IF
CHECKGAMEGOLD > <$STR(N31)>
#ACT
GAMEGOLD - <$STR(N31)>
MOV S21 <PlayImg:16:200:11:30:3:35>
MOV S25 <Img:193:16:4:10/@777停止位置1>
MOV S26 <Img:193:16:1:10/@777停止位置2>
MOV S27 <Img:193:16:4:10/@777停止位置3>
MOV N25 0
SetOnTimer 244 1
GOTO @777开始
DELAYGOTO 200 @777开始1
#ELSEACT
SENDMSG 5 〖赌场〗身上元宝不够当前每次开启数目.无法开启.



[@777开始1]
#ACT
MOV S22 <PlayImg:16:200:11:30:0:19>
GOTO @777开始
DELAYGOTO 200 @777开始2

[@777开始2]
#ACT
MOV S23 <PlayImg:16:200:11:30:3:3>
GOTO @777开始

[@777开始]
#IF
large N25 2
#ACT
goto @777计算赢得888
#ELSEACT
GOTO @777开始-1

[@777开始-1]
#ACT
MOV N35 0
MOV S30 <$X>
OPENMERCHANTBIGDLG 16 190 0 4 0 -60 0 0 0
#SAY
                                                     <Img:9:16:3:0/@关闭幸运机>\ \ \ \ \ \ \ \ \ \
      <PlayImg:16:194:4:5000:2:12>\ \


       <$STR(S21)>\
                      <$STR(S22)>\
                                    <$STR(S23)>\ \ \ \ \ \ \


      <$STR(S25)> <$STR(S26)><$STR(S27)>\


<Img:191:16:-14:51>\
                                                        <Img:192:16:1:30>\




             {<$STR(S28)>       <$STR(S29)>         <$STR(N35)>/FCOLOR=249}\ \

                           {<$GAMEGOLD>/FCOLOR=249}\

[@777停止位置1]
#IF
EQUAL N25 0
#ACT
INC N25 1
MOVR N27 200 203
MOV S21 <Img:
INC S21 <$STR(N27)>
INC S21 :16:3:35>
MOV S25 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
goto @777停止位置1-1

[@777停止位置1-1]
#IF
EQUAL N25 1
#ACT
goto @777停止位置1-2
#ELSEACT
goto @777停止位置1-3

[@777停止位置1-2]
#IF
random 5
#ACT
INC N25 1
MOVR N27 200 205
MOV S21 <Img:
INC S21 <$STR(N27)>
INC S21 :16:3:35>
MOV S25 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
INC N25 1
MOVR N27 200 203
MOV S21 <Img:
INC S21 <$STR(N27)>
INC S21 :16:3:35>
MOV S25 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始

[@777停止位置1-3]
#IF
random 5
#ACT
INC N25 1
MOVR N27 200 210
MOV S21 <Img:
INC S21 <$STR(N27)>
INC S21 :16:3:35>
MOV S25 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
INC N25 1
MOVR N27 200 204
MOV S21 <Img:
INC S21 <$STR(N27)>
INC S21 :16:3:35>
MOV S25 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始




[@777停止位置2]
#IF
EQUAL N25 0
#ACT
INC N25 1
MOVR N28 204 206
MOV S22 <Img:
INC S22 <$STR(N28)>
INC S22 :16:0:19>
MOV S26 <Img:193:16:1:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
goto @777停止位置2-1

[@777停止位置2-1]
#IF
EQUAL N25 1
#ACT
goto @777停止位置2-2
#ELSEACT
goto @777停止位置2-3

[@777停止位置2-2]
#IF
random 4
#ACT
INC N25 1
MOVR N28 203 207
MOV S22 <Img:
INC S22 <$STR(N28)>
INC S22 :16:0:19>
MOV S26 <Img:193:16:1:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
INC N25 1
MOVR N28 204 207
MOV S22 <Img:
INC S22 <$STR(N28)>
INC S22 :16:0:19>
MOV S26 <Img:193:16:1:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始

[@777停止位置2-3]
#IF
random 7
#ACT
INC N25 1
MOVR N28 200 210
MOV S22 <Img:
INC S22 <$STR(N28)>
INC S22 :16:0:19>
MOV S26 <Img:193:16:1:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
INC N25 1
MOVR N28 204 207
MOV S22 <Img:
INC S22 <$STR(N28)>
INC S22 :16:0:19>
MOV S26 <Img:193:16:1:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始


[@777停止位置3]
#IF
EQUAL N25 0
#ACT
INC N25 1
MOVR N29 208 210
MOV S23 <Img:
INC S23 <$STR(N29)>
INC S23 :16:3:3>
MOV S27 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
goto @777停止位置3-1

[@777停止位置3-1]
#IF
EQUAL N25 1
#ACT
goto @777停止位置3-2
#ELSEACT
goto @777停止位置3-3

[@777停止位置3-2]
#IF
random 5
#ACT
INC N25 1
MOVR N29 207 210
MOV S23 <Img:
INC S23 <$STR(N29)>
INC S23 :16:3:3>
MOV S27 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
INC N25 1
MOVR N29 208 210
MOV S23 <Img:
INC S23 <$STR(N29)>
INC S23 :16:3:3>
MOV S27 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始

[@777停止位置3-3]
#IF
random 5
#ACT
INC N25 1
MOVR N29 200 210
MOV S23 <Img:
INC S23 <$STR(N29)>
INC S23 :16:3:3>
MOV S27 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始
#ELSEACT
INC N25 1
MOVR N29 207 210
MOV S23 <Img:
INC S23 <$STR(N29)>
INC S23 :16:3:3>
MOV S27 <Img:193:16:4:10>
PLAYSOUND Gamepatch\Wav\777-2.wav 1 0
GOTO @777开始


;==============================================
[@777计算赢得888]
#IF
EQUAL N27 201
EQUAL N28 201
#ACT
MOV N26 2
GOTO @777计算赢得999


#IF
EQUAL N27 201
EQUAL N29 201
#ACT
MOV N26 2
GOTO @777计算赢得999


#IF
EQUAL N28 201
EQUAL N29 201
#ACT
MOV N26 2
GOTO @777计算赢得999


#IF
EQUAL N27 201
EQUAL N28 201
EQUAL N29 201
#ACT
MOV N26 150
GOTO @777计算赢得999


#IF
EQUAL N27 210
EQUAL N28 210
#ACT
MOV N26 4
GOTO @777计算赢得999


#IF
EQUAL N27 210
EQUAL N29 210
#ACT
MOV N26 4
GOTO @777计算赢得999


#IF
EQUAL N28 210
EQUAL N29 210
#ACT
MOV N26 4
GOTO @777计算赢得999


#IF
EQUAL N27 210
EQUAL N28 210
EQUAL N29 210
#ACT
MOV N26 200
GOTO @777计算赢得999


#IF
EQUAL N27 205
EQUAL N28 205
#ACT
MOV N26 6
GOTO @777计算赢得999


#IF
EQUAL N27 205
EQUAL N29 205
#ACT
MOV N26 6
GOTO @777计算赢得999


#IF
EQUAL N28 205
EQUAL N29 205
#ACT
MOV N26 6
GOTO @777计算赢得999


#IF
EQUAL N27 205
EQUAL N28 205
EQUAL N29 205
#ACT
MOV N26 250
GOTO @777计算赢得999


#IF
EQUAL N27 202
EQUAL N28 202
#ACT
MOV N26 8
GOTO @777计算赢得999


#IF
EQUAL N27 202
EQUAL N29 202
#ACT
MOV N26 8
GOTO @777计算赢得999


#IF
EQUAL N28 202
EQUAL N29 202
#ACT
MOV N26 8
GOTO @777计算赢得999


#IF
EQUAL N27 202
EQUAL N28 202
EQUAL N29 202
#ACT
MOV N26 300
GOTO @777计算赢得999


#IF
EQUAL N27 206
EQUAL N28 206
#ACT
MOV N26 10
GOTO @777计算赢得999


#IF
EQUAL N27 206
EQUAL N29 206
#ACT
MOV N26 10
GOTO @777计算赢得999


#IF
EQUAL N28 206
EQUAL N29 206
#ACT
MOV N26 10
GOTO @777计算赢得999


#IF
EQUAL N27 206
EQUAL N28 206
EQUAL N29 206
#ACT
MOV N26 350
GOTO @777计算赢得999


#IF
EQUAL N27 207
EQUAL N28 207
#ACT
MOV N26 12
GOTO @777计算赢得999


#IF
EQUAL N27 207
EQUAL N29 207
#ACT
MOV N26 12
GOTO @777计算赢得999


#IF
EQUAL N28 207
EQUAL N29 207
#ACT
MOV N26 12
GOTO @777计算赢得999


#IF
EQUAL N27 207
EQUAL N28 207
EQUAL N29 207
#ACT
MOV N26 400
GOTO @777计算赢得999


#IF
EQUAL N27 204
EQUAL N28 204
#ACT
MOV N26 15
GOTO @777计算赢得999


#IF
EQUAL N27 204
EQUAL N29 204
#ACT
MOV N26 15
GOTO @777计算赢得999


#IF
EQUAL N28 204
EQUAL N29 204
#ACT
MOV N26 15
GOTO @777计算赢得999


#IF
EQUAL N27 204
EQUAL N28 204
EQUAL N29 204
#ACT
MOV N26 460
GOTO @777计算赢得999


#IF
EQUAL N27 208
EQUAL N28 208
#ACT
MOV N26 20
GOTO @777计算赢得999


#IF
EQUAL N27 208
EQUAL N29 208
#ACT
MOV N26 20
GOTO @777计算赢得999


#IF
EQUAL N28 208
EQUAL N29 208
#ACT
MOV N26 20
GOTO @777计算赢得999


#IF
EQUAL N27 208
EQUAL N28 208
EQUAL N29 208
#ACT
MOV N26 555
GOTO @777计算赢得999


#IF
EQUAL N27 209
EQUAL N28 209
#ACT
MOV N26 40
GOTO @777计算赢得999


#IF
EQUAL N27 209
EQUAL N29 209
#ACT
MOV N26 40
GOTO @777计算赢得999


#IF
EQUAL N28 209
EQUAL N29 209
#ACT
MOV N26 40
GOTO @777计算赢得999


#IF
EQUAL N27 209
EQUAL N28 209
EQUAL N29 209
#ACT
MOV N26 666
GOTO @777计算赢得999


#IF
EQUAL N27 200
EQUAL N28 200
#ACT
MOV N26 60
GOTO @777计算赢得999


#IF
EQUAL N27 200
EQUAL N29 200
#ACT
MOV N26 60
GOTO @777计算赢得999


#IF
EQUAL N28 200
EQUAL N29 200
#ACT
MOV N26 60
GOTO @777计算赢得999


#IF
EQUAL N27 200
EQUAL N28 200
EQUAL N29 200
#ACT
MOV N26 888
GOTO @777计算赢得999


#IF
EQUAL N27 203
EQUAL N28 203
EQUAL N29 203
#ACT
MOV N26 100
GOTO @777计算赢得999


#IF
#ACT
MOV N26 0
MOV N25 0
PLAYSOUND Gamepatch\Wav\777-4.wav 1 0
SetOffTimer 250
GOTO @幸运老虎机



[@777计算赢得999]
#ACT
PLAYSOUND Gamepatch\Wav\777-3.mp3 1 0
MOV N35 <$STR(N31)>
MUL N35 <$STR(N26)>
GAMEGOLD + <$STR(N35)>
SENDMSG 7 〖赌场〗恭喜你赢得了<$STR(N35)>个元宝!
MOV N26 0
MOV N25 0
SetOffTimer 250
GOTO @幸运老虎机


[@关闭幸运机]
#ACT
SetOffTimer 244
CLEARDELAYGOTO
CLOSEMERCHANTBIGDLG
close


回复

使用道具 举报

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

本版积分规则