跳到主要内容

自创神兵系统

;//此脚本仅供参考,目的是提供开发思路,切勿用于开区

[@main]
天地始,万物开,自有神通;星辰变,轮回转,当寻大道;\
无上妙义,是为法则\ 金石为刃,断玉开山,终为下品;\
神通加之,呼风唤雨,已为灵秀;\ 天地法则加之,移山填海,神鬼用命,莫有不能,此等神兵,\
是为绝品。\\
<绝世神兵相关/@weaponmenu> <绝世宝甲相关/@clothesmenu> <获得神兵材料/@toSubmitMenu> <离开/@exit>\

[@clothesmenu]
以凡品甲胄为形,以上古琉璃石为灵,以法则之力加之,\
即可炼制出绝世之宝甲!\\\
<绝世宝甲介绍/@jieshaocloth> <法则之力打造绝世宝甲/@makeclothes>\
<重新命名绝世宝甲/@@changeclothesname> <强化绝世宝甲属性/@@strengthenclothes>\
<绝世宝甲属性转换/@changeclothesattr>\
<衣服升级绝世神衣/@yifusjjssy> <衣服换外观/@changeclohteslooks> <返回/@main>\

[@yifusjjssy]
绝世神衣可以和以下新衣服融合,提升绝世神衣威力:\
与流金宝甲融合,获得10点攻击属性并与流金套装组成\
套装属性。再与天之流金宝甲融合,再次获得10点攻击属性\
并与天之流金套装组成套装属性。总共可获得20点攻击属性\
。若直接与天之流金武器融合,将直接获得20点攻击属性。\
<衣服升级绝世神衣/@@upgradeclothesname>\

[@changeclothesattr]
不同职业之间的宝甲属性可以相互转换,消耗<Color=green 100000金币>\
的费用,即可将宝甲属性转换。\
请选择宝甲转换后属性所属职业:\\\\
<战士/@clothestozhanshi> <法师/@clothestofashi> <道士/@clothestodaoshi> <妖士/@clothestoyaoshi>\
<返回/@clothesmenu>


[@clothestoyaoshi]
#SAY
请放入您的衣服\\\ <返回/@clothesmenu>
#ACT
Showspotdlg 6 放入你的绝世神衣 @妖士绝世神衣

[@妖士绝世神衣]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Job 3
#ACT
SENDMSG 5 两种属性一样,不用进行变换
break
#IF
checkgold 100000
#SAY
恭喜您的属性转换成功
#ACT
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 20
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 40
MOV P3 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P3 2
INC P3 28
MOV P4 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P4 2
INC P4 22
UPGRADEUSERITEM $PARAM(1) 156 = 3
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = $STR(P3)
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P4)
take 金币 100000
break
close
#elseact
SENDMSG 5 金币不足,无法转换!

[@clothestodaoshi]
#SAY
请放入您的衣服\\\ <返回/@clothesmenu>
#ACT
Showspotdlg 6 放入你的绝世神衣 @道士绝世神衣

[@道士绝世神衣]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Job 2
#ACT
SENDMSG 5 两种属性一样,不用进行变换
break
#IF
checkgold 100000
#SAY
恭喜您的属性转换成功
#ACT
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 20
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 42
MOV P3 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P3 2
INC P3 30
MOV P4 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P4 2
INC P4 22
UPGRADEUSERITEM $PARAM(1) 156 = 2
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = $STR(P3)
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P4)
take 金币 100000
break
close
#elseact
SENDMSG 5 金币不足,无法转换!

[@clothestofashi]
#SAY
请放入您的衣服\\\ <返回/@clothesmenu>
#ACT
Showspotdlg 6 放入你的绝世神衣 @法师绝世神衣

[@法师绝世神衣]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Job 1
#ACT
SENDMSG 5 两种属性一样,不用进行变换
break
#IF
checkgold 100000
#SAY
恭喜您的属性转换成功
#ACT
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 20
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 44
MOV P3 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P3 2
INC P3 27
MOV P4 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P4 2
INC P4 24
UPGRADEUSERITEM $PARAM(1) 156 = 1
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = $STR(P3)
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P4)
take 金币 100000
break
close
#elseact
SENDMSG 5 金币不足,无法转换!

[@clothestozhanshi]
#SAY
请放入您的衣服\\\ <返回/@clothesmenu>
#ACT
Showspotdlg 6 放入你的绝世神衣 @战士绝世神衣

[@战士绝世神衣]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 此衣服不是绝世宝甲,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Job 0
#ACT
SENDMSG 5 两种属性一样,不用进行变换
break
#IF
checkgold 100000
#SAY
恭喜您的属性转换成功
#ACT
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 20
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 40
MOV P3 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P3 2
INC P3 28
MOV P4 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
MULT P4 2
INC P4 22
UPGRADEUSERITEM $PARAM(1) 156 = 0
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = $STR(P3)
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P4)
take 金币 100000
break
close
#elseact
SENDMSG 5 金币不足,无法转换!


[@makeclothes]
绝世宝甲共有四种不同的类型,分别适合战士、法师、道\
士、妖士使用。\ 请选择你想要打造的宝甲种类:\
<color=red 只有主体可以穿戴绝世宝甲>\\
<战士宝甲/@@makezhanshiclothes> <法师宝甲/@@makefashiclothes> \
<道士宝甲/@@makedaoshiclothes> <妖士宝甲/@@makeyaoshiclothes>\\
<返回/@clothesmenu>\

[@jieshaocloth]
绝世宝甲乃是融入天地法则的至坚战甲,绝世宝甲有独一无\
二的名字,有唯一的主人,只有主体可以装备。\\\
<绝世宝甲属性介绍/@jieshaocloth_shuxing> <如何打造绝世宝甲/@jieshaocloth_dazao> \
<如何重新命名宝甲/@jieshaocloth_rename> <如何强化绝世宝甲/@jieshaocloth_strengthen> \
<如何转换宝甲属性/@jieshaocloth_zhuanhuan> <返回/@clothesmenu>\

[@jieshaocloth_zhuanhuan]
花费<Color=green 100000金币>,可以在通过归元一气炉的宝甲属性转换\
功能,将某一职业的绝世宝甲属性转换为其他职业的绝世宝\
甲属性\\\\\
<返回/@jieshaocloth>\\

[@jieshaocloth_strengthen]
绝世宝甲两种属性,需要用不同的材料加以强化。\
<Color=green 雪蚕丝>:强化基础属性,每次强化攻击+1、防御+2。\
<Color=green 火蛛丝>:强化特殊属性,每强化10次属性提升一档。\
两种属性强化初始消耗均为10个对应材料,每强化10次,消\耗的材料增加10个。两种属性均可强化100次。\\\
<返回/@jieshaocloth>\

