功能最全的传奇四大排行完整脚本

Bigmerboy · 发表于 2019-8-4 10:53:18

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？立即注册

x

[@Main]

#If
CheckLevelEx > 0
#Act
MOV S30 未上榜
MOV S9 神秘随机物品
OpenBigDialogBox 0
SortHumVarToListEx 连杰_评价_总 .\QuestDiary\数据文件\装备评价\装备总评价.txt 1 .\QuestDiary\数据文件\装备评价\装备排行.txt 1
#If
EQUAL A10
#Act
MOV A10 $暂无数据
MOV S10 <$STR(N10)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 0 A10 N10
MOV S31 <$STR(A10)>
SetStringBlank S31 24 1
MOV S10 <$STR(N10)>
#If
EQUAL A11
#Act
MOV A11 $暂无数据
MOV S11 <$STR(N11)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 1 A11 N11
MOV S32 <$STR(A11)>
SetStringBlank S32 24 1
MOV S11 <$STR(N11)>
#If
EQUAL A12
#Act
MOV A12 $暂无数据
MOV S12 <$STR(N12)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 2 A12 N12
MOV S33 <$STR(A12)>
SetStringBlank S33 24 1
MOV S12 <$STR(N12)>
#If
EQUAL A13
#Act
MOV A13 $暂无数据
MOV S13 <$STR(N13)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 3 A13 N13
MOV S34 <$STR(A13)>
SetStringBlank S34 18 1
MOV S13 <$STR(N13)>
#If
EQUAL A14
#Act
MOV A14 $暂无数据
MOV S14 <$STR(N14)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 4 A14 N14
MOV S35 <$STR(A14)>
SetStringBlank S35 18 1
MOV S14 <$STR(N14)>
#If
EQUAL A15
#Act
MOV A15 $暂无数据
MOV S15 <$STR(N15)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 5 A15 N15
MOV S36 <$STR(A15)>
SetStringBlank S36 18 1
MOV S15 <$STR(N15)>
#If
EQUAL A16
#Act
MOV A16 $暂无数据
MOV S16 <$STR(N16)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 6 A16 N16
MOV S37 <$STR(A16)>
SetStringBlank S37 18 1
MOV S16 <$STR(N16)>
#If
EQUAL A17
#Act
MOV A17 $暂无数据
MOV S17 <$STR(N17)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 7 A17 N17
MOV S38 <$STR(A17)>
SetStringBlank S38 18 1
MOV S17 <$STR(N17)>
#If
EQUAL A18
#Act
MOV A18 $暂无数据
MOV S18 <$STR(N18)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 8 A18 N18
MOV S39 <$STR(A18)>
SetStringBlank S39 18 1
MOV S18 <$STR(N18)>
#If
EQUAL A19
#Act
MOV A19 $暂无数据
MOV S19 <$STR(N19)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 9 A19 N19
MOV S40 <$STR(A19)>
SetStringBlank S40 17 1
MOV S19 <$STR(N19)>
#If
EQUAL A20
#Act
MOV A20 $暂无数据
MOV S20 <$STR(N20)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 10 A20 N20
MOV S41 <$STR(A20)>
SetStringBlank S41 4 1
MOV S20 <$STR(N20)>
#If
EQUAL A21
#Act
MOV A21 $暂无数据
MOV S21 <$STR(N21)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 11 A21 N21
MOV S42 <$STR(A21)>
SetStringBlank S42 4 0
MOV S21 <$STR(N21)>
#If
EQUAL A22
#Act
MOV A22 $暂无数据
MOV S22 <$STR(N22)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 12 A22 N22
MOV S43 <$STR(A22)>
SetStringBlank S43 4 0
MOV S22 <$STR(N22)>
#If
EQUAL A23
#Act
MOV A23 $暂无数据
MOV S23 <$STR(N23)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 13 A23 N23
MOV S44 <$STR(A23)>
SetStringBlank S44 4 0
MOV S23 <$STR(N23)>
#If
EQUAL A24
#Act
MOV A24 $暂无数据
MOV S24 <$STR(N24)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 14 A24 N24
MOV S45 <$STR(A24)>
SetStringBlank S45 4 0
MOV S24 <$STR(N24)>
#If
EQUAL A25
#Act
MOV A25 $暂无数据
MOV S25 <$STR(N25)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 15 A25 N25
MOV S46 <$STR(A25)>
SetStringBlank S46 4 0
MOV S25 <$STR(N25)>
#If
EQUAL A26
#Act
MOV A26 $暂无数据
MOV S26 <$STR(N26)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 16 A26 N26
MOV S47 <$STR(A26)>
SetStringBlank S47 4 0
MOV S26 <$STR(N26)>
#If
EQUAL A27
#Act
MOV A27 $暂无数据
MOV S27 <$STR(N27)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 17 A27 N27
MOV S48 <$STR(A27)>
SetStringBlank S48 4 0
MOV S27 <$STR(N27)>
#If
EQUAL A28
#Act
MOV A28 $暂无数据
MOV S28 <$STR(N28)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 18 A28 N28
MOV S49 <$STR(A28)>
SetStringBlank S49 4 0
MOV S28 <$STR(N28)>
#If
EQUAL A29
#Act
MOV A29 $暂无数据
MOV S29 <$STR(N29)>
#ELSEACT
GetListString .\QuestDiary\数据文件\装备评价\装备排行.txt 19 A29 N29
MOV S50 <$STR(A29)>
SetStringBlank S50 4 0
MOV S29 <$STR(N29)>
#If
EQUAL A10 <$USERNAME>
#Act
MOV S30 第01名
#If
EQUAL A11 <$USERNAME>
#Act
MOV S30 第02名
#If
EQUAL A12 <$USERNAME>
#Act
MOV S30 第03名
#If
EQUAL A13 <$USERNAME>
#Act
MOV S30 第04名
#If
EQUAL A14 <$USERNAME>
#Act
MOV S30 第05名
#If
EQUAL A15 <$USERNAME>
#Act
MOV S30 第06名
#If
EQUAL A16 <$USERNAME>
#Act
MOV S30 第07名
#If
EQUAL A17 <$USERNAME>
#Act
MOV S30 第08名
#If
EQUAL A18 <$USERNAME>
#Act
MOV S30 第09名
#If
EQUAL A19 <$USERNAME>
#Act
MOV S30 第10名
#If
EQUAL A20 <$USERNAME>
#Act
MOV S30 第11名
#If
EQUAL A21 <$USERNAME>
#Act
MOV S30 第12名
#If
EQUAL A22 <$USERNAME>
#Act
MOV S30 第13名
#If
EQUAL A23 <$USERNAME>
#Act
MOV S30 第14名
#If
EQUAL A24 <$USERNAME>
#Act
MOV S30 第15名
#If
EQUAL A25 <$USERNAME>
#Act
MOV S30 第16名
#If
EQUAL A26 <$USERNAME>
#Act
MOV S30 第17名
#If
EQUAL A27 <$USERNAME>
#Act
MOV S30 第18名
#If
EQUAL A28 <$USERNAME>
#Act
MOV S30 第19名
#If
EQUAL A29 <$USERNAME>
#Act
MOV S30 第20名

