|
我就是传说中的神兵欧冶子.\
如果你需要装备修理或者武器升级之类的低级服务.\
你还是出门去找那些凡间的铁匠吧.\
我只提供以下几种高级服务.\\
<强化装备/@强化装备></@@!PIC2 3,14536>\
[@强化装备]
<color=red 欢迎使用本服全新装备属性提升系统:>\
<color=0X99CCFF 每升级一次需要1颗炼制宝石>\
<color=0X99CCFF 同时每提升一次会增加> <color=green 一点黑暗属性>\
<color=ea00ff 满属性为:>武器最多升级5点,首饰最多升级3点?\
<color=red 消费指南:>每提升一次将会收取相应的金币费用!\
<color=ea00ff 友情提示:装备升级,成功率50%,但是不会导致装备破碎>\\
<有钱就是王道-我什么都没有,就是钱多/@极品加星> <我只是看看而已?/@exit>
[@极品加星]
#ACT
checkitembox 放入你想升级的物品 1 48
[@getboxitem48]
#IF
CHECKVARLIST $CHECKBOXITEM.NAME ..\加星武器.txt
#ACT
GOTO @武器加星
break
#IF
CHECKVARLIST $CHECKBOXITEM.NAME ..\加星首饰.txt
#ACT
GOTO @首饰加星
break
#ELSEACT
messagebox 当前装备不能进行黑暗属性升级!
break
[@武器加星]
#IF
checkjob warrior
#ACT
MOV P5 $CHECKBOXITEM.DARKPOINT(2)
goto @检查武器
break
#IF
checkjob wizard
#ACT
MOV P5 $CHECKBOXITEM.DARKPOINT(4)
goto @检查武器
break
#IF
checkjob taoist
#ACT
MOV P5 $CHECKBOXITEM.DARKPOINT(6)
goto @检查武器
break
[@检查武器]
#IF
LARGE P5 4
#ACT
messagebox 当前装备的黑暗属性值已经达到最高限制5点了,不能进行升级!
#ELSEACT
MOV P6 2000000
goto @检查金币值1
break
[@检查金币值1]
#IF
checkgold $str(p6)
checkitem 炼制宝石
#ACT
goto @检查职业1
#ELSEACT
messagebox 你的金币不足,升级当前武器所需要的金币为:<$STR(P6)>,和装备炼制宝石。
break
[@检查职业1]
#IF
random 3
#ACT
GOTO @武器升级成功
break
#ELSEACT
GOTO @武器升级失败
break
[@武器升级成功]
#IF
checkjob warrior
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 21 + 1
SENDMSG 5 金币加星成功,黑暗攻击+1,金币减少<$STR(P6)>
break
#IF
checkjob wizard
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 23 + 1
SENDMSG 5 金币加星成功,黑暗魔法+1,金币减少<$STR(P6)>
break
#IF
checkjob taoist
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 25 + 1
SENDMSG 5 金币加星成功,黑暗道术+1,金币减少<$STR(P6)>
break
[@武器升级失败]
#IF
checkjob warrior
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 21 + 0
SENDMSG 5 金币加星失败,金币减少<$STR(P6)>
break
#IF
checkjob wizard
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 23 + 0
SENDMSG 5 金币加星失败,金币减少<$STR(P6)>
break
#IF
checkjob taoist
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 25 + 0
SENDMSG 5 金币加星失败,金币减少<$STR(P6)>
break
[@首饰加星]
#IF
checkjob warrior
#ACT
MOV P5 $CHECKBOXITEM.DARKPOINT(2)
goto @检查首饰
break
#IF
checkjob wizard
#ACT
MOV P5 $CHECKBOXITEM.DARKPOINT(4)
goto @检查首饰
break
#IF
checkjob taoist
#ACT
MOV P5 $CHECKBOXITEM.DARKPOINT(6)
goto @检查首饰
break
[@检查首饰]
#IF
LARGE P5 2
#ACT
messagebox 当前装备的黑暗属性值已经达到最高限制3点了,不能进行升级!
#ELSEACT
MOV P6 3000000
goto @检查金币值2
break
[@检查金币值2]
#IF
checkgold $str(p6)
checkitem 炼制宝石
#ACT
goto @检查职业2
#ELSEACT
messagebox 你的金币不足,升级当前武器所需要的金币为:<$STR(P6)>,和装备炼制宝石。
break
[@检查职业2]
#IF
random 3
#ACT
GOTO @首饰升级成功
break
#ELSEACT
GOTO @首饰升级失败
break
[@首饰升级成功]
#IF
checkjob warrior
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 21 + 1
SENDMSG 5 金币加星成功,黑暗攻击+1,金币减少<$STR(P6)>
break
#IF
checkjob wizard
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 23 + 1
SENDMSG 5 金币加星成功,黑暗魔法+1,金币减少<$STR(P6)>
break
#IF
checkjob taoist
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 25 + 1
SENDMSG 5 金币加星成功,黑暗道术+1,金币减少<$STR(P6)>
break
[@首饰升级失败]
#IF
checkjob warrior
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 21 + 0
SENDMSG 5 金币加星失败,金币减少<$STR(P6)>
break
#IF
checkjob wizard
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 23 + 0
SENDMSG 5 金币加星失败,金币减少<$STR(P6)>
break
#IF
checkjob taoist
#ACT
take 金币 $str(p6)
take 炼制宝石 1
UPGRADECHECKITEMBOX 25 + 0
SENDMSG 5 金币加星失败,金币减少<$STR(P6)>
break
| |