传奇七号站-为优质资源而生分享无止境,七版本站Ctrl+D收藏本站!
登录后,享受更多优质服务哦

传奇服务端武器装备幸运大转盘脚本

七号编辑 收藏
传奇服务端武器装备幸运大转盘脚本,对不起,你的金元不足1个,无法开启【幸运大转盘】,对不起,你的包裹不足2格,无法开启幸运大转盘

完整脚本下载地址:https://www.7bbz.com/fwd/ngbb/7776.html

[@main]
#IF
Small U8 1
#Act
MessageBox 对不起,你的金元不足1个,无法开启【幸运大转盘】!
break
 
#IF
not CheckBagSize 2
#Act
MessageBox 对不起,你的包裹不足2格,无法开启幸运大转盘!
break
 
#IF
CheckLevelEx > 0
#ACT
Mov N$古德转盘素材编号 243
 
Mov S$古德转盘奖池目录 ..\QuestDiary\晴天\大转盘
 
;下面是需求金元数量
Mov N$古德转动一次金元 10
Mov N$古德刷新奖池金元 1
 
;设置大对话框
OPENMERCHANTBIGDLG <$STR(N$古德转盘素材编号)> 0 0 4 10 -80 1 613 60 1
 
#IF
Equal N$古德转盘领取状态 1
#ACT
Goto @大转盘领取啦
Break
#ElseAct
Goto @大转盘刷新
break
 
;-------------------------------------------------------------------------------------------------
 
[@领取大转盘显示]
#IF
Equal N$古德转盘领取状态 1
#ACT
Break
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:30:8:200:225:195><Img:3:<$STR(N$古德转盘素材编号)>:80:245/@dzp_lq>\
 \<ImgNum:1:<$STR(G555)>:-3:310:148> 
 \ \ \ \ \
<$STR(S$古德转盘格子闪光)>
\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<$STR(S$古德转盘格子显示)>
 
 
;-------------------------------------------------------------------------------------------------
[@大转盘领取啦]
#IF
Equal N$古德转盘领取状态 1
#ACT
SHOWPROGRESSBARDLG 1 @提取完成 正在提取奖品,进度%d%... 0
DelayCall 1000 @提取完成
break
 
 
[@提取完成]
#IF
Equal N$古德转盘领取状态 1
#ACT
Mov N$古德转盘领取状态 0
Give <$STR(S$古德转盘奖品<$STR(N$古德奖品定位)>)> 1
MessageBox 恭喜你获得幸运大转盘奖品《<$STR(S$古德转盘奖品<$STR(N$古德奖品定位)>)>》
SendMsg 0 玩家[{【%s】|254:241}]竟然在{[幸运大转盘]|250:241}抽到了{[<$STR(S$古德转盘奖品<$STR(N$古德奖品定位)>)>]|251:241} 15 20。
SendNewLineMsg 0 254 252 15 80 5 1 震惊!玩家:[{<$USERNAME>|250:0}]竟然在。{幸运大转盘|70:0}抽到了[{<$STR(S$古德转盘奖品<$STR(N$古德奖品定位)>)>|249:0}]。
Goto @大转盘刷新
break
 
 
 
;-------------------------------------------------------------------------------------------------
[@检测大转盘刷新]
#IF
Small U8 1
#Act
MessageBox 对不起,你的金元不足1个,无法刷新大转盘!
break
#ElseAct
Goto @大转盘刷新
break
 