#If
CheckLevelEx > 0
#Act
SetStringBlank S10 11 1
SetStringBlank S11 11 1
SetStringBlank S12 11 1
SetStringBlank S13 11 1
SetStringBlank S14 11 1
SetStringBlank S15 11 1
SetStringBlank S16 11 1
SetStringBlank S17 11 1
SetStringBlank S18 11 1
SetStringBlank S19 11 1
SetStringBlank S20 10 1
SetStringBlank S21 10 1
SetStringBlank S22 10 1
SetStringBlank S23 10 1
SetStringBlank S24 10 1
SetStringBlank S25 10 1
SetStringBlank S26 10 1
SetStringBlank S27 10 1
SetStringBlank S28 10 1
SetStringBlank S29 10 1
DelayCall 500 @声音
#Say
<Img:310:0:55:-2/@MAIN><Img:313:0:56:-2/@杀戮排行><Img:315:0:58:-2/@荣誉排行><Img:317:0:60:-2/@血狱排行>\ \ \ \
{<$STR(S31)><$STR(S10)>/SCOLOR=253}　　　　　 {11　　　　<$STR(S41)> <$STR(S20)>/SCOLOR=100}\
{<$STR(S32)><$STR(S11)>/SCOLOR=250}　　　　　 {12　　　　<$STR(S42)> <$STR(S21)>/SCOLOR=100}\
{<$STR(S33)><$STR(S12)>/SCOLOR=254}　　　　　 {13　　　　<$STR(S43)> <$STR(S22)>/SCOLOR=100}\
　　 {4<$STR(S34)><$STR(S13)>　　　　　 14　　　　<$STR(S44)> <$STR(S23)>/SCOLOR=100}\
　　 {5<$STR(S35)><$STR(S14)>　　　　　 15　　　　<$STR(S45)> <$STR(S24)>/SCOLOR=100}\
　　 {6<$STR(S36)><$STR(S15)>　　　　　 16　　　　<$STR(S46)> <$STR(S25)>/SCOLOR=100}\
　　 {7<$STR(S37)><$STR(S16)>　　　　　 17　　　　<$STR(S47)> <$STR(S26)>/SCOLOR=100}\
　　 {8<$STR(S38)><$STR(S17)>　　　　　 18　　　　<$STR(S48)> <$STR(S27)>/SCOLOR=100}\
　　 {9<$STR(S39)><$STR(S18)>　　　　　 19　　　　<$STR(S49)> <$STR(S28)>/SCOLOR=100}\
　　 {10<$STR(S40)><$STR(S19)>　　　　　 20　　　　<$STR(S50)> <$STR(S29)>/SCOLOR=100}\ \
　　　　　{<$STR(S30)>/SCOLOR=58}　　装备总分:　{<$HUMAN(连杰_评价_总)>/SCOLOR=151}\
　　　　　<如果您能挤上前20名,您将获得如下奖励/SCOLOR=151>→【{<$STR(S9)>/SCOLOR=168}】\
　<友情提示：总评至少200分才能领取奖励！如未上榜请尝试重新穿戴装备！/SCOLOR=58> By:<$SERVERNAME>\
<Img:95:0:395:-43/@装备评价_领奖A><Img:346:0:100:-247><Img:346:0:318:-247>\

[@装备评价_领奖A]
#If
CHECKVAR HUMAN 连杰_评价_总 > 199
#ELSEACT
CLOSE
SENDMSG 5 【失败】：您的装备总评小于200分，请尝试重新穿戴装备后再来领奖！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖说明】→您的装备总评小于200分！\↓\↓【领奖提示】→请尝试重新穿戴装备，重新计算总评分！\↓\↓【版权所有】→<$SERVERNAME>
Break

#If
EQUAL A10 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_前三奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A11 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_前三奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A12 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_前三奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A13 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A14 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A15 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A16 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A17 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A18 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A19 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A20 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A21 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A22 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A23 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A24 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A25 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A26 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A27 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A28 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#If
EQUAL A29 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\装备评价\装备评价_普通奖.txt S9
GOTO @装备评价_领奖B
Break
#ELSEACT
MOV S9 $暂无数据
SENDMSG 5 【领奖】：您没有挤上装备评价榜前20名，未够资格领取奖励！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取失败！\↓\↓【领奖说明】→您没有挤上装备评价榜前20名，未够资格领取奖励！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @MAIN
Break

[@装备评价_领奖B]
#IF
dayofweek sun
check [21] 0
#ACT
set [21] 1
set [22] 0
set [23] 0
set [24] 0
set [25] 0
set [26] 0
set [27] 0
goto @装备评价_领奖C
Break
#IF
dayofweek mon
check [22] 0
#ACT
set [21] 0
set [22] 1
set [23] 0
set [24] 0
set [25] 0
set [26] 0
set [27] 0
goto @装备评价_领奖C
Break
#IF
dayofweek tue
check [23] 0
#ACT
set [21] 0
set [22] 0
set [23] 1
set [24] 0
set [25] 0
set [26] 0
set [27] 0
goto @装备评价_领奖C
Break
#IF
dayofweek wed
check [24] 0
#ACT
set [21] 0
set [22] 0
set [23] 0
set [24] 1
set [25] 0
set [26] 0
set [27] 0
goto @装备评价_领奖C
Break
#IF
dayofweek thu
check [25] 0
#ACT
set [21] 0
set [22] 0
set [23] 0
set [24] 0
set [25] 1
set [26] 0
set [27] 0
goto @装备评价_领奖C
Break
#IF
dayofweek fri
check [26] 0
#ACT
set [21] 0
set [22] 0
set [23] 0
set [24] 0
set [25] 0
set [26] 1
set [27] 0
goto @装备评价_领奖C
Break
#IF
dayofweek sat
check [27] 0
#ACT
set [21] 0
set [22] 0
set [23] 0
set [24] 0
set [25] 0
set [26] 0
set [27] 1
goto @装备评价_领奖C
Break
#IF
#ACT
SENDMSG 5 【领奖】：您今天的装备评价榜奖励已经领取过了！每天限制领取一次！
Close
MESSAGEBOX ↓【领取奖励】→失败！\↓\↓【领取说明】→您今天已经领取过了！\↓\↓【友情提示】→装备评价榜的奖励，每天限制领取一次！\↓\↓【版权所有】→<$SERVERNAME>
Break

[@装备评价_领奖C]
#IF
#ACT
GIVE <$STR(S9)> 1
SendCenterMsg 146 252 ◤公告◥：恭喜【<$USERNAME>】成功领取了装备评价排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！ 1 15
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取成功！\↓\↓【领取奖励】→装备评价排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @MAIN
Break

