连续捐献1000元宝3次就会变成排行第一100多万元宝了。帮看看什么问题
[@main]
#IF
#ACT
GetRandomText ..\QuestDiary\元宝捐献\第一排名.txt S41
GetRandomText ..\QuestDiary\元宝捐献\第二排名.txt S42
GetRandomText ..\QuestDiary\元宝捐献\第三排名.txt S46
GetRandomText ..\QuestDiary\元宝捐献\第四排名.txt S44
GetRandomText ..\QuestDiary\元宝捐献\第五排名.txt S45
GetRandomText ..\QuestDiary\元宝捐献\第一排名元宝数.txt S31
GetRandomText ..\QuestDiary\元宝捐献\第二排名元宝数.txt S32
GetRandomText ..\QuestDiary\元宝捐献\第三排名元宝数.txt S33
GetRandomText ..\QuestDiary\元宝捐献\第四排名元宝数.txt S34
GetRandomText ..\QuestDiary\元宝捐献\第五排名元宝数.txt S35
MOV A260 <$STR(S41)>
MOV A261 <$STR(S42)>
MOV A262 <$STR(S46)>
MOV A263 <$STR(S44)>
MOV A264 <$STR(S45)>
MOV G260 <$STR(S31)>
MOV G261 <$STR(S32)>
MOV G262 <$STR(S33)>
MOV G263 <$STR(S34)>
MOV G264 <$STR(S35)>

SetStringBlank <$STR(A260)> 18 1
SetStringBlank <$STR(A261)> 18 1
SetStringBlank <$STR(A262)> 18 1
SetStringBlank <$STR(A263)> 18 1
SetStringBlank <$STR(A264)> 18 1


GOTO @捐献用1
BREAK

[@捐献用1]
#if
#say
<~HOT 远古1.76小极品欢迎您使用游戏捐赠系统！/SCOLOR=243>\
<申请第一名/@申请第一名> <攻魔道+10点/SCOLOR=254>  {玩家:<$STR(A260)>/SCOLOR=116}{金额:<$STR(G260)>/SCOLOR=253}\
<申请第二名/@申请第二名> <攻魔道+5点/SCOLOR=191>   {玩家:<$STR(A261)>/SCOLOR=116}{金额:<$STR(G261)>/SCOLOR=253}\
<申请第三名/@申请第三名> <攻魔道+4点/SCOLOR=191>   {玩家:<$STR(A262)>/SCOLOR=116}{金额:<$STR(G262)>/SCOLOR=253}\
<申请第四名/@申请第四名> <攻魔道+3点/SCOLOR=191>   {玩家:<$STR(A263)>/SCOLOR=116}{金额:<$STR(G263)>/SCOLOR=253}\
<申请第五名/@申请第五名> <攻魔道+2点/SCOLOR=191>   {玩家:<$STR(A264)>/SCOLOR=116}{金额:<$STR(G264)>/SCOLOR=253}\
<捐献第六名/SCOLOR=251> <攻魔道+1点/SCOLOR=191>   <无需申请，捐献1000元宝，默认在第6名中/SCOLOR=154>\
{捐献数量: 您当前捐款金额为:<$HUMAN(JK)>/SCOLOR=250} <首次捐献不进入排行榜/SCOLOR=249>\
<点此捐献(最少1000元宝)/@@InPutInteger10>


[@InPutInteger10]
#IF
small N10 1000 
#ACT
messagebox 对不起,捐献金额最少1000元宝
BREAK

#IF
CHECKGameGold < <$STR(N10)>
#ACT
messagebox 对不起,你的元宝少于1000元宝
BREAK

#IF
#ACT
GOTO @JKKS
BREAK
#ELSEACT
messagebox 对不起,您没有那么多的元宝
BREAK

[@JKKS]
#IF
#ACT
GAMEGOLD - <$STR(N10)>
CALCVAR HUMAN JK + <$STR(N10)>
SAVEVAR HUMAN JK ..\QuestDiary\重要数据\元宝捐献Save.txt
GOTO @JKJC
BREAK

[@JKJC]
#IF
CHECKVAR HUMAN JK > 999
CHECKNAMELIST ..\QuestDiary\元宝捐献\第六排名.txt
#ACT
GOTO @JKPAIM
BREAK

#IF
CHECKVAR HUMAN JK > 999
#ACT
Addnamelist ..\QuestDiary\元宝捐献\第六排名.txt
BREAK
close
#ELSEACT
BREAK
close

[@JKPAIM]
#IF
CHECKVAR HUMAN JK > <$STR(G260)>
#ACT
GOTO @BAOCUN
BREAK
close
#ELSEACT
GOTO @JKPAIM1
BREAK

