antyvfl 发表于 2022-10-8 23:13:31

传世AFT引擎配套全服杀人排行榜脚本

;杀人触发字段，比如A杀死了B在中州，则A执行QF[@杀人触发]B执行QF[杀人触发]
[@杀人触发]
#IF
RANDOM 1
#ACT
MOV S0 $KILLHUMMAN;把B的名字给S0
INC S0 |   ;s0 字符后面加一个|
INC S0 $MAPNAME   ;地图名字给加到S0后面
INC S0 |
INC S0 $DATETIME    ;时间加到S0后面
;这是的S0 就是：A|中州|2011年4月22日9:08:39 的 格式
ADDVARLIST $STR(S0) ..QuestDiary数据文件各种排行杀人数据<$USERNAME>.txt   //加入制定文本，一个玩家一个
SENDMSG 0 人在江湖飘，哪能不挨刀！玩家{%S}在{<$MAPNAME>}瞬息间将对手{<$KILLHUMMAN>}置于死地
#IF
PosEx $USERNAME .QuestDiary数据文件各种排行杀人排行.txt S0    检测玩家是否有以前的杀人数据
#ACT
mov p10 0
GETVALIDSTR $STR(S0) | S0 P10    数据存在，把杀人的次数给P10
INC P10 1    P10 +1
MOV P0 0    P0 为0循环排行开始5uwl.net
GOTO @杀人排行
#ELSEACT
MOV P10 1    不存在杀人数值，首次杀人，P10 赋值1
MOV P0 0
GOTO @杀人排行

[@被杀触发]
#IF
CHECKLEVELEX > 0
#ACT
MOV S0 $PARAM(2)
INC S0 |
INC S0 $MAPNAME
INC S0 |
INC S0 $DATETIME
ADDVARLIST $STR(S0) ..QuestDiary数据文件各种排行被杀数据<$USERNAME>.txt
SENDMSG 6 你被<$PARAM(2)>杀害了！
#IF
PosEx $USERNAME .QuestDiary数据文件各种排行被杀排行.txt S0
#ACT
mov p10 0
GETVALIDSTR $STR(S0) | S0 P10
INC P10 1
MOV P0 0
GOTO @被杀排行
#ELSEACT
MOV P10 1
MOV P0 0
GOTO @被杀排行

[@杀人排行]
#IF
PosEx $USERNAME .QuestDiary数据文件各种排行杀人排行.txt S0
#ACT
DELVARLIST $STR(S0) ..QuestDiary数据文件各种排行杀人排行.txt
#IF
large P0 19
#ACT
break
#IF
random 1
#ACT
ReadRandomStr ..QuestDiary数据文件各种排行杀人排行.txt S0 $STR(P0)
MOV P1 0
#IF
!equal S0 无
#ACT
GETVALIDSTR $STR(S0) | S0 P1
#IF
LARGE P10 $STR(P1)
#ACT
FORMATSTR S0 %s|%s <$USERNAME>|<$STR(P10)>
INSERTVARLIST $STR(P0) $STR(S0) .QuestDiary数据文件各种排行杀人排行.txt
#ELSEACT
INC P0 1
GOTO @杀人排行

[@被杀排行]
#IF
PosEx $USERNAME .QuestDiary数据文件各种排行被杀排行.txt S0
#ACT
DELVARLIST $STR(S0) ..QuestDiary数据文件各种排行被杀排行.txt
#IF
large P0 19
#ACT
break
#IF
random 1
#ACT
ReadRandomStr ..QuestDiary数据文件各种排行被杀排行.txt S0 $STR(P0)
MOV P1 0
#IF
!equal S0 无
#ACT
GETVALIDSTR $STR(S0) | S0 P1
#IF
LARGE P10 $STR(P1)
#ACT
FORMATSTR S0 %s|%s <$USERNAME>|<$STR(P10)>
INSERTVARLIST $STR(P0) $STR(S0) .QuestDiary数据文件各种排行被杀排行.txt
#ELSEACT
INC P0 1
GOTO @被杀排行

wangjun123 发表于 2022-10-8 23:24:32

楼主加油，我们都看好你哦。

xlz888 发表于 2022-10-10 01:15:33

淡定，淡定，淡定……

lxb1101 发表于 2022-10-11 18:56:20

楼主加油，我们都看好你哦。

275498507 发表于 2022-10-13 05:33:12

我只是路过打酱油的。

noncode 发表于 2022-10-13 08:36:22

真是难得给力的帖子啊。

brader 发表于 2022-10-14 14:37:23

真是被感动的痛哭流涕……

yoyo2012 发表于 2022-10-14 15:10:09

真是难得给力的帖子啊。

tt8bj 发表于 2022-10-16 21:45:02

楼主加油，我们都看好你哦。

sgsmd123 发表于 2022-10-20 12:01:45

激动人心，无法言表！
页: [1] 2
查看完整版本: 传世AFT引擎配套全服杀人排行榜脚本