[@杀戮排行]
#If
CheckLevelEx > 0
#Act
MOV S30 未上榜
MOV S9 神秘随机物品
OpenBigDialogBox 0
SortHumVarToListEx 杀敌次数 .\QuestDiary\数据文件\杀人数据\杀敌次数.txt 1 .\QuestDiary\数据文件\杀人数据\杀人排行.txt 1
#If
EQUAL A30
#Act
MOV A30 $暂无数据
MOV S10 <$STR(N10)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 0 A30 N10
MOV S31 <$STR(A30)>
SetStringBlank S31 24 1
MOV S10 <$STR(N10)>
#If
EQUAL A31
#Act
MOV A31 $暂无数据
MOV S11 <$STR(N11)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 1 A31 N11
MOV S32 <$STR(A31)>
SetStringBlank S32 24 1
MOV S11 <$STR(N11)>
#If
EQUAL A32
#Act
MOV A32 $暂无数据
MOV S12 <$STR(N12)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 2 A32 N12
MOV S33 <$STR(A32)>
SetStringBlank S33 24 1
MOV S12 <$STR(N12)>
#If
EQUAL A33
#Act
MOV A33 $暂无数据
MOV S13 <$STR(N13)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 3 A33 N13
MOV S34 <$STR(A33)>
SetStringBlank S34 18 1
MOV S13 <$STR(N13)>
#If
EQUAL A34
#Act
MOV A34 $暂无数据
MOV S14 <$STR(N14)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 4 A34 N14
MOV S35 <$STR(A34)>
SetStringBlank S35 18 1
MOV S14 <$STR(N14)>
#If
EQUAL A35
#Act
MOV A35 $暂无数据
MOV S15 <$STR(N15)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 5 A35 N15
MOV S36 <$STR(A35)>
SetStringBlank S36 18 1
MOV S15 <$STR(N15)>
#If
EQUAL A36
#Act
MOV A36 $暂无数据
MOV S16 <$STR(N16)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 6 A36 N16
MOV S37 <$STR(A36)>
SetStringBlank S37 18 1
MOV S16 <$STR(N16)>
#If
EQUAL A37
#Act
MOV A37 $暂无数据
MOV S17 <$STR(N17)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 7 A37 N17
MOV S38 <$STR(A37)>
SetStringBlank S38 18 1
MOV S17 <$STR(N17)>
#If
EQUAL A38
#Act
MOV A38 $暂无数据
MOV S18 <$STR(N18)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 8 A38 N18
MOV S39 <$STR(A38)>
SetStringBlank S39 18 1
MOV S18 <$STR(N18)>
#If
EQUAL A39
#Act
MOV A39 $暂无数据
MOV S19 <$STR(N19)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 9 A39 N19
MOV S40 <$STR(A39)>
SetStringBlank S40 17 1
MOV S19 <$STR(N19)>
#If
EQUAL A40
#Act
MOV A40 $暂无数据
MOV S20 <$STR(N20)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 10 A40 N20
MOV S41 <$STR(A40)>
SetStringBlank S41 4 1
MOV S20 <$STR(N20)>
#If
EQUAL A41
#Act
MOV A41 $暂无数据
MOV S21 <$STR(N21)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 11 A41 N21
MOV S42 <$STR(A41)>
SetStringBlank S42 4 0
MOV S21 <$STR(N21)>
#If
EQUAL A42
#Act
MOV A42 $暂无数据
MOV S22 <$STR(N22)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 12 A42 N22
MOV S43 <$STR(A42)>
SetStringBlank S43 4 0
MOV S22 <$STR(N22)>
#If
EQUAL A43
#Act
MOV A43 $暂无数据
MOV S23 <$STR(N23)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 13 A43 N23
MOV S44 <$STR(A43)>
SetStringBlank S44 4 0
MOV S23 <$STR(N23)>
#If
EQUAL A44
#Act
MOV A44 $暂无数据
MOV S24 <$STR(N24)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 14 A44 N24
MOV S45 <$STR(A44)>
SetStringBlank S45 4 0
MOV S24 <$STR(N24)>
#If
EQUAL A45
#Act
MOV A45 $暂无数据
MOV S25 <$STR(N25)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 15 A45 N25
MOV S46 <$STR(A45)>
SetStringBlank S46 4 0
MOV S25 <$STR(N25)>
#If
EQUAL A46
#Act
MOV A46 $暂无数据
MOV S26 <$STR(N26)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 16 A46 N26
MOV S47 <$STR(A46)>
SetStringBlank S47 4 0
MOV S26 <$STR(N26)>
#If
EQUAL A47
#Act
MOV A47 $暂无数据
MOV S27 <$STR(N27)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 17 A47 N27
MOV S48 <$STR(A47)>
SetStringBlank S48 4 0
MOV S27 <$STR(N27)>
#If
EQUAL A48
#Act
MOV A48 $暂无数据
MOV S28 <$STR(N28)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 18 A48 N28
MOV S49 <$STR(A48)>
SetStringBlank S49 4 0
MOV S28 <$STR(N28)>
#If
EQUAL A49
#Act
MOV A49 $暂无数据
MOV S29 <$STR(N29)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\杀人排行.txt 19 A49 N29
MOV S50 <$STR(A49)>
SetStringBlank S50 4 0
MOV S29 <$STR(N29)>
#If
EQUAL A30 <$USERNAME>
#Act
MOV S30 第01名
#If
EQUAL A31 <$USERNAME>
#Act
MOV S30 第02名
#If
EQUAL A32 <$USERNAME>
#Act
MOV S30 第03名
#If
EQUAL A33 <$USERNAME>
#Act
MOV S30 第04名
#If
EQUAL A34 <$USERNAME>
#Act
MOV S30 第05名
#If
EQUAL A35 <$USERNAME>
#Act
MOV S30 第06名
#If
EQUAL A36 <$USERNAME>
#Act
MOV S30 第07名
#If
EQUAL A37 <$USERNAME>
#Act
MOV S30 第08名
#If
EQUAL A38 <$USERNAME>
#Act
MOV S30 第09名
#If
EQUAL A39 <$USERNAME>
#Act
MOV S30 第10名
#If
EQUAL A40 <$USERNAME>
#Act
MOV S30 第11名
#If
EQUAL A41 <$USERNAME>
#Act
MOV S30 第12名
#If
EQUAL A42 <$USERNAME>
#Act
MOV S30 第13名
#If
EQUAL A43 <$USERNAME>
#Act
MOV S30 第14名
#If
EQUAL A44 <$USERNAME>
#Act
MOV S30 第15名
#If
EQUAL A45 <$USERNAME>
#Act
MOV S30 第16名
#If
EQUAL A46 <$USERNAME>
#Act
MOV S30 第17名
#If
EQUAL A47 <$USERNAME>
#Act
MOV S30 第18名
#If
EQUAL A48 <$USERNAME>
#Act
MOV S30 第19名
#If
EQUAL A49 <$USERNAME>
#Act
MOV S30 第20名

