 | 捐献系统脚本 |
[@main]
\
【亲爱的玩家】
[@查看待遇]
沙城捐献:所有捐献的元宝累积将作为攻沙奖励,根据捐献元宝的数量 \
来排行爵位,爵位越高获赠属性就越高!共分为以下六级:0 \
第一名：总统→属性额外增加
第二名：公爵→属性额外增加
第三名：侯爵→属性额外增加
第四名：伯爵→属性额外增加
第五名：子爵→属性额外增加
第六名：少爵→属性额外增加
[@沙城捐献1]
#ACT
#CALL [\游戏登陆\捐献排名.txt] @开始捐献排名
MOV S0
MOV S1
MOV S2
MOV S3
MOV S4
GetRandomText .\QuestDiary\抽取数据\系统限制\空格限制.txt S5 1
INC S0
INC S0
INC S1
INC S1
INC S2
INC S2
INC S3
INC S3
INC S4
INC S4
DEC S0 16 66
DEC S1 16 66
DEC S2 16 66
DEC S3 16 66
DEC S4 16 66
#SAY
第一名
第二名
第三名
第四名
第五名
第六名
[@CALLInPutInteger88]
#if
small N88 5000
#ACT
MESSAGEBOX ぐ【失败】：最少捐献5000元宝!
GOTO @沙城捐献1
BREAK
#IF
CHECKGAMEGOLD <
#ACT
MESSAGEBOX ぐ【失败】：您身上元宝不足
GOTO @沙城捐献1
BREAK
#ELSEACT
GAMEGOLD -
CALCVAR HUMAN 捐献元宝 +
SAVEVAR HUMAN 捐献元宝 ..\QuestDiary\数据文件\捐献元宝.txt
CALCVAR GLOBAL 捐献总额 +
SAVEVAR GLOBAL 捐献总额 ..\QuestDiary\数据文件\捐献排名数据.txt
GOTO @沙城捐献1
BREAK
[@查看是否排名]
#IF
CHECKVAR HUMAN 捐献元宝 > 4999
#ACT
MESSAGEBOX ぐ恭喜：您在第六名排名内...
BREAK
#elseact
MESSAGEBOX ぐ抱歉：您不在第六名排名内....
BREAK