[@JKPAIM1]
#IF
CHECKVAR HUMAN JK > <$STR(G261)>
#ACT
GOTO @BAOCUN1
BREAK
close
#ELSEACT
GOTO @JKPAIM2
BREAK

[@JKPAIM2]
#IF
CHECKVAR HUMAN JK > <$STR(G262)>
#ACT
GOTO @BAOCUN2
BREAK
close
#ELSEACT
GOTO @JKPAIM3
BREAK

[@JKPAIM3]
#IF
CHECKVAR HUMAN JK > <$STR(G263)>
#ACT
GOTO @BAOCUN3
BREAK
close
#ELSEACT
GOTO @JKPAIM4
BREAK

[@JKPAIM4]
#IF
CHECKVAR HUMAN JK > <$STR(G264)>
#ACT
GOTO @BAOCUN4
MESSAGEBOX 感谢您对本服的支持
BREAK
close
#ELSEACT
BREAK
close

[@BAOCUN]
#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第一排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第一排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第一排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第一排名.txt
AddTextList ..\QuestDiary\元宝捐献\第一排名元宝数.txt <$HUMAN(JK)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK


#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第二排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第一排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第一排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第一排名.txt
AddTextList ..\QuestDiary\元宝捐献\第二排名.txt <$STR(A260)>
AddTextList ..\QuestDiary\元宝捐献\第一排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$STR(G260)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第三排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第一排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第一排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第一排名.txt
AddTextList ..\QuestDiary\元宝捐献\第二排名.txt <$STR(A260)>
AddTextList ..\QuestDiary\元宝捐献\第一排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$STR(G260)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第四排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第一排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第一排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第一排名.txt
AddTextList ..\QuestDiary\元宝捐献\第二排名.txt <$STR(A260)>
AddTextList ..\QuestDiary\元宝捐献\第一排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$STR(G260)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第五排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第一排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第一排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第一排名.txt
AddTextList ..\QuestDiary\元宝捐献\第一排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第二排名.txt <$STR(A260)>
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$STR(G260)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
AddTextList ..\QuestDiary\元宝捐献\第五排名.txt <$STR(A263)>
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$STR(G263)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第六排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第一排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第一排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第一排名.txt
AddTextList ..\QuestDiary\元宝捐献\第一排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第二排名.txt <$STR(A260)>
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$STR(G260)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
AddTextList ..\QuestDiary\元宝捐献\第五排名.txt <$STR(A263)>
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$STR(G263)>
AddTextList ..\QuestDiary\元宝捐献\第六排名.txt <$STR(A264)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

[@BAOCUN1]
#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第二排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第二排名.txt
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$HUMAN(JK)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第三排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第二排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第四排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第二排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第五排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第二排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
AddTextList ..\QuestDiary\元宝捐献\第五排名.txt <$STR(A263)>
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$STR(G263)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第六排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第二排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第二排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第二排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第二排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第三排名.txt <$STR(A261)>
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$STR(G261)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
AddTextList ..\QuestDiary\元宝捐献\第五排名.txt <$STR(A263)>
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$STR(G263)>
AddTextList ..\QuestDiary\元宝捐献\第六排名.txt <$STR(A263)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

[@BAOCUN2]
#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第三排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第三排名.txt
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$HUMAN(JK)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第四排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第三排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第五排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第三排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
AddTextList ..\QuestDiary\元宝捐献\第五排名.txt <$STR(A263)>
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$STR(G263)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第六排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第三排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第三排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第三排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第三排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第四排名.txt <$STR(A262)>
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$STR(G262)>
AddTextList ..\QuestDiary\元宝捐献\第五排名.txt <$STR(A263)>
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$STR(G263)>
AddTextList ..\QuestDiary\元宝捐献\第六排名.txt <$STR(A264)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

[@BAOCUN3]
#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第四排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第四排名.txt
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$HUMAN(JK)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第五排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第四排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第五排名.txt <$STR(A263)>
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$STR(G263)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第六排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第四排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第四排名.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第四排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第四排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第六排名.txt <$STR(A264)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

[@BAOCUN4]
#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第五排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第五排名.txt
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$HUMAN(JK)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK

#IF
CHECKNAMELIST ..\QuestDiary\元宝捐献\第六排名.txt
#ACT
ClearNameList ..\QuestDiary\元宝捐献\第五排名元宝数.txt
ClearNameList ..\QuestDiary\元宝捐献\第五排名.txt
Addnamelist ..\QuestDiary\元宝捐献\第五排名.txt 
AddTextList ..\QuestDiary\元宝捐献\第五排名元宝数.txt <$HUMAN(JK)>
AddTextList ..\QuestDiary\元宝捐献\第六排名.txt <$STR(A264)>
#CALL [\游戏登陆\称号1.txt] @称号2
goto @main
BREAK