#If
CheckLevelEx > 0
#Act
SetStringBlank S10 11 1
SetStringBlank S11 11 1
SetStringBlank S12 11 1
SetStringBlank S13 11 1
SetStringBlank S14 11 1
SetStringBlank S15 11 1
SetStringBlank S16 11 1
SetStringBlank S17 11 1
SetStringBlank S18 11 1
SetStringBlank S19 11 1
SetStringBlank S20 10 1
SetStringBlank S21 10 1
SetStringBlank S22 10 1
SetStringBlank S23 10 1
SetStringBlank S24 10 1
SetStringBlank S25 10 1
SetStringBlank S26 10 1
SetStringBlank S27 10 1
SetStringBlank S28 10 1
SetStringBlank S29 10 1
#Say
<Img:311:0:55:-2/@MAIN><Img:312:0:56:-2/@杀戮排行><Img:315:0:58:-2/@荣誉排行><Img:317:0:60:-2/@血狱排行>\ \ \ \
{<$STR(S31)><$STR(S10)>/SCOLOR=253}　　　　　 {11　　　　<$STR(S41)> <$STR(S20)>/SCOLOR=100}\
{<$STR(S32)><$STR(S11)>/SCOLOR=250}　　　　　 {12　　　　<$STR(S42)> <$STR(S21)>/SCOLOR=100}\
{<$STR(S33)><$STR(S12)>/SCOLOR=254}　　　　　 {13　　　　<$STR(S43)> <$STR(S22)>/SCOLOR=100}\
　　 {4<$STR(S34)><$STR(S13)>　　　　　 14　　　　<$STR(S44)> <$STR(S23)>/SCOLOR=100}\
　　 {5<$STR(S35)><$STR(S14)>　　　　　 15　　　　<$STR(S45)> <$STR(S24)>/SCOLOR=100}\
　　 {6<$STR(S36)><$STR(S15)>　　　　　 16　　　　<$STR(S46)> <$STR(S25)>/SCOLOR=100}\
　　 {7<$STR(S37)><$STR(S16)>　　　　　 17　　　　<$STR(S47)> <$STR(S26)>/SCOLOR=100}\
　　 {8<$STR(S38)><$STR(S17)>　　　　　 18　　　　<$STR(S48)> <$STR(S27)>/SCOLOR=100}\
　　 {9<$STR(S39)><$STR(S18)>　　　　　 19　　　　<$STR(S49)> <$STR(S28)>/SCOLOR=100}\
　　 {10<$STR(S40)><$STR(S19)>　　　　　 20　　　　<$STR(S50)> <$STR(S29)>/SCOLOR=100}\ \
　　　　　{<$STR(S30)>/SCOLOR=58}　　杀人总数:　{<$HUMAN(杀敌次数)>/SCOLOR=151}\
　　　　　<如果您能挤上前20名,您将获得如下奖励/SCOLOR=151>→【{<$STR(S9)>/SCOLOR=168}】\
　<友情提示：您至少需要10个人头才够资格领取奖励！前三名奖励丰厚！/SCOLOR=58> By:<$SERVERNAME>\
<Img:95:0:395:-43/@杀戮排行_领奖A><Img:347:0:100:-247><Img:347:0:318:-247>\

[@杀戮排行_领奖A]
#If
CHECKVAR HUMAN 杀敌次数 > 9
#ELSEACT
CLOSE
SENDMSG 5 【失败】：才杀了这么点人就来领奖？至少需要10个人头！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取失败！\↓\↓【领奖说明】→请杀10个人头再来领取奖励！\↓\↓【版权所有】→<$SERVERNAME>
Break

#If
EQUAL A30 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_前三奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A31 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_前三奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A32 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_前三奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A33 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A34 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A35 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A36 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A37 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A38 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A39 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A40 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A41 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A42 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A43 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A44 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A45 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A46 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A47 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A48 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#If
EQUAL A49 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\杀人排行_普通奖.txt S9
GOTO @杀戮排行_领奖B
Break
#ELSEACT
MOV S9 $暂无数据
SENDMSG 5 【领奖】：您没有挤上杀戮排行榜前20名，未够资格领取奖励！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取失败！\↓\↓【领奖说明】→您没有挤上杀戮排行榜前20名，未够资格领取奖励！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @杀戮排行
Break

[@杀戮排行_领奖B]
#IF
dayofweek sun
check [28] 0
#ACT
set [28] 1
set [29] 0
set [30] 0
set [31] 0
set [32] 0
set [33] 0
set [34] 0
goto @杀戮排行_领奖C
Break
#IF
dayofweek mon
check [29] 0
#ACT
set [28] 0
set [29] 1
set [30] 0
set [31] 0
set [32] 0
set [33] 0
set [34] 0
goto @杀戮排行_领奖C
Break
#IF
dayofweek tue
check [30] 0
#ACT
set [28] 0
set [29] 0
set [30] 1
set [31] 0
set [32] 0
set [33] 0
set [34] 0
goto @杀戮排行_领奖C
Break
#IF
dayofweek wed
check [31] 0
#ACT
set [28] 0
set [29] 0
set [30] 0
set [31] 1
set [32] 0
set [33] 0
set [34] 0
goto @杀戮排行_领奖C
Break
#IF
dayofweek thu
check [32] 0
#ACT
set [28] 0
set [29] 0
set [30] 0
set [31] 0
set [32] 1
set [33] 0
set [34] 0
goto @杀戮排行_领奖C
Break
#IF
dayofweek fri
check [33] 0
#ACT
set [28] 0
set [29] 0
set [30] 0
set [31] 0
set [32] 0
set [33] 1
set [34] 0
goto @杀戮排行_领奖C
Break
#IF
dayofweek sat
check [34] 0
#ACT
set [28] 0
set [29] 0
set [30] 0
set [31] 0
set [32] 0
set [33] 0
set [34] 1
goto @杀戮排行_领奖C
Break
#IF
#ACT
SENDMSG 5 【领奖】：您今天的杀戮排行榜奖励已经领取过了！每天限制领取一次！
Close
MESSAGEBOX ↓【领取奖励】→失败！\↓\↓【领取说明】→您今天已经领取过了！\↓\↓【友情提示】→杀戮排行榜的奖励，每天限制领取一次！\↓\↓【版权所有】→<$SERVERNAME>
Break

[@杀戮排行_领奖C]
#IF
#ACT
GIVE <$STR(S9)> 1
SendCenterMsg 161 58 ◤公告◥：恭喜【<$USERNAME>】成功领取了杀戮排行排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！ 1 15
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取成功！\↓\↓【领取奖励】→杀戮排行排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @杀戮排行
Break

