传世服务端光明铸造师脚本

传世服务端光明铸造师脚本

出处：本站整理作者：佚名发布时间：2014-02-27阅读次数：

[@main]
　　我是一名技艺高超的铸造师，一直以来我都深居无人之\
所研究铸造技术，无论是装备或是武器都是我的拿手本领。\
在这个值得欢庆的日子，战歌网，我离开自己的居所，希望以我的本\
领为大家带来一些帮助。勇士，你找我有什么事情吗？\\
　　<使用光明材料打造物品/@打造物品>　<打开光明礼盒/@打开光明礼盒>\
　　<升级光明材料/@光明材料>　　　　　<光明材料与神石/@材料神石>\
　　<拆卸装备/@拆卸装备>　　　　　　　<关闭/@exit>

[@打开光明礼盒]
#SAY
　　光明礼盒中蕴涵着神奇的魔力，隐藏着各种光明材料。\
但目前只有我能将它打开。你有光明礼盒吗？
#ACT
ShowSpotDlg 6 请放入光明礼盒 @放入光明礼盒

[@放入光明礼盒]
#IF
EQUAL $PARAM(0) 光明礼盒
#ACT
goto @开始打开光明礼盒
break
close
#ELSESAY
你放上的物品不是光明礼盒不能打开。\\
<我再找找看/@exit>

[@开始打开光明礼盒]
#IF
#ACT
ReadRandomStr ..\QuestDiary\奖励设置\光明奖励.txt S16
give $STR(S16) 1
take 光明礼盒 1
SENDMSG 10 <$USERNAME>成功在中州光明铸造师使用<$PARAM(0)>获得<$PARAM(11)>。
break

[@拆卸装备]
#SAY
　　我能够把圣战、战神、神武、血煞这一些类型的装备\
拆卸成光明材料，除圣战、法神、天尊套装拆谢光明材料\
可能失败，其他装备拆卸100%可以拆卸出光明材料，越高\
级的装备拆卸出来的光明材料等级越高。每帮你拆谢一样\
装备我将<color=green 收取10元宝>手续费。
#ACT
ShowSpotDlg 6 请放入装备 @放入装备

[@放入装备]
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\DarkEquipment.txt
#ACT
GOTO @黑暗装备
break
close
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\ThreeGodEquipment.txt
#ACT
GOTO @三神装备
break
close
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\SkyEquipment.txt
#ACT
GOTO @天空装备
break
close
#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\Prohibitedplace.txt
#ACT
GOTO @禁地装备
break
close
#ELSESAY
你所投放的物品并不是圣战、战神、神武、血煞这一些类\
型的装备，我不能拆卸出光明材料。\
<知道了/@exit>

[@黑暗装备]
#IF
random 6
#ACT
GIVE 五级光明材料
TAKEM $PARAM(1)
break
#IF
random 5
#ACT
GIVE 二级光明材料
TAKEM $PARAM(1)
break
#IF
random 4
#ACT
GIVE 四级光明材料
TAKEM $PARAM(1)
break
#IF
random 3
#ACT
GIVE 三级光明材料
TAKEM $PARAM(1)
break
#IF
random 2
#ACT
GIVE 二级光明材料
TAKEM $PARAM(1)
break
#IF
random 1
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break

[@三神装备]
#IF
random 6
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break
#IF
random 5
#ACT
GIVE 二级光明材料
TAKEM $PARAM(1)
break
#IF
random 4
#ACT
GIVE 四级光明材料
TAKEM $PARAM(1)
break
#IF
random 3
#ACT
GIVE 三级光明材料
TAKEM $PARAM(1)
break
#IF
random 2
#ACT
GIVE 二级光明材料
TAKEM $PARAM(1)
break
#IF
random 1
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break

[@天空装备]
#IF
random 6
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break
#IF
random 5
#ACT
GIVE 二级光明材料
TAKEM $PARAM(1)
break
#IF
random 4
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break
#IF
random 3
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break
#IF
random 2
#ACT
GIVE 二级光明材料
TAKEM $PARAM(1)
break
#IF
random 1
#ACT
GIVE 二级光明材料
TAKEM $PARAM(1)
break

[@禁地装备]
#IF
random 3
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break
#IF
random 2
#ACT
TAKEM $PARAM(1)
break
#IF
random 1
#ACT
GIVE 一级光明材料
TAKEM $PARAM(1)
break

[@打造物品]
#SAY
　　请放入你需要打造的光明材料，记住，越高级的材料所\
打造出的物品越好。
#ACT
ShowSpotDlg 6 请放入光明材料 @放入光明材料

[@放入光明材料]
#IF
EQUAL $PARAM(0) 一级光明材料
#ACT
GOTO @一级光明
break
close
#IF
EQUAL $PARAM(0) 二级光明材料
#ACT
GOTO @二级光明
break
close
#IF
EQUAL $PARAM(0) 三级光明材料
#ACT
GOTO @三级光明
break
close
#IF
EQUAL $PARAM(0) 四级光明材料
#ACT
GOTO @四级光明
break
close
#IF
EQUAL $PARAM(0) 五级光明材料
#ACT
GOTO @五级光明
break
close
#ELSESAY
你放入的不是光明材料，不能打造物品。\\
<我再找找看/@exit>

[@一级光明]
#IF
#act
ReadRandomStr ..\QuestDiary\奖励设置\一级光明.txt S16
give $STR(S16) 1
take 一级光明材料 1
SENDMSG 10 <$USERNAME>成功在中州光明铸造师使用<$PARAM(0)>获得<$PARAM(11)>。
break
close