传奇回收排行榜奖励脚本

admin · 发表于 2016-3-13 16:22:25

[@main]
#IF
#ACT
MOV S4
MOV S5
MOV S6
MOV S7
MOV S8
MOV N71 0
MOV N72 0
MOV N73 0
MOV N74 0
MOV N75 0
#IF
#ACT
CLEARNAMELIST ..\QuestDiary\排行系统\实时排名ql.txt
LOADVAR HUMAN 勤劳点数 ..\QuestDiary\数据文件\勤劳排行.txt
SortHumVarToListEx 勤劳点数 .\QuestDiary\数据文件\勤劳排行.txt 1 .\QuestDiary\排行系统\实时排名ql.txt 1
GetListString .\QuestDiary\排行系统\实时排名ql.txt 0 S4 N81
GetListString .\QuestDiary\排行系统\实时排名ql.txt 1 S5 N82
GetListString .\QuestDiary\排行系统\实时排名ql.txt 2 S6 N83
GetListString .\QuestDiary\排行系统\实时排名ql.txt 3 S7 N84
GetListString .\QuestDiary\排行系统\实时排名ql.txt 4 S8 N85
SetStringBlank S4 14 0
SetStringBlank S5 14 0
SetStringBlank S6 14 0
SetStringBlank S7 14 0
SetStringBlank S8 14 0
MOV S111 <$USERNAME>
INC S111 :<$HUMAN(勤劳点数)>
GetStringPos .\QuestDiary\排行系统\实时排名ql.txt <$STR(S111)>
OpenBigDialogBox 10
#say
\ \
\                                     <《回收排名榜》/SCOLOR=250>\ \
　　　　　　　　　　<本服独创勤劳榜系统，于每天00:00进行统计回收元宝数。凡是当天/SCOLOR=254>\
　　　　　　　　　　<回收元宝前三名的玩家，都会获得当天回收总值的百分比返还奖励。/SCOLOR=254>\
　　　　　　　　　　<在第二天按照名次分别领取15%、10%、5%的元宝返还。/SCOLOR=254>\
　　　　　　　　　　<详细的说，比如你当天回收了10万，而且排名又是第一名的话，那/SCOLOR=253>\
　　　　　　　　　　<么第二天你就能领取1.5万的返还。/SCOLOR=253><注：只累计当天数，第二天清零。/SCOLOR=58>\
　　　　　　　　　　<──────────────────────────────/SCOLOR=13> \
　　　　　　　　　　　　　　　 <Img:39:0:0:0><Img:39:0:0:0><Img:39:0:0:0><您今日已经回收：[/SCOLOR=250>{<$HUMAN(勤劳点数)>/SCOLOR=151}<]个元宝/SCOLOR=250><Img:39:0:0:0><Img:39:0:0:0><Img:39:0:0:0>\
　回收排名榜　　 \
　　　　　　　　　　<今日回收第一名的玩家为:/SCOLOR=242>{<$STR(S4)>/SCOLOR=254}  <回收数量为：/SCOLOR=70>{<$STR(N81)>/SCOLOR=253}\
<回收元宝前三名的玩/AUTOCOLOR=159>　 <今日回收第二名的玩家为:/SCOLOR=242>{<$STR(S5)>/SCOLOR=254}  <回收数量为：/SCOLOR=70>{<$STR(N82)>/SCOLOR=253}\
<家，将获得当天回收/AUTOCOLOR=159>　 <今日回收第三名的玩家为:/SCOLOR=242>{<$STR(S6)>/SCOLOR=254}  <回收数量为：/SCOLOR=70>{<$STR(N83)>/SCOLOR=253}\
<总值百分比返还奖励/AUTOCOLOR=159>　 \ \
<查看昨日前三名排行/@dqql2>　 <──────────────────────────────/SCOLOR=13> \
　　　　　　　　　　<温馨提醒：/SCOLOR=58><昨日排名前三的玩家可以点此排行进行领取返还！/@dqql2>\
　　　　　　　　　　<──────────────────────────────/SCOLOR=13> \