[@大转盘刷新]
#IF
#ACT
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品1)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品2)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品3)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品4)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品5)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品6)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品7)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品8)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品9)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品10)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品11)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品12)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品13)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品14)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品15)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品16)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品17)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品18)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品19)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品20)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品21)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品22)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品23)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品24)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品25)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品26)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品27)>
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\转盘奖池.txt <$STR(S$古德转盘奖品28)>
GetDBItemFieldValue <$STR(S$古德转盘奖品1)> idx <$STR(N$古德转盘奖品1)>
GetDBItemFieldValue <$STR(S$古德转盘奖品2)> idx <$STR(N$古德转盘奖品2)>
GetDBItemFieldValue <$STR(S$古德转盘奖品3)> idx <$STR(N$古德转盘奖品3)>
GetDBItemFieldValue <$STR(S$古德转盘奖品4)> idx <$STR(N$古德转盘奖品4)>
GetDBItemFieldValue <$STR(S$古德转盘奖品5)> idx <$STR(N$古德转盘奖品5)>
GetDBItemFieldValue <$STR(S$古德转盘奖品6)> idx <$STR(N$古德转盘奖品6)>
GetDBItemFieldValue <$STR(S$古德转盘奖品7)> idx <$STR(N$古德转盘奖品7)>
GetDBItemFieldValue <$STR(S$古德转盘奖品8)> idx <$STR(N$古德转盘奖品8)>
GetDBItemFieldValue <$STR(S$古德转盘奖品9)> idx <$STR(N$古德转盘奖品9)>
GetDBItemFieldValue <$STR(S$古德转盘奖品10)> idx <$STR(N$古德转盘奖品10)>
GetDBItemFieldValue <$STR(S$古德转盘奖品11)> idx <$STR(N$古德转盘奖品11)>
GetDBItemFieldValue <$STR(S$古德转盘奖品12)> idx <$STR(N$古德转盘奖品12)>
GetDBItemFieldValue <$STR(S$古德转盘奖品13)> idx <$STR(N$古德转盘奖品13)>
GetDBItemFieldValue <$STR(S$古德转盘奖品14)> idx <$STR(N$古德转盘奖品14)>
GetDBItemFieldValue <$STR(S$古德转盘奖品15)> idx <$STR(N$古德转盘奖品15)>
GetDBItemFieldValue <$STR(S$古德转盘奖品16)> idx <$STR(N$古德转盘奖品16)>
GetDBItemFieldValue <$STR(S$古德转盘奖品17)> idx <$STR(N$古德转盘奖品17)>
GetDBItemFieldValue <$STR(S$古德转盘奖品18)> idx <$STR(N$古德转盘奖品18)>
GetDBItemFieldValue <$STR(S$古德转盘奖品19)> idx <$STR(N$古德转盘奖品19)>
GetDBItemFieldValue <$STR(S$古德转盘奖品20)> idx <$STR(N$古德转盘奖品20)>
GetDBItemFieldValue <$STR(S$古德转盘奖品21)> idx <$STR(N$古德转盘奖品21)>
GetDBItemFieldValue <$STR(S$古德转盘奖品22)> idx <$STR(N$古德转盘奖品22)>
GetDBItemFieldValue <$STR(S$古德转盘奖品23)> idx <$STR(N$古德转盘奖品23)>
GetDBItemFieldValue <$STR(S$古德转盘奖品24)> idx <$STR(N$古德转盘奖品24)>
GetDBItemFieldValue <$STR(S$古德转盘奖品25)> idx <$STR(N$古德转盘奖品25)>
GetDBItemFieldValue <$STR(S$古德转盘奖品26)> idx <$STR(N$古德转盘奖品26)>
GetDBItemFieldValue <$STR(S$古德转盘奖品27)> idx <$STR(N$古德转盘奖品27)>
GetDBItemFieldValue <$STR(S$古德转盘奖品28)> idx <$STR(N$古德转盘奖品28)>
 
 
GETRANDOMLINETEXT <$STR(S$古德转盘奖池目录)>\每次必显示.txt <$STR(S$随机转盘奖品)>
GetDBItemFieldValue <$STR(S$随机转盘奖品)> idx <$STR(N$随机转盘奖品)>
Movr P1 1 29
Mov N$古德转盘奖品<$Str(P1)> <$STR(N$随机转盘奖品)>
 
Movr N$古德转盘载入延迟 2 3
Mul N$古德转盘载入延迟 100
DelayCall <$STR(N$古德转盘载入延迟)> @大转盘显示啦
Break
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:20:10:200:227:255>
\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
;<$STR(S$古德转盘格子显示)>
 
 
;-------------------------------------------------------------------------------------------------
[@大转盘显示啦]
#IF
CheckLevelEx > 1
#ACT
Mov S$古德转盘格子0 <ItemShow:<$STR(N$古德转盘奖品1)>:0:48:-333:1>
Mov S$古德转盘格子1 <ItemShow:<$STR(N$古德转盘奖品2)>:0:103:-350:1>
Mov S$古德转盘格子2 <ItemShow:<$STR(N$古德转盘奖品3)>:0:160:-366:1>
Mov S$古德转盘格子3 <ItemShow:<$STR(N$古德转盘奖品4)>:0:217:-382:1>
Mov S$古德转盘格子4 <ItemShow:<$STR(N$古德转盘奖品5)>:0:273:-398:1>
Mov S$古德转盘格子5 <ItemShow:<$STR(N$古德转盘奖品6)>:0:330:-414:1>
Mov S$古德转盘格子6 <ItemShow:<$STR(N$古德转盘奖品7)>:0:386:-430:1>
Mov S$古德转盘格子7 <ItemShow:<$STR(N$古德转盘奖品8)>:0:442:-446:1>
Mov S$古德转盘格子8 <ItemShow:<$STR(N$古德转盘奖品9)>:0:499:-462:1>
Mov S$古德转盘格子9 <ItemShow:<$STR(N$古德转盘奖品10)>:0:555:-478:1>
 