[@jieshaocloth_rename]
绝世宝甲可以重新命名,宝甲主人在归元一气炉处,使用\
<Color=green 太虚神符>,即可将宝甲重新命名。\
<Color=red 只有宝甲主人才可以更改宝甲名字>\\\\\
<返回/@jieshaocloth>\

[@jieshaocloth_dazao]
打造绝世宝甲,需要先选择宝甲属性所属职业,然后将一\
件衣服放入归元一气炉中,用一块<Color=green 上古琉璃石>加以熔炼,并\
为衣服附上自己独一无二的名字,既可以打造出绝世宝甲。\
宝甲的属性根据你的选择不同而不同。\
<color=red 注:><color=green 妖士衣服打造后只有妖士可以穿戴,战法道衣服打造>\
<color=green 后只有战法道可以穿戴。>\
<color=red 只有主体可以穿戴绝世宝甲>\
<返回/@jieshaocloth>\

[@jieshaocloth_shuxing]
绝世宝甲有两种属性:<color=green 基础属性和特殊属性。>\
<color=green 基础属性:>攻击<color=red 20-40>、物防<color=red 0-28>、魔防<color=red 0-22>(战士)\
魔法<color=red 20-44>、物防<color=red 0-27>、魔防<color=red 0-24>(法师)\
道术<color=red 20-42>、物防<color=red 0-30>、魔防<color=red 0-22>(道士)\
妖力<color=red 20-40>、物防<color=red 0-28>、魔防<color=red 0-22>(妖士)\
<color=green 特殊属性:>当宝甲神力值满后,可以重塑死者金身,使\
其满状态复活。\
<color=red 注:><color=green 重塑金身效果和重生戒指效果不会同时触发,优先触>\
<返回/@jieshaocloth> <下一页/@nextpage_1>\

[@nextpage_1]
<color=green 发重生戒指效果,当重生戒指处于CD时,才会触发重塑金身>\
<color=green 效果。>\\\\\\
<返回/@jieshaocloth> <上一页/@jieshaocloth_shuxing>\

[@weaponmenu]
以世上凡兵为形,以上古七彩石为灵,以法则之力加之,\
即可炼制出绝世之神兵!\\\
<绝世神兵介绍/@jieshaoweapon> <法则之力打造绝世神兵/@makecustom>\
<重新命名绝世神兵/@@changecustomname> <强化绝世神兵属性/@@strengthencustom>\
<绝世神兵属性转换/@changemenu> <武器换外观/@changeweaponlooks>\
<返回/@main>\

[@changemenu]
不同职业之间的神兵属性可以相互转换,消耗<Color=green 100000金币>\
的费用,即可将神兵属性转换。\
请选择神兵转换后属性所属职业\\\
<战士/@changetozhanshi> <法师/@changetofashi> <道士/@changetodaoshi>\
<返回/@weaponmenu>

[@changetozhanshi]
#SAY
放入你的绝世神兵\\\ <返回/@changemenu>
#ACT
Showspotdlg 6 放入你的绝世神兵 @战士绝世神兵

[@战士绝世神兵]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 5
#ACT
SENDMSG 5 此物品不能不能打造神兵
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 此武器不是绝世神兵,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Job 0
#ACT
SENDMSG 5 两种属性一样,不用进行变换
break
#IF
!checkgold 100000
#ACT
SENDMSG 5 金币不足,无法转换!
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Ruler 1
#SAY
恭喜您的属性转换成功
#ACT
MOV P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceAC
INC P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceMAC
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 168
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 248
UPGRADEUSERITEM $PARAM(1) 156 = 0
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = $STR(P0)
UPGRADEUSERITEM $PARAM(1) 162 = 0
take 金币 100000
break
close
#ELSESAY
恭喜您的属性转换成功
#ELSEACT
MOV P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceAC
INC P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceMAC
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 50
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 100
UPGRADEUSERITEM $PARAM(1) 156 = 0
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = $STR(P0)
UPGRADEUSERITEM $PARAM(1) 162 = 0
take 金币 100000
break
close

[@changetofashi]
#SAY
放入你的绝世神兵\\\ <返回/@changemenu>
#ACT
Showspotdlg 6 放入你的绝世神兵 @法师绝世神兵

[@法师绝世神兵]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 5
#ACT
SENDMSG 5 此物品不能不能打造神兵
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 此武器不是绝世神兵,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Job 1
#ACT
SENDMSG 5 两种属性一样,不用进行变换
break
#IF
!checkgold 100000
#ACT
SENDMSG 5 金币不足,无法转换!
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Ruler 1
#SAY
恭喜您的属性转换成功
#ACT
MOV P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceAC
INC P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceMAC
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 148
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 188
UPGRADEUSERITEM $PARAM(1) 156 = 1
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = 0
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P0)
take 金币 100000
break
close
#ELSESAY
恭喜您的属性转换成功
#ELSEACT
MOV P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceAC
INC P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceMAC
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 40
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 70
UPGRADEUSERITEM $PARAM(1) 156 = 1
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = 0
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P0)
take 金币 100000
break
close

[@changetodaoshi]
#SAY
放入你的绝世神兵\\\ <返回/@changemenu>
#ACT
Showspotdlg 6 放入你的绝世神兵 @道士绝世神兵

[@道士绝世神兵]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].STDMODE 5
#ACT
SENDMSG 5 此物品不能不能打造神兵
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 此武器不是绝世神兵,不可使用此功能
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Job 2
#ACT
SENDMSG 5 两种属性一样,不用进行变换
break
#IF
!checkgold 100000
#ACT
SENDMSG 5 金币不足,无法转换!
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].GODITEM.Ruler 1
#SAY
恭喜您的属性转换成功
#ACT
MOV P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceAC
INC P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceMAC
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 138
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 178
UPGRADEUSERITEM $PARAM(1) 156 = 2
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = 0
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P0)
take 金币 100000
break
close
#ELSESAY
恭喜您的属性转换成功
#ELSEACT
MOV P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceAC
INC P0 $ITEMINFO[$PARAM(1)].GODITEM.ReduceMAC
MOV P1 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P1 50
MOV P2 $ITEMINFO[$PARAM(1)].ITEMEXT(81)
INC P2 80
UPGRADEUSERITEM $PARAM(1) 156 = 2
UPGRADEUSERITEM $PARAM(1) 159 = $STR(P1)
UPGRADEUSERITEM $PARAM(1) 160 = $STR(P2)
UPGRADEUSERITEM $PARAM(1) 161 = 0
UPGRADEUSERITEM $PARAM(1) 162 = $STR(P0)
take 金币 100000
break
close

