佩戴血月虎王盾杀怪增加虎王经验的脚本

此脚本需佩戴血月虎王盾才触发 触发条件自行设置

[@杀怪触发]

GOTO @虎王相关


[@虎王相关]
#IF
POS $SOULBEAD 血月虎王盾
#ACT
MOV D45 $PARAM(0)
#ELSEACT
break
#IF
!CheckSlaveName 啸天虎
!CheckSlaveName 啸天虎王
#ACT
;未释放出战兽虎王将不触发脚本
break
#IF
SMALL D45 20
#ACT
;杀怪经验不足20将不触发脚本
break
#ELSEACT
MOV D46 $TIGER.LEVEL
DIV D45 20
TigerExp + $STR(D45)
SENDMSG 5 在血月虎王盾的作用下，本次杀怪为您的战兽虎王增加了<$STR(D45)>经验的修为。

#IF
LARGE $TIGER.LEVEL $STR(D46)
SMALL $TIGER.EXP $TIGER.MAXEXP
#ACT
MOV D50 0
GOTO @虎王排行
break

[@虎王排行]
#IF
PosInList $USERNAME ..\QuestDiary\游戏数据\各种排行\战兽虎王.txt S0
#ACT
DELVARLIST $STR(S0) ..\QuestDiary\游戏数据\各种排行\战兽虎王.txt

#IF
LARGE D50 999
#ACT
break

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\游戏数据\各种排行\战兽虎王.txt S0 $STR(D50)
MOV P1 0

#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S0 P1

#IF
LARGE $TIGER.LEVEL $STR(P1)
#ACT
FORMATSTR S0 %s|%s <$USERNAME>|<$TIGER.LEVEL>
INSERTVARLIST $STR(D50) $STR(S0) ..\QuestDiary\游戏数据\各种排行\战兽虎王.txt
#ELSEACT
INC D50 1
goto @虎王排行

其余脚本自行完善  以上脚本未经测试 请自行测试