[@main]
#if
#act
OPENMERCHANTBIGDLG 20 31 0 0 0 0 1 398 1
mov A300 <$STR(A200)>
mov A301 <$STR(A201)>
mov A302 <$STR(A202)>
mov A303 <$STR(A203)>
mov A304 <$STR(A204)>
mov A205 <$STR(G200)>个
mov A206 <$STR(G201)>个
mov A207 <$STR(G202)>个
mov A208 <$STR(G203)>个
mov A209 <$STR(G204)>个
SetStringBlank <$STR(A300)> 15 1
SetStringBlank <$STR(A301)> 15 1
SetStringBlank <$STR(A302)> 15 1
SetStringBlank <$STR(A303)> 15 1
SetStringBlank <$STR(A304)> 15 1
SetStringBlank <$STR(A205)> 10 1
SetStringBlank <$STR(A206)> 10 1
SetStringBlank <$STR(A207)> 10 1
SetStringBlank <$STR(A208)> 10 1
SetStringBlank <$STR(A209)> 10 1
#say
<--------------------------------------------------------------/AUTOCOLOR=90>\
<元宝捐赠/AUTOCOLOR=254> <Hot~/AUTOCOLOR=249> <谁是英雄?谁是狗熊?比比就知道!/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\
<--------------------------------------------------------------/AUTOCOLOR=90>\
<第一名:/AUTOCOLOR=91>{<$STR(A300)>/FCOLOR=151} <捐赠元宝:/AUTOCOLOR=91>{<$STR(a205)>/FCOLOR=250} <全属性增加 15-15/AUTOCOLOR=91> \\
<第二名:/AUTOCOLOR=92>{<$STR(A301)>/FCOLOR=151} <捐赠元宝:/AUTOCOLOR=92>{<$STR(a206)>/FCOLOR=250} <全属性增加 12-12/AUTOCOLOR=92>\
<第三名:/AUTOCOLOR=93>{<$STR(A302)>/FCOLOR=151} <捐赠元宝:/AUTOCOLOR=93>{<$STR(a207)>/FCOLOR=250} <全属性增加 9-9/AUTOCOLOR=93>\
<第四名:/AUTOCOLOR=89>{<$STR(A303)>/FCOLOR=151} <捐赠元宝:/AUTOCOLOR=89>{<$STR(a208)>/FCOLOR=250} <全属性增加 6-6/AUTOCOLOR=89>\
<第五名:/AUTOCOLOR=95>{<$STR(A304)>/FCOLOR=151} <捐赠元宝:/AUTOCOLOR=95>{<$STR(a209)>/FCOLOR=250} <全属性增加 3-3/AUTOCOLOR=95>\
<--------------------------------------------------------------/AUTOCOLOR=90>\
<1、每次捐赠必须大于5000元宝./AUTOCOLOR=156>\
<2、当你捐赠的元宝比排行版上的玩家高出50时即可替代他的排名./AUTOCOLOR=155>\
<3、捐献达到10万元宝玩家也可以获得全属性增加3-3奖励./AUTOCOLOR=145>\
<4、游戏的稳定运营离不开您的支持,感谢您的捐赠与支持./AUTOCOLOR=147>\
<--------------------------------------------------------------/AUTOCOLOR=90>\
??????????? <捐赠数据合区保存./AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<你已经捐赠了(/AUTOCOLOR=242>{<$HUMAN(捐献元宝额度)>/FCOLOR=251})<元宝...当前帐户的元宝数量为:/AUTOCOLOR=242>{<$GAMEGOLD>/FCOLOR=251}<个!/AUTOCOLOR=242>\
第1名:<皇帝/AUTOCOLOR=70> 第2名:<丞相/AUTOCOLOR=229> 第3名:<元帅/AUTOCOLOR=253> 第4名:<将军/AUTOCOLOR=250> 第5名:<太尉/AUTOCOLOR=254>\
<--------------------------------------------------------------/AUTOCOLOR=90>\
?<√我要捐赠/@@InPutInteger1> <每日凌晨更新排行,数据清空/FCOLOR=253> <看看而已×/@exit> \
[@InPutInteger1]
#IF
LARGE N1 4999
CHECKGAMEGOLD > N1 > 4999
#ACT
GAMEGOLD - <$STR(N1)>
CALCVAR HUMAN 捐献元宝额度 + <$STR(N1)>
SAVEVAR HUMAN 捐献元宝额度 ..\QuestDiary\功能\捐献记录额度\捐献记录额度.txt
Delaygoto 100 @捐赠排名
MESSAGEBOX [捐赠信息]:\?\捐赠成功,你本次捐增了<$STR(N1)>元宝!\您对本服总共捐赠了<$HUMAN(捐献元宝额度)>元宝!\感谢您对本服大力支持,您现在可以享受俸禄待遇了!
#ELSEACT
MESSAGEBOX [捐赠失败]:你没元宝或者输入有误,元宝捐赠最少5000元宝起步!
BREAK
[@捐赠排名]
#IF
CHECKVAR HUMAN 捐献元宝额度 > <$STR(G200)>
#ACT
GOTO @BAOCUN
#CALL [\数据文件\封号刷新.txt] @刷新
SENDMSG 7 感谢您对本服的支持,目前排名第一,小退后获得属性!
goto @main
#ELSEACT
GOTO @捐赠排名1
BREAK
[@捐赠排名1]
#IF
CHECKVAR HUMAN 捐献元宝额度 > <$STR(G201)>
#ACT
GOTO @BAOCUN1
#CALL [\数据文件\封号刷新.txt] @刷新
SENDMSG 7 感谢您对本服的支持,目前排名第二,小退后获得属性!
goto @main
#ELSEACT
GOTO @捐赠排名2
BREAK
[@捐赠排名2]
#IF
CHECKVAR HUMAN 捐献元宝额度 > <$STR(G202)>
#ACT
GOTO @BAOCUN2
#CALL [\数据文件\封号刷新.txt] @刷新
SENDMSG 7 感谢您对本服的支持,目前排名第三,小退后获得属性!
goto @main
#ELSEACT
GOTO @捐赠排名3
BREAK
[@捐赠排名3]
#IF
CHECKVAR HUMAN 捐献元宝额度 > <$STR(G203)>
#ACT
GOTO @BAOCUN3
#CALL [\数据文件\封号刷新.txt] @刷新
SENDMSG 7 感谢您对本服的支持,目前排名第四,小退后获得属性!
goto @main
#ELSEACT
GOTO @捐赠排名4
BREAK
[@捐赠排名4]
#IF
CHECKVAR HUMAN 捐献元宝额度 > <$STR(G204)>
#ACT
GOTO @BAOCUN4
#CALL [\数据文件\封号刷新.txt] @刷新
SENDMSG 7 感谢您对本服的支持,目前排名第五,小退后获得属性!
goto @main
BREAK
#if
CHECKVAR HUMAN 捐献元宝额度 > 99999
#act
#CALL [\数据文件\封号刷新.txt] @刷新
SENDMSG 7 [提示]:您元宝捐款金额超过了10万,奖励全属性3-3,小退后获得属性!
BREAK
[@BAOCUN]
#IF
EQUAL A200 <$USERNAME>
#ACT
MOV A200 <$USERNAME>
MOV G200 <$HUMAN(捐献元宝额度)>
BREAK
#IF
EQUAL A201 <$USERNAME>
#ACT
MOV A201 <$STR(A200)>
MOV G201 <$STR(G200)>
MOV A200 <$USERNAME>
MOV G200 <$HUMAN(捐献元宝额度)>
BREAK
#IF
EQUAL A202 <$USERNAME>
#ACT
MOV A202 <$STR(A201)>
MOV G202 <$STR(G201)>
MOV A201 <$STR(A200)>
MOV G201 <$STR(G200)>
MOV A200 <$USERNAME>
MOV G200 <$HUMAN(捐献元宝额度)>
BREAK
#IF
EQUAL A203 <$USERNAME>
#ACT
MOV A203 <$STR(A202)>
MOV G203 <$STR(G202)>
MOV A202 <$STR(A201)>
MOV G202 <$STR(G201)>
MOV A201 <$STR(A200)>
MOV G201 <$STR(G200)>
MOV A200 <$USERNAME>
MOV G200 <$HUMAN(捐献元宝额度)>
#ELSEACT
MOV A204 <$STR(A203)>
MOV G204 <$STR(G203)>
MOV A203 <$STR(A202)>
MOV G203 <$STR(G202)>
MOV A202 <$STR(A201)>
MOV G202 <$STR(G201)>
MOV A201 <$STR(A200)>
MOV G201 <$STR(G200)>
MOV A200 <$USERNAME>
MOV G200 <$HUMAN(捐献元宝额度)>
BREAK
[@BAOCUN1]
#IF
EQUAL A201 <$USERNAME>
#ACT
MOV A201 <$USERNAME>
MOV G201 <$HUMAN(捐献元宝额度)>
BREAK
#IF
EQUAL A202 <$USERNAME>
#ACT
MOV A202 <$STR(A201)>
MOV G202 <$STR(G201)>
MOV A201 <$USERNAME>
MOV G201 <$HUMAN(捐献元宝额度)>
BREAK
#IF
EQUAL A203 <$USERNAME>
#ACT
MOV A203 <$STR(A202)>
MOV G203 <$STR(G202)>
MOV A202 <$STR(A201)>
MOV G202 <$STR(G201)>
MOV A201 <$USERNAME>
MOV G201 <$HUMAN(捐献元宝额度)>
#ELSEACT
MOV A204 <$STR(A203)>
MOV G204 <$STR(G203)>
MOV A203 <$STR(A202)>
MOV G203 <$STR(G202)>
MOV A202 <$STR(A201)>
MOV G202 <$STR(G201)>
MOV A201 <$USERNAME>
MOV G201 <$HUMAN(捐献元宝额度)>
BREAK
[@BAOCUN2]
#IF
EQUAL A202 <$USERNAME>
#ACT
MOV A202 <$USERNAME>
MOV G202 <$HUMAN(捐献元宝额度)>
BREAK
#IF
EQUAL A203 <$USERNAME>
#ACT
MOV A203 <$STR(A202)>
MOV G203 <$STR(G202)>
MOV A202 <$USERNAME>
MOV G202 <$HUMAN(捐献元宝额度)>
#ELSEACT
MOV A204 <$STR(A203)>
MOV G204 <$STR(G203)>
MOV A203 <$STR(A202)>
MOV G203 <$STR(G202)>
MOV A202 <$USERNAME>
MOV G202 <$HUMAN(捐献元宝额度)>
BREAK
[@BAOCUN3]
#IF
EQUAL A203 <$USERNAME>
#ACT
MOV A203 <$USERNAME>
MOV G203 <$HUMAN(捐献元宝额度)>
#ELSEACT
MOV A204 <$STR(A203)>
MOV G204 <$STR(G203)>
MOV A203 <$USERNAME>
MOV G203 <$HUMAN(捐献元宝额度)>
BREAK
[@BAOCUN4]
#ACT
MOV A204 <$USERNAME>
MOV G204 <$HUMAN(捐献元宝额度)>
BREAK
|