[@makecustom]
绝世神兵共有三种不同的类型,分别适合战士、法师、道\
士使用。\
请选择你想要打造的神兵种类:\\\\
<战士/@@makezhanshicustom> <法师/@@makefashicustom> <道士/@@makedaoshicustom> <妖士/@@makeyaoshicustom>\
<返回/@weaponmenu>\

[@神兵打造]
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 5
#ACT
GOTO @武器神兵打造
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
#ACT
GOTO @衣服宝甲打造
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
GOTO @衣服宝甲打造
break

[@衣服宝甲打造]
#IF
EQUAL $PARAM(0) 1
#ACT
GOTO @绝世宝甲打造
#IF
EQUAL $PARAM(0) 2
#ACT
GOTO @绝世宝甲强化
#IF
EQUAL $PARAM(0) 3
#ACT
GOTO @绝世宝甲命名
#IF
EQUAL $PARAM(0) 4
#ACT
GOTO @绝世宝甲升级
break

[@绝世宝甲强化]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 雪蚕丝
#ACT
GOTO @强化雪蚕丝
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 火蛛丝
#ACT
GOTO @强化火蛛丝
break

[@强化火蛛丝]
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世宝甲,请放入绝世宝甲
break
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 99
#ACT
SENDMSG 5 对不起,绝世宝甲最高强化100次,不能进行宝甲强化
break
#IF
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 10
#ACT
MOV P9 10
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 10
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 20
#ACT
MOV P9 20
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 20
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 30
#ACT
MOV P9 30
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 30
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 40
#ACT
MOV P9 40
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 40
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 50
#ACT
MOV P9 50
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 50
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 60
#ACT
MOV P9 60
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 60
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 70
#ACT
MOV P9 70
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 70
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 80
#ACT
MOV P9 80
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 80
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 90
#ACT
MOV P9 90
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 90
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 99
#ACT
MOV P9 100
#IF
EQUAL $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
TAKEM $PARAM(2)
UPGRADEUSERITEM $PARAM(1) 83 + 1
GOTO @火蛛丝KT
break
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
UPGRADEUSERITEM $PARAM(2) 20 - $STR(P9)
UPGRADEUSERITEM $PARAM(1) 83 + 1
GOTO @火蛛丝KT
break
#ELSEACT
SENDMSG 5 对不起,您包裹里的材料不足,不能进行宝甲强化
break

[@火蛛丝KT]
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 10
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 2
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 20
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 2
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 30
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 2
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 40
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 3
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 50
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 3
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 60
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 3
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 70
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 4
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 80
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 4
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 90
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 4
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 100
#ACT
UPGRADEUSERITEM $PARAM(1) 163 + 5
INC P9 10
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break
#ELSEACT
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的火蛛丝
break

[@强化雪蚕丝]
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世宝甲,请放入绝世宝甲
break
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 99
#ACT
SENDMSG 5 对不起,绝世宝甲最高强化100次,不能进行宝甲强化
break
#IF
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 10
#ACT
MOV P9 10
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 10
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 20
#ACT
MOV P9 20
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 20
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 30
#ACT
MOV P9 30
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 30
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 40
#ACT
MOV P9 40
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 40
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 50
#ACT
MOV P9 50
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 50
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 60
#ACT
MOV P9 60
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 60
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 70
#ACT
MOV P9 70
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 70
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 80
#ACT
MOV P9 80
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 80
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 90
#ACT
MOV P9 90
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 90
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 99
#ACT
MOV P9 100
#IF
EQUAL $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
UPGRADEUSERITEM $PARAM(1) 159 + 1
UPGRADEUSERITEM $PARAM(1) 160 + 1
UPGRADEUSERITEM $PARAM(1) 161 + 2
UPGRADEUSERITEM $PARAM(1) 162 + 2
TAKEM $PARAM(2)
UPGRADEUSERITEM $PARAM(1) 81 + 1
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的雪蚕丝
break
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
UPGRADEUSERITEM $PARAM(1) 159 + 1
UPGRADEUSERITEM $PARAM(1) 160 + 1
UPGRADEUSERITEM $PARAM(1) 161 + 2
UPGRADEUSERITEM $PARAM(1) 162 + 2
UPGRADEUSERITEM $PARAM(2) 20 - $STR(P9)
UPGRADEUSERITEM $PARAM(1) 81 + 1
SENDMSG 5 恭喜您,强化绝世宝甲成功!下级此类强化需要数量<$STR(P9)>的雪蚕丝
break
#ELSEACT
SENDMSG 5 对不起,您包裹里的材料不足,不能进行宝甲强化
break

[@绝世宝甲命名]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].GODITEM.HumName $USERNAME
#ACT
SENDMSG 5 只有宝甲主人才能更改宝甲名字
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世宝甲,请放入绝世宝甲
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 太虚神符
#ACT
UPGRADEUSERITEM $PARAM(1) 157 = $PARAM(3)
TAKEM $PARAM(2)
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入太虚神符
break

[@绝世宝甲打造]
#IF
EQUAL $PARAM(4) 0
#ACT
GOTO @战士绝世宝甲打造
#IF
EQUAL $PARAM(4) 1
#ACT
GOTO @法师绝世宝甲打造
#IF
EQUAL $PARAM(4) 2
#ACT
GOTO @道士绝世宝甲打造
#IF
EQUAL $PARAM(4) 3
#ACT
GOTO @妖士绝世宝甲打造
break

