找回密码
 立即注册
查看: 95|回复: 1

[脚本资源] GOM新开单职业传奇装备强化脚本,装备放到下面四方框里面即可

[复制链接]

0

威望

2660

元宝

1万

金币

VIP会员

积分
6860
逍遥MIR 发表于 2024-7-18 01:24:28 | 显示全部楼层 |阅读模式
[@main]
#if
#Act
OPENMERCHANTBIGDLG 2 25 1 1 -200 150 1 418 3
#SAY
\ \ \
<>                 <请把要强化的装备放到下面四方框里面>\
<><普通1% 精良2% 优秀3% 完美4% 超越5% 史诗6% 传说7% 神话8% 帝王9% 江湖10%/SCOLOR=70>\
<>              <强化一次需要:5千元宝+50江湖币+50江湖令/SCOLOR=250>\
<PlayImg:24:999:11:200:130:-30:0>
<ITEMBOX:1:113:203:40:20:50:50:5,10,11,15,19,21,22,23,24,26,30,64,63,62:武器,铠甲,手镯,戒指,腰带,靴子,头盔,项链,宝石,勋章可强化>\


[@ItemOutBox1]
#IF
#ACT
goto @main
break

[@ItemIntoBox1]
#OR
EQUAL <$BOXITEM[1].STDMODE> 31
EQUAL <$BOXITEM[1].STDMODE> 2
EQUAL <$BOXITEM[1].STDMODE> 44
EQUAL <$BOXITEM[1].STDMODE> 41
#act
ReturnBoxItem 1
break


#IF
#ACT
GOTO @显示


[@显示]
#IF
#Act
OPENMERCHANTBIGDLG 2 25 1 1 -200 150 1 418 3
#SAY
\ \ \
<>                 <请把要强化的装备放到下面四方框里面>\
<><普通1% 精良2% 优秀3% 完美4% 超越5% 史诗6% 传说7% 神话8% 帝王9% 江湖10%/SCOLOR=70>\
<>              <强化一次需要:5千元宝+50江湖币+50江湖令/SCOLOR=250>\
<PlayImg:24:999:11:200:130:-30:0>
<ITEMBOX:1:113:203:40:20:50:50:5,10,11,15,19,21,22,23,24,26,30,64,63,62:武器,铠甲,手镯,戒指,腰带,靴子,头盔,项链,宝石,勋章可强化>\  \ \ \ \ \

<>                   <■/SCOLOR=58><■/SCOLOR=58><■/SCOLOR=58><■/SCOLOR=58><■/SCOLOR=58><开始强化|^254#消耗【5千元宝+50江湖币+50江湖令】可重新强化一次该装备/@确定鉴定><■/SCOLOR=58><■/SCOLOR=58><■/SCOLOR=58><■/SCOLOR=58><■/SCOLOR=58>  \



[@确定鉴定]

#IF

CHECKGameGold > 4999
CHECKGameGird > 49
CHECKITEM 江湖令 50
#act
Take 江湖令 50
GameGold - 5000
GameGird - 50
GetRandomText ..\QuestDiary\重要设置\鉴定品质.txt S10
#ELSEACT
MESSAGEBOX 错误:\你5千元宝+50江湖币+50江湖令不够,无法强化。\
BREAK

#IF
EQUAL <$STR(S10)> 普通
#ACT
MOV N$数值 1

#IF
EQUAL <$STR(S10)> 精良
#ACT
MOV N$数值 2

#IF
EQUAL <$STR(S10)> 优秀
#ACT
MOV N$数值 3


#IF
EQUAL <$STR(S10)> 完美
#ACT
MOV N$数值 4


#IF
EQUAL <$STR(S10)> 超越
#ACT
MOV N$数值 5


#IF
EQUAL <$STR(S10)> 史诗
#ACT
MOV N$数值 6

#IF
EQUAL <$STR(S10)> 传说
#ACT
MOV N$数值 7


#IF
EQUAL <$STR(S10)> 神话
#ACT
MOV N$数值 8

#IF
EQUAL <$STR(S10)> 帝王
#ACT
MOV N$数值 9

#IF
EQUAL <$STR(S10)> 江湖
#ACT
MOV N$数值 9

#IF
#ACT
SetUpgradeItem 1
CHANGECUSTOMITEMVALUE -1 0 = <$STR(N$数值)>
CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$数值)>
CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$数值)>
CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$数值)>
CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$数值)>
CHANGECUSTOMITEMABIL -1 0 0 254
CHANGECUSTOMITEMABIL -1 1 0 254
CHANGECUSTOMITEMABIL -1 2 0 254
CHANGECUSTOMITEMABIL -1 3 0 254
CHANGECUSTOMITEMABIL -1 4 0 254
CHANGECUSTOMITEMABIL -1 0 1 1
CHANGECUSTOMITEMABIL -1 1 1 2
CHANGECUSTOMITEMABIL -1 2 1 3
CHANGECUSTOMITEMABIL -1 3 1 4
CHANGECUSTOMITEMABIL -1 4 1 5
CHANGECUSTOMITEMABIL -1 0 2 0
CHANGECUSTOMITEMABIL -1 1 2 1
CHANGECUSTOMITEMABIL -1 2 2 2
CHANGECUSTOMITEMABIL -1 3 2 3
CHANGECUSTOMITEMABIL -1 4 2 4
CHANGECUSTOMITEMABIL -1 0 3 1
CHANGECUSTOMITEMABIL -1 1 3 1
CHANGECUSTOMITEMABIL -1 2 3 1
CHANGECUSTOMITEMABIL -1 3 3 1
CHANGECUSTOMITEMABIL -1 4 3 1
UpDateBoxItem 1
MESSAGEBOX 鸿福齐天:\恭喜你鉴定出了<$STR(S10)>级装备!!!!\


#IF
EQUAL <$STR(S10)> 江湖
#ACT
ReturnBoxItem 1
MESSAGEBOX 鸿福齐天:\恭喜你鉴定出了江湖级装备!!!!\
BREAK

0

威望

0

元宝

248

金币

中级会员

积分
238
无心Dino 发表于 2024-10-6 14:37:05 | 显示全部楼层
确实是难得好帖啊,顶先
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|小黑屋|逍遥版本库

GMT+8, 2024-11-21 16:45 , Processed in 0.043673 second(s), 30 queries .

Powered by XyBbk! X3.5

Copyright © 2001-2024, XyBbk Cloud.

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