[@荣誉排行]
#If
CheckLevelEx > 0
#Act
MOV S30 未上榜
MOV S9 神秘随机物品
OpenBigDialogBox 0
SortHumVarToListEx 连杰_荣誉值 .\QuestDiary\数据文件\杀人数据\荣誉数据.txt 1 .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 1
#If
EQUAL A50
#Act
MOV A50 $暂无数据
MOV S10 <$STR(N10)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 0 A50 N10
MOV S31 <$STR(A50)>
SetStringBlank S31 24 1
MOV S10 <$STR(N10)>
#If
EQUAL A51
#Act
MOV A51 $暂无数据
MOV S11 <$STR(N11)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 1 A51 N11
MOV S32 <$STR(A51)>
SetStringBlank S32 24 1
MOV S11 <$STR(N11)>
#If
EQUAL A52
#Act
MOV A52 $暂无数据
MOV S12 <$STR(N12)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 2 A52 N12
MOV S33 <$STR(A52)>
SetStringBlank S33 24 1
MOV S12 <$STR(N12)>
#If
EQUAL A53
#Act
MOV A53 $暂无数据
MOV S13 <$STR(N13)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 3 A53 N13
MOV S34 <$STR(A53)>
SetStringBlank S34 18 1
MOV S13 <$STR(N13)>
#If
EQUAL A54
#Act
MOV A54 $暂无数据
MOV S14 <$STR(N14)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 4 A54 N14
MOV S35 <$STR(A54)>
SetStringBlank S35 18 1
MOV S14 <$STR(N14)>
#If
EQUAL A55
#Act
MOV A55 $暂无数据
MOV S15 <$STR(N15)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 5 A55 N15
MOV S36 <$STR(A55)>
SetStringBlank S36 18 1
MOV S15 <$STR(N15)>
#If
EQUAL A56
#Act
MOV A56 $暂无数据
MOV S16 <$STR(N16)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 6 A56 N16
MOV S37 <$STR(A56)>
SetStringBlank S37 18 1
MOV S16 <$STR(N16)>
#If
EQUAL A57
#Act
MOV A57 $暂无数据
MOV S17 <$STR(N17)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 7 A57 N17
MOV S38 <$STR(A57)>
SetStringBlank S38 18 1
MOV S17 <$STR(N17)>
#If
EQUAL A58
#Act
MOV A58 $暂无数据
MOV S18 <$STR(N18)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 8 A58 N18
MOV S39 <$STR(A58)>
SetStringBlank S39 18 1
MOV S18 <$STR(N18)>
#If
EQUAL A59
#Act
MOV A59 $暂无数据
MOV S19 <$STR(N19)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 9 A59 N19
MOV S40 <$STR(A59)>
SetStringBlank S40 17 1
MOV S19 <$STR(N19)>
#If
EQUAL A60
#Act
MOV A60 $暂无数据
MOV S20 <$STR(N20)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 10 A60 N20
MOV S41 <$STR(A60)>
SetStringBlank S41 4 1
MOV S20 <$STR(N20)>
#If
EQUAL A61
#Act
MOV A61 $暂无数据
MOV S21 <$STR(N21)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 11 A61 N21
MOV S42 <$STR(A61)>
SetStringBlank S42 4 0
MOV S21 <$STR(N21)>
#If
EQUAL A62
#Act
MOV A62 $暂无数据
MOV S22 <$STR(N22)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 12 A62 N22
MOV S43 <$STR(A62)>
SetStringBlank S43 4 0
MOV S22 <$STR(N22)>
#If
EQUAL A63
#Act
MOV A63 $暂无数据
MOV S23 <$STR(N23)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 13 A63 N23
MOV S44 <$STR(A63)>
SetStringBlank S44 4 0
MOV S23 <$STR(N23)>
#If
EQUAL A64
#Act
MOV A64 $暂无数据
MOV S24 <$STR(N24)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 14 A64 N24
MOV S45 <$STR(A64)>
SetStringBlank S45 4 0
MOV S24 <$STR(N24)>
#If
EQUAL A65
#Act
MOV A65 $暂无数据
MOV S25 <$STR(N25)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 15 A65 N25
MOV S46 <$STR(A65)>
SetStringBlank S46 4 0
MOV S25 <$STR(N25)>
#If
EQUAL A66
#Act
MOV A66 $暂无数据
MOV S26 <$STR(N26)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 16 A66 N26
MOV S47 <$STR(A66)>
SetStringBlank S47 4 0
MOV S26 <$STR(N26)>
#If
EQUAL A67
#Act
MOV A67 $暂无数据
MOV S27 <$STR(N27)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 17 A67 N27
MOV S48 <$STR(A67)>
SetStringBlank S48 4 0
MOV S27 <$STR(N27)>
#If
EQUAL A68
#Act
MOV A68 $暂无数据
MOV S28 <$STR(N28)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 18 A68 N28
MOV S49 <$STR(A68)>
SetStringBlank S49 4 0
MOV S28 <$STR(N28)>
#If
EQUAL A69
#Act
MOV A69 $暂无数据
MOV S29 <$STR(N29)>
#ELSEACT
GetListString .\QuestDiary\数据文件\杀人数据\荣誉排行.txt 19 A69 N29
MOV S50 <$STR(A69)>
SetStringBlank S50 4 0
MOV S29 <$STR(N29)>
#If
EQUAL A50 <$USERNAME>
#Act
MOV S30 第01名
#If
EQUAL A51 <$USERNAME>
#Act
MOV S30 第02名
#If
EQUAL A52 <$USERNAME>
#Act
MOV S30 第03名
#If
EQUAL A53 <$USERNAME>
#Act
MOV S30 第04名
#If
EQUAL A54 <$USERNAME>
#Act
MOV S30 第05名
#If
EQUAL A55 <$USERNAME>
#Act
MOV S30 第06名
#If
EQUAL A56 <$USERNAME>
#Act
MOV S30 第07名
#If
EQUAL A57 <$USERNAME>
#Act
MOV S30 第08名
#If
EQUAL A58 <$USERNAME>
#Act
MOV S30 第09名
#If
EQUAL A59 <$USERNAME>
#Act
MOV S30 第10名
#If
EQUAL A60 <$USERNAME>
#Act
MOV S30 第11名
#If
EQUAL A61 <$USERNAME>
#Act
MOV S30 第12名
#If
EQUAL A62 <$USERNAME>
#Act
MOV S30 第13名
#If
EQUAL A63 <$USERNAME>
#Act
MOV S30 第14名
#If
EQUAL A64 <$USERNAME>
#Act
MOV S30 第15名
#If
EQUAL A65 <$USERNAME>
#Act
MOV S30 第16名
#If
EQUAL A66 <$USERNAME>
#Act
MOV S30 第17名
#If
EQUAL A67 <$USERNAME>
#Act
MOV S30 第18名
#If
EQUAL A68 <$USERNAME>
#Act
MOV S30 第19名
#If
EQUAL A69 <$USERNAME>
#Act
MOV S30 第20名