[@战士绝世宝甲打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
#ACT
GIVE 绝世宝甲 1
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
GIVE 绝世宝衣 1
#IF
TRUE
#ACT
UPGRADEUSERITEM $PARAM(10) 156 = 0
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 20
UPGRADEUSERITEM $PARAM(10) 160 = 40
UPGRADEUSERITEM $PARAM(10) 161 = 28
UPGRADEUSERITEM $PARAM(10) 162 = 22
UPGRADEUSERITEM $PARAM(10) 163 = 10
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世宝甲-<$PARAM(3)>
break

[@法师绝世宝甲打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
#ACT
GIVE 绝世宝甲 1
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
GIVE 绝世宝衣 1
#IF
TRUE
#ACT
UPGRADEUSERITEM $PARAM(10) 156 = 1
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 20
UPGRADEUSERITEM $PARAM(10) 160 = 44
UPGRADEUSERITEM $PARAM(10) 161 = 27
UPGRADEUSERITEM $PARAM(10) 162 = 24
UPGRADEUSERITEM $PARAM(10) 163 = 10
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世宝甲-<$PARAM(3)>
break

[@道士绝世宝甲打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
#ACT
GIVE 绝世宝甲 1
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
GIVE 绝世宝衣 1
#IF
TRUE
#ACT
UPGRADEUSERITEM $PARAM(10) 156 = 2
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 20
UPGRADEUSERITEM $PARAM(10) 160 = 42
UPGRADEUSERITEM $PARAM(10) 161 = 30
UPGRADEUSERITEM $PARAM(10) 162 = 22
UPGRADEUSERITEM $PARAM(10) 163 = 10
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世宝甲-<$PARAM(3)>
break

[@妖士绝世宝甲打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
#ACT
GIVE 绝世宝甲 1
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
GIVE 绝世宝衣 1
#IF
TRUE
#ACT
UPGRADEUSERITEM $PARAM(10) 156 = 3
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 20
UPGRADEUSERITEM $PARAM(10) 160 = 40
UPGRADEUSERITEM $PARAM(10) 161 = 28
UPGRADEUSERITEM $PARAM(10) 162 = 22
UPGRADEUSERITEM $PARAM(10) 163 = 10
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世宝甲-<$PARAM(3)>
break

[@武器神兵打造]
#IF
EQUAL $PARAM(0) 1
#ACT
GOTO @绝世神兵打造
#IF
EQUAL $PARAM(0) 2
#ACT
GOTO @绝世神兵强化
#IF
EQUAL $PARAM(0) 3
#ACT
GOTO @绝世神兵命名
#IF
EQUAL $PARAM(0) 4
#ACT
GOTO @绝世神兵升级
break

[@绝世神兵强化]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 赤炎神铁
#ACT
GOTO @强化赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 紫金玄铁
#ACT
GOTO @强化紫金玄铁
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 千年寒铁
#ACT
GOTO @强化千年寒铁
break

[@强化绝世神兵]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 赤炎神铁
#ACT
GOTO @强化赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 紫金玄铁
#ACT
GOTO @强化紫金玄铁
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 千年寒铁
#ACT
GOTO @强化千年寒铁
break

[@强化赤炎神铁]
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世神兵,请放入绝世神兵
break
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 99
#ACT
SENDMSG 5 对不起,绝世神兵最高强化100次,不能进行武器强化
break
#IF
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 10
#ACT
MOV P9 10
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 10
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 20
#ACT
MOV P9 20
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 20
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 30
#ACT
MOV P9 30
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 30
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 40
#ACT
MOV P9 40
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 40
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 50
#ACT
MOV P9 50
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 50
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 60
#ACT
MOV P9 60
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 60
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 70
#ACT
MOV P9 70
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 70
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 80
#ACT
MOV P9 80
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 80
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 90
#ACT
MOV P9 90
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 90
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(82) 99
#ACT
MOV P9 100
#IF
EQUAL $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
TAKEM $PARAM(2)
UPGRADEUSERITEM $PARAM(1) 83 + 1
GOTO @赤炎神铁KT
break
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
UPGRADEUSERITEM $PARAM(2) 20 - $STR(P9)
UPGRADEUSERITEM $PARAM(1) 83 + 1
GOTO @赤炎神铁KT
break
#ELSEACT
SENDMSG 5 对不起,您包裹里的材料不足,不能进行武器强化
break

[@赤炎神铁KT]
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 10
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 5
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 20
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 4
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 30
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 4
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 40
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 4
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 50
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 3
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 60
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 3
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 70
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 3
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 80
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 2
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 90
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 2
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(82) 100
#ACT
UPGRADEUSERITEM $PARAM(1) 163 - 2
INC P9 10
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break
#ELSEACT
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的赤炎神铁
break


[@强化紫金玄铁]
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世神兵,请放入绝世神兵
break
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 99
#ACT
SENDMSG 5 对不起,绝世神兵最高强化100次,不能进行武器强化
break
#IF
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 10
#ACT
MOV P9 10
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 10
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 20
#ACT
MOV P9 20
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 20
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 30
#ACT
MOV P9 30
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 30
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 40
#ACT
MOV P9 40
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 40
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 50
#ACT
MOV P9 50
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 50
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 60
#ACT
MOV P9 60
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 60
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 70
#ACT
MOV P9 70
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 70
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 80
#ACT
MOV P9 80
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 80
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 90
#ACT
MOV P9 90
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 90
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 99
#ACT
MOV P9 100
#IF
EQUAL $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
TAKEM $PARAM(2)
GOTO @紫金玄铁XK
break
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
UPGRADEUSERITEM $PARAM(2) 20 - $STR(P9)
GOTO @紫金玄铁XK
break
#ELSEACT
SENDMSG 5 对不起,您包裹里的材料不足,不能进行武器强化
break

[@紫金玄铁XK]
#IF
LARGE $ITEMINFO[$PARAM(1)].GODITEM.ReduceAC 0
#ACT
UPGRADEUSERITEM $PARAM(1) 161 + 2
UPGRADEUSERITEM $PARAM(1) 82 + 1
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的紫金玄铁
break
#IF
LARGE $ITEMINFO[$PARAM(1)].GODITEM.ReduceMAC 0
#ACT
UPGRADEUSERITEM $PARAM(1) 162 + 2
UPGRADEUSERITEM $PARAM(1) 82 + 1
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的紫金玄铁
break

[@强化千年寒铁]
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世神兵,请放入绝世神兵
break
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 99
#ACT
SENDMSG 5 对不起,绝世神兵最高强化100次,不能进行武器强化
break
#IF
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 10
#ACT
MOV P9 10
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 10
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 20
#ACT
MOV P9 20
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 20
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 30
#ACT
MOV P9 30
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 30
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 40
#ACT
MOV P9 40
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 40
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 50
#ACT
MOV P9 50
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 50
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 60
#ACT
MOV P9 60
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 60
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 70
#ACT
MOV P9 70
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 70
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 80
#ACT
MOV P9 80
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 80
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 90
#ACT
MOV P9 90
#IF
LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 90
!LARGE $ITEMINFO[$PARAM(1)].ITEMEXT(81) 99
#ACT
MOV P9 100
#IF
EQUAL $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
UPGRADEUSERITEM $PARAM(1) 159 + 1
UPGRADEUSERITEM $PARAM(1) 160 + 1
TAKEM $PARAM(2)
UPGRADEUSERITEM $PARAM(1) 81 + 1
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的千年寒铁
break
#IF
LARGE $ITEMINFO[$PARAM(2)].DURA $STR(P9)
#ACT
UPGRADEUSERITEM $PARAM(1) 159 + 1
UPGRADEUSERITEM $PARAM(1) 160 + 1
UPGRADEUSERITEM $PARAM(2) 20 - $STR(P9)
UPGRADEUSERITEM $PARAM(1) 81 + 1
SENDMSG 5 恭喜您,强化绝世神兵成功!下级此类强化需要数量<$STR(P9)>的千年寒铁
break
#ELSEACT
SENDMSG 5 对不起,您包裹里的材料不足,不能进行武器强化
break


[@绝世神兵命名]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].GODITEM.HumName $USERNAME
#ACT
SENDMSG 5 只有神兵主人才能更改神兵名字
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世神兵,请放入绝世神兵
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 太乙神符
#ACT
UPGRADEUSERITEM $PARAM(1) 157 = $PARAM(3)
TAKEM $PARAM(2)
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入太乙神符
break

[@绝世神兵打造]
#IF
EQUAL $PARAM(4) 0
#ACT
GOTO @战士绝世神兵打造
#IF
EQUAL $PARAM(4) 1
#ACT
GOTO @法师绝世神兵打造
#IF
EQUAL $PARAM(4) 2
#ACT
GOTO @道士绝世神兵打造
#IF
EQUAL $PARAM(4) 3
#ACT
GOTO @妖士绝世神兵打造
break

[@战士绝世神兵打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
GETVALIDSTR $STR(S12) | S13 P60
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 0
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 168
UPGRADEUSERITEM $PARAM(10) 160 = 248
UPGRADEUSERITEM $PARAM(10) 161 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
UPGRADEUSERITEM $PARAM(10) 16 = $STR(P60)
UPGRADEUSERITEM $PARAM(10) 59 = 1
UPGRADEUSERITEM $PARAM(10) 164 = 1
#ELSEACT
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 0
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 50
UPGRADEUSERITEM $PARAM(10) 160 = 100
UPGRADEUSERITEM $PARAM(10) 161 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
#IF
EQUAL $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break
#IF
LARGE $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].FEATURE
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break


[@法师绝世神兵打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
GETVALIDSTR $STR(S12) | S13 P60
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 1
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 148
UPGRADEUSERITEM $PARAM(10) 160 = 188
UPGRADEUSERITEM $PARAM(10) 162 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
UPGRADEUSERITEM $PARAM(10) 16 = $STR(P60)
UPGRADEUSERITEM $PARAM(10) 164 = 1
UPGRADEUSERITEM $PARAM(10) 59 = 1
#ELSEACT
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 1
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 40
UPGRADEUSERITEM $PARAM(10) 160 = 70
UPGRADEUSERITEM $PARAM(10) 162 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
#IF
EQUAL $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break
#IF
LARGE $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].FEATURE
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break

[@道士绝世神兵打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
GETVALIDSTR $STR(S12) | S13 P60
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 2
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 148
UPGRADEUSERITEM $PARAM(10) 160 = 188
UPGRADEUSERITEM $PARAM(10) 162 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
UPGRADEUSERITEM $PARAM(10) 16 = $STR(P60)
UPGRADEUSERITEM $PARAM(10) 164 = 1
UPGRADEUSERITEM $PARAM(10) 59 = 1
#ELSEACT
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 2
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 40
UPGRADEUSERITEM $PARAM(10) 160 = 70
UPGRADEUSERITEM $PARAM(10) 162 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
#IF
EQUAL $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break
#IF
LARGE $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].FEATURE
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break

[@妖士绝世神兵打造]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
GETVALIDSTR $STR(S12) | S13 P60
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 3
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 138
UPGRADEUSERITEM $PARAM(10) 160 = 178
UPGRADEUSERITEM $PARAM(10) 161 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
UPGRADEUSERITEM $PARAM(10) 16 = $STR(P60)
UPGRADEUSERITEM $PARAM(10) 164 = 1
UPGRADEUSERITEM $PARAM(10) 59 = 1
#ELSEACT
give 绝世神兵 1
UPGRADEUSERITEM $PARAM(10) 156 = 3
UPGRADEUSERITEM $PARAM(10) 6 = 7
UPGRADEUSERITEM $PARAM(10) 157 = $PARAM(3)
UPGRADEUSERITEM $PARAM(10) 158 = $USERNAME
UPGRADEUSERITEM $PARAM(10) 159 = 50
UPGRADEUSERITEM $PARAM(10) 160 = 80
UPGRADEUSERITEM $PARAM(10) 161 = 10
UPGRADEUSERITEM $PARAM(10) 163 = 25
UPGRADEUSERITEM $PARAM(10) 18 = 1
UPGRADEUSERITEM $PARAM(10) 19 = 3
MOV P10 $ITEMINFO[$PARAM(1)].LOOKS
UPGRADEUSERITEM $PARAM(10) 166 = $STR(P10)
#IF
EQUAL $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].Shape
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break
#IF
LARGE $ITEMINFO[$PARAM(1)].FEATURE 0
#ACT
MOV P11 $ITEMINFO[$PARAM(1)].FEATURE
UPGRADEUSERITEM $PARAM(10) 165 = $STR(P11)
TAKEM $PARAM(1)
TAKEM $PARAM(2)
SENDMSG 15 恭喜玩家-<$USERNAME>成功开启归元一气炉,引动天地法则,打造出绝世神兵-<$PARAM(3)>
break

[@神兵预览]
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 5
#ACT
GOTO @武器神兵预览
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 10
#ACT
GOTO @衣服宝甲预览
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].STDMODE 11
#ACT
GOTO @衣服宝甲预览
break

[@衣服宝甲预览]
#IF
EQUAL $PARAM(0) 1
#ACT
GOTO @绝世宝甲打造预览
#IF
EQUAL $PARAM(0) 2
#ACT
GOTO @绝世宝甲强化预览
#IF
EQUAL $PARAM(0) 3
#ACT
GOTO @绝世宝甲命名预览
#IF
EQUAL $PARAM(0) 4
#ACT
GOTO @绝世宝甲升级预览
break

[@绝世宝甲强化预览]

[@绝世宝甲命名预览]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].GODITEM.HumName $USERNAME
#ACT
SENDMSG 5 只有宝甲主人才能更改宝甲名字
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世宝甲,请放入绝世宝甲
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 太虚神符
#ACT
SETPARAM 6 $PARAM(3)
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入太虚神符
break

