传奇开区一条龙独家发布的雨涵古币捐献脚本

一骑当千

(@@InPutString @@InPutInteger )


[@Main]
#if
        CheckLevelEx        <        59
#Act
        Messagebox        60级以后才可以查询！
BREAK
#if
        CheckLevelEx        >        59
#Act
        OPENMERCHANTBIGDLG 20 30 0 0 0 0 1 564 1
        Mov        S60        <$STR(A60)>
        Mov        S61        <$STR(A61)>
        Mov        S62        <$STR(A62)>
        Mov        S63        <$STR(A63)>
        Mov        S64        <$STR(A64)>
        Mov        S65        <$STR(A65)>
        Mov        S66        <$STR(A66)>
        Mov        S67        <$STR(A67)>
        Mov        S68        <$STR(A68)>
        SetStringBlank <$STR(S60)> 15 1
        SetStringBlank <$STR(S61)> 15 1
        SetStringBlank <$STR(S62)> 15 1
        SetStringBlank <$STR(S63)> 15 1
        SetStringBlank <$STR(S64)> 15 1
        SetStringBlank <$STR(S65)> 15 1
        SetStringBlank <$STR(S66)> 15 1
        SetStringBlank <$STR(S67)> 15 1
        SetStringBlank <$STR(S68)> 15 1
#say
\ \ \
　<★★★★★★★★★★★★★★★★★/FCOLOR=250><雨涵古币捐献排行榜/FCOLOR=253><★★★★★★★★★★★★★★★★★/FCOLOR=250>\
　<第一名:/FCOLOR=250><  全属性+12  目标死亡爆率+12%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S60)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G60)>/FCOLOR=253}\
　<第二名:/FCOLOR=250><  全属性+10  目标死亡爆率+10%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S61)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G61)>/FCOLOR=253}\
　<第三名:/FCOLOR=250><  全属性+ 8  目标死亡爆率+ 8%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S62)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G62)>/FCOLOR=253}\
　<第四名:/FCOLOR=250><  全属性+ 7  目标死亡爆率+ 7%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S63)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G63)>/FCOLOR=253}\
　<第五名:/FCOLOR=250><  全属性+ 6  目标死亡爆率+ 6%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S64)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G64)>/FCOLOR=253}\
　<第六名:/FCOLOR=250><  全属性+ 5  目标死亡爆率+ 5%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S65)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G65)>/FCOLOR=253}\
　<第七名:/FCOLOR=250><  全属性+ 4  目标死亡爆率+ 4%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S66)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G66)>/FCOLOR=253}\
　<第八名:/FCOLOR=250><  全属性+ 3  目标死亡爆率+ 3%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S67)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G67)>/FCOLOR=253}\
　<第九名:/FCOLOR=250><  全属性+ 2  目标死亡爆率+ 2%  /FCOLOR=251><募捐者:/FCOLOR=168>{<$STR(S68)>/FCOLOR=249}< 捐献雨涵古币:/FCOLOR=168>{<$STR(G68)>/FCOLOR=253}\
　<★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★/FCOLOR=250>\
　<剩余充值雨涵古币:/FCOLOR=250>{<$GAMEDIAMOND>/FCOLOR=253}\
　  <已捐献雨涵古币:/FCOLOR=250>{<$HUMAN(捐献雨涵古币额度)>/FCOLOR=253} \ \

　<温馨提示：捐献上榜玩家称号系统自动更换！ 合区后因2个区同时存在排行，所有排行显示以/FCOLOR=254>\
　　 　 　  <主区排行但是你原来的募捐数量不会减少，只需要重新捐赠一次，系统自动检测再/FCOLOR=254>\
　          <合并游戏中的排行，并进行调整！/FCOLOR=254>\

　　　　　　　　　　　　　　　　　<【/FCOLOR=251><我要捐献雨涵古币/@@InPutInteger60><】/FCOLOR=251>\
\                               <每日凌晨更新排行，数据清空/FCOLOR=253>\
[@InPutInteger60]
#If
        Small        N60        20
#Act
        Messagebox        每次捐献最少20雨涵古币！
Break
#If
#Act
        Mov        N61        <$STR(N60)>
        Dec        N61        1
#If
        CHECKGAMEDIAMOND        >        <$STR(N61)>
#Act
        GAMEDIAMOND        -        <$STR(N60)>
CALCVAR HUMAN 捐献雨涵古币额度 + <$STR(N60)>
SAVEVAR HUMAN 捐献雨涵古币额度 ..\QuestDiary\功能\捐献记录额度\捐献记录额度.txt
        Mov        N60        <$HUMAN(捐献雨涵古币额度)>
        Goto        @Main
        #CALL [捐献雨涵古币.txt] @雨涵古币排名
#ElseAct
        MessageBox        您的雨涵古币不足！
[@捐献规则]
#if
#Act
        MessageBox        \　\

Micah

支持支持再支持

我叫舞姐

为保住菊花，这个一定得回复！

天利普

LZ是天才，坚定完毕

至上小松

锄禾日当午，发帖真辛苦。谁知坛中餐，帖帖皆辛苦！

啪啪啪ご

看起来不错

牛必塞

没人回帖。。。我来个吧

kfy8896

这么强,支持楼主，佩服

tcd5g76

无论是不是沙发都得回复下

B比比

鼎力支持！！