武器直升脚本 -传奇3私服发布网 www.8ncc.com 每日更新最新新开传奇3私服

;;=============QQ:85053178==============
[@武器MAX]
{
#ACT
Loadvalue D7 "QuestDiary\资料库\参数控制\积分系统控制.txt" 参数控制武器MAX
#IF
checklevel 30
#SAY
啊翔那个老头是不是很不讲人情？那找我吧！\
{FCOLOR/10}我的祖传秘方让“对你的武器没有一点影响”远离你！{FCOLOR/12}\
能让你的武器一下子升到MAX，每级需要{FCOLOR/1} <$OUTPUT(D7)> {FCOLOR/12}点积分\
{FCOLOR/10}只能直接跳到MAX,不能停留在中间的级数上.每一级都是必定成功的,但是只能升一种属性{FCOLOR/12}\
\
{FCOLOR/15}提示:{FCOLOR/12}{FCOLOR/10}能保留原来武器的极品属性.{FCOLOR/12}\\
<[开始积分升刀]/@getmax6>\
<[ 返回 ]/@积分列表>\\
#elsesay
MAX快速直升需要 {FCOLOR/10}30级 {FCOLOR/12}才能使用\

[@getmax6]
#IF
checkweaponlevel 1
#SAY
{FCOLOR/15}提示:{FCOLOR/10}{FCOLOR/12}现在武器必升无须切换小号操作了,直接用大号操作.请将未试刀的武器拿于手上{FCOLOR/12}\
武器每级需要收取 {FCOLOR/10}<$OUTPUT(D7)>{FCOLOR/12} 点积分!你必须按照我的说明进行!\
{FCOLOR/10}<$username>{FCOLOR/12}玩家当前拥有{FCOLOR/10}<$NewJFPoint>{FCOLOR/12}点积分!\
{FCOLOR/1}请选择你要升级的类型:千万不要乱选!否则武器会消失!{FCOLOR/12}\\
<[冶炼(火)]/@进行升级(1)> <[冶炼(冰)]/@进行升级(2)>\
<[冶炼(雷)]/@进行升级(3)> <[冶炼(风)]/@进行升级(4)>\
<[冶炼(神圣)]/@进行升级(5)> <[冶炼(暗黑)]/@进行升级(6)>\
<[冶炼(幻影)]/@进行升级(7)> <[冶炼魔法攻击]/@进行_2(1)>\
<[冶炼(破坏)]/@进行_2(0)>\\
<[ 返回 ]/@积分列表>
#ELSESAY
你身上没有佩带武器，无法给你2次冶炼\
<[ 返回 ]/@积分列表>

[@进行升级()]
#ACT
MOV D5 %ARG(1)
#IF
checkweaponlevel 16
#SAY
你武器已经满级,无需再升级...\
#ACT
BREAK
#IF
checkweaponlevel 15
#act
mov D8 1
GOTO @goup_1
break
#IF
checkweaponlevel 14
#act
mov D8 2
GOTO @goup_1
break
#IF
checkweaponlevel 13
#act
mov D8 3
GOTO @goup_1
break
#IF
checkweaponlevel 12
#act
mov D8 4
GOTO @goup_1
break
#IF
checkweaponlevel 11
#act
mov D8 5
GOTO @goup_1
break
#IF
checkweaponlevel 10
#act
mov D8 6
GOTO @goup_1
break
#IF
checkweaponlevel 9
#act
mov D8 7
GOTO @goup_1
break
#IF
checkweaponlevel 8
#act
mov D8 8
GOTO @goup_1
break
#IF
checkweaponlevel 7
#act
mov D8 9
GOTO @goup_1
break
#IF
checkweaponlevel 6
#act
mov D8 10
GOTO @goup_1
break
#IF
checkweaponlevel 5
#act
mov D8 11
GOTO @goup_1
break
#IF
checkweaponlevel 4
#act
mov D8 12
GOTO @goup_1
break
#IF
checkweaponlevel 3
#act
mov D8 13
GOTO @goup_1
break
#IF
checkweaponlevel 2
#act
mov D8 14
GOTO @goup_1
break
#IF
checkweaponlevel 1
#act
mov D8 15
GOTO @goup_1
break
#ELSESAY
对不起,你没有携带武器.升级无法进行\

[@goup_1]
#ACT
MOV P1 %D8
MOV P2 %D7
MUL P1 P2
MOV D6 %P9
#IF
CheckUnit CHECKJF %D6
#ACT
SetUnit SETJF - %D6
SetUnit SETITEMAMULET 1 14 76 1
SetUnit SETITEMAMULET 1 11 %D5 1
SetUnit ADDITEMAMULET 1 12 %D8
#say
您的武器{FCOLOR/10}升级成功{FCOLOR/12}.请取下就可看到.\\
<[返回上一层]/@main>\
<[关闭]/@exit>\
#ELSESAY
对不起,你的积分不足,无法进行升刀.\

[@进行_2()]
#ACT
MOV D5 %ARG(1)
#IF
checkweaponlevel 16
#SAY
你武器已经满级,无需再升级...\
#ACT
BREAK
#IF
checkweaponlevel 15
#act
mov D8 1
GOTO @goup_2
break
#IF
checkweaponlevel 14
#act
mov D8 2
GOTO @goup_2
break
#IF
checkweaponlevel 13
#act
mov D8 3
GOTO @goup_2
break
#IF
checkweaponlevel 12
#act
mov D8 4
GOTO @goup_2
break
#IF
checkweaponlevel 11
#act
mov D8 5
GOTO @goup_2
break
#IF
checkweaponlevel 10
#act
mov D8 6
GOTO @goup_2
break
#IF
checkweaponlevel 9
#act
mov D8 7
GOTO @goup_2
break
#IF
checkweaponlevel 8
#act
mov D8 8
GOTO @goup_2
break
#IF
checkweaponlevel 7
#act
mov D8 9
GOTO @goup_2
break
#IF
checkweaponlevel 6
#act
mov D8 10
GOTO @goup_2
break
#IF
checkweaponlevel 5
#act
mov D8 11
GOTO @goup_2
break
#IF
checkweaponlevel 4
#act
mov D8 12
GOTO @goup_2
break
#IF
checkweaponlevel 3
#act
mov D8 13
GOTO @goup_2
break
#IF
checkweaponlevel 2
#act
mov D8 14
GOTO @goup_2
break
#IF
checkweaponlevel 1
#act
mov D8 15
GOTO @goup_2
break
#ELSESAY
对不起,你没有携带武器.升级无法进行\

[@goup_2]
#ACT
MOV P1 %D8
MOV P2 %D7
MUL P1 P2
MOV D6 %P9
#IF
CheckUnit CHECKJF %D6
#ACT
SetUnit SETJF - %D6
SetUnit SETITEMAMULET 1 14 76 1
SetUnit ADDITEMAMULET 1 %D5 %D8
#say
您的武器{FCOLOR/10}升级成功{FCOLOR/12}.请取下就可看到.\\
<[返回上一层]/@main>\
<[关闭]/@exit>\
#ELSESAY
对不起,你的积分不足,无法升刀.\

}
;;=============QQ:85053178==============