[@绝世宝甲打造预览]
#IF
EQUAL $PARAM(4) 0
#ACT
GOTO @战士绝世宝甲预览
#IF
EQUAL $PARAM(4) 1
#ACT
GOTO @法师绝世宝甲预览
#IF
EQUAL $PARAM(4) 2
#ACT
GOTO @道士绝世宝甲预览
#IF
EQUAL $PARAM(4) 3
#ACT
GOTO @妖士绝世宝甲预览
break

[@战士绝世宝甲预览]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SETPARAM 5 0 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 20 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 40 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 28 ;--无视对方物理防御,如果是衣服则为加防御上限
SETPARAM 11 22 ;--无视对方魔法防御,如果是衣服则为加魔御上限
SETPARAM 12 10 ;--暴走模式下消耗的神力
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break

[@法师绝世宝甲预览]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SETPARAM 5 1 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 20 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 44 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 27 ;--无视对方物理防御,如果是衣服则为加防御上限
SETPARAM 11 24 ;--无视对方魔法防御,如果是衣服则为加魔御上限
SETPARAM 12 10 ;--暴走模式下消耗的神力
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break

[@道士绝世宝甲预览]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SETPARAM 5 2 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 20 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 42 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 30 ;--无视对方物理防御,如果是衣服则为加防御上限
SETPARAM 11 22 ;--无视对方魔法防御,如果是衣服则为加魔御上限
SETPARAM 12 10 ;--暴走模式下消耗的神力
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break

