[@ReleasePet]
#IF
EQUAL $ITEMINFO[$PET.MAKEINDEX].VALUE(9) 0
#ACT
MOV D20 0
#IF
EQUAL $ITEMINFO[$PET.MAKEINDEX].VALUE(9) 1
#ACT
MOV D20 7
#IF
EQUAL $ITEMINFO[$PET.MAKEINDEX].VALUE(9) 2
#ACT
MOV D20 14
#IF
EQUAL $PET.NAME
#ACT
MOV S50
#ELSEACT
MOV S50 $PET.NAME
#IF
TRUE
#ACT
MOV D60 $ITEMINFO[$PET.MAKEINDEX].VALUE(9)
MOV D61 0
MOV D62 20
MOV D63 $PET.LEVEL
MOV D64 $PET.EXP
MOV S66 =
MOV S60 升序(强化)
MOV S61 ..\QuestDiary\无限排名\灵兽排名.txt
FormatStr S62 GAMEOFWOL=%s=%s=%s=%s=%s=%s <$USERNAME>|<$STR(D60)>|<$PET.MAKEINDEX>|<$STR(D63)>|<$PET.EXP>|<$STR(S50)>
#CALL [\游戏功能\排名运算.txt] @StartRank
ReadRandomStr $STR(S61) S65 0
Split $STR(S65) = S70
SETPETATTRIBUTE $PET.MAKEINDEX 27 = 0
#IF
EQUAL $ITEMINFO[$PET.MAKEINDEX].NAME 虎魔石
#ACT
#CALL [\游戏功能\灵兽属性.txt] @灵兽属性
#IF
EQUAL S73 $PET.MAKEINDEX
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 27 = 1
SENDMSG 5 你当前的灵兽是排名第一的万兽至尊,获得特殊属性骑战速度+1
#IF
EQUAL $PET.LEVEL 300
#ACT
SETPETATTRIBUTE $PET.MAKEINDEX 27 = 1
SENDMSG 7 你当前的灵兽达到300级,所有属性已经达到极限!
SENDMSG 5 你当前的灵兽是排名第一的万兽至尊,获得特殊属性骑战速度+1
SENDMSG 0 恭喜<$USERNAME>的灵兽是当前灵兽至尊榜上排名第一的灵兽,获得特殊属性<骑战速度+1>
Break
//对应#CALL [\游戏功能\排名运算.txt] @StartRank
[@StartRank]
{
#IF
CheckVarList $STR(S62) $STR(S61)
#ACT
Break
#ELSEACT
Goto @MoveRank
Break
[@MoveRank]
#IF
SMALL D61 $STR(D62)
#ACT
#ELSEACT
Break
#IF
PosInList $STR(S62) $STR(S61) S64
#ACT
DELVARLIST $STR(S62) $STR(S61)
#IF
TRUE
#ACT
ReadRandomStr $STR(S61) S65 $STR(D61)
#IF
!EQUAL S65
#ACT
Split $STR(S65) $STR(S66) S80
#IF
EQUAL S65
#ACT
INSERTVARLIST $STR(D61) $STR(S62) $STR(S61)
Break
#IF
Pos $STR(S60) 降序
SMALL D60 $STR(S82)
#ACT
INSERTVARLIST $STR(D61) $STR(S62) $STR(S61)
Break
#IF
Pos $STR(S60) 升序
LARGE D60 $STR(S82)
#ACT
INSERTVARLIST $STR(D61) $STR(S62) $STR(S61)
Break
#IF
Pos $STR(S60) 降序(强化)
EQUAL D60 $STR(S82)
SMALL D63 $STR(S84)
#ACT
INSERTVARLIST $STR(D61) $STR(S62) $STR(S61)
Break
#IF
Pos $STR(S60) 升序(强化)
EQUAL D60 $STR(S82)
LARGE D63 $STR(S84)
#ACT
INSERTVARLIST $STR(D61) $STR(S62) $STR(S61)
Break
#IF
Pos $STR(S60) 降序(强化)
EQUAL D60 $STR(S82)
EQUAL D63 $STR(S84)
SMALL D64 $STR(S85)
#ACT
INSERTVARLIST $STR(D61) $STR(S62) $STR(S61)
Break
#IF
Pos $STR(S60) 升序(强化)
EQUAL D60 $STR(S82)
EQUAL D63 $STR(S84)
LARGE D64 $STR(S85)
#ACT
INSERTVARLIST $STR(D61) $STR(S62) $STR(S61)
Break
#ELSEACT
INC D61 1
Goto @MoveRank
Break
}
//对应\QuestDiary\无限排名\灵兽排名.txt
GAMEOFWOL=665656=3=180843801=2=0=
//这个自己设定去#CALL [\游戏功能\灵兽属性.txt] @灵兽属性
下载声明:
1、本站所有资源、仅供学习交流,不得商业运营资源,不确保资源完整性,图片和资源仅供参考, 不提供任何技术服务。
2、本站资源均有第三方用户自行上传分享推荐,非本站自制,仅供玩家做交流学习之用!切勿用于商业用途!游戏作品版权
归原作者享有,如有版权问题,请附带版权证明至邮件,本平台将应您的要求删除。举报邮箱 :859840003@qq.com
评论