viewing paste Unknown #29913 | Text

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86
//===== Hercules Script ======================================
//= Floating Server Rates
//===== By: ==================================================
//= Lupus
//===== Current Version: =====================================
//= 1.0
//===== Description: =========================================
//= It's a simply example of setbattleflag
//= This script will change your server rates from 1x to 1.5x every 6 hours
//= Note: It doesn't affect Card granted drops, MVP & Treasure Chests drops ^_-
//=       It also doesn't affect CARD drops, because they are just 0.01%
//===== Additional Comments: =================================
//= You can make incredible scripts with 'setbattleflag'!
//============================================================
//= DekadaRO Notes
//= - As compensation for OBT Delay, floating rates is activated on monday and tuesday, schedule should be back to normal next week.
//============================================================
-       script  WeekendFloatingRate     FAKE_NPC,{
OnInit:
OnHour00:
        if (gettime(GETTIME_WEEKDAY) == MONDAY)
        donpcevent "FloatingRates::OnDeactivate";
        end;
OnHour06:
OnHour12:
OnHour18:
        if (gettime(GETTIME_WEEKDAY) == SATURDAY || gettime(GETTIME_WEEKDAY) == SUNDAY)
        donpcevent "FloatingRates::OnActivate";
        end;
}
 
-       script  GMActivate      FAKE_NPC,{
OnWhisperGlobal:
        if (getgroupid() == 99) {
                if (@whispervar0$ == "on") {
                        donpcevent "FloatingRates::OnActivate";
                        end;
                }
                if (@whispervar0$ == "off") {
                        donpcevent "FloatingRates::OnDeactivate";
                        end;
                }
        end;
        }
        end;
}
 
-       script  FloatingRates   FAKE_NPC,{
OnActivate:
//-------------------
        set $@brate,rand(2000,2500);
        set $@jrate,rand(2000,2500);
        set $@drate,rand(2000,2500);
        set $@crate,rand(30000,35000);
        //Base exp
        setbattleflag("base_exp_rate",$@brate);
        //Job exp
        setbattleflag("job_exp_rate",$@jrate);
        //Drops
        setbattleflag("item_rate_common",$@drate);
        setbattleflag("item_rate_heal",$@drate);
        setbattleflag("item_rate_use",$@drate);
        setbattleflag("item_rate_equip",$@drate);
        setbattleflag("item_rate_card",$@crate);
        atcommand "@reloadmobdb";
 
        announce "Current Rune-Midgard rates are:",bc_all,0xFF6060;
        announce "Base: x"+($@brate/100)+" Job: x"+($@jrate/100)+" Drop: x"+($@drate/100)+" Card: x"+($@crate/100)+" ",bc_all,0xFF6060;
        end;
       
OnDeactivate:
        setbattleflag("base_exp_rate",2000);
        //Job exp
        setbattleflag("job_exp_rate",2000);
        //Drops
        setbattleflag("item_rate_common",2000);
        setbattleflag("item_rate_heal",2000);
        setbattleflag("item_rate_use",2000);
        setbattleflag("item_rate_equip",2000);
        setbattleflag("item_rate_card",30000);
        atcommand "@reloadmobdb";
 
        announce "Floating Rate event has ended, rates are now back to regular server rates:",bc_all,0xFF6060;
        announce "Base: x"+($@brate/100)+" Job: x"+($@jrate/100)+" Drop: x"+($@drate/100)+" Card: x"+($@crate/100)+" ",bc_all,0xFF6060;
        end;
}
Viewed 529 times, submitted by unknown.