[@妖士绝世宝甲预览]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古琉璃石
#ACT
SETPARAM 5 3 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 20 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 40 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 28 ;--无视对方物理防御,如果是衣服则为加防御上限
SETPARAM 11 22 ;--无视对方魔法防御,如果是衣服则为加魔御上限
SETPARAM 12 10 ;--暴走模式下消耗的神力
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入上古琉璃石
break

[@武器神兵预览]
#IF
EQUAL $PARAM(0) 1
#ACT
GOTO @绝世神兵打造预览
#IF
EQUAL $PARAM(0) 2
#ACT
GOTO @绝世神兵强化预览
#IF
EQUAL $PARAM(0) 3
#ACT
GOTO @绝世神兵命名预览
#IF
EQUAL $PARAM(0) 4
#ACT
GOTO @绝世神兵升级预览
break

[@绝世神兵命名预览]
#IF
!EQUAL $ITEMINFO[$PARAM(1)].GODITEM.HumName $USERNAME
#ACT
SENDMSG 5 只有神兵主人才能更改神兵名字
break
#IF
EQUAL $ITEMINFO[$PARAM(1)].ITEMEXT(80) 0
#ACT
SENDMSG 5 你放入的不是绝世神兵,请放入绝世神兵
break
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 太乙神符
#ACT
SETPARAM 6 $PARAM(3)
#ELSEACT
SENDMSG 5 你放入的材料错误,请放入太乙神符
break


[@绝世神兵打造预览]
#IF
EQUAL $PARAM(4) 0
#ACT
GOTO @战士绝世神兵预览
#IF
EQUAL $PARAM(4) 1
#ACT
GOTO @法师绝世神兵预览
#IF
EQUAL $PARAM(4) 2
#ACT
GOTO @道士绝世神兵预览
#IF
EQUAL $PARAM(4) 3
#ACT
GOTO @妖士绝世神兵预览
break

[@战士绝世神兵预览]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
SETPARAM 5 0 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 168 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 248 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 10 ;--无视对方物理防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
SETPARAM 14 1
break
#ELSEACT
SETPARAM 5 0 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 50 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 100 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 10 ;--无视对方物理防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
break

[@法师绝世神兵预览]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
SETPARAM 5 1 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 148 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 188 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 11 10 ;--无视对方魔法防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
SETPARAM 14 1
break
#ELSEACT
SETPARAM 5 1 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 40 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 50 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 11 10 ;--无视对方魔法防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
break

[@道士绝世神兵预览]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
SETPARAM 5 2 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 138 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 178 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 11 10 ;--无视对方魔法防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
SETPARAM 14 1
break
#ELSEACT
SETPARAM 5 2 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 50 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 80 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 11 10 ;--无视对方魔法防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
break

[@妖士绝世神兵预览]
#IF
!EQUAL $ITEMINFO[$PARAM(2)].STDNAME 上古七彩石
#ACT
SENDMSG 5 你放入的材料错误,请放入上古七彩石
break
#IF
POSINLIST $ITEMINFO[$PARAM(1)].STDNAME ..\QuestDiary\游戏读取\主宰者武器.txt S12
#ACT
SETPARAM 5 3 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 138 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 178 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 10 ;--无视对方魔法防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
SETPARAM 14 1
break
#ELSEACT
SETPARAM 5 3 ;--基础属性类型(0-加攻击,1-加魔法,2-加道术 ,3-加妖力,设置了类型也代表是自制神兵)
SETPARAM 6 $PARAM(3) ;--自定义物品名称
SETPARAM 7 $USERNAME ;--修改属于哪个角色名称
SETPARAM 8 50 ;--基础属性点下限 (攻击力, 魔法,道术, 妖力)
SETPARAM 9 80 ;--基础属性点上限 (攻击力, 魔法,道术, 妖力)
SETPARAM 10 10 ;--无视对方魔法防御,如果是衣服则为加防御上限
SETPARAM 12 25 ;--暴走模式下消耗的神力
SETPARAM 13 7 ;--幸运
SETPARAM 15 14 ;--佩带需求
SETPARAM 16 240 ;--佩带级别
break


[@绝世神兵强化预览]
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 千年寒铁
#ACT
GOTO @强化神兵基础属性
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 紫金玄铁
#ACT
GOTO @强化神兵减免属性
#IF
EQUAL $ITEMINFO[$PARAM(2)].STDNAME 赤炎神铁
#ACT
GOTO @强化神兵暴击属性
break

[@强化神兵基础属性]
#IF
EQUAL $PARAM(4) 0
#ACT
GOTO @战士强化神兵基础属性
#IF
EQUAL $PARAM(4) 1
#ACT
GOTO @法师强化神兵基础属性
#IF
EQUAL $PARAM(4) 2
#ACT
GOTO @道士强化神兵基础属性
#IF
EQUAL $PARAM(4) 3
#ACT
GOTO @妖士强化神兵基础属性
break

[@战士强化神兵基础属性]



[@wuqisjjssb]
绝世神兵可以和以下新武器融合,提升绝世神兵威力:\
与流金武器融合,获得10点攻击属性并与流金套装组成\
套装属性。再与天之流金武器融合,再次获得10点攻击属性\
并与天之流金套装组成套装属性。总共可获得20点攻击属性\
。若直接与天之流金武器融合,将直接获得20点攻击属性。\
<武器升级绝世神兵/@@upgradecustomname>\

