[@main]
#IF
CHECKTEXTLIST ..\QuestDiary\数据文件\捐献名单排行.txt <$USERNAME>
#ACT
GetStringPos ..\QuestDiary\数据文件\捐献名单排行.txt <$USERNAME>
MOV N$排名 <$STR(N0)>
INC N$排名 1
MOV S$介绍 第[<$STR(N$排名)>]名
#ELSEACT
MOV S$介绍 暂未获得排名
#IF
#ACT
GetListString ..\QuestDiary\数据文件\捐献排名.txt 0 A461 N40
GetListString ..\QuestDiary\数据文件\捐献排名.txt 1 A462 N41
GetListString ..\QuestDiary\数据文件\捐献排名.txt 2 A463 N42
GetListString ..\QuestDiary\数据文件\捐献排名.txt 3 A464 N43
GetListString ..\QuestDiary\数据文件\捐献排名.txt 4 A465 N44
GetListString ..\QuestDiary\数据文件\捐献排名.txt 6 A466 N45
GetListString ..\QuestDiary\数据文件\捐献排名.txt 7 A467 N46
GetListString ..\QuestDiary\数据文件\捐献排名.txt 8 A468 N47
GetListString ..\QuestDiary\数据文件\捐献排名.txt 9 A469 N48
GetListString ..\QuestDiary\数据文件\捐献排名.txt 10 A470 N49
MOV S$捐献排名1 <$STR(A461)>
MOV S$捐献排名2 <$STR(A462)>
MOV S$捐献排名3 <$STR(A463)>
MOV S$捐献排名4 <$STR(A464)>
MOV S$捐献排名5 <$STR(A465)>
MOV S$捐献排名6 <$STR(A466)>
MOV S$捐献排名7 <$STR(A467)>
MOV S$捐献排名8 <$STR(A468)>
MOV S$捐献排名9 <$STR(A469)>
MOV S$捐献排名10 <$STR(A470)>
SetStringBlank S$捐献排名1 14 1
SetStringBlank S$捐献排名2 14 1
SetStringBlank S$捐献排名3 14 1
SetStringBlank S$捐献排名4 14 1
SetStringBlank S$捐献排名5 14 1
SetStringBlank S$捐献排名6 14 1
SetStringBlank S$捐献排名7 14 1
SetStringBlank S$捐献排名8 14 1
SetStringBlank S$捐献排名9 14 1
SetStringBlank S$捐献排名10 14 1
MOV G281 <$STR(N40)>
MOV G282 <$STR(N41)>
MOV G283 <$STR(N42)>
MOV G284 <$STR(N43)>
MOV G285 <$STR(N44)>
MOV G286 <$STR(N45)>
MOV G287 <$STR(N46)>
MOV G288 <$STR(N47)>
MOV G289 <$STR(N48)>
MOV G290 <$STR(N49)>
MOV S$捐献金额A1 <$STR(G281)>
MOV S$捐献金额A2 <$STR(G282)>
MOV S$捐献金额A3 <$STR(G283)>
MOV S$捐献金额A4 <$STR(G284)>
MOV S$捐献金额A5 <$STR(G285)>
MOV S$捐献金额A6 <$STR(G286)>
MOV S$捐献金额A7 <$STR(G287)>
MOV S$捐献金额A8 <$STR(G288)>
MOV S$捐献金额A9 <$STR(G289)>
MOV S$捐献金额A10 <$STR(G290)>
SetStringBlank S$捐献金额A1 10 1
SetStringBlank S$捐献金额A2 10 1
SetStringBlank S$捐献金额A3 10 1
SetStringBlank S$捐献金额A4 10 1
SetStringBlank S$捐献金额A5 10 1
SetStringBlank S$捐献金额A6 10 1
SetStringBlank S$捐献金额A7 10 1
SetStringBlank S$捐献金额A8 10 1
SetStringBlank S$捐献金额A9 10 1
SetStringBlank S$捐献金额A10 10 1
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 0 S$今日捐献 N$富豪金额
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\今日01区.txt 0 S$今日首区 S$捐献金额0
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\今日02区.txt 0 S$今日二区 S$捐献金额1
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\今日03区.txt 0 S$今日三区 S$捐献金额2
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\今日04区.txt 0 S$今日四区 S$捐献金额3
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\今日05区.txt 0 S$今日五区 S$捐献金额4
MOV N$总金额 0
;MOV N$富豪捐献 <$STR(N$富豪金额)>
;DIV N$富豪捐献 2
INC N$总金额 <$str(S$捐献金额0)>
INC N$总金额 <$str(S$捐献金额1)>
INC N$总金额 <$str(S$捐献金额2)>
INC N$总金额 <$str(S$捐献金额3)>
INC N$总金额 <$str(S$捐献金额4)>
INC N$总金额 <$str(S$捐献金额5)>
INC N$总金额 <$str(S$捐献金额6)>
INC N$总金额 <$str(S$捐献金额7)>
INC N$总金额 <$str(S$捐献金额8)>
INC N$总金额 <$str(S$捐献金额9)>
INC N$总金额 <$str(S$捐献金额10)>
INC N$总金额 <$STR(N$富豪捐献)>
;==============================
MOV N$总计发放 <$STR(N$总金额)>
DIV N$总计发放 10
MUL N$总计发放 7
MOV N$胜利方奖励 <$STR(N$总计发放)>
DIV N$胜利方奖励 10
MUL N$胜利方奖励 6
MOV N$失败方奖励 <$STR(N$总计发放)>
DIV N$失败方奖励 10
MUL N$失败方奖励 4
;==============================
SetStringBlank S$今日首区 5 1
SetStringBlank S$今日二区 5 1
SetStringBlank S$今日三区 5 1
SetStringBlank S$今日四区 5 1
SetStringBlank S$今日五区 5 1
SetStringBlank S$捐献金额0 5 1
SetStringBlank S$捐献金额1 5 1
SetStringBlank S$捐献金额2 5 1
SetStringBlank S$捐献金额3 5 1
SetStringBlank S$捐献金额4 5 1
SetStringBlank S$捐献金额5 5 1
SetStringBlank S$捐献金额6 5 1
SetStringBlank S$捐献金额7 5 1
SetStringBlank S$捐献金额8 5 1
SetStringBlank S$捐献金额9 5 1
CloseBigDialogBox
OPENMERCHANTBIGDLG 1 390 1 4 0 -85 1 628 19
#Say
\<img:630:1:266:-12>\ \ \ \
<第一富豪:/SCOLOR=249> <【/SCOLOR=254><$STR(S$捐献排名1)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A1)><】/SCOLOR=254> <[查看榜一属性]|249#属性说明:一统天下必备^253#第一富豪：★★★王·爵★★★ 刀刀切割+90W 攻击力倍数1.8 全元素+5%^253#凡是捐献满3000RMB以上的:刀刀切割+90W 攻击力倍数1.8% 全元素+5% ^253#凡是捐献满3000RMB以上的:专属坐骑(麒麟)直接斩杀低于10%血量的绿色怪物和白色怪物^253#凡是捐献满3000RMB以上的:永久保留所有属性(合区不清理)/SCOLOR=70>\ \
<第二富豪:/SCOLOR=253> <【/SCOLOR=254><$STR(S$捐献排名2)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A2)><】/SCOLOR=254> <[查看榜二属性]|249#属性说明:一统天下必备^253#第二富豪：★★★公·爵★★★ 刀刀切割+60W 攻击力倍数1.4 全元素+3%/SCOLOR=70> \ \
<第三富豪:/SCOLOR=254> <【/SCOLOR=254><$STR(S$捐献排名3)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A3)><】/SCOLOR=254> <[查看榜三属性]|249#属性说明:一统天下必备^253#第三富豪：★★★候·爵★★★ 刀刀切割+40W 攻击力倍数1.3 全元素+2%/SCOLOR=70> \ \
<第四富豪:/SCOLOR=243> <【/SCOLOR=254><$STR(S$捐献排名4)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A4)><】/SCOLOR=254> <[查看榜四属性]|249#属性说明:一统天下必备^253#第四富豪：★★★子·爵★★★ 刀刀切割+25W 攻击力倍数1.2 全元素+1%/SCOLOR=70> \ \
<第五富豪:/SCOLOR=150> <【/SCOLOR=254><$STR(S$捐献排名5)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A5)><】/SCOLOR=254> <[查看榜五属性]|249#属性说明:一统天下必备^253#第五富豪：★★★子·爵★★★ 刀刀切割+25W 攻击力倍数1.1 全元素+1%/SCOLOR=70> \ \
<第六富豪:/SCOLOR=218> <【/SCOLOR=254><$STR(S$捐献排名6)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A6)><】/SCOLOR=254> <[查看榜六属性]|249#属性说明:一统天下必备^253#第六富豪：★★★子·爵★★★ 刀刀切割+25W 攻击力倍数1.1 全元素+1%/SCOLOR=70> \ \
<第七富豪:/SCOLOR=218> <【/SCOLOR=254><$STR(S$捐献排名7)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A7)><】/SCOLOR=254> <[查看榜七属性]|249#属性说明:一统天下必备^253#第七富豪：★★★子·爵★★★ 刀刀切割+25W 攻击力倍数1.1 全元素+1%/SCOLOR=70> \ \
<第八富豪:/SCOLOR=218> <【/SCOLOR=254><$STR(S$捐献排名8)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A8)><】/SCOLOR=254> <[查看榜八属性]|249#属性说明:一统天下必备^253#第八富豪：★★★子·爵★★★ 刀刀切割+25W 攻击力倍数1.1 全元素+1%/SCOLOR=70> \ \
<第九富豪:/SCOLOR=218> <【/SCOLOR=254><$STR(S$捐献排名9)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A9)><】/SCOLOR=254> <[查看榜九属性]|249#属性说明:一统天下必备^253#第九富豪：★★★子·爵★★★ 刀刀切割+25W 攻击力倍数1.1 全元素+1%/SCOLOR=70> \ \
<第十富豪:/SCOLOR=218> <【/SCOLOR=254><$STR(S$捐献排名10)><】/SCOLOR=254> <当前捐献RMB点数量:/SCOLOR=253><【/SCOLOR=254><$STR(S$捐献金额A10)><】/SCOLOR=254> <[查看榜十属性]|249#属性说明:一统天下必备^253#第十富豪：★★★子·爵★★★ 刀刀切割+25W 攻击力倍数1.1 全元素+1%/SCOLOR=70> \ \
<> <凡是捐献10RMB以上均可获得 杀怪暴率+20% 基础攻击+300 基础血量+30000 刀刀切割怪物5W/SCOLOR=249>\
<> <------------------------------------------------------------------------------------------->\
<> <注：合区后关闭排行功能，清理排行“捐献满1000永久保留所有属性(合区永不清理)”/SCOLOR=254>\
<> <注：每次捐献的100% 累计到攻城奖金 用于发放攻城福利 官方绝不盈利/SCOLOR=242> <【您当前拥有RMB：/FCOLOR=251>{<$GAMEPOINT>点!】/FCOLOR=251}\
<> <注：捐献满3000RMB即可永久获得 榜一所有属性/SCOLOR=242><你当前已捐献（<$HUMAN(捐献)>）RMB点/SCOLOR=249><【/SCOLOR=249><捐 赠 RMB点|^253#最低10RMB点起捐/@@InPutInteger33(最低10起捐)><】/SCOLOR=249> \
<> <注：捐献满3000RMB即可永久获得 ◆麒麟神兽◆/SCOLOR=242><你当前已捐献（<$HUMAN(捐献)>）RMB点/SCOLOR=249><【/SCOLOR=249><领取麒麟神兽|^250#【麒麟神兽专属：斩杀低于10%血量的绿色怪物和白色怪物】^250#【麒麟神兽专属：斩杀低于10%血量的绿色怪物和白色怪物】^250#【捐献满3000的玩家不需要再合成［切割］】^250#【捐献满3000的玩家不需要再合成［切割］】/@领取神兽><】/SCOLOR=249> \
[@领取神兽]
#IF
CHECKVAR HUMAN 捐献 < 2000
#ACT
messagebox 你捐献不到2000点，无法领取
break
#if
CHECK [30] 1
#act
MESSAGEBOX [失败:]\ \ 每个角色只能领取一次
BREAK
#IF
CHECK [30]
CHECKVAR HUMAN 捐献 > 1999
#ACT
SET [30] 1
give ≮麒麟≯ゞ神兽 1
SENDMSG 0 249 116 恭喜【<$USERNAME>】【捐献[3000]RMB】领取麒麟神兽!（其切割功能和终极切割，［切割］·秒杀符箓√【超凡】属性一样)【捐献满2000的玩家不需要再合成［切割］】
break
[@InPutInteger33]
#IF
CHECKVAR HUMAN 捐献 < 10
SMALL N33 10
#ACT
MESSAGEBOX 注意：首次捐献必须大于10，第二次可任意捐献！
break
#IF
CHECKGAMEPOINT < <$STR(N33)>
#ACT
messagebox 您的RMB点不足：<$STR(N33)>点，无法捐献！
break
#IF
EQUAL <$STR(N33)> 0
#ACT
MESSAGEBOX 错误！请重新输入！！
BREAK
#if
#act
mov N$统计捐献总量 <$HUMAN(捐献)>
INC N$统计捐献总量 <$STR(N33)>
#IF
large N$统计捐献总量 2000
#ACT
MESSAGEBOX 你已捐献了<$HUMAN(捐献)>点,当前在捐<$STR(N33)>,总数超过最高的封顶2000点！！
BREAK
#IF
CHECKGAMEPOINT ? <$STR(N33)>
NOT CheckContainsText <$SERVERNAME> 通宵
NOT CheckContainsText <$SERVERNAME> 01区
NOT CheckContainsText <$SERVERNAME> 02区
NOT CheckContainsText <$SERVERNAME> 03区
NOT CheckContainsText <$SERVERNAME> 04区
NOT CheckContainsText <$SERVERNAME> 05区
#ACT
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 0 S$今日捐献 N$富豪金额
INC N$富豪金额 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 今日捐献:<$STR(N$富豪金额)> 0
GAMEPOINT - <$STR(N33)>
CALCVAR HUMAN 捐献 + <$STR(N33)>
SAVEVAR HUMAN 捐献 ..\QuestDiary\数据文件\捐献变量.txt
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献排名.txt 1
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献名单排行.txt 0
GetListString ..\QuestDiary\数据文件\捐献排名.txt 0 A461 N40
GetListString ..\QuestDiary\数据文件\捐献排名.txt 1 A462 N41
GetListString ..\QuestDiary\数据文件\捐献排名.txt 2 A463 N42
GetListString ..\QuestDiary\数据文件\捐献排名.txt 3 A464 N43
GetListString ..\QuestDiary\数据文件\捐献排名.txt 4 A465 N44
GetListString ..\QuestDiary\数据文件\捐献排名.txt 5 A466 N45
GetListString ..\QuestDiary\数据文件\捐献排名.txt 6 A467 N46
GetListString ..\QuestDiary\数据文件\捐献排名.txt 7 A468 N47
GetListString ..\QuestDiary\数据文件\捐献排名.txt 8 A469 N48
GetListString ..\QuestDiary\数据文件\捐献排名.txt 9 A470 N49
MOV S$捐献排名1 <$STR(A461)>
MOV S$捐献排名2 <$STR(A462)>
MOV S$捐献排名3 <$STR(A463)>
MOV S$捐献排名4 <$STR(A464)>
MOV S$捐献排名5 <$STR(A465)>
MOV S$捐献排名6 <$STR(A466)>
MOV S$捐献排名7 <$STR(A467)>
MOV S$捐献排名8 <$STR(A468)>
MOV S$捐献排名9 <$STR(A469)>
MOV S$捐献排名10 <$STR(A470)>
MOV G281 <$STR(N40)>
MOV G282 <$STR(N41)>
MOV G283 <$STR(N42)>
MOV G284 <$STR(N43)>
MOV G285 <$STR(N44)>
MOV G286 <$STR(N45)>
MOV G287 <$STR(N46)>
MOV G288 <$STR(N47)>
MOV G289 <$STR(N48)>
MOV G290 <$STR(N49)>
CLEARNAMELIST ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日01区.txt
AddTextListEx ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日01区.txt 今日一区:<$STR(G21)> 0
#CALL [\游戏登陆\属性设置.txt] @属性刷新
#CALL [\数据文件\捐献封号.txt] @捐献检测
BREAK
#IF
CHECKGAMEPOINT ? <$STR(N33)>
CheckContainsText <$SERVERNAME> 1区
#ACT
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 0 S$今日捐献 N$富豪金额
INC N$富豪金额 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 今日捐献:<$STR(N$富豪金额)> 0
GAMEPOINT - <$STR(N33)>
CALCVAR HUMAN 捐献 + <$STR(N33)>
SAVEVAR HUMAN 捐献 ..\QuestDiary\数据文件\捐献变量.txt
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献排名.txt 1
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献名单排行.txt 0
GetListString ..\QuestDiary\数据文件\捐献排名.txt 0 A461 N40
GetListString ..\QuestDiary\数据文件\捐献排名.txt 1 A462 N41
GetListString ..\QuestDiary\数据文件\捐献排名.txt 2 A463 N42
GetListString ..\QuestDiary\数据文件\捐献排名.txt 3 A464 N43
GetListString ..\QuestDiary\数据文件\捐献排名.txt 4 A465 N44
GetListString ..\QuestDiary\数据文件\捐献排名.txt 5 A466 N45
GetListString ..\QuestDiary\数据文件\捐献排名.txt 6 A467 N46
GetListString ..\QuestDiary\数据文件\捐献排名.txt 7 A468 N47
GetListString ..\QuestDiary\数据文件\捐献排名.txt 8 A469 N48
GetListString ..\QuestDiary\数据文件\捐献排名.txt 9 A470 N49
MOV S$捐献排名1 <$STR(A461)>
MOV S$捐献排名2 <$STR(A462)>
MOV S$捐献排名3 <$STR(A463)>
MOV S$捐献排名4 <$STR(A464)>
MOV S$捐献排名5 <$STR(A465)>
MOV S$捐献排名6 <$STR(A466)>
MOV S$捐献排名7 <$STR(A467)>
MOV S$捐献排名8 <$STR(A468)>
MOV S$捐献排名9 <$STR(A469)>
MOV S$捐献排名10 <$STR(A470)>
MOV G281 <$STR(N40)>
MOV G282 <$STR(N41)>
MOV G283 <$STR(N42)>
MOV G284 <$STR(N43)>
MOV G285 <$STR(N44)>
MOV G286 <$STR(N45)>
MOV G287 <$STR(N46)>
MOV G288 <$STR(N47)>
MOV G289 <$STR(N48)>
MOV G290 <$STR(N49)>
;INC G21 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日01区.txt
AddTextListEx ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日01区.txt 今日一区:<$STR(G21)> 0
#CALL [\游戏登陆\属性设置.txt] @属性刷新
#CALL [\数据文件\捐献封号.txt] @捐献检测
#IF
CHECKGAMEPOINT ? <$STR(N33)>
CheckContainsText <$SERVERNAME> 2区
#ACT
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 0 S$今日捐献 N$富豪金额
INC N$富豪金额 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 今日捐献:<$STR(N$富豪金额)> 0
GAMEPOINT - <$STR(N33)>
CALCVAR HUMAN 捐献 + <$STR(N33)>
SAVEVAR HUMAN 捐献 ..\QuestDiary\数据文件\捐献变量.txt
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献排名.txt 1
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献名单排行.txt 0
GetListString ..\QuestDiary\数据文件\捐献排名.txt 0 A461 N40
GetListString ..\QuestDiary\数据文件\捐献排名.txt 1 A462 N41
GetListString ..\QuestDiary\数据文件\捐献排名.txt 2 A463 N42
GetListString ..\QuestDiary\数据文件\捐献排名.txt 3 A464 N43
GetListString ..\QuestDiary\数据文件\捐献排名.txt 4 A465 N44
GetListString ..\QuestDiary\数据文件\捐献排名.txt 5 A466 N45
GetListString ..\QuestDiary\数据文件\捐献排名.txt 6 A467 N46
GetListString ..\QuestDiary\数据文件\捐献排名.txt 7 A468 N47
GetListString ..\QuestDiary\数据文件\捐献排名.txt 8 A469 N48
GetListString ..\QuestDiary\数据文件\捐献排名.txt 9 A470 N49
MOV S$捐献排名1 <$STR(A461)>
MOV S$捐献排名2 <$STR(A462)>
MOV S$捐献排名3 <$STR(A463)>
MOV S$捐献排名4 <$STR(A464)>
MOV S$捐献排名5 <$STR(A465)>
MOV S$捐献排名6 <$STR(A466)>
MOV S$捐献排名7 <$STR(A467)>
MOV S$捐献排名8 <$STR(A468)>
MOV S$捐献排名9 <$STR(A469)>
MOV S$捐献排名10 <$STR(A470)>
MOV G281 <$STR(N40)>
MOV G282 <$STR(N41)>
MOV G283 <$STR(N42)>
MOV G284 <$STR(N43)>
MOV G285 <$STR(N44)>
MOV G286 <$STR(N45)>
MOV G287 <$STR(N46)>
MOV G288 <$STR(N47)>
MOV G289 <$STR(N48)>
MOV G290 <$STR(N49)>
;INC G21 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日02区.txt
AddTextListEx ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日02区.txt 今日二区:<$STR(G21)> 0
#CALL [\游戏登陆\属性设置.txt] @属性刷新
#CALL [\数据文件\捐献封号.txt] @捐献检测
#IF
CHECKGAMEPOINT ? <$STR(N33)>
CheckContainsText <$SERVERNAME> 3区
#ACT
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 0 S$今日捐献 N$富豪金额
INC N$富豪金额 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 今日捐献:<$STR(N$富豪金额)> 0
GAMEPOINT - <$STR(N33)>
CALCVAR HUMAN 捐献 + <$STR(N33)>
SAVEVAR HUMAN 捐献 ..\QuestDiary\数据文件\捐献变量.txt
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献排名.txt 1
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献名单排行.txt 0
GetListString ..\QuestDiary\数据文件\捐献排名.txt 0 A461 N40
GetListString ..\QuestDiary\数据文件\捐献排名.txt 1 A462 N41
GetListString ..\QuestDiary\数据文件\捐献排名.txt 2 A463 N42
GetListString ..\QuestDiary\数据文件\捐献排名.txt 3 A464 N43
GetListString ..\QuestDiary\数据文件\捐献排名.txt 4 A465 N44
GetListString ..\QuestDiary\数据文件\捐献排名.txt 5 A466 N45
GetListString ..\QuestDiary\数据文件\捐献排名.txt 6 A467 N46
GetListString ..\QuestDiary\数据文件\捐献排名.txt 7 A468 N47
GetListString ..\QuestDiary\数据文件\捐献排名.txt 8 A469 N48
GetListString ..\QuestDiary\数据文件\捐献排名.txt 9 A470 N49
MOV S$捐献排名1 <$STR(A461)>
MOV S$捐献排名2 <$STR(A462)>
MOV S$捐献排名3 <$STR(A463)>
MOV S$捐献排名4 <$STR(A464)>
MOV S$捐献排名5 <$STR(A465)>
MOV S$捐献排名6 <$STR(A466)>
MOV S$捐献排名7 <$STR(A467)>
MOV S$捐献排名8 <$STR(A468)>
MOV S$捐献排名9 <$STR(A469)>
MOV S$捐献排名10 <$STR(A470)>
MOV G281 <$STR(N40)>
MOV G282 <$STR(N41)>
MOV G283 <$STR(N42)>
MOV G284 <$STR(N43)>
MOV G285 <$STR(N44)>
MOV G286 <$STR(N45)>
MOV G287 <$STR(N46)>
MOV G288 <$STR(N47)>
MOV G289 <$STR(N48)>
MOV G290 <$STR(N49)>
;INC G21 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日03区.txt
AddTextListEx ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日03区.txt 今日三区:<$STR(G21)> 0
#CALL [\游戏登陆\属性设置.txt] @属性刷新
#CALL [\数据文件\捐献封号.txt] @捐献检测
#IF
CHECKGAMEPOINT ? <$STR(N33)>
CheckContainsText <$SERVERNAME> 4区
#ACT
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 0 S$今日捐献 N$富豪金额
INC N$富豪金额 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 今日捐献:<$STR(N$富豪金额)> 0
GAMEPOINT - <$STR(N33)>
CALCVAR HUMAN 捐献 + <$STR(N33)>
SAVEVAR HUMAN 捐献 ..\QuestDiary\数据文件\捐献变量.txt
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献排名.txt 1
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献名单排行.txt 0
GetListString ..\QuestDiary\数据文件\捐献排名.txt 0 A461 N40
GetListString ..\QuestDiary\数据文件\捐献排名.txt 1 A462 N41
GetListString ..\QuestDiary\数据文件\捐献排名.txt 2 A463 N42
GetListString ..\QuestDiary\数据文件\捐献排名.txt 3 A464 N43
GetListString ..\QuestDiary\数据文件\捐献排名.txt 4 A465 N44
GetListString ..\QuestDiary\数据文件\捐献排名.txt 5 A466 N45
GetListString ..\QuestDiary\数据文件\捐献排名.txt 6 A467 N46
GetListString ..\QuestDiary\数据文件\捐献排名.txt 7 A468 N47
GetListString ..\QuestDiary\数据文件\捐献排名.txt 8 A469 N48
GetListString ..\QuestDiary\数据文件\捐献排名.txt 9 A470 N49
MOV S$捐献排名1 <$STR(A461)>
MOV S$捐献排名2 <$STR(A462)>
MOV S$捐献排名3 <$STR(A463)>
MOV S$捐献排名4 <$STR(A464)>
MOV S$捐献排名5 <$STR(A465)>
MOV S$捐献排名6 <$STR(A466)>
MOV S$捐献排名7 <$STR(A467)>
MOV S$捐献排名8 <$STR(A468)>
MOV S$捐献排名9 <$STR(A469)>
MOV S$捐献排名10 <$STR(A470)>
MOV G281 <$STR(N40)>
MOV G282 <$STR(N41)>
MOV G283 <$STR(N42)>
MOV G284 <$STR(N43)>
MOV G285 <$STR(N44)>
MOV G286 <$STR(N45)>
MOV G287 <$STR(N46)>
MOV G288 <$STR(N47)>
MOV G289 <$STR(N48)>
MOV G290 <$STR(N49)>
;INC G21 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日04区.txt
AddTextListEx ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日04区.txt 今日四区:<$STR(G21)> 0
#CALL [\游戏登陆\属性设置.txt] @属性刷新
#CALL [\数据文件\捐献封号.txt] @捐献检测
#IF
CHECKGAMEPOINT ? <$STR(N33)>
CheckContainsText <$SERVERNAME> 5区
#ACT
GetListString ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 0 S$今日捐献 N$富豪金额
INC N$富豪金额 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A28)>\富豪捐献.txt 今日捐献:<$STR(N$富豪金额)> 0
GAMEPOINT - <$STR(N33)>
CALCVAR HUMAN 捐献 + <$STR(N33)>
SAVEVAR HUMAN 捐献 ..\QuestDiary\数据文件\捐献变量.txt
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献排名.txt 1
SortHumVarToListEx 捐献 ..\QuestDiary\数据文件\捐献变量.txt 1 ..\QuestDiary\数据文件\捐献名单排行.txt 0
GetListString ..\QuestDiary\数据文件\捐献排名.txt 0 A461 N40
GetListString ..\QuestDiary\数据文件\捐献排名.txt 1 A462 N41
GetListString ..\QuestDiary\数据文件\捐献排名.txt 2 A463 N42
GetListString ..\QuestDiary\数据文件\捐献排名.txt 3 A464 N43
GetListString ..\QuestDiary\数据文件\捐献排名.txt 4 A465 N44
GetListString ..\QuestDiary\数据文件\捐献排名.txt 5 A466 N45
GetListString ..\QuestDiary\数据文件\捐献排名.txt 6 A467 N46
GetListString ..\QuestDiary\数据文件\捐献排名.txt 7 A468 N47
GetListString ..\QuestDiary\数据文件\捐献排名.txt 8 A469 N48
GetListString ..\QuestDiary\数据文件\捐献排名.txt 9 A470 N49
MOV S$捐献排名1 <$STR(A461)>
MOV S$捐献排名2 <$STR(A462)>
MOV S$捐献排名3 <$STR(A463)>
MOV S$捐献排名4 <$STR(A464)>
MOV S$捐献排名5 <$STR(A465)>
MOV S$捐献排名6 <$STR(A466)>
MOV S$捐献排名7 <$STR(A467)>
MOV S$捐献排名8 <$STR(A468)>
MOV S$捐献排名9 <$STR(A469)>
MOV S$捐献排名10 <$STR(A470)>
MOV G281 <$STR(N40)>
MOV G282 <$STR(N41)>
MOV G283 <$STR(N42)>
MOV G284 <$STR(N43)>
MOV G285 <$STR(N44)>
MOV G286 <$STR(N45)>
MOV G287 <$STR(N46)>
MOV G288 <$STR(N47)>
MOV G289 <$STR(N48)>
MOV G290 <$STR(N49)>
;INC G21 <$STR(N33)>
CLEARNAMELIST ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日05区.txt
AddTextListEx ..\..\..\..\..\..\..\..\通区捐献\<$STR(A28)>\今日05区.txt 今日五区:<$STR(G21)> 0
#CALL [\游戏登陆\属性设置.txt] @属性刷新
#CALL [\数据文件\捐献封号.txt] @捐献检测
#IF
CHECKLEVELEX > 0
#ACT
Gmexecute 开始提问 @排行榜刷新
GOTO @MAIN
SENDMOVEMSG 0 253 0 130 1 (*)公益捐献：“{<$USERNAME>/SCOLOR=254}”成功捐献{[<$STR(N33)>]RMB/SCOLOR=251}点到公益奖池中，强势打入捐献排行榜第【<$STR(N$排名)>】名！{（首次捐献30RMB即可获得永久属性加成）/SCOLOR=251} 15 1 30 0
BREAK