[@dqql2]
#IF
#ACT
MOV S4
MOV S5
MOV S6
MOV S7
MOV S8
MOV N81 0
MOV N82 0
MOV N83 0
MOV N84 0
MOV N85 0
GetListString .\QuestDiary\排行系统\最终排行ql.txt 0 S4 N81
GetListString .\QuestDiary\排行系统\最终排行ql.txt 1 S5 N82
GetListString .\QuestDiary\排行系统\最终排行ql.txt 2 S6 N83
GetListString .\QuestDiary\排行系统\最终排行ql.txt 3 S7 N84
GetListString .\QuestDiary\排行系统\最终排行ql.txt 4 S8 N85
SetStringBlank S4 14 0
SetStringBlank S5 14 0
SetStringBlank S6 14 0
SetStringBlank S7 14 0
SetStringBlank S8 14 0
MOV S111 <$USERNAME>
INC S111 :<$HUMAN(勤劳点数)>
GetStringPos .\QuestDiary\排行系统\最终排行ql.txt <$STR(S111)>
OpenBigDialogBox 10
#say
\ \
\                                     <《昨日回收排名榜》/SCOLOR=250>\ \
　　　　　　　　　　<本服独创勤劳榜系统，于每天00:00进行统计回收元宝数。凡是当天/SCOLOR=254>\
　　　　　　　　　　<回收元宝前三名的玩家，都会获得当天回收总值的百分比返还奖励。/SCOLOR=254>\
　　　　　　　　　　<在第二天按照名次分别领取15%、10%、5%的元宝返还。/SCOLOR=254>\
　　　　　　　　　　<详细的说，比如你当天回收了10万，而且排名又是第一名的话，那/SCOLOR=253>\
　　　　　　　　　　<么第二天你就能领取1.5万的返还。/SCOLOR=253><注：只累计当天数，第二天清零。/SCOLOR=58>\
　　　　　　　　　　<──────────────────────────────/SCOLOR=13> \
　　　　　　　　　　　　　　　　<Img:39:0:0:0><Img:39:0:0:0><Img:39:0:0:0><昨日排行回收排行名次/SCOLOR=250><Img:39:0:0:0><Img:39:0:0:0><Img:39:0:0:0>\
　回收排名榜　　\
　　　　　　　　　　<昨日回收第一名的玩家为:/SCOLOR=242>{<$STR(S4)>/SCOLOR=254}  <回收数量为：/SCOLOR=70>{<$STR(N81)>/SCOLOR=253}\
<回收元宝前三名的玩/AUTOCOLOR=159>　 <昨日回收第二名的玩家为:/SCOLOR=242>{<$STR(S5)>/SCOLOR=254}  <回收数量为：/SCOLOR=70>{<$STR(N82)>/SCOLOR=253}\
<家，将获得当天回收/AUTOCOLOR=159>　 <昨日回收第三名的玩家为:/SCOLOR=242>{<$STR(S6)>/SCOLOR=254}  <回收数量为：/SCOLOR=70>{<$STR(N83)>/SCOLOR=253}\
<总值百分比返还奖励/AUTOCOLOR=159>　\ \
<返回今日前三名排行/@main>　 <──────────────────────────────/SCOLOR=13> \
　　　　　　　　  　　<第一名返还/@ph1>　 <第二名返还/@ph2>　 <第三名返还/@ph3>\

[@ph1]
#IF
EQUAL A341 <$USERNAME>
#act
MOV N51 0
GOTO @gm001
#ELSEACT
MessageBox 操作失败：\　\您不是昨日勤劳第一名，无法领取本奖励。
BREAK
[@gm001]
#IF
Equal G361 0
#act
GOTO @ly001
#ELSEACT
MessageBox 操作失败：\　\您已经领取过该奖励，无法重复领取本奖励。
BREAK
[@ly001]
#IF
Large G331 0
#act
Div N51 <$STR(G331)> 100
MUL N51 <$STR(N51)> 15
Gamegold + <$STR(N51)>
MOV G361 1
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第一名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第一名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第一名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第一名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第一名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
#ELSEACT
MessageBox 操作失败：\　\数据异常，无法领取！
BREAK

[@ph2]
#IF
EQUAL A342 <$USERNAME>
#act
MOV N51 0
GOTO @gm002
#ELSEACT
MessageBox 操作失败：\　\您不是昨日勤劳第二名，无法领取本奖励。
BREAK
[@gm002]
#IF
Equal G362 0
#act
GOTO @ly002
#ELSEACT
MessageBox 操作失败：\　\您已经领取过该奖励，无法重复领取本奖励。
BREAK
[@ly002]
#IF
Large G337 0
#act
Div N51 <$STR(G337)> 100
MUL N51 <$STR(N51)> 10
Gamegold + <$STR(N51)>
MOV G362 1
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第二名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第二名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第二名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第二名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第二名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
#ELSEACT
MessageBox 操作失败：\　\数据异常，无法领取！
BREAK

