找回密码
 立即注册

[其他] 传奇世界2真魂珠设置方法与技巧案例

[复制链接]
antyvfl 发表于 2022-10-9 00:45:33 | 显示全部楼层 |阅读模式
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
}

jinxun 发表于 2022-10-9 04:51:10 | 显示全部楼层
激动人心,无法言表!
回复

使用道具 举报

ningking 发表于 2022-10-9 19:01:01 | 显示全部楼层
真是被感动的痛哭流涕……
回复

使用道具 举报

roach_work 发表于 2022-10-11 11:35:39 | 显示全部楼层
真是被感动的痛哭流涕……
回复

使用道具 举报

gmgmlj 发表于 2022-10-11 15:38:45 | 显示全部楼层
激动人心,无法言表!
回复

使用道具 举报

jz641268 发表于 2022-10-14 16:13:48 | 显示全部楼层
无回帖,不论坛,这才是人道。
回复

使用道具 举报

lujie701 发表于 2022-10-15 13:01:17 | 显示全部楼层
真是被感动的痛哭流涕……
回复

使用道具 举报

lengweijun 发表于 2022-10-16 01:10:37 | 显示全部楼层
我只是路过打酱油的。
回复

使用道具 举报

meidou. 发表于 2022-10-16 08:57:01 | 显示全部楼层
真是被感动的痛哭流涕……
回复

使用道具 举报

1092427021 发表于 2022-10-22 13:39:52 | 显示全部楼层
真是被感动的痛哭流涕……
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|游戏淘宝湾

GMT+8, 2024-11-21 19:53 , Processed in 0.070325 second(s), 54 queries .

Powered by Discuz! X3.5

Copyright © 2001-2024, Oddpp Cloud.

快速回复 返回顶部 返回列表