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

(@@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        \　\

我只是路过打酱油的。

无回帖，不论坛，这才是人道。

强烈支持楼主ing……

激动人心，无法言表！

感恩无私的分享与奉献 :)

真是被感动的痛哭流涕……

激动人心，无法言表！

无回帖，不论坛，这才是人道。

看到这帖子真是高兴！