定制仙兽排行榜第一获得骑战速度+1功能

一甡噯YAN

	仙兽排行第一骑战速度+1，排行下降骑战速度恢复正常

﹑kk.

	//QF处添加 [@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] @灵兽属性

花落知大小

	激动人心，无法言表！

liujunpk

	看到这帖子真是高兴！

nba2016

	真是难得给力的帖子啊。

54aojian

	强烈支持楼主ing……

a26655363

	确定这个脚本是完整的？

56647193

	支持啊 看看如何啊

一甡噯YAN

	﹑kk. 发表于 2017-7-26 11:39 //QF处添加 [@ReleasePet] #IF 请问这个是如何获取到仙兽排行榜第一名的?还是自己写一个灵兽排行,然后获取第一名?

dianmeng999

	我只是路过打酱油的。