本站主推发布:新开传奇发布网,新开传奇,新开传奇发布,176复古传奇,迷失传奇,战神传奇,传奇私服,找搜服,仙剑传奇
当前位置: zhaosf首页 > 开服资料 > 传奇脚本 >

Hero和3K引擎通用赌博脚本

时间:2017-03-01 00:25来源:传奇私服 作者:新开传奇网站
本脚本中设置的默认地图为GA1,如需要更换地图请自己修改。 QM: [@摇色子] #if IsOnMap GA1 #act MOV d0 $STR(G198) playdice 1 @cube_cds-1 #say .\正在摇骰子.... [@cube_cds-1] #IF check [030] 1 equal d0 1 LARGE N1 0 #ACT set [030] 0 MUL N12 $STR(N1) 285 Div N13 $STR(N12) 100 GAMEGOLD + $STR(N13)
本脚本中设置的默认地图为GA1,如需要更换地图请自己修改。
 
QM:
[@摇色子]
#if
IsOnMap GA1
#act
MOV d0 <$STR(G198)>
playdice 1 @cube_cds-1
#say
.\正在摇骰子....
[@cube_cds-1]
#IF
check [030] 1
equal d0 1
LARGE N1 0
#ACT
set [030] 0
MUL N12 <$STR(N1)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [030] 1
equal d0 2
LARGE N1 0
#ACT
set [030] 0
MUL N12 <$STR(N1)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N1)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [030] 1
equal d0 3
LARGE N2 0
#ACT
set [030] 0
MUL N12 <$STR(N2)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [030] 1
equal d0 4
LARGE N2 0
#ACT
set [030] 0
MUL N12 <$STR(N2)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N2)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [030] 1
equal d0 5
LARGE N3 0
#ACT
set [030] 0
MUL N12 <$STR(N3)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [030] 1
equal d0 6
LARGE N3 0
#ACT
set [030] 0
MUL N12 <$STR(N3)> 285
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N3)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [032] 1
equal d0 1
LARGE N5 0
#ACT
set [032] 0
MUL N12 <$STR(N5)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [032] 1
equal d0 2
LARGE N4 0
#ACT
set [032] 0
MUL N12 <$STR(N4)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [032] 1
equal d0 3
LARGE N5 0
#ACT
set [032] 0
MUL N12 <$STR(N5)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [032] 1
equal d0 4
LARGE N4 0
#ACT
set [032] 0
MUL N12 <$STR(N4)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [032] 1
equal d0 5
LARGE N5 0
#ACT
set [032] 0
MUL N12 <$STR(N5)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N5)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [032] 1
equal d0 6
LARGE N4 1
#ACT
set [032] 0
MUL N12 <$STR(N4)> 190
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N4)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [031] 1
equal d0 1
LARGE N6 0
#ACT
set [031] 0
MUL N12 <$STR(N6)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N6)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N6)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [031] 1
equal d0 2
LARGE N7 0
#ACT
set [031] 0
MUL N12 <$STR(N7)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N7)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N7)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [031] 1
equal d0 3
LARGE N8 0
#ACT
set [031] 0
MUL N12 <$STR(N8)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N8)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N8)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [031] 1
equal d0 4
LARGE N9 0
#ACT
set [031] 0
MUL N12 <$STR(N9)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N9)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N9)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [031] 1
equal d0 5
LARGE N10 0
#ACT
set [031] 0
MUL N12 <$STR(N10)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N10)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N10)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#IF
check [031] 1
equal d0 6
LARGE N11 0
#ACT
set [031] 0
MUL N12 <$STR(N11)> 570
Div N13 <$STR(N12)> 100
GAMEGOLD + <$STR(N13)>
GuildNoticeMsg 254 249 【%s】在赌博过程中,用<$STR(N11)>个元宝赢得了<$STR(N13)>个元宝.
sendmsg 7 恭喜你用<$STR(N11)>个元宝赢得了<$STR(N13)>个元宝.
goto @再接再厉
break
 
#ELSEact
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
sendmsg 7 很遗憾,没有摇到你需要的点数.你可以重新下注了!
break
close
 
[@再接再厉]
#ACT
MOV N1 0
MOV N2 0
MOV N3 0
MOV N4 0
MOV N5 0
MOV N6 0
MOV N7 0
MOV N8 0
MOV N9 0
MOV N10 0
MOV N11 0
MOV N12 0
MOV N13 0
set [030] 0
set [031] 0
set [032] 0
sendmsg 5 您当前的元宝为:<$GAMEGOLD>个.你可以继续押注了.
break
close
 
NPC脚本:
(@@InPutInteger)
[@main]
#IF
ISADMIN
#say
-------------------拥有元宝数{<$GAMEGOLD>}-----------------\
<切记:每局只能押一次.第二次押注将作废所有押注!/AUTOCOLOR=253,245> \
<赔率6倍>:【<①/@@InPutInteger6>】【<②/@@InPutInteger7>】【<③/@@InPutInteger8>】【<④/@@InPutInteger9>】【<⑤/@@InPutInteger10>】【<⑥/@@InPutInteger11>】\
<赔率3倍>:【<大/@@InPutInteger3>】【<中/@@InPutInteger2>】【<小/@@InPutInteger1>】     ①②为小,③④为中,⑤⑥为大\
<赔率2倍>:【<单/@@InPutInteger5>】【<双/@@InPutInteger4>】           ①③⑤为单,②④⑥为双\ \
说明:点击您要竞猜的数字,输入您要下注的金额,按确定..\
压住离手还剩下<$STR(G203)>秒,请要下注的朋友速度哦\
<刷新一下/@main>     <游戏规则/@游戏规则>     <返回土城/@土城>
#elsesay
-------------------拥有元宝数{<$GAMEGOLD>}-----------------\
<为防止作弊,每局只能押注一次!重复押注将取消之前的押注/AUTOCOLOR=253,245> \
<赔率6倍>:【<①/@@InPutInteger6>】【<②/@@InPutInteger7>】【<③/@@InPutInteger8>】【<④/@@InPutInteger9>】【<⑤/@@InPutInteger10>】【<⑥/@@InPutInteger11>】\
<赔率3倍>:【<大/@@InPutInteger3>】【<中/@@InPutInteger2>】【<小/@@InPutInteger1>】     ①②为小,③④为中,⑤⑥为大\
<赔率2倍>:【<单/@@InPutInteger5>】【<双/@@InPutInteger4>】           ①③⑤为单,②④⑥为双\ \
说明:点击您要竞猜的数字,输入您要下注的金额,按确定..\
压住离手还剩下<$STR(G203)>秒,请要下注的朋友速度哦\
<刷新一下/@main>     <游戏规则/@游戏规则>     <返回土城/@土城>  \
 
 
[@土城]
#act
mapmove 3 333 332
[@游戏规则]
.\
<为防止作弊,每局只能押注一次!重复押注将取消之前的押注>\.\
押注数额是1-20000元宝\
每次猜中扣除5%的手续费\
所有在这个地图的人摇的点数都是一样的\
[@InPutInteger1]
#if
EQUAL G203 0
#act
messagebox 对不起,已经押注离手.请等待下轮
break
#if
check [030] 1
#act
messagebox 对不起,每局只能押一次.刚才的押注已作废,请重新押注 (责任编辑:找搜服传奇发布网)
------分隔线----------------------------
栏目列表
推荐内容