Mov S$古德转盘格子10 <ItemShow:<$STR(N$古德转盘奖品11)>:0:555:-433:1>
Mov S$古德转盘格子11 <ItemShow:<$STR(N$古德转盘奖品12)>:0:555:-391:1>
Mov S$古德转盘格子12 <ItemShow:<$STR(N$古德转盘奖品13)>:0:555:-350:1>
Mov S$古德转盘格子13 <ItemShow:<$STR(N$古德转盘奖品14)>:0:555:-306:1>
Mov S$古德转盘格子14 <ItemShow:<$STR(N$古德转盘奖品15)>:0:555:-264:1>
 
Mov S$古德转盘格子15 <ItemShow:<$STR(N$古德转盘奖品16)>:0:500:-279:1>
Mov S$古德转盘格子16 <ItemShow:<$STR(N$古德转盘奖品17)>:0:443:-295:1>
Mov S$古德转盘格子17 <ItemShow:<$STR(N$古德转盘奖品18)>:0:387:-311:1>
Mov S$古德转盘格子18 <ItemShow:<$STR(N$古德转盘奖品19)>:0:331:-328:1>
Mov S$古德转盘格子19 <ItemShow:<$STR(N$古德转盘奖品20)>:0:274:-343:1>
Mov S$古德转盘格子20 <ItemShow:<$STR(N$古德转盘奖品21)>:0:218:-359:1>
Mov S$古德转盘格子21 <ItemShow:<$STR(N$古德转盘奖品22)>:0:162:-375:1>
Mov S$古德转盘格子22 <ItemShow:<$STR(N$古德转盘奖品23)>:0:105:-390:1>
Mov S$古德转盘格子23 <ItemShow:<$STR(N$古德转盘奖品24)>:0:48:-407:1>
 
Mov S$古德转盘格子24 <ItemShow:<$STR(N$古德转盘奖品25)>:0:48:-482:1>
Mov S$古德转盘格子25 <ItemShow:<$STR(N$古德转盘奖品26)>:0:48:-558:1>
Mov S$古德转盘格子26 <ItemShow:<$STR(N$古德转盘奖品27)>:0:48:-632:1>
Mov S$古德转盘格子27 <ItemShow:<$STR(N$古德转盘奖品28)>:0:48:-707:1>
 
Mov S$古德转盘格子显示 <$STR(S$古德转盘格子0)>\<$STR(S$古德转盘格子1)>\<$STR(S$古德转盘格子2)>\<$STR(S$古德转盘格子3)>\<$STR(S$古德转盘格子4)>\<$STR(S$古德转盘格子5)>\<$STR(S$古德转盘格子6)>\<$STR(S$古德转盘格子7)>\<$STR(S$古德转盘格子8)>\<$STR(S$古德转盘格子9)>\<$STR(S$古德转盘格子10)>\<$STR(S$古德转盘格子11)>\<$STR(S$古德转盘格子12)>\<$STR(S$古德转盘格子13)>\<$STR(S$古德转盘格子14)>\<$STR(S$古德转盘格子15)>\<$STR(S$古德转盘格子16)>\<$STR(S$古德转盘格子17)>\<$STR(S$古德转盘格子18)>\<$STR(S$古德转盘格子19)>\<$STR(S$古德转盘格子20)>\<$STR(S$古德转盘格子21)>\<$STR(S$古德转盘格子22)>\<$STR(S$古德转盘格子23)>\<$STR(S$古德转盘格子24)>\<$STR(S$古德转盘格子25)>\<$STR(S$古德转盘格子26)>\<$STR(S$古德转盘格子27)>\
Break
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:30:8:200:225:195><Img:1:<$STR(N$古德转盘素材编号)>:80:245|243#转动需要:<$STR(N$古德转动一次金元)>金元/@开始大转盘1>\
 \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
 <ImgEx:<$STR(N$古德转盘素材编号)>:4:5:6:390:30|250#刷新奖池奖品^243#刷新需要:<$STR(N$古德刷新奖池金元)>金元/@大转盘刷新>\
 \ \ \ \ \ \ \
