求高手，帮忙增加一条自定义百分比鉴定属性··········

gagalq

自己捣鼓半天，还是不理想， 特来求助，，增加一条自定义百分比鉴定属性，是百分比·····

[@鉴定读取]

{

#IF
not checktextlist ..\questdiary\切割鉴定\允许鉴定列表.txt <$str(S$鉴定装备名称)>
#act
break
#IF
equal N$允许鉴定 0
#act
break

#IF
#act
MOV S$鉴定属性品质

#IF
Random 70
checktextlist ..\questdiary\切割鉴定\4完美列表.txt <$str(S$鉴定装备名称)>
#act
MOV S$鉴定属性品质 [完美]
MOV N$鉴定属性色号 249
MOVR N$鉴定属性数值 9000 11001


#IF
Random 60
equal S$鉴定属性品质
checktextlist ..\questdiary\切割鉴定\3罕见列表.txt <$str(S$鉴定装备名称)>
#act
MOV S$鉴定属性品质 [罕见]
MOV N$鉴定属性色号 70
MOVR N$鉴定属性数值 7000 9091


#IF
Random 30
equal S$鉴定属性品质
checktextlist ..\questdiary\切割鉴定\2稀有列表.txt <$str(S$鉴定装备名称)>
#act
MOV S$鉴定属性品质 [稀有]
MOV N$鉴定属性色号 254
MOVR N$鉴定属性数值 5000 7001


#IF
Random 5
Equal S$鉴定属性品质
checktextlist ..\questdiary\切割鉴定\1精品列表.txt <$str(S$鉴定装备名称)>
#act
MOV S$鉴定属性品质 [精品]
MOV N$鉴定属性色号 250
MOVR N$鉴定属性数值 3000 5001


#IF
Equal S$鉴定属性品质
#act
MOV S$鉴定属性品质 [良品]
MOV N$鉴定属性色号 242
MOVR N$鉴定属性数值 1000 3001


#IF
checktextlist ..\questdiary\切割鉴定\剑甲列表.txt <$str(S$鉴定装备名称)>
#act
MUL N$鉴定属性数值 2

#IF
#act
CHANGECUSTOMITEMTEXT <$str(N$鉴定装备位置)> <$str(S$鉴定属性品质)>
CHANGECUSTOMITEMTEXTCOLOR <$str(N$鉴定装备位置)> <$str(N$鉴定属性色号)>

CHANGECUSTOMITEMABIL <$str(N$鉴定装备位置)> 0 0 <$str(N$鉴定属性色号)>
CHANGECUSTOMITEMABIL <$str(N$鉴定装备位置)> 0 1 8
CHANGECUSTOMITEMABIL <$str(N$鉴定装备位置)> 0 2 0
CHANGECUSTOMITEMABIL <$str(N$鉴定装备位置)> 0 3 0
CHANGECUSTOMITEMVALUE <$str(N$鉴定装备位置)> 0 = <$str(N$鉴定属性数值)>
SENDUPGRADEITEM



}

我知道答案 回答被采纳将会获得1 荣誉 + 888 萝卜币 已有1人回答