//===== rAthena Script =======================================
//= Sample: Mapflag Test
//===== By: ==================================================
//= Jbain
//===== Last Updated: ========================================
//= 20121003
//===== Description: ========================================= 
//= Demonstrates mapflag commands.
//============================================================

prontera,165,145,0	script	EXPflagtest	123,{
	mes "[EXPflagtest]";
	mes "Set up the map rates:";
	switch(select("Job EXP:Base EXP:PVP on:Reset all flags")) {
	case 1:
		input .@rate;
		setmapflag "prontera",MF_JEXP,.@rate;
		close;
	case 2:
		input .@rate;
		setmapflag "prontera",MF_BEXP,.@rate;
		close;
	case 3:
		setmapflag "prontera",MF_PVP;
		close;
	case 4:
		removemapflag "prontera",MF_BEXP;
		removemapflag "prontera",MF_JEXP;
		removemapflag "prontera",MF_PVP;
		close;
	}
}