[@ph3]
#IF
EQUAL A343 <$USERNAME>
#act
MOV N51 0
GOTO @gm003
#ELSEACT
MessageBox 操作失败：\　\您不是昨日勤劳第三名，无法领取本奖励。
BREAK
[@gm003]
#IF
Equal G363 0
#act
GOTO @ly003
#ELSEACT
MessageBox 操作失败：\　\您已经领取过该奖励，无法重复领取本奖励。
BREAK
[@ly003]
#IF
Large G333 0
#act
Div N51 <$STR(G333)> 100
MUL N51 <$STR(N51)> 5
Gamegold + <$STR(N51)>
MOV G363 1
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第三名的玩家：<$USERNAME>领取了5%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第三名的玩家：<$USERNAME>领取了5%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第三名的玩家：<$USERNAME>领取了5%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第三名的玩家：<$USERNAME>领取了5%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第三名的玩家：<$USERNAME>领取了5%返还奖励，元宝增加<$STR(N51)> 1 5
#ELSEACT
MessageBox 操作失败：\　\数据异常，无法领取！
BREAK

[@ph4]
#IF
EQUAL A334 <$USERNAME>
#act
MOV N51 0
GOTO @gm004
#ELSEACT
MessageBox 操作失败：\　\您不是昨日勤劳第四名，无法领取本奖励。
BREAK
[@gm004]
#IF
Equal G364 0
#act
GOTO @ly004
#ELSEACT
MessageBox 操作失败：\　\您已经领取过该奖励，无法重复领取本奖励。
BREAK
[@ly004]
#IF
Large G334 0
#act
Div N51 <$STR(G334)> 100
MUL N51 <$STR(N51)> 15
Gamegold + <$STR(N51)>
MOV G364 1
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第四名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第四名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第四名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第四名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第四名的玩家：<$USERNAME>领取了15%返还奖励，元宝增加<$STR(N51)> 1 5
#ELSEACT
MessageBox 操作失败：\　\数据异常，无法领取！
BREAK
[@ph5]
#IF
EQUAL A335 <$USERNAME>
#act
MOV N51 0
GOTO @gm005
#ELSEACT
MessageBox 操作失败：\　\您不是昨日勤劳第五名，无法领取本奖励。
BREAK
[@gm005]
#IF
Equal G365 0
#act
GOTO @ly005
#ELSEACT
MessageBox 操作失败：\　\您已经领取过该奖励，无法重复领取本奖励。
BREAK
[@ly005]
#IF
Large G335 0
#act
Div N51 <$STR(G335)> 100
MUL N51 <$STR(N51)> 10
Gamegold + <$STR(N51)>
MOV G365 1
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第五名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第五名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第五名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第五名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
SendCenterMsg 251 249 （回收排行榜）:昨天勤劳第五名的玩家：<$USERNAME>领取了10%返还奖励，元宝增加<$STR(N51)> 1 5
#ELSEACT
MessageBox 操作失败：\　\数据异常，无法领取！
BREAK

a13405542325 · 发表于 2020-4-1 13:52:17

这个服务端不错，看看能不能开起来。

shayacheng · 发表于 2020-4-15 12:21:38

站长，有没有中变之类的版本，我想开个中变传奇私服和朋友一块玩！

shangmo · 发表于 2020-4-15 12:21:50

站长，有没有微变之类的版本，我想开个微变传奇私服和朋友一块玩！

619265271 · 发表于 2020-5-17 11:26:41

咱们的论坛资源很多了，什么时候出点传奇架设教程来看看？

dssfdf · 发表于 2020-5-17 20:05:02

最喜欢GM起点这个传奇版本库了

z78925 · 发表于 2020-7-4 20:05:43

怀旧版传奇谁开了？如果人气不错的，我想玩玩。原汁原味的话，更不错。;有东北网通的朋友，怎么网通线路架设个传奇就那么难啊！

wmovqqpe52 · 发表于 2021-1-17 16:53:40

gom引擎的版本多更新点吧，很喜欢这种炫酷的版本！

NoptoMjoypE · 发表于 2021-4-3 13:02:20

我开了个1.95传奇，有没有想玩的？站内PM我一下，送路费和装备！

nmbgcgnqgp · 发表于 2021-11-18 15:09:02

弱弱的问一句：把这个版本弄成商业传奇要多少钱？不懂任何技术的情况下！

GM起点

[传奇脚本] 传奇回收排行榜奖励脚本

相关帖子