找回密码
 立即注册
查看: 17860|回复: 74

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

    [复制链接]
  • TA的每日心情
    奋斗
    2024-12-17 21:15
  • 签到天数: 488 天

    连续签到: 1 天

    [LV.9]妙领天机

    482

    主题

    3030

    回帖

    4596

    积分

    如雷贯耳

    积分
    4596
    发表于 2019-8-4 10:53:18 | 显示全部楼层 |阅读模式

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

    您需要 登录 才可以下载或查看,没有账号?立即注册

    ×

    [@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
    楼主热帖
  • TA的每日心情

    2019-8-28 05:05
  • 签到天数: 452 天

    连续签到: 2 天

    [LV.9]妙领天机

    5

    主题

    3005

    回帖

    3014

    积分

    声名显赫

    积分
    3014
    发表于 2019-8-4 11:03:48 | 显示全部楼层
    楼主呀,,,您太有才了。。。
    回复

    使用道具 举报

  • TA的每日心情
    擦汗
    2019-8-30 06:47
  • 签到天数: 461 天

    连续签到: 1 天

    [LV.9]妙领天机

    1

    主题

    3038

    回帖

    3039

    积分

    声名显赫

    积分
    3039
    发表于 2019-8-12 18:20:20 | 显示全部楼层
    楼主呀,,,您太有才了。。。
    回复

    使用道具 举报

  • TA的每日心情
    奋斗
    2019-8-30 05:00
  • 签到天数: 474 天

    连续签到: 6 天

    [LV.9]妙领天机

    3

    主题

    3005

    回帖

    3010

    积分

    声名显赫

    积分
    3010
    发表于 2019-8-13 04:30:08 | 显示全部楼层
    支持,赞一个
    回复

    使用道具 举报

  • TA的每日心情
    开心
    2019-8-30 20:48
  • 签到天数: 484 天

    连续签到: 4 天

    [LV.9]妙领天机

    3

    主题

    3030

    回帖

    3030

    积分

    声名显赫

    积分
    3030
    发表于 2019-8-18 16:25:46 | 显示全部楼层
    无论是不是沙发都得回复下
    回复

    使用道具 举报

  • TA的每日心情
    奋斗
    2019-8-30 04:52
  • 签到天数: 460 天

    连续签到: 4 天

    [LV.9]妙领天机

    6

    主题

    3116

    回帖

    3124

    积分

    声名显赫

    积分
    3124
    发表于 2019-8-20 13:09:14 | 显示全部楼层
    报告!别开枪,我就是路过来看看的。。。
    回复

    使用道具 举报

  • TA的每日心情
    郁闷
    2019-8-29 10:31
  • 签到天数: 477 天

    连续签到: 6 天

    [LV.9]妙领天机

    0

    主题

    3081

    回帖

    3080

    积分

    声名显赫

    积分
    3080
    发表于 2019-8-27 04:00:18 | 显示全部楼层
    为保住菊花,这个一定得回复!
    回复

    使用道具 举报

  • TA的每日心情
    擦汗
    2019-8-30 09:11
  • 签到天数: 456 天

    连续签到: 6 天

    [LV.9]妙领天机

    3

    主题

    3091

    回帖

    3096

    积分

    声名显赫

    积分
    3096
    发表于 2019-8-28 05:08:06 | 显示全部楼层
    无论是不是沙发都得回复下
    回复

    使用道具 举报

  • TA的每日心情
    奋斗
    2019-8-30 10:34
  • 签到天数: 465 天

    连续签到: 7 天

    [LV.9]妙领天机

    5

    主题

    3017

    回帖

    3025

    积分

    声名显赫

    积分
    3025
    发表于 2019-8-28 12:31:12 | 显示全部楼层
    支持你哈...................................
    回复

    使用道具 举报

  • TA的每日心情
    擦汗
    2019-8-30 11:30
  • 签到天数: 481 天

    连续签到: 1 天

    [LV.9]妙领天机

    0

    主题

    3064

    回帖

    3059

    积分

    声名显赫

    积分
    3059
    发表于 2019-9-1 13:00:45 | 显示全部楼层
    珍爱生命,果断回帖。
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    QQ|Archiver|手机版|小黑屋|任逍遥

    GMT+8, 2024-12-25 00:32 , Processed in 0.125963 second(s), 45 queries .

    Powered by 任逍遥 X3.5

    Copyright © 2001-2024, Rxiaoyao Cloud.

    快速回复 返回顶部 返回列表