#If
CheckLevelEx > 0
#Act
SetStringBlank S10 11 1
SetStringBlank S11 11 1
SetStringBlank S12 11 1
SetStringBlank S13 11 1
SetStringBlank S14 11 1
SetStringBlank S15 11 1
SetStringBlank S16 11 1
SetStringBlank S17 11 1
SetStringBlank S18 11 1
SetStringBlank S19 11 1
SetStringBlank S20 10 1
SetStringBlank S21 10 1
SetStringBlank S22 10 1
SetStringBlank S23 10 1
SetStringBlank S24 10 1
SetStringBlank S25 10 1
SetStringBlank S26 10 1
SetStringBlank S27 10 1
SetStringBlank S28 10 1
SetStringBlank S29 10 1
#Say
<Img:311:0:55:-2/@MAIN><Img:313:0:56:-2/@杀戮排行><Img:314:0:58:-2/@荣誉排行><Img:317:0:60:-2/@血狱排行>\ \ \ \
{<$STR(S31)><$STR(S10)>/SCOLOR=253}　　　　　 {11　　　　<$STR(S41)> <$STR(S20)>/SCOLOR=100}\
{<$STR(S32)><$STR(S11)>/SCOLOR=250}　　　　　 {12　　　　<$STR(S42)> <$STR(S21)>/SCOLOR=100}\
{<$STR(S33)><$STR(S12)>/SCOLOR=254}　　　　　 {13　　　　<$STR(S43)> <$STR(S22)>/SCOLOR=100}\
　　 {4<$STR(S34)><$STR(S13)>　　　　　 14　　　　<$STR(S44)> <$STR(S23)>/SCOLOR=100}\
　　 {5<$STR(S35)><$STR(S14)>　　　　　 15　　　　<$STR(S45)> <$STR(S24)>/SCOLOR=100}\
　　 {6<$STR(S36)><$STR(S15)>　　　　　 16　　　　<$STR(S46)> <$STR(S25)>/SCOLOR=100}\
　　 {7<$STR(S37)><$STR(S16)>　　　　　 17　　　　<$STR(S47)> <$STR(S26)>/SCOLOR=100}\
　　 {8<$STR(S38)><$STR(S17)>　　　　　 18　　　　<$STR(S48)> <$STR(S27)>/SCOLOR=100}\
　　 {9<$STR(S39)><$STR(S18)>　　　　　 19　　　　<$STR(S49)> <$STR(S28)>/SCOLOR=100}\
　　 {10<$STR(S40)><$STR(S19)>　　　　　 20　　　　<$STR(S50)> <$STR(S29)>/SCOLOR=100}\ \
　　　　　{<$STR(S30)>/SCOLOR=58}　　荣誉点数:　{<$HUMAN(连杰_荣誉值)>/SCOLOR=151}\
　　　　　<如果您能挤上前20名,您将获得如下奖励/SCOLOR=151>→【{<$STR(S9)>/SCOLOR=168}】\
　<友情提示：需要在行会混战(活动)中获得20点荣誉值才够资格领取奖励！/SCOLOR=58> By:<$SERVERNAME>\
<Img:95:0:395:-43/@荣誉排行_领奖A><Img:348:0:100:-247><Img:348:0:318:-247>\

[@荣誉排行_领奖A]
#If
CHECKVAR HUMAN 连杰_荣誉值 > 19
#ELSEACT
CLOSE
SENDMSG 5 【失败】：行会混战(活动)开始后，在战场中每杀1人获得10点荣誉值！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取失败！\↓\↓【领奖说明】→您至少需要20点荣誉才够资格！\↓\↓【版权所有】→<$SERVERNAME>
Break

#If
EQUAL A50 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_前三奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A51 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_前三奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A52 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_前三奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A53 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A54 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A55 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A56 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A57 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A58 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A59 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A60 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A61 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A62 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A63 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A64 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A65 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A66 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A67 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A68 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#If
EQUAL A69 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\杀人数据\荣誉排行_普通奖.txt S9
GOTO @荣誉排行_领奖B
Break
#ELSEACT
MOV S9 $暂无数据
SENDMSG 5 【领奖】：您没有挤上杀戮排行榜前20名，未够资格领取奖励！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取失败！\↓\↓【领奖说明】→您没有挤上杀戮排行榜前20名，未够资格领取奖励！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @杀戮排行
Break

[@荣誉排行_领奖B]
#IF
dayofweek sun
check [35] 0
#ACT
set [35] 1
set [36] 0
set [37] 0
set [38] 0
set [39] 0
set [40] 0
set [41] 0
goto @荣誉排行_领奖C
Break
#IF
dayofweek mon
check [36] 0
#ACT
set [35] 0
set [36] 1
set [37] 0
set [38] 0
set [39] 0
set [40] 0
set [41] 0
goto @荣誉排行_领奖C
Break
#IF
dayofweek tue
check [37] 0
#ACT
set [35] 0
set [36] 0
set [37] 1
set [38] 0
set [39] 0
set [40] 0
set [41] 0
goto @荣誉排行_领奖C
Break
#IF
dayofweek wed
check [38] 0
#ACT
set [35] 0
set [36] 0
set [37] 0
set [38] 1
set [39] 0
set [40] 0
set [41] 0
goto @荣誉排行_领奖C
Break
#IF
dayofweek thu
check [39] 0
#ACT
set [35] 0
set [36] 0
set [37] 0
set [38] 0
set [39] 1
set [40] 0
set [41] 0
goto @荣誉排行_领奖C
Break
#IF
dayofweek fri
check [40] 0
#ACT
set [35] 0
set [36] 0
set [37] 0
set [38] 0
set [39] 0
set [40] 1
set [41] 0
goto @荣誉排行_领奖C
Break
#IF
dayofweek sat
check [41] 0
#ACT
set [35] 0
set [36] 0
set [37] 0
set [38] 0
set [39] 0
set [40] 0
set [41] 1
goto @荣誉排行_领奖C
Break
#IF
#ACT
SENDMSG 5 【领奖】：您今天的杀戮排行榜奖励已经领取过了！每天限制领取一次！
Close
MESSAGEBOX ↓【领取奖励】→失败！\↓\↓【领取说明】→您今天已经领取过了！\↓\↓【友情提示】→杀戮排行榜的奖励，每天限制领取一次！\↓\↓【版权所有】→<$SERVERNAME>
Break

[@荣誉排行_领奖C]
#IF
#ACT
GIVE <$STR(S9)> 1
SendCenterMsg 161 58 ◤公告◥：恭喜【<$USERNAME>】成功领取了杀戮排行排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！ 1 15
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取成功！\↓\↓【领取奖励】→杀戮排行排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @杀戮排行
Break

