viewing paste Unknown #121 | Athena

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
-    script    FloatingRates    -1,{
OnPCLoginEvent:
OnPCLogoutEvent:
if (getusers(1) >= 5) {
if (getbattleflag("base_exp_rate")==10000 && getbattleflag("job_exp_rate")==10000) {
set $@brate,rand(15000,30000);
set $@jrate,rand(15000,30000);
set $@drate,2000;
setbattleflag "base_exp_rate", $@brate;
setbattleflag "job_exp_rate", $@jrate;
atcommand "@reloadmobdb";
announce "Current floating rates are: "+($@brate/100)+"x"+($@jrate/100)+"x"+($@drate/100)+"x",bc_blue|bc_all;
}
} else if (getusers(1) < 4) {
if (getbattleflag("base_exp_rate")>10000 || getbattleflag("job_exp_rate")>10000) {
set $@brate,10000;
set $@jrate,10000;
set $@drate,2000;
setbattleflag "base_exp_rate", $@brate;
setbattleflag "job_exp_rate", $@jrate;
atcommand "@reloadmobdb";
announce "Current normal rates are: "+($@brate/100)+"x"+($@jrate/100)+"x"+($@drate/100)+"x",bc_blue|bc_all;
delwaitingroom "Info NPC";
donpcevent "Info NPC::OnInit";
}
}
}
 
 
prontera,150,150,5      script  Info NPC        99,{
OnInit:
waitingroom     "Rates: "+$@brate/100+"x/"+$@jrate/100+"x/"+drate/100+"x",0;
}
Viewed 592 times, submitted by Streusel.