<$STR(S$古德转盘格子显示)>
 
 
 
;-------------------------------------------------------------------------------------------------
[@开始大转盘1]
#IF
Small U8 <$STR(N$古德转动一次金元)>
#ACT
MessageBox 小伙子,转动一次需要<$STR(N$古德转动一次金元)>金元!
Break
#ElseAct
Dec U8 <$STR(N$古德转动一次金元)>
Goto @奖品检测
Break
 
 
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:30:8:200:225:195><Img:1:<$STR(N$古德转盘素材编号)>:80:245>\
 \
  \ \ \ \ \
<PlayImgEx:<$STR(N$古德转盘素材编号)>:50:100:40:1:18:-51:0>\
 \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<$STR(S$古德转盘格子显示)>
 
 
;-------------------------------------------------------------------------------------------------
[@奖品检测]
#IF
CheckLevelEx > 1
#Act
Movr N$古德转盘停止随机 0 28
Mov N$古德奖品定位 <$STR(N$古德转盘停止随机)>
Inc N$古德奖品定位 1
Mov S$抽不到物品 <$STR(S$古德转盘奖品<$STR(N$古德奖品定位)>)>
 
#IF
CHECKTEXTLIST ..\QuestDiary\晴天\大转盘\抽不到物品.txt <$STR(S$抽不到物品)>
#Act
Goto @奖品检测
break
#ElseAct
DelayCall 1000 @开始大转盘2
break
 
 
[@开始大转盘2]
#IF
CheckLevelEx > 1
#ACT
Mov N$古德转盘奖品延迟 <$STR(N$古德转盘停止随机)>
Mul N$古德转盘奖品延迟 100
Inc N$古德转盘奖品延迟 1
Mov N$古德转盘格子x2 <$STR(N$古德转盘停止随机)>
Mul N$古德转盘格子x2 2
Mov N$古德转盘停止格子 150
Inc N$古德转盘停止格子 <$STR(N$古德转盘格子x2)>
 
Mov S$古德转盘格子闪光 <PlayImg:<$STR(N$古德转盘素材编号)>:<$STR(N$古德转盘停止格子)>:2:200:41:-22>
Mov N$古德转盘领取状态 1
DelayCall 3000 @延迟1圈
;Goto @延迟一圈
Break
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:30:8:200:220:195><Img:1:<$STR(N$古德转盘素材编号)>:80:245>\
 \
  \ \ \ \ \
<PlayImgEx:<$STR(N$古德转盘素材编号)>:94:27:100:1:41:-22:0>\
 
 \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<$STR(S$古德转盘格子显示)>
 
[@延迟1圈]
#IF
CheckLevelEx > 1
#ACT
DelayCall 3000 @延迟2圈
Break
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:30:8:200:220:195><Img:1:<$STR(N$古德转盘素材编号)>:80:245>\
 \
  \ \ \ \ \
<PlayImgEx:<$STR(N$古德转盘素材编号)>:94:27:100:1:41:-22:0>\
 \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<$STR(S$古德转盘格子显示)>
 
[@延迟2圈]
#IF
CheckLevelEx > 1
#ACT
DelayCall <$STR(N$古德转盘奖品延迟)> @开始大转盘3
Break
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:30:8:200:220:195><Img:1:<$STR(N$古德转盘素材编号)>:80:245>\
 \
  \ \ \ \ \
<PlayImgEx:<$STR(N$古德转盘素材编号)>:94:<$STR(N$古德奖品定位)>:100:1:41:-22:0>\
 \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<$STR(S$古德转盘格子显示)>
 
;-------------------------------------------------------------------------------------------------
[@开始大转盘3]
#IF
Equal N$古德转盘领取状态 1
#ACT
Break
#SAY
<PlayImg:<$STR(N$古德转盘素材编号)>:30:8:200:220:195><Img:3:<$STR(N$古德转盘素材编号)>:80:245/@大转盘领取啦>\
 \
  \ \ \ \ \
<$STR(S$古德转盘格子闪光)>\
 \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
<$STR(S$古德转盘格子显示)>
 

☉若无特殊注明本文皆为传奇版本库原创,转载请保留文章出处。
☉本站提供的资源来源网络收集,仅供学习研究之用切勿用于商业用途。
上一篇:传奇GM后台管理脚本,刀锋传奇游戏后台管理系统
下一篇:gm基地玄冰剑法脚本开关模式,对目标造成200%伤害80%几率使目标

我要评论
说点什么吧
  • 全部评论(0
    还没有评论,快来抢沙发吧!