传奇3私服几率升装备属性脚本

［@upallitems］
{
#say
我能为您提升装备的属性。您有2种选择!\
{FCOLOR/10}
高级升级模式的成功概率更高,需求为:\
1个装备炼制石,5点积分,10个封魔石,100万金币!\
普通升级模式的成功率比较低，需求为:\
1个装备炼制石,200万金币!\
需要升级的物品请戴在身上!\
{FCOLOR/12}
<高级升级模式
<普通升级模式> dedecms.com

;;---------------------------------普通升级模式
［@ready1］
#if
checkitem 装备炼制石 1
checkgold 2000000
#say
{FCOLOR/10}
请注意,物品的等级越高,成功的几率就越低!\
如果升级失败的话,您的物品将会恢复到未升级的状态!\
{FCOLOR/12}
选出你要升级的装备吧\
<衣服)> \
<头盔)> \
<项链)> \
<左手镯)> <右手镯)> \
<左戒指)> <右戒指)> \
#elsesay
对不起,升级所需要的材料您还缺一些,请确认您的材料够多再来升级吧!\
<离开>

［@upJERELRYPY()］
#act
mov D0 %ARG(1)

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 6
#say
非常抱歉,您的装备已经到了顶级了,现在不能再升了\
我们会逐步开放其他的升级项目,等我们开放了您再来升级吧!\
<离开>
#act
break

#IF
checkcmd CHECKUPLVLTYPE %D0 AC                   ;允许升级类型
#say
您的这件物品只能升级防御,您确认要升级吗?\
<升级防御                             ;带着升级类型参数跳转
<离开>
#act
break dedecms.com

#IF
checkcmd CHECKUPLVLTYPE %D0 MAC
#say
您的这件物品只能升级魔法防御,您确认要升级吗?\
<升级魔法防御                             ;带着升级类型参数跳转
<离开>
#act
break

dedecms.com

#IF
checkcmd CHECKUPLVLTYPE %D0 DC
#say
您的这件物品只能升级破坏,您确认要升级吗?\
<升级破坏                             ;带着升级类型参数跳转
<离开>
#act
break

#IF
checkcmd CHECKUPLVLTYPE %D0 MC
#say
您的这件物品只能升级自然系或者灵魂系魔法\
具体加的属性根据您的首饰的本来的属性判断!\
您确认要升级吗?\
<升级全系列魔法                             ;带着升级类型参数跳转
<离开>
#act
break

#if
#say
对不起，您选择的物品暂时还没有开放升级功能!\
<离开>

［@lvlPY()］                 ;设定物品升级成功率
#ACT
mov D1 %ARG(1)
MOVR D3 100

#if
checkitem 装备炼制石 1
checkgold 2000000
large D3 20
#act
take 装备炼制石 1
take 金币 2000000
HLSCRIPTCMD CLEARJERELRYAMULET %D0
#say
很遗憾，您的这次装备升级失败了，您的装备被还原了...\
<离开
#elseact
take 装备炼制石 1
take 金币 2000000
HLSCRIPTCMD addITEMAMULET %D0 10 1 
HLSCRIPTCMD addITEMAMULET %D0 %D1 1 
#elsesay
祝贺您,您这次装备升级成功了!取下装备就可以看到您的成果了!\
<离开
;;-------------------------------------高级升级模式
［@ready］
#if
checkitem 装备炼制石 1
checkitem 封魔石  10
HLSCRIPTCMD CHECKPOINT 5  
checkgold 1000000
#say
你真的很厉害嘛。这么苛刻的要求都搞定了^_^\
{FCOLOR/10}
请注意,物品的等级越高,成功的几率就越低!\
如果升级失败的话,您的物品将会恢复到未升级的状态!\
{FCOLOR/12}
选出你要升级的装备吧\\
<衣服)> \

［@upJERELRY()］
#act
mov D0 %ARG(1) dedecms.com

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 6
#say
非常抱歉,您的装备已经到了顶级了,现在不能再升了\
我们会逐步开放其他的升级项目,等我们开放了您再来升级吧!\
<离开>
#act
break

#IF
checkcmd CHECKUPLVLTYPE %D0 AC                   ;允许升级类型
#say
您的这件物品只能升级防御,您确认要升级吗?\
<升级防御                             ;带着升级类型参数跳转
<离开>
#act
break

#IF
checkcmd CHECKUPLVLTYPE %D0 MAC
#say
您的这件物品只能升级魔法防御,您确认要升级吗?\
<升级魔法防御                             ;带着升级类型参数跳转
<离开>
#act
break

#IF
checkcmd CHECKUPLVLTYPE %D0 DC
#say
您的这件物品只能升级破坏,您确认要升级吗?\
<升级破坏                             ;带着升级类型参数跳转
<离开>
#act
break

#IF
checkcmd CHECKUPLVLTYPE %D0 MC
#say
您的这件物品只能升级自然系或者灵魂系魔法\
具体加的属性根据您的首饰的本来的属性判断!\
您确认要升级吗?\
<升级全系列魔法                             ;带着升级类型参数跳转
<离开>
#act
break dedecms.com

#if
#say
对不起，您选择的物品暂时还没有开放升级功能!\
<离开>

［@lvl()］                 ;设定物品升级成功率
#ACT
mov D1 %ARG(1)
MOVR D3 100

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 5
#ACT
MOV D2 35
goto @upItem
break dedecms.com

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 4
#ACT
MOV D2 40
goto @upItem
break

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 3
#ACT
MOV D2 50
goto @upItem
break

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 2
#ACT
MOV D2 60
goto @upItem
break

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 1
#ACT
MOV D2 70
goto @upItem
break dedecms.com

#IF
!HLSCRIPTCMD CHECKITEMPRO %D0 10 0
#ACT
MOV D2 80
goto @upItem
break

［@upItem］

#if
checkitem 装备炼制石 1
checkitem 封魔石  10
HLSCRIPTCMD CHECKPOINT 5  
checkgold 1000000
large D3 %D2
#act
take 装备炼制石 1
take 封魔石  10
HLSCRIPTCMD SETPOINT - 5  升首饰
take 金币 1000000
HLSCRIPTCMD CLEARJERELRYAMULET %D0
#say
很遗憾，您的这次装备升级失败了，您的装备被还原了...\
<离开
#elseact
take 装备炼制石 1
take 封魔石  10
HLSCRIPTCMD SETPOINT - 5  升首饰
take 金币 1000000
HLSCRIPTCMD addITEMAMULET %D0 10 1 
HLSCRIPTCMD addITEMAMULET %D0 %D1 1 
#elsesay
祝贺您,您这次装备升级成功了!取下装备就可以看到您的成果了!\
<离开

dedecms.com