特别提醒:以下是装备随机互换的NPC脚本,脚本中分3类装备互换并消耗不同数量的元宝,大家如果使用该脚本需要自己去添加NPC,另外还需要在“QuestDiary\装备互换\”文件夹下添加3类装备的TXT抽取文件(火龙首饰.txt、狂雷首饰.txt、狂雷剑甲.txt) ,这3个文件里边就按分类每行一个添加可以互换的装备名字,脚本会在这3个文件内随机提取一个返还给玩家,3类装备只可以在相应类别中互换。这个脚本添加需要有一定的开服技术,大家自己研究研究吧,有什不懂的可以在下边留言。
[@互换]
#SAY
<╔═══════════════════════════╗/SCOLOR=125>\
<║/SCOLOR=125> <火龙系列首饰互换需要5000元宝,随机换区一件火龙首饰/SCOLOR=251> <║/SCOLOR=125>\
<║/SCOLOR=125> <║/SCOLOR=125>\
<║/SCOLOR=125> <互换[火龙系列首饰]/@hlss> <║/SCOLOR=125>\
<╚═══════════════════════════╝/SCOLOR=125>\
<╔═══════════════════════════╗/SCOLOR=253>\
<║/SCOLOR=253> <狂雷系列首饰互换需要1000元宝,随机换区一件狂雷首饰/SCOLOR=251> <║/SCOLOR=253>\
<║/SCOLOR=253> <狂雷系列剑甲互换需要5000元宝,随机换区一件狂雷剑甲/SCOLOR=251> <║/SCOLOR=253>\
<║/SCOLOR=253> <互换[狂雷系列首饰]/@klss> <互换[狂雷系列剑甲]/@kljj> <║/SCOLOR=253>\
<╚═══════════════════════════╝/SCOLOR=253>\
[@hlss]
#SAY
\
\
将互换<火龙系列首饰/SCOLOR=251>放入框内\
<ITEMBOX:1:3:661:170:70:76:76:*:请放入火龙系列首饰>\
\
<取回/@取回> ← → <互换/@hlss1>
\
\
\
<返回上一页/@互换>
[@取回]
#ACT
ReturnBoxItem 1
[@hlss1]
#IF
CHECKTEXTLIST ..\QuestDiary\装备互换\火龙首饰.txt <$BOXITEM[1].NAME>
#ACT
goto @火龙开始
#ELSEACT
MESSAGEBOX \错误提示:请放入火龙系列首饰!
[@火龙开始]
#IF
checkgamegold > 4999
#ACT
SetUpgradeItem 1
gamegold - 5000
DelBoxItem 1
GetRandomText ..\QuestDiary\装备互换\火龙首饰.txt S0
GIVE <$STR(S0)> 1
SENDMSG 0 玩家「{%s|227:0:1}」互换火龙首饰,获得{[<$STR(S0)>]|223:0:1}!
#ELSEACT
MESSAGEBOX \错误提示:元宝不足5000!
[@klss]
#SAY
\
\
将互换<狂雷系列首饰/SCOLOR=251>放入框内\
<ITEMBOX:2:3:661:170:70:76:76:*:请放入狂雷系列首饰>\
\
<取回/@取回1> ← → <互换/@klss1>
\
\
\
<返回上一页/@互换>
[@取回1]
#ACT
ReturnBoxItem 2
[@klss1]
#IF
CHECKTEXTLIST ..\QuestDiary\装备互换\狂雷首饰.txt <$BOXITEM[2].NAME>
#ACT
goto @狂雷开始
#ELSEACT
MESSAGEBOX \错误提示:请放入狂雷系列首饰!
[@狂雷开始]
#IF
checkgamegold > 999
#ACT
SetUpgradeItem 2
gamegold - 1000
DelBoxItem 2
GetRandomText ..\QuestDiary\装备互换\狂雷首饰.txt S0
GIVE <$STR(S0)> 1
SENDMSG 0 玩家「{%s|227:0:1}」互换狂雷首饰,获得{[<$STR(S0)>]|223:0:1}!
#ELSEACT
MESSAGEBOX \错误提示:元宝不足1000!
[@kljj]
#SAY
\
\
将互换<狂雷系列剑甲/SCOLOR=251>放入框内\
<ITEMBOX:3:3:661:170:70:76:76:*:请放入狂雷系列剑甲>\
\
<取回/@取回3> ← → <互换/@kljj1>
\
\
\
<返回上一页/@互换>
[@取回3]
#ACT
ReturnBoxItem 3
[@kljj1]
#IF
CHECKTEXTLIST ..\QuestDiary\装备互换\狂雷剑甲.txt <$BOXITEM[3].NAME>
#ACT
goto @狂雷剑甲
#ELSEACT
MESSAGEBOX \错误提示:请放入狂雷系列剑甲!
[@狂雷剑甲]
#IF
checkgamegold > 4999
#ACT
SetUpgradeItem 3
gamegold - 5000
DelBoxItem 3
GetRandomText ..\QuestDiary\装备互换\狂雷剑甲.txt S0
GIVE <$STR(S0)> 1
SENDMSG 0 玩家「{%s|227:0:1}」互换狂雷剑甲,获得{[<$STR(S0)>]|223:0:1}!
#ELSEACT
MESSAGEBOX \错误提示:元宝不足5000!
|