腾飞论坛 发表于 2012-9-18 16:51:57

传奇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 @武馆积分排行
;将检测行数增加并重新检测
}

论坛一条龙

说个毛线 发表于 2014-3-2 12:52:37

这么版块的帖子越来越有深度了！

风少爷 发表于 2014-3-2 12:02:59

顶顶更健康！

小七子 发表于 2014-3-2 12:39:28

青春不在了，青春痘还在！

问天 发表于 2014-3-2 12:04:14

最近压力山大啊！

孙宇宙 发表于 2014-3-2 12:19:19

看帖回帖一条路！

感动的小强儿 发表于 2014-6-1 11:32:42

我裤子脱了，纸都准备好了，你就给我看这个？

狂人 发表于 2014-6-1 11:30:27

好东西，赞一个！

刘彤 发表于 2014-6-1 11:20:16

楼主给脑残下了定义！

木唯尘 发表于 2014-6-1 11:15:52

楼上的心情不错啊！
页: [1] 2
查看完整版本: 传奇AFT引擎特色武器积分排行NPC功能脚本