[@血狱排行]
#If
CheckLevelEx > 0
#Act
MOV S30 未上榜
MOV S9 神秘随机物品
OpenBigDialogBox 0
SortHumVarToListEx 血狱深渊层数 .\QuestDiary\数据文件\血狱深渊\血狱层数.txt 1 .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 1
#If
EQUAL A70
#Act
MOV A70 $暂无数据
MOV S10 <$STR(N10)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 0 A70 N10
MOV S31 <$STR(A70)>
SetStringBlank S31 24 1
MOV S10 <$STR(N10)>
#If
EQUAL A71
#Act
MOV A71 $暂无数据
MOV S11 <$STR(N11)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 1 A71 N11
MOV S32 <$STR(A71)>
SetStringBlank S32 24 1
MOV S11 <$STR(N11)>
#If
EQUAL A72
#Act
MOV A72 $暂无数据
MOV S12 <$STR(N12)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 2 A72 N12
MOV S33 <$STR(A72)>
SetStringBlank S33 24 1
MOV S12 <$STR(N12)>
#If
EQUAL A73
#Act
MOV A73 $暂无数据
MOV S13 <$STR(N13)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 3 A73 N13
MOV S34 <$STR(A73)>
SetStringBlank S34 18 1
MOV S13 <$STR(N13)>
#If
EQUAL A74
#Act
MOV A74 $暂无数据
MOV S14 <$STR(N14)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 4 A74 N14
MOV S35 <$STR(A74)>
SetStringBlank S35 18 1
MOV S14 <$STR(N14)>
#If
EQUAL A75
#Act
MOV A75 $暂无数据
MOV S15 <$STR(N15)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 5 A75 N15
MOV S36 <$STR(A75)>
SetStringBlank S36 18 1
MOV S15 <$STR(N15)>
#If
EQUAL A76
#Act
MOV A76 $暂无数据
MOV S16 <$STR(N16)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 6 A76 N16
MOV S37 <$STR(A76)>
SetStringBlank S37 18 1
MOV S16 <$STR(N16)>
#If
EQUAL A77
#Act
MOV A77 $暂无数据
MOV S17 <$STR(N17)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 7 A77 N17
MOV S38 <$STR(A77)>
SetStringBlank S38 18 1
MOV S17 <$STR(N17)>
#If
EQUAL A78
#Act
MOV A78 $暂无数据
MOV S18 <$STR(N18)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 8 A78 N18
MOV S39 <$STR(A78)>
SetStringBlank S39 18 1
MOV S18 <$STR(N18)>
#If
EQUAL A79
#Act
MOV A79 $暂无数据
MOV S19 <$STR(N19)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 9 A79 N19
MOV S40 <$STR(A79)>
SetStringBlank S40 17 1
MOV S19 <$STR(N19)>
#If
EQUAL A80
#Act
MOV A80 $暂无数据
MOV S20 <$STR(N20)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 10 A80 N20
MOV S41 <$STR(A80)>
SetStringBlank S41 4 1
MOV S20 <$STR(N20)>
#If
EQUAL A81
#Act
MOV A81 $暂无数据
MOV S21 <$STR(N21)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 11 A81 N21
MOV S42 <$STR(A81)>
SetStringBlank S42 4 0
MOV S21 <$STR(N21)>
#If
EQUAL A82
#Act
MOV A82 $暂无数据
MOV S22 <$STR(N22)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 12 A82 N22
MOV S43 <$STR(A82)>
SetStringBlank S43 4 0
MOV S22 <$STR(N22)>
#If
EQUAL A83
#Act
MOV A83 $暂无数据
MOV S23 <$STR(N23)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 13 A83 N23
MOV S44 <$STR(A83)>
SetStringBlank S44 4 0
MOV S23 <$STR(N23)>
#If
EQUAL A84
#Act
MOV A84 $暂无数据
MOV S24 <$STR(N24)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 14 A84 N24
MOV S45 <$STR(A84)>
SetStringBlank S45 4 0
MOV S24 <$STR(N24)>
#If
EQUAL A85
#Act
MOV A85 $暂无数据
MOV S25 <$STR(N25)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 15 A85 N25
MOV S46 <$STR(A85)>
SetStringBlank S46 4 0
MOV S25 <$STR(N25)>
#If
EQUAL A86
#Act
MOV A86 $暂无数据
MOV S26 <$STR(N26)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 16 A86 N26
MOV S47 <$STR(A86)>
SetStringBlank S47 4 0
MOV S26 <$STR(N26)>
#If
EQUAL A87
#Act
MOV A87 $暂无数据
MOV S27 <$STR(N27)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 17 A87 N27
MOV S48 <$STR(A87)>
SetStringBlank S48 4 0
MOV S27 <$STR(N27)>
#If
EQUAL A88
#Act
MOV A88 $暂无数据
MOV S28 <$STR(N28)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 18 A88 N28
MOV S49 <$STR(A88)>
SetStringBlank S49 4 0
MOV S28 <$STR(N28)>
#If
EQUAL A89
#Act
MOV A89 $暂无数据
MOV S29 <$STR(N29)>
#ELSEACT
GetListString .\QuestDiary\数据文件\血狱深渊\血狱排行.txt 19 A89 N29
MOV S50 <$STR(A89)>
SetStringBlank S50 4 0
MOV S29 <$STR(N29)>
#If
EQUAL A70 <$USERNAME>
#Act
MOV S30 第01名
#If
EQUAL A71 <$USERNAME>
#Act
MOV S30 第02名
#If
EQUAL A72 <$USERNAME>
#Act
MOV S30 第03名
#If
EQUAL A73 <$USERNAME>
#Act
MOV S30 第04名
#If
EQUAL A74 <$USERNAME>
#Act
MOV S30 第05名
#If
EQUAL A75 <$USERNAME>
#Act
MOV S30 第06名
#If
EQUAL A76 <$USERNAME>
#Act
MOV S30 第07名
#If
EQUAL A77 <$USERNAME>
#Act
MOV S30 第08名
#If
EQUAL A78 <$USERNAME>
#Act
MOV S30 第09名
#If
EQUAL A79 <$USERNAME>
#Act
MOV S30 第10名
#If
EQUAL A80 <$USERNAME>
#Act
MOV S30 第11名
#If
EQUAL A81 <$USERNAME>
#Act
MOV S30 第12名
#If
EQUAL A82 <$USERNAME>
#Act
MOV S30 第13名
#If
EQUAL A83 <$USERNAME>
#Act
MOV S30 第14名
#If
EQUAL A84 <$USERNAME>
#Act
MOV S30 第15名
#If
EQUAL A85 <$USERNAME>
#Act
MOV S30 第16名
#If
EQUAL A86 <$USERNAME>
#Act
MOV S30 第17名
#If
EQUAL A87 <$USERNAME>
#Act
MOV S30 第18名
#If
EQUAL A88 <$USERNAME>
#Act
MOV S30 第19名
#If
EQUAL A89 <$USERNAME>
#Act
MOV S30 第20名

