[@装备排名系统]
{
#IF
EQUAL S90
#ACT
MOV S90 装备
#IF
EQUAL S90 装备
#ACT
MOV S91 .\QuestDiary\排序数据\装备数值.txt
MOV S92 .\QuestDiary\排序数据\装备名单.txt
MOV S93 <Img:4454:0:1:-3><Img:4457:0:1:-3/@杀人><Img:4459:0:1:-3/@荣誉><Img:4461:0:1:-3/@深渊>
MOV S94 <Img:4490:0:1:-7>
MOV S95 <装备总分:/SCOLOR=161>
MOV S96 {<$HUMAN(AddValueTotal)>/SCOLOR=151}
#IF
EQUAL S90 杀人
#ACT
MOV S91 .\QuestDiary\排序数据\杀人数值.txt
MOV S92 .\QuestDiary\排序数据\杀人名单.txt
MOV S93 <Img:4455:0:1:-3/@装备><Img:4456:0:1:-3><Img:4459:0:1:-3/@荣誉><Img:4461:0:1:-3/@深渊>
MOV S94 <Img:4491:0:1:-7>
MOV S95 <杀敌次数:/SCOLOR=161>
MOV S96 {<$HUMAN(KILLPK)>/SCOLOR=151}
#IF
EQUAL S90 荣誉
#ACT
MOV S91 .\QuestDiary\排序数据\荣誉数值.txt
MOV S92 .\QuestDiary\排序数据\荣誉名单.txt
MOV S93 <Img:4455:0:1:-3/@装备><Img:4457:0:1:-3/@杀人><Img:4458:0:1:-3><Img:4461:0:1:-3/@深渊>
MOV S94 <Img:4492:0:1:-7>
MOV S95 < 荣誉值:/SCOLOR=161>
MOV S96 {<$HUMAN(YONGYU)>/SCOLOR=151}
#IF
EQUAL S90 深渊
#ACT
MOV S91 .\QuestDiary\排序数据\深渊数值.txt
MOV S92 .\QuestDiary\排序数据\深渊名单.txt
MOV S93 <Img:4455:0:1:-3/@装备><Img:4457:0:1:-3/@杀人><Img:4459:0:1:-3/@荣誉><Img:4460:0:1:-3>
MOV S94 <Img:4493:0:1:-7>
MOV S95 <通过层数:/SCOLOR=161>
MOV S96 {<$HUMAN(AbyssMaxRecord)>/SCOLOR=151}
#IF
CHECKLEVELEX > 0
#ACT
;SendMsg 5 S90:<$STR(S90)>
MOV S50 --
MOV S51 --
MOV S52 --
MOV S53 --
MOV S54 --
MOV S55 --
MOV S56 --
MOV S57 --
MOV S58 --
MOV S59 --
MOV S60 0
MOV S61 0
MOV S62 0
MOV S63 0
MOV S64 0
MOV S65 0
MOV S66 0
MOV S67 0
MOV S68 0
MOV S69 0
MOV S70 --
MOV S71 --
MOV S72 --
MOV S73 --
MOV S74 --
MOV S75 --
MOV S76 --
MOV S77 --
MOV S78 --
MOV S79 --
MOV S80 0
MOV S81 0
MOV S82 0
MOV S83 0
MOV S84 0
MOV S85 0
MOV S86 0
MOV S87 0
MOV S88 0
MOV S89 0
MOV S97 100名外
MOV S98 <--/SCOLOR=83>
#IF
CHECKLEVELEX > 0
#ACT
GetStringPos <$STR(S92)> 最后一行数据标记
;SendMsg 5 字符串在列表中的位置:<$STR(N0)>
#IF
LARGE N0 10000
#ACT
GOTO @排行主界面
BREAK
#IF
LARGE N0 0
#ACT
GetListString <$STR(S91)> 0 S70 M1
MOV S80 <$STR(M1)>
SetStringBlank S70 14 0
SetStringBlank S80 7 1
#IF
LARGE N0 1
#ACT
GetListString <$STR(S91)> 1 S71 M1
MOV S81 <$STR(M1)>
SetStringBlank S71 14 0
SetStringBlank S81 7 1
#IF
LARGE N0 2
#ACT
GetListString <$STR(S91)> 2 S72 M1
MOV S82 <$STR(M1)>
SetStringBlank S72 14 0
SetStringBlank S82 7 1
#IF
LARGE N0 3
#ACT
GetListString <$STR(S91)> 3 S73 M1
MOV S83 <$STR(M1)>
SetStringBlank S73 14 0
SetStringBlank S83 7 1
#IF
LARGE N0 4
#ACT
GetListString <$STR(S91)> 4 S74 M1
MOV S84 <$STR(M1)>
SetStringBlank S74 14 0
SetStringBlank S84 7 1
#IF
LARGE N0 5
#ACT
GetListString <$STR(S91)> 5 S75 M1
MOV S85 <$STR(M1)>
SetStringBlank S75 14 0
SetStringBlank S85 7 1
#IF
LARGE N0 6
#ACT
GetListString <$STR(S91)> 6 S76 M1
MOV S86 <$STR(M1)>
SetStringBlank S76 14 0
SetStringBlank S86 7 1
#IF
LARGE N0 7
#ACT
GetListString <$STR(S91)> 7 S77 M1
MOV S87 <$STR(M1)>
SetStringBlank S77 14 0
SetStringBlank S87 7 1
#IF
LARGE N0 8
#ACT
GetListString <$STR(S91)> 8 S78 M1
MOV S88 <$STR(M1)>
SetStringBlank S78 14 0
SetStringBlank S88 7 1
#IF
LARGE N0 9
#ACT
GetListString <$STR(S91)> 9 S79 M1
MOV S89 <$STR(M1)>
SetStringBlank S79 14 0
SetStringBlank S89 7 1
#IF
LARGE N0 10
#ACT
GetListString <$STR(S91)> 10 S50 M1
MOV S60 <$STR(M1)>
SetStringBlank S50 14 0
SetStringBlank S60 7 1
#IF
LARGE N0 11
#ACT
GetListString <$STR(S91)> 11 S51 M1
MOV S61 <$STR(M1)>
SetStringBlank S51 14 0
SetStringBlank S61 7 1
#IF
LARGE N0 12
#ACT
GetListString <$STR(S91)> 12 S52 M1
MOV S62 <$STR(M1)>
SetStringBlank S52 14 0
SetStringBlank S62 7 1
#IF
LARGE N0 13
#ACT
GetListString <$STR(S91)> 13 S53 M1
MOV S63 <$STR(M1)>
SetStringBlank S53 14 0
SetStringBlank S63 7 1
#IF
LARGE N0 14
#ACT
GetListString <$STR(S91)> 14 S54 M1
MOV S64 <$STR(M1)>
SetStringBlank S54 14 0
SetStringBlank S64 7 1
#IF
LARGE N0 15
#ACT
GetListString <$STR(S91)> 15 S55 M1
MOV S65 <$STR(M1)>
SetStringBlank S55 14 0
SetStringBlank S65 7 1
#IF
LARGE N0 16
#ACT
GetListString <$STR(S91)> 16 S56 M1
MOV S66 <$STR(M1)>
SetStringBlank S56 14 0
SetStringBlank S66 7 1
#IF
LARGE N0 17
#ACT
GetListString <$STR(S91)> 17 S57 M1
MOV S67 <$STR(M1)>
SetStringBlank S57 14 0
SetStringBlank S67 7 1
#IF
LARGE N0 18
#ACT
GetListString <$STR(S91)> 18 S58 M1
MOV S68 <$STR(M1)>
SetStringBlank S58 14 0
SetStringBlank S68 7 1
#IF
LARGE N0 19
#ACT
GetListString <$STR(S91)> 19 S59 M1
MOV S69 <$STR(M1)>
SetStringBlank S59 14 0
SetStringBlank S69 7 1
#IF
CHECKNAMELISTPOSITION <$STR(S92)> > 0 P0
CHECKNAMELISTPOSITION <$STR(S92)> < 101 P0
#act
MOV S97 <$STR(P0)>
SetStringBlank S97 4 1
SetStringBlank S97 7 0
#elseact
MOV S97 100名外
#IF
LARGE P0 0
SMALL P0 101
EQUAL S90 装备
#ACT
GetRandomText .\QuestDiary\各类排行\排行奖励经验List.txt S99 <$STR(P0)>
MOV S98 <
INC S98 <$STR(S99)>
INC S98 经验/SCOLOR=250>
INC S98 +
GetRandomText .\QuestDiary\各类排行\排行奖励金币List.txt S99 <$STR(P0)>
INC S98 <
INC S98 <$STR(S99)>
INC S98 金币/SCOLOR=151>
INC S98 +
GetRandomText .\QuestDiary\各类排行\排行奖励物品List.txt S99 <$STR(P0)>
INC S98 白溟玄晶*
INC S98 <$STR(S99)>
#IF
LARGE P0 100
EQUAL S90 装备
#ACT
MOV S98 <
INC S98 3000000经验/SCOLOR=250>
INC S98 +
INC S98 <
INC S98 100000金币/SCOLOR=151>
;#IF
;CHECKVAR HUMAN RankAward > 0
;#ACT
;MOV S98 <已领取/SCOLOR=83>
#IF
CHECKLEVELEX > 0
#ACT
GOTO @排行主界面
BREAK
[@排行主界面]
#IF
CHECKLEVELEX > 0
#ACT
OpenBigDialogBox 1
BREAK
#SAY
<$STR(S93)>\
\
\
<$STR(S94)> <$STR(S94)>\
< /SCOLOR=159> {<$STR(S70)>/SCOLOR=151} {<$STR(S80)>/SCOLOR=151} <11/SCOLOR=159> {<$STR(S50)>/SCOLOR=159} {<$STR(S60)>/SCOLOR=159}\
< /SCOLOR=159> {<$STR(S71)>/SCOLOR=161} {<$STR(S81)>/SCOLOR=161} <12/SCOLOR=159> {<$STR(S51)>/SCOLOR=159} {<$STR(S61)>/SCOLOR=159}\
< /SCOLOR=159> {<$STR(S72)>/SCOLOR=102} {<$STR(S82)>/SCOLOR=102} <13/SCOLOR=159> {<$STR(S52)>/SCOLOR=159} {<$STR(S62)>/SCOLOR=159}\
<4/SCOLOR=159> {<$STR(S73)>/SCOLOR=159} {<$STR(S83)>/SCOLOR=159} <14/SCOLOR=159> {<$STR(S53)>/SCOLOR=159} {<$STR(S63)>/SCOLOR=159}\
<5/SCOLOR=159> {<$STR(S74)>/SCOLOR=159} {<$STR(S84)>/SCOLOR=159} <15/SCOLOR=159> {<$STR(S54)>/SCOLOR=159} {<$STR(S64)>/SCOLOR=159}\
<6/SCOLOR=159> {<$STR(S75)>/SCOLOR=159} {<$STR(S85)>/SCOLOR=159} <16/SCOLOR=159> {<$STR(S55)>/SCOLOR=159} {<$STR(S65)>/SCOLOR=159}\
<7/SCOLOR=159> {<$STR(S76)>/SCOLOR=159} {<$STR(S86)>/SCOLOR=159} <17/SCOLOR=159> {<$STR(S56)>/SCOLOR=159} {<$STR(S66)>/SCOLOR=159}\
<8/SCOLOR=159> {<$STR(S77)>/SCOLOR=159} {<$STR(S87)>/SCOLOR=159} <18/SCOLOR=159> {<$STR(S57)>/SCOLOR=159} {<$STR(S67)>/SCOLOR=159}\
<9/SCOLOR=159> {<$STR(S78)>/SCOLOR=159} {<$STR(S88)>/SCOLOR=159} <19/SCOLOR=159> {<$STR(S58)>/SCOLOR=159} {<$STR(S68)>/SCOLOR=159}\
<10/SCOLOR=159> {<$STR(S79)>/SCOLOR=159} {<$STR(S89)>/SCOLOR=159} <20/SCOLOR=159> {<$STR(S59)>/SCOLOR=159} {<$STR(S69)>/SCOLOR=159}\
<Img:4042:0:11:23/@领取排行奖励> <Img:0:0:0:0>\
{<$STR(S97)>/SCOLOR=151} <$STR(S95)> <$STR(S96)> \
<$STR(S98)>\
[@领取排行奖励]
#IF
HOUR 0 20
#ACT
MESSAGEBOX 21:30之后才可以领取排名奖励!
BREAK
#IF
HOUR 21
MIN 0 29
#ACT
MESSAGEBOX 21:30之后才可以领取排名奖励!
BREAK
#IF
CHECKVAR HUMAN RankAward > 0
#ACT
MESSAGEBOX 你已经领取过今天的装备排名奖励,请明天再来!
BREAK
#IF
EQUAL S90 装备
#ELSEACT
MESSAGEBOX 目前只有装备排行才有排名奖励!
BREAK
#IF
CHECKLEVELEX > 0
#ACT
GetStringPos .\QuestDiary\排序数据\装备名单.txt <$USERNAME>
SENDMSG 6 排名:<$STR(N0)>
CALCVAR HUMAN RankAward = 1
SAVEVAR HUMAN RankAward ..\QuestDiary\变量数据\其他次数数据.txt
#IF
SMALL N0 101
#ACT
INC N0 1
GetRandomText .\QuestDiary\各类排行\排行奖励经验List.txt S11 <$STR(N0)>
CHANLeg引擎XP + <$STR(S11)>
GetRandomText .\QuestDiary\各类排行\排行奖励金币List.txt S12 <$STR(N0)>
GIVE 金币 <$STR(S12)>
GetRandomText .\QuestDiary\各类排行\排行奖励物品List.txt S13 <$STR(N0)>
GIVE 白溟玄晶 <$STR(S13)>
SendCenterMsg 22 26 『<$USERNAME>』领取了【装备排名奖励】,排名:<$STR(N0)>,奖励:<$STR(S11)>经验+<$STR(S12)>金币+白溟玄晶*<$STR(S13)>！ 1
SENDMSG 6 你领取了【装备排名奖励】,排名:<$STR(N0)>,奖励:<$STR(S11)>经验+<$STR(S12)>金币+白溟玄晶*<$STR(S13)>！！
BREAK
#IF
CHECKLEVELEX > 0
#ACT
CHANLeg引擎XP + 3000000
GIVE 金币 100000
SendCenterMsg 22 26 『<$USERNAME>』领取了【装备排名奖励】,排名100名之后,奖励:3000000经验+100000金币！ 1
SENDMSG 6 你领取了【装备排名奖励】,排名100名之后,奖励:3000000经验+100000金币！
BREAK
[@装备]
#IF
CHECKLEVELEX > 0
#ACT
MOV S90 装备
GOTO @装备排名系统
BREAK
[@深渊]
#IF
CHECKLEVELEX > 0
#ACT
MOV S90 深渊
GOTO @装备排名系统
BREAK
[@杀人]
#IF
CHECKLEVELEX > 0
#ACT
MOV S90 杀人
GOTO @装备排名系统
BREAK
[@荣誉]
#IF
CHECKLEVELEX > 0
#ACT
MOV S90 荣誉
GOTO @装备排名系统
BREAK
}
|传奇服务端| 一休论坛 ( 冀ICP备2023015431号-6 ) |网站地图
发表于 2016-8-4 08:13:03
发表于 2016-8-4 10:01:28