2024-05-07
传奇服务端武器装备幸运大转盘脚本，对不起，你的金元不足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基地玄冰剑法脚本开关模式，对目标造成200%伤害80%几率使目标
下一篇:
传奇GM后台管理脚本,刀锋传奇游戏后台管理系统