#If
CheckLevelEx > 0
#Act
SetStringBlank S10 11 1
SetStringBlank S11 11 1
SetStringBlank S12 11 1
SetStringBlank S13 11 1
SetStringBlank S14 11 1
SetStringBlank S15 11 1
SetStringBlank S16 11 1
SetStringBlank S17 11 1
SetStringBlank S18 11 1
SetStringBlank S19 11 1
SetStringBlank S20 10 1
SetStringBlank S21 10 1
SetStringBlank S22 10 1
SetStringBlank S23 10 1
SetStringBlank S24 10 1
SetStringBlank S25 10 1
SetStringBlank S26 10 1
SetStringBlank S27 10 1
SetStringBlank S28 10 1
SetStringBlank S29 10 1
#Say
<Img:311:0:55:-2/@MAIN><Img:313:0:56:-2/@杀戮排行><Img:315:0:58:-2/@荣誉排行><Img:316:0:60:-2/@血狱排行>\ \ \ \
{<$STR(S31)><$STR(S10)>/SCOLOR=253}　　　　　 {11　　　　<$STR(S41)> <$STR(S20)>/SCOLOR=100}\
{<$STR(S32)><$STR(S11)>/SCOLOR=250}　　　　　 {12　　　　<$STR(S42)> <$STR(S21)>/SCOLOR=100}\
{<$STR(S33)><$STR(S12)>/SCOLOR=254}　　　　　 {13　　　　<$STR(S43)> <$STR(S22)>/SCOLOR=100}\
　　 {4<$STR(S34)><$STR(S13)>　　　　　 14　　　　<$STR(S44)> <$STR(S23)>/SCOLOR=100}\
　　 {5<$STR(S35)><$STR(S14)>　　　　　 15　　　　<$STR(S45)> <$STR(S24)>/SCOLOR=100}\
　　 {6<$STR(S36)><$STR(S15)>　　　　　 16　　　　<$STR(S46)> <$STR(S25)>/SCOLOR=100}\
　　 {7<$STR(S37)><$STR(S16)>　　　　　 17　　　　<$STR(S47)> <$STR(S26)>/SCOLOR=100}\
　　 {8<$STR(S38)><$STR(S17)>　　　　　 18　　　　<$STR(S48)> <$STR(S27)>/SCOLOR=100}\
　　 {9<$STR(S39)><$STR(S18)>　　　　　 19　　　　<$STR(S49)> <$STR(S28)>/SCOLOR=100}\
　　 {10<$STR(S40)><$STR(S19)>　　　　　 20　　　　<$STR(S50)> <$STR(S29)>/SCOLOR=100}\ \
　　　　　{<$STR(S30)>/SCOLOR=58}　　血狱层数:　{<$HUMAN(血狱深渊层数)>/SCOLOR=151}\
　　　　　<如果您能挤上前20名,您将获得如下奖励/SCOLOR=151>→【{<$STR(S9)>/SCOLOR=168}】\
　<友情提示：需要在血狱深渊(副本)中至少突破20层！否者无法获得奖励！/SCOLOR=58> By:<$SERVERNAME>\
<Img:95:0:395:-43/@血狱排行_领奖A><Img:349:0:100:-247><Img:349:0:318:-247>\

[@血狱排行_领奖A]
#If
CHECKVAR HUMAN 血狱深渊层数 > 19
#ELSEACT
CLOSE
SENDMSG 5 【失败】：您在血狱深渊中未能突破(20)层，无法获得奖励！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取失败！\↓\↓【领奖说明】→您在血狱深渊中需要至少突破20层！\↓\↓【版权所有】→<$SERVERNAME>
Break

#If
EQUAL A70 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_前三奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A71 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_前三奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A72 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_前三奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A73 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A74 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A75 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A76 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A77 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A78 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A79 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A80 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A81 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A82 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A83 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A84 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A85 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A86 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A87 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A88 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#If
EQUAL A89 <$USERNAME>
#Act
GetRandomText .\QuestDiary\数据文件\血狱深渊\血狱排行_普通奖.txt S9
GOTO @血狱排行_领奖B
Break
#ELSEACT
MOV S9 $暂无数据
SENDMSG 5 【领奖】：您没有挤上血狱排行榜前20名，未够资格领取奖励！
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取失败！\↓\↓【领奖说明】→您没有挤上血狱排行榜前20名，未够资格领取奖励！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @血狱排行
Break

[@血狱排行_领奖B]
#IF
dayofweek sun
check [42] 0
#ACT
set [42] 1
set [43] 0
set [44] 0
set [45] 0
set [46] 0
set [47] 0
set [48] 0
goto @血狱排行_领奖C
Break
#IF
dayofweek mon
check [43] 0
#ACT
set [42] 0
set [43] 1
set [44] 0
set [45] 0
set [46] 0
set [47] 0
set [48] 0
goto @血狱排行_领奖C
Break
#IF
dayofweek tue
check [44] 0
#ACT
set [42] 0
set [43] 0
set [44] 1
set [45] 0
set [46] 0
set [47] 0
set [48] 0
goto @血狱排行_领奖C
Break
#IF
dayofweek wed
check [45] 0
#ACT
set [42] 0
set [43] 0
set [44] 0
set [45] 1
set [46] 0
set [47] 0
set [48] 0
goto @血狱排行_领奖C
Break
#IF
dayofweek thu
check [46] 0
#ACT
set [42] 0
set [43] 0
set [44] 0
set [45] 0
set [46] 1
set [47] 0
set [48] 0
goto @血狱排行_领奖C
Break
#IF
dayofweek fri
check [47] 0
#ACT
set [42] 0
set [43] 0
set [44] 0
set [45] 0
set [46] 0
set [47] 1
set [48] 0
goto @血狱排行_领奖C
Break
#IF
dayofweek sat
check [48] 0
#ACT
set [42] 0
set [43] 0
set [44] 0
set [45] 0
set [46] 0
set [47] 0
set [48] 1
goto @血狱排行_领奖C
Break
#IF
#ACT
SENDMSG 5 【领奖】：您今天的血狱排行榜奖励已经领取过了！每天限制领取一次！
Close
MESSAGEBOX ↓【领取奖励】→失败！\↓\↓【领取说明】→您今天已经领取过了！\↓\↓【友情提示】→血狱排行榜的奖励，每天限制领取一次！\↓\↓【版权所有】→<$SERVERNAME>
Break

[@血狱排行_领奖C]
#IF
#ACT
GIVE <$STR(S9)> 1
SendCenterMsg 161 58 ◤公告◥：恭喜【<$USERNAME>】成功领取了血狱排行排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！ 1 15
MESSAGEBOX ↓【勇士名称】→<$USERNAME>\↓\↓【领奖提示】→领取成功！\↓\↓【领取奖励】→血狱排行排行榜<$STR(S30)>奖励，获得物品【<$STR(S9)>】！\↓\↓【版权所有】→<$SERVERNAME>
GOTO @血狱排行
Break

[@声音]
#IF
random 2
#ACT
PlayMusic man_5_3.mp3
Break

#IF
#ACT
PlayMusic man_5_2.mp3
Break

wxdd1988 · 发表于 2019-8-4 11:03:48

楼主呀，，，您太有才了。。。

米兰babe · 发表于 2019-8-12 18:20:20

楼主呀，，，您太有才了。。。

红la4ewp · 发表于 2019-8-13 04:30:08

支持，赞一个

cat_worm · 发表于 2019-8-18 16:25:46

无论是不是沙发都得回复下

世纪婴儿3000 · 发表于 2019-8-20 13:09:14

报告！别开枪，我就是路过来看看的。。。

小米小米米灵儿 · 发表于 2019-8-27 04:00:18

为保住菊花，这个一定得回复！

刘子力 · 发表于 2019-8-28 05:08:06

无论是不是沙发都得回复下

六幻灵纱 · 发表于 2019-8-28 12:31:12

支持你哈...................................

米_粥 · 发表于 2019-9-1 13:00:45

珍爱生命，果断回帖。

		自动登录	找回密码
密码			立即注册