传奇3积分升刀脚本

[@积分升刀主界面]
#IF
checkweaponlevel 2
#SAY
;18级以上的武器只能进行大规模炼制\
超过1级的武器无法使用MAX制炼,请使用魔晶石把武器还原1级再使用该功能.\
#ACT
BREAK

#IF
checkweaponlevel 1
#SAY
您好!欢迎使用MAX制炼,您目前还有 {FCOLOR/1}<$USERJF>{FCOLOR/12} 点积分.\
是不是觉得升武器好烦琐?我就是能帮你的人!\
一次性可以把新的武器炼成MAX全成功\
但我需要收取 {FCOLOR/10}2000{FCOLOR/12} 点积分的手续费\
请选择清楚,选择后将无法改变\\
_<武器MAX冶炼(火)/@StartPromote(1)> <武器MAX冶炼(冰)/@StartPromote(2)>\
_<武器MAX冶炼(雷)/@StartPromote(3)> <武器MAX冶炼(风)/@StartPromote(4)>\
_<武器MAX冶炼(神圣)/@StartPromote(5)> <武器MAX冶炼(暗黑)/@StartPromote(6)>\
_<武器MAX冶炼(幻影)/@StartPromote(7)> <武器MAX冶炼(破坏)/@StartPromote1>\
_<武器MAX冶炼(全系列魔法)/@StartPromote2>\\
_<返 回/@武器制炼1>\
#ELSESAY
必须是全新的武器才可以炼制\

[@StartPromote()]
#ACT
mov D0 %ARG(1)

#IF
checkcmd CHECKUSERJF 2000
checkcmd CHECKITEMINFO 1
#ACT
ACTCMD SETUSERJF - 2000 积分升刀
ACTCMD EDITITEM FLD_DESC11 = %D0
ACTCMD EDITITEM FLD_DESC12 + 17
ACTCMD EDITITEM FLD_DESCR = 83
ACTCMD EDITITEM FLD_DESCG = 0
ACTCMD EDITITEM FLD_DESCB = 0
SysMsg "您花费了<2000>积分.还剩余 <$USERJF> 积分!"
#SAY
_您的武器已经冶炼完毕！请{FCOLOR/10}试刀{FCOLOR/12}吧！\
_您花费{FCOLOR/10}2000{FCOLOR/12}点积分，剩余{FCOLOR/10}<$USERJF>{FCOLOR/12}点积分\
_怎么样，我的技术还不错吧~欢迎下次光临\\
__<返 回/@积分升刀主界面>\

#elsesay
对不起,您只有 {FCOLOR/1}<$USERJF>{FCOLOR/12} 点积分,不足够使用该功能.\\
__<返 回/@积分升刀主界面>\

[@StartPromote1]
#ACT
mov D0 %ARG(1)

#IF
checkcmd CHECKUSERJF 2000
checkcmd CHECKITEMINFO 1
#ACT
ACTCMD SETUSERJF - 2000 积分升刀
ACTCMD EDITITEM FLD_DESC0 + 17
ACTCMD EDITITEM FLD_DESCR = 83
ACTCMD EDITITEM FLD_DESCG = 0
ACTCMD EDITITEM FLD_DESCB = 0
SysMsg "您花费了<2000>积分.还剩余 <$USERJF> 积分!"
#SAY
_您的武器已经冶炼完毕！请{FCOLOR/10}试刀{FCOLOR/12}吧！\
_您花费{FCOLOR/10}500{FCOLOR/12}点积分，剩余{FCOLOR/10}<$USERJF>{FCOLOR/12}点积分\
_怎么样，我的技术还不错吧~欢迎下次光临\\
__<返 回/@积分升刀主界面>\

#elsesay
对不起,您只有 {FCOLOR/1}<$USERJF>{FCOLOR/12} 点积分,不足够使用该功能.\\
_<返 回/@积分到MAX>\

[@StartPromote2]
#ACT
mov D0 %ARG(1)

#IF
checkcmd CHECKUSERJF 2000
checkcmd CHECKITEMINFO 1
#ACT
ACTCMD SETUSERJF - 2000 积分升刀
ACTCMD EDITITEM FLD_DESC1 + 17
ACTCMD EDITITEM FLD_DESCR = 83
ACTCMD EDITITEM FLD_DESCG = 0
ACTCMD EDITITEM FLD_DESCB = 0
SysMsg "您花费了<2000>积分.还剩余 <$USERJF> 积分!"
#SAY
_您的武器已经冶炼完毕！请{FCOLOR/10}试刀{FCOLOR/12}吧！\
_您

花费{FCOLOR/10}2000{FCOLOR/12}点积分，剩余{FCOLOR/10}<$USERJF>{FCOLOR/12}点积分\
_怎么样，我的技术还不错吧~欢迎下次光临\\
_<返 回/@积分升刀主界面>\

#elsesay
对不起,您只有 {FCOLOR/1}<$USERJF>{FCOLOR/12} 点积分,不足够使用该功能.\\
_<返 回/@积分升刀主界面>\
}
这是脚本，在D:\Mud3\Envir\QuestDiary\上古科技\积分系统 找到“积分系统主菜单"这个文件，打开。
在里面添加”『<积分升刀/@积分升刀>』“，在往下，添加”[@积分升刀]
#CALL [上古科技\积分系统\积分升刀.txt] @积分升刀主界面“。保存，关闭。ok
附带说下这个升武器脚本只能升到18级。