[@toSubmitMenu]
绝世神兵需要的材料均乃天地间之奇珍异宝,常人不可\
轻易获得。当年,鸿钧老祖曾将自己的一些珍宝存放于此炉中。\
勇士在此处上交龙币,即可获得积分。当积分达到一定程\
度,即可兑换炉中的奇珍异宝。\\\
<上交2个龙币/@doSubmit&0> <上交10个龙币/@doSubmit&1>\
<上交100个龙币/@doSubmit&2> <上交1000个龙币/@doSubmit&3> <积分兑换/@toExchangeMenu>\
<返回/@main>

[@toExchangeMenu]
勇士,无数奇珍异宝藏于此炉中,只要你有足够的积分,\
就可以兑换奇珍异宝。\
<兑换千年寒铁/@doExchange&0>\
<兑换紫金玄铁/@doExchange&1>\
<兑换赤炎神铁/@doExchange&2>\
<兑换上古七彩石/@doExchange&3>\\
<返回/@toSubmitMenu>

[@doExchange]
#IF
EQUAL $SCRIPTPARAM(1) 0
#SAY
您总共累计积分为{color=green <$HUMAN(材料累计积分)>点},剩余可用积分为{color=green <$HUMAN(材料可用积分)>点}\
勇士,每20点积分可以兑换1个千年寒铁。\
<兑换1个千年寒铁/@doExchange0>\
<兑换10个千年寒铁/@doExchange1>\
<兑换100个千年寒铁/@doExchange2>\
<消耗所有积分兑换千年寒铁/@doExchange3>\\
<返回/@toExchangeMenu>
#ACT
break
#IF
EQUAL $SCRIPTPARAM(1) 1
#SAY
您总共累计积分为{color=green <$HUMAN(材料累计积分)>点},剩余可用积分为{color=green <$HUMAN(材料可用积分)>点}\
勇士,每20点积分可以兑换1个紫金玄铁。\
<兑换1个紫金玄铁/@doExchange10>\
<兑换10个紫金玄铁/@doExchange11>\
<兑换100个紫金玄铁/@doExchange12>\
<消耗所有积分兑换紫金玄铁/@doExchange13>\\
<返回/@toExchangeMenu>
#ACT
break
#IF
EQUAL $SCRIPTPARAM(1) 2
#SAY
您总共累计积分为{color=green <$HUMAN(材料累计积分)>点},剩余可用积分为{color=green <$HUMAN(材料可用积分)>点}\
勇士,每20点积分可以兑换1个赤炎神铁。\
<兑换1个赤炎神铁/@doExchange20>\
<兑换10个赤炎神铁/@doExchange21>\
<兑换100个赤炎神铁/@doExchange22>\
<消耗所有积分兑换赤炎神铁/@doExchange23>\\
<返回/@toExchangeMenu>
#ACT
break
#IF
EQUAL $SCRIPTPARAM(1) 3
#SAY
您总共累计积分为{color=green <$HUMAN(材料累计积分)>点},剩余可用积分为{color=green <$HUMAN(材料可用积分)>点}\
勇士,每10000点积分可以兑换1个上古七彩石。\
<兑换1个上古七彩石/@doExchange30>\\
<返回/@toExchangeMenu>
#ACT
break

[@doExchange0]
#IF
CHECKVAR HUMAN 材料可用积分 > 19
#ACT
CALCVAR HUMAN 材料可用积分 - 20
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 千年寒铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 1
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange1]
#IF
CHECKVAR HUMAN 材料可用积分 > 199
#ACT
CALCVAR HUMAN 材料可用积分 - 200
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 千年寒铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 10
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange2]
#IF
CHECKVAR HUMAN 材料可用积分 > 1999
#ACT
CALCVAR HUMAN 材料可用积分 - 2000
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 千年寒铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange3]
#IF
CHECKVAR HUMAN 材料可用积分 > 0
#ACT
MOV P0 $HUMAN(材料累计积分)
DIV P0 20
#IF
!SMALL P0 1
#ACT
CALCVAR HUMAN 材料可用积分 - $HUMAN(材料累计积分)
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 千年寒铁 1
UPGRADEUSERITEM $PARAM(10) 20 = $STR(P0)
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange10]
#IF
CHECKVAR HUMAN 材料可用积分 > 19
#ACT
CALCVAR HUMAN 材料可用积分 - 20
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 紫金玄铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 1
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange11]
#IF
CHECKVAR HUMAN 材料可用积分 > 199
#ACT
CALCVAR HUMAN 材料可用积分 - 200
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 紫金玄铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 10
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange12]
#IF
CHECKVAR HUMAN 材料可用积分 > 1999
#ACT
CALCVAR HUMAN 材料可用积分 - 2000
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 紫金玄铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange13]
#IF
CHECKVAR HUMAN 材料可用积分 > 0
#ACT
MOV P0 $HUMAN(材料累计积分)
DIV P0 20
#IF
!SMALL P0 1
#ACT
CALCVAR HUMAN 材料可用积分 - $HUMAN(材料累计积分)
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 紫金玄铁 1
UPGRADEUSERITEM $PARAM(10) 20 = $STR(P0)
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange20]
#IF
CHECKVAR HUMAN 材料可用积分 > 19
#ACT
CALCVAR HUMAN 材料可用积分 - 20
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 赤炎神铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 1
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange21]
#IF
CHECKVAR HUMAN 材料可用积分 > 199
#ACT
CALCVAR HUMAN 材料可用积分 - 200
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 赤炎神铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 10
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange22]
#IF
CHECKVAR HUMAN 材料可用积分 > 1999
#ACT
CALCVAR HUMAN 材料可用积分 - 2000
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 赤炎神铁 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange23]
#IF
CHECKVAR HUMAN 材料可用积分 > 0
#ACT
MOV P0 $HUMAN(材料累计积分)
DIV P0 20
#IF
!SMALL P0 1
#ACT
CALCVAR HUMAN 材料可用积分 - $HUMAN(材料累计积分)
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 赤炎神铁 1
UPGRADEUSERITEM $PARAM(10) 20 = $STR(P0)
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doExchange30]
#IF
CHECKVAR HUMAN 材料可用积分 > 10000
#ACT
CALCVAR HUMAN 材料可用积分 - 10000
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
GIVE 上古七彩石 1
#ELSESAY
对不起,您剩余可使用积分不足,无法兑换。\\
<离开/@exit>

[@doSubmit]
#IF
EQUAL $SCRIPTPARAM(1) 0
#ACT
GOTO @2个龙币
break
#IF
EQUAL $SCRIPTPARAM(1) 1
#ACT
GOTO @10个龙币
break
#IF
EQUAL $SCRIPTPARAM(1) 2
#ACT
GOTO @100个龙币
break
#IF
EQUAL $SCRIPTPARAM(1) 3
#ACT
GOTO @1000个龙币
break

