传奇世界镇魔符积分活动脚本(6)

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\活动数据\积分排名.txt S0 3
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S13 %-2s%-25s%s 4|<$STR(S1)>|<$STR(S2)>

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\活动数据\积分排名.txt S0 4
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S14 %-2s%-25s%s 5|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#SAY
<color=green 累积镇魔积分总排名>\
<color=green 排名 角色名 镇魔积分 奖励>\
<$STR(S10)>\
<$STR(S11)>\
<$STR(S12)>\
<$STR(S13)>\
<$STR(S14)>\
<color=gray 第1页> <第2页/@viewAll2> <返回/@main>

[@viewAll2]
#IF
random 1
#ACT
mov S10
mov S11
mov S12
mov S13
mov S14

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\活动数据\积分排名.txt S0 5
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S10 %-2s%-25s%s 1|<$STR(S1)>|<$STR(S2)>

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\活动数据\积分排名.txt S0 6
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S11 %-2s%-25s%s 2|<$STR(S1)>|<$STR(S2)>

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\活动数据\积分排名.txt S0 7
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S12 %-2s%-25s%s 3|<$STR(S1)>|<$STR(S2)>

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\活动数据\积分排名.txt S0 8
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S13 %-2s%-25s%s 4|<$STR(S1)>|<$STR(S2)>

#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\活动数据\积分排名.txt S0 9
#IF
!equal S0
#ACT
GETVALIDSTR $STR(S0) | S1 S2
FORMATSTR S14 %-2s%-25s%s 5|<$STR(S1)>|<$STR(S2)>
#IF
random 1
#SAY
<color=green 累积镇魔积分总排名>\
<color=green 排名 角色名 镇魔积分 奖励>\
<$STR(S10)>\
<$STR(S11)>\
<$STR(S12)>\
<$STR(S13)>\
<$STR(S14)>\
<第1页/@viewAll> <color=gray 第2页> <返回/@main>

AutoRunRobot.txt文件下任意行添加
#AutoRun NPC RUNONDAY 12:00 @清理临时数据

RobotManage.txt下添加
[@清理临时数据]
#IF
LARGE G88 0
#ACT
DEC G88 1
FileCopy ..\QuestDiary\活动数据\今日积分.txt ..\QuestDiary\活动数据\昨日积分.txt
CLEARNAMELIST ..\QuestDiary\活动数据\今日积分.txt
晚上是休息时间不上游戏，所以我将其清理的数据改为了中午12点。

复制以上，在D:\WolServer\Mir200\Envir\Market_def目录下新建个文本命名：活动-0.txt。
然后在中州任意地方打上GM命令：@mobnpc 镇魔仙子 活动 214 0         刷新@npc就OK