0:品级 P1:修炼值 P2:升级所需修炼值 P4:配合设定升级所需修炼值 P5:设置魂珠吸收经验倍数(与引擎经验倍率一致,目前300倍)
[@魂珠升级]
{
#IF
CHECKUSEITEM 14
#ACT
goto @升级hz
[@升级hz]
#IF
random 1
#ACT
MOV P0 $ITEMINFO[$USEITEMMAKEINDEX(14)].value(12)
MOV P1 $ITEMINFO[$USEITEMMAKEINDEX(14)].ITEMEXT(72)
#IF
LARGE P0 9
#ACT
;SENDMSG 5 当前魂珠已经达到最高品级10级了,不能进行升级了!
break
#IF
EQUAL P0 0
#ACT
UPGRADEUSERITEM 14 12 = 1
UPGRADEUSERITEM 14 15 = 1
#IF
EQUAL $SOULBEAD 仙魂珠
#ACT
MOV P4 2000
#IF
EQUAL $SOULBEAD 真魂珠
#ACT
MOV P4 1000
#IF
SMALL P0 2
#ACT
MOV P2 1000
#IF
LARGE P0 1
#ACT
MOV P2 1000
#IF
LARGE P0 2
#ACT
MOV P2 2000
#IF
LARGE P0 3
#ACT
MOV P2 3000
#IF
LARGE P0 4
#ACT
MOV P2 5000
#IF
LARGE P0 5
#ACT
MOV P2 10000
#IF
LARGE P0 6
#ACT
MOV P2 20000
#IF
LARGE P0 7
#ACT
MOV P2 30000
#IF
LARGE P0 8
#ACT
MOV P2 40000
#IF
LARGE P0 9
#ACT
MOV P2 50000
#IF
random 1
#ACT
MULT P2 $STR(P4)
#IF
SMALL P1 $STR(P2)
#ACT
MOV P5 $PARAM(0)
MULT P5 $STR(0)
UPGRADEUSERITEM 14 72 + $STR(P5)
#elseact
UPGRADEUSERITEM 14 12 + 1
UPGRADEUSERITEM 14 72 = 0
goto @属性hz
[@属性hz]
#IF
EQUAL $SOULBEAD 仙魂珠
#act
goto @仙魂珠
#IF
EQUAL $SOULBEAD 真魂珠
#act
goto @真魂珠
break
[@仙魂珠]
#IF
random 1
#ACT
MOV P0 $ITEMINFO[$USEITEMMAKEINDEX(14)].VALUE(12)
#IF
EQUAL P0 1
#ACT
UPGRADEUSERITEM 14 0 = 2
UPGRADEUSERITEM 14 1 = 2
UPGRADEUSERITEM 14 2 = 2
UPGRADEUSERITEM 14 3 = 2
UPGRADEUSERITEM 14 4 = 3
UPGRADEUSERITEM 14 5 = 3
UPGRADEUSERITEM 14 15 = 20
Break
#IF
EQUAL P0 2
#ACT
UPGRADEUSERITEM 14 0 = 3
UPGRADEUSERITEM 14 1 = 3
UPGRADEUSERITEM 14 2 = 3
UPGRADEUSERITEM 14 3 = 3
UPGRADEUSERITEM 14 4 = 4
UPGRADEUSERITEM 14 5 = 4
UPGRADEUSERITEM 14 15 = 30
Break
#IF
EQUAL P0 3
#ACT
UPGRADEUSERITEM 14 0 = 4
UPGRADEUSERITEM 14 1 = 4
UPGRADEUSERITEM 14 2 = 4
UPGRADEUSERITEM 14 3 = 4
UPGRADEUSERITEM 14 4 = 5
UPGRADEUSERITEM 14 5 = 5
UPGRADEUSERITEM 14 15 = 50
Break
#IF
EQUAL P0 4
#ACT
UPGRADEUSERITEM 14 0 = 5
UPGRADEUSERITEM 14 1 = 5
UPGRADEUSERITEM 14 2 = 5
UPGRADEUSERITEM 14 3 = 5
UPGRADEUSERITEM 14 4 = 6
UPGRADEUSERITEM 14 5 = 6
UPGRADEUSERITEM 14 15 = 70
Break
#IF
EQUAL P0 5
#ACT
UPGRADEUSERITEM 14 0 = 6
UPGRADEUSERITEM 14 1 = 6
UPGRADEUSERITEM 14 2 = 6
UPGRADEUSERITEM 14 3 = 6
UPGRADEUSERITEM 14 4 = 7
UPGRADEUSERITEM 14 5 = 7
UPGRADEUSERITEM 14 15 = 100
Break
#IF
EQUAL P0 6
#ACT
UPGRADEUSERITEM 14 0 = 7
UPGRADEUSERITEM 14 1 = 7
UPGRADEUSERITEM 14 2 = 7
UPGRADEUSERITEM 14 3 = 7
UPGRADEUSERITEM 14 4 = 8
UPGRADEUSERITEM 14 5 = 8
UPGRADEUSERITEM 14 15 = 120
Break
#IF
EQUAL P0 7
#ACT
UPGRADEUSERITEM 14 0 = 8
UPGRADEUSERITEM 14 1 = 8
UPGRADEUSERITEM 14 2 = 8
UPGRADEUSERITEM 14 3 = 8
UPGRADEUSERITEM 14 4 = 9
UPGRADEUSERITEM 14 5 = 9
UPGRADEUSERITEM 14 15 = 150
Break
#IF
EQUAL P0 8
#ACT
UPGRADEUSERITEM 14 0 = 9
UPGRADEUSERITEM 14 1 = 9
UPGRADEUSERITEM 14 2 = 9
UPGRADEUSERITEM 14 3 = 9
UPGRADEUSERITEM 14 4 = 10
UPGRADEUSERITEM 14 5 = 10
UPGRADEUSERITEM 14 15 = 165
Break
#IF
EQUAL P0 9
#ACT
UPGRADEUSERITEM 14 0 = 10
UPGRADEUSERITEM 14 1 = 10
UPGRADEUSERITEM 14 2 = 10
UPGRADEUSERITEM 14 3 = 10
UPGRADEUSERITEM 14 4 = 11
UPGRADEUSERITEM 14 5 = 11
UPGRADEUSERITEM 14 15 = 180
#IF
EQUAL P0 10
#ACT
UPGRADEUSERITEM 14 0 = 12
UPGRADEUSERITEM 14 1 = 12
UPGRADEUSERITEM 14 2 = 12
UPGRADEUSERITEM 14 3 = 12
UPGRADEUSERITEM 14 4 = 13
UPGRADEUSERITEM 14 5 = 13
UPGRADEUSERITEM 14 15 = 200
Break
[@真魂珠]
#IF
random 1
#ACT
MOV P0 $ITEMINFO[$USEITEMMAKEINDEX(14)].VALUE(12)
#IF
EQUAL P0 1
#ACT
UPGRADEUSERITEM 14 0 = 1
UPGRADEUSERITEM 14 1 = 1
UPGRADEUSERITEM 14 2 = 1
UPGRADEUSERITEM 14 3 = 1
UPGRADEUSERITEM 14 4 = 1
UPGRADEUSERITEM 14 5 = 1
UPGRADEUSERITEM 14 15 = 5
Break
#IF
EQUAL P0 2
#ACT
UPGRADEUSERITEM 14 0 = 2
UPGRADEUSERITEM 14 1 = 2
UPGRADEUSERITEM 14 2 = 2
UPGRADEUSERITEM 14 3 = 2
UPGRADEUSERITEM 14 4 = 1
UPGRADEUSERITEM 14 5 = 1
UPGRADEUSERITEM 14 15 = 10
Break
#IF
EQUAL P0 3
#ACT
UPGRADEUSERITEM 14 0 = 2
UPGRADEUSERITEM 14 1 = 2
UPGRADEUSERITEM 14 2 = 2
UPGRADEUSERITEM 14 3 = 2
UPGRADEUSERITEM 14 4 = 2
UPGRADEUSERITEM 14 5 = 2
UPGRADEUSERITEM 14 15 = 15
Break
#IF
EQUAL P0 4
#ACT
UPGRADEUSERITEM 14 0 = 4
UPGRADEUSERITEM 14 1 = 4
UPGRADEUSERITEM 14 2 = 4
UPGRADEUSERITEM 14 3 = 4
UPGRADEUSERITEM 14 4 = 2
UPGRADEUSERITEM 14 5 = 2
UPGRADEUSERITEM 14 15 = 25
Break
#IF
EQUAL P0 5
#ACT
UPGRADEUSERITEM 14 0 = 5
UPGRADEUSERITEM 14 1 = 5
UPGRADEUSERITEM 14 2 = 5
UPGRADEUSERITEM 14 3 = 5
UPGRADEUSERITEM 14 4 = 4
UPGRADEUSERITEM 14 5 = 4
UPGRADEUSERITEM 14 15 = 35
Break
#IF
EQUAL P0 6
#ACT
UPGRADEUSERITEM 14 0 = 6
UPGRADEUSERITEM 14 1 = 6
UPGRADEUSERITEM 14 2 = 6
UPGRADEUSERITEM 14 3 = 6
UPGRADEUSERITEM 14 4 = 4
UPGRADEUSERITEM 14 5 = 4
UPGRADEUSERITEM 14 15 = 45
Break
#IF
EQUAL P0 7
#ACT
UPGRADEUSERITEM 14 0 = 7
UPGRADEUSERITEM 14 1 = 7
UPGRADEUSERITEM 14 2 = 7
UPGRADEUSERITEM 14 3 = 7
UPGRADEUSERITEM 14 4 = 5
UPGRADEUSERITEM 14 5 = 5
UPGRADEUSERITEM 14 15 = 55
Break
#IF
EQUAL P0 8
#ACT
UPGRADEUSERITEM 14 0 = 7
UPGRADEUSERITEM 14 1 = 7
UPGRADEUSERITEM 14 2 = 7
UPGRADEUSERITEM 14 3 = 7
UPGRADEUSERITEM 14 4 = 5
UPGRADEUSERITEM 14 5 = 5
UPGRADEUSERITEM 14 15 = 65
Break
#IF
EQUAL P0 9
#ACT
UPGRADEUSERITEM 14 0 = 8
UPGRADEUSERITEM 14 1 = 8
UPGRADEUSERITEM 14 2 = 8
UPGRADEUSERITEM 14 3 = 8
UPGRADEUSERITEM 14 4 = 5
UPGRADEUSERITEM 14 5 = 5
UPGRADEUSERITEM 14 15 = 85
#IF
EQUAL P0 10
#ACT
UPGRADEUSERITEM 14 0 = 9
UPGRADEUSERITEM 14 1 = 9
UPGRADEUSERITEM 14 2 = 9
UPGRADEUSERITEM 14 3 = 9
UPGRADEUSERITEM 14 4 = 6
UPGRADEUSERITEM 14 5 = 6
UPGRADEUSERITEM 14 15 = 100
Break
}
|
|