[@2个龙币]
#IF
!CHECKITEM 龙币 1
#ACT
SENDMSG 5 你没有龙币,龙币可以在商城购买。
break
#IF
SMALL $ITEMVALSUM(龙币).DURA 2
#SAY
对不起,您的<color=red 龙币>数量不足。\\
<离开/@exit>
#ACT
break
#ELSEACT
MOV P34 $ITEMVALSUM(龙币).DURA
TAKE 龙币 666666
DEC P34 2
CALCVAR HUMAN 材料累计积分 + 2
CALCVAR HUMAN 材料可用积分 + 2
SAVEVAR HUMAN 材料累计积分 ..\QUESTDIARY\数据文件\个人变量.txt
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
#IF
!SMALL P34 1
#ACT
GIVE 龙币 1
UPGRADEUSERITEM $PARAM(10) 20 = $STR(P34)

[@10个龙币]
#IF
!CHECKITEM 龙币 1
#ACT
SENDMSG 5 你没有龙币,龙币可以在商城购买。
break
#IF
SMALL $ITEMVALSUM(龙币).DURA 10
#SAY
对不起,您的<color=red 龙币>数量不足。\\
<离开/@exit>
#ACT
break
#ELSEACT
MOV P34 $ITEMVALSUM(龙币).DURA
TAKE 龙币 666666
DEC P34 10
CALCVAR HUMAN 材料累计积分 + 10
CALCVAR HUMAN 材料可用积分 + 10
SAVEVAR HUMAN 材料累计积分 ..\QUESTDIARY\数据文件\个人变量.txt
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
#IF
!SMALL P34 1
#ACT
GIVE 龙币 1
UPGRADEUSERITEM $PARAM(10) 20 = $STR(P34)

[@100个龙币]
#IF
!CHECKITEM 龙币 1
#ACT
SENDMSG 5 你没有龙币,龙币可以在商城购买。
break
#IF
SMALL $ITEMVALSUM(龙币).DURA 100
#SAY
对不起,您的<color=red 龙币>数量不足。\\
<离开/@exit>
#ACT
break
#ELSEACT
MOV P34 $ITEMVALSUM(龙币).DURA
TAKE 龙币 666666
DEC P34 100
CALCVAR HUMAN 材料累计积分 + 100
CALCVAR HUMAN 材料可用积分 + 100
SAVEVAR HUMAN 材料累计积分 ..\QUESTDIARY\数据文件\个人变量.txt
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
#IF
!SMALL P34 1
#ACT
GIVE 龙币 1
UPGRADEUSERITEM $PARAM(10) 20 = $STR(P34)

[@1000个龙币]
#IF
!CHECKITEM 龙币 1
#ACT
SENDMSG 5 你没有龙币,龙币可以在商城购买。
break
#IF
SMALL $ITEMVALSUM(龙币).DURA 1000
#SAY
对不起,您的<color=red 龙币>数量不足。\\
<离开/@exit>
#ACT
break
#ELSEACT
MOV P34 $ITEMVALSUM(龙币).DURA
TAKE 龙币 666666
DEC P34 1000
CALCVAR HUMAN 材料累计积分 + 1000
CALCVAR HUMAN 材料可用积分 + 1000
SAVEVAR HUMAN 材料累计积分 ..\QUESTDIARY\数据文件\个人变量.txt
SAVEVAR HUMAN 材料可用积分 ..\QUESTDIARY\数据文件\个人变量.txt
#IF
!SMALL P34 1
#ACT
GIVE 龙币 1
UPGRADEUSERITEM $PARAM(10) 20 = $STR(P34)

[@jieshaoweapon]
绝世神兵乃是融入天地法则的至高兵器,绝世神兵有独一无\
二的名字,有唯一的主人,主体元神可以装备。\\\
<绝世神兵属性介绍/@jieshaoweapon_shuxing> <如何打造绝世神兵/@jieshaoweapon_dazao> \
<如何重新命名神兵/@jieshaoweapon_rename> <如何强化绝世神兵/@jieshaoweapon_strengthen> \
<如何转换神兵属性/@jieshaoweapon_zhuanhuan> <返回/@weaponmenu>\

[@jieshaoweapon_zhuanhuan]
花费<Color=green 100000金币>,可以在通过归元一气炉的神兵属性转换\
功能,将某一职业的绝世神兵属性转换为其他职业的绝世神\
兵属性\\\\\
<返回/@jieshaoweapon>\

[@jieshaoweapon_shuxing]
绝世神兵有三种属性:基础属性,减防属性和暴击属性。\
基础属性:攻击50-100(战士)、魔法40-70(法师)、\
道术50-80(道士)、幸运+7\
<Color=red 使用主宰者武器打造,可以获得更高的基础属性。>\
减防属性:无视对方物理或魔法防御10点\
暴击属性:暴走模式下,每次攻击100%暴击。\\
<返回/@jieshaoweapon> <下一页/@nextpage>\

[@nextpage]
暴走模式:装备武器后,界面会显示武器神力值。\
神力值每分钟增长3点,共100点。当神力值达到\
100点后,武器进入暴走模式。\
暴走模式下,每次攻击会消耗神力值,当神力值\
不足以维持下次攻击时,退出暴走模式。\\\
<返回/@jieshaoweapon>\

[@jieshaoweapon_dazao]
打造绝世神兵,需要先选择神兵属性所属职业,然后将一\
把兵器放入归元一气炉中,用一块<Color=green 上古七彩石>加以熔炼,并\
为武器附上自己独一无二的名字,既可以打造出绝世神兵。\
神兵的属性根据你的选择不同而不同。\
<Color=red 绝世神兵主体和元神均可以装备>。\
<Color=red 使用主宰者武器可以打造出基础属性更高的神兵>。\\
<返回/@jieshaoweapon>\

[@jieshaoweapon_rename]
绝世神兵可以重新命名,神兵主人在归元一气炉处,使用\
<Color=green 太乙神符>,即可将神兵重新命名。\
<Color=red 只有神兵主人才可以更改神兵名字>\\\\\
<返回/@jieshaoweapon>\

[@jieshaoweapon_strengthen]
绝世神兵三种属性,需要用不同的材料加以强化。\
<Color=green 千年寒铁:>强化基础属性,每次强化攻击+1。\
<Color=green 紫金玄铁:>强化减防属性,每次强化无视防御属性+2。\
<Color=green 赤炎神铁:>强化暴击属性,每强化10次,属性提升一档。\
三种属性强化初始消耗均为10个对应材料,每强化10次,消\耗的材料增加10个。三种属性均可强化100次。\
<color=red 在中州铸造师处,拆卸沙城装备可获得三种材料。>\
<返回/@jieshaoweapon>\