AFT引擎特色武器积分排行NPC功能脚本

[@武馆积分排行]
{
#IF
PosEx $USERNAME .QuestDiary数据文件各种排行武馆积分排行.txt S0
;检测玩家名字是否在里面
#ACT
DELVARLIST $STR(S0) ..QuestDiary数据文件各种排行武馆积分排行.txt
;在的话将他的信息删除

#IF
LARGE P0 50
;检测到多少行后中断操作
#ACT
break

#IF
random 1
#ACT
ReadRandomStr ..QuestDiary数据文件各种排行武馆积分排行.txt S0 $STR(P0)
;读出P0行中玩家信息保存到S0变量
MOV P1

#IF
!equal S0 无
#ACT
GETVALIDSTR $STR(S0) | S1 S2
GETVALIDSTR $STR(S2) | S3 S4
GETVALIDSTR $STR(S4) | P1 S5
;将S0变量，也就是P0行的玩家信息进行分解

#IF
CHECKVAR HUMAN 武馆 > $STR(P1)
;当前玩家的变量是否大于分解出来P1参数
#ACT
FORMATSTR S0 %s|%s|%s|%s <$USERNAME>|<$JOB>|<$HUMAN(武馆)>|<$HUMAN(封03)>
INSERTVARLIST $STR(P0) $STR(S0) .QuestDiary数据文件各种排行武馆积分排行.txt
;将玩家的相关信息添加到P0行中
#ELSEACT
inc P0 1
goto @武馆积分排行
;将检测行数增加并重新检测
}