-	script	FloatingRates	-1,{

	OnInit:
	OnTue2300:
	OnFri2300:
	OnSat2300:
	OnSun2300:
		.base_exp_rate = getbattleflag("base_exp_rate");
		.job_exp_rate = getbattleflag("job_exp_rate");
		.item_rate_common = getbattleflag("item_rate_common");
		.item_rate_heal = getbattleflag("item_rate_heal");
		.item_rate_use = getbattleflag("item_rate_use");
		.item_rate_equip = getbattleflag("item_rate_equip");
		
		callsub( L_rate,1 );
		end;
			
	OnTue1600:
	OnFri1600:
		callsub( L_rate,2 );
		end;
		
	OnSat1000:
	OnSun1000:
		callsub( L_rate,3 );
		end;
		
	L_rate:
		.@rate = getarg(0,1);
		
		.@base_exp_rate = ( .@rate * .base_exp_rate );
		.@job_exp_rate = ( .@rate * .job_exp_rate );
		.@item_rate_common = ( .@rate * .item_rate_common );
		.@item_rate_heal = ( .@rate * .item_rate_heal );
		.@item_rate_use = ( .@rate * .item_rate_use );
		.@item_rate_equip = ( .@rate * .item_rate_equip );
		
		setbattleflag("base_exp_rate",.@base_exp_rate;
		setbattleflag("job_exp_rate",.@job_exp_rate;
		setbattleflag("item_rate_common",.@item_rate_common;
		setbattleflag("item_rate_heal",.@item_rate_heal;
		setbattleflag("item_rate_use",.@item_rate_use;
		setbattleflag("item_rate_equip",.@item_rate_equip;
		
		atcommand "@reloadmobdb";
		
		announce "Current Earthfall rates are: "+.@base_exp_rate+"x "+.@job_exp_rate+"x "+($@drate-100)+"x",bc_all,0xFF6060;
		end;
}