//===== eAthena Script =======================================
//= Escalar La Montaña Light Versión
//===== By: ==================================================
//= Ziu
//===== Current Version: =====================================
//= 1.2
//===== Compatible With: =====================================
//= eAthena TRUNK 14006+ (client up time 2009) data Ver. 109+(Ver. Ziu)
//===== Additional Comments: =================================
//= 1.0 Pre-Released  [Ziu]
//= 1.1 Complete Script [Ziu]
//= 1.2 Add New Mob & mapflag [Ziu]
//============================================================
-	script	InitScriptELM	-1,{
OnInit:
	disablenpc "SN2";
	disablenpc "SN3";
	disablenpc "SN4";
	end;
}

aldebaran,134,119,5	script	Skill Donator::SN4	703,{
	if ((Class == Job_Novice) && (BaseLevel < 26) && (Weight < 1))  {
		if ((getskilllv(143))) {
			mes "[Skill Donator]";
			mes "Tu ya tienes la skill trick dead, no necesitas mi ayuda";
			emotion e_pif;
			close;
		} else {
			mes "[Skill Donator]";
			mes "Veo que no tienes aun está skill, ahora ya la has aprendido";
			specialeffect2 EF_ANGELUS;
			skill 143,1,0;
			close;
		}
	} else {
		mes "[Skill Donator]";
		mes "No Cumples con ninguno de los requisitos requeridos, ser novice, que tú level base no sea superior a 25 y llevar cero de peso";
		close;
	}
}

aldebaran,134,115,5	script	Super Novice::SN1	729,{
	if (getgmlevel()>75) {
		mes "[Super Novice]";
		mes "¿Que deseas hacer?";
		next;
		switch( Select("Iniciar Evento.","No Hacer nada.","Terminar Evento." ) )
		{
			Case 1:
				mes "[Super Novice]";
				mes "Ahora pueden comenzar el evento";
				announce "Se a Iniciado El Evento Escalar La Montaña.",bc_all;
				enablenpc "SN2";
				enablenpc "SN3";
				enablenpc "SN4";
				disablenpc "SN1";
				close;

			Case 2:
				mes "[Super Novice]";
				mes "Entonces, ¿para que me molestas?";
				close;
			Case 3:
				mes "[Super Novice]";
				mes "Termine el evento";
				close2;
				announce "Ha Terminado El Evento Escalar La Montaña.",bc_all;
				donpcevent "escalf::OnEnable";
				disablenpc "SN3";
				disablenpc "SN2";
				disablenpc "SN4";
				end;
		}
	}

	mes "[Super Novice]";
	mes "Buenas, no tienes los suficientes privilegios para poder controlarme";
	next;
	mes "[Super Novice]";
	mes "Solo un gm tiene el suficiente poder para poder doblegar mi voluntad, ahora viajero marcha de aquí";
	close;
}

aldebaran,134,115,5	script	Super Novice::SN2	729,{
	if (getgmlevel()>75) {
		mes "[Super Novice]";
		mes " Buenas, miembro del staff de (servidor que sea)";
		mes "¿Que Podría yo hacer por ti?";
		next;
		switch( Select("Llevame Al Evento.","No Hacer nada.","Terminar Evento." ) )
		{
			Case 1:
				mes "[Super Novice]";
				mes "Puedes usar tus poderes para ir, pero si inistes yo te llevaré";
				close2;
				warp "event_escal",70,305;
				end;
			
			Case 2:
				close;
			
			Case 3:
				mes "[Super Novice]";
				mes "Termine el evento";
				close2;
				announce "Ha Terminado El Evento Escalar La Montaña.",bc_all;
				donpcevent "escalf::OnEnable";
				disablenpc "SN4";
				disablenpc "SN3";
				enablenpc "SN1";
				disablenpc "SN2";
				end;
		}
	}
	if ((Class == Job_Novice) && (BaseLevel < 26) && (Weight < 1))  {
		mes "[Super Novice]";
		mes "Perfecto cumples con los requisitos puedes pasar";
		sc_end SC_ALL;
		close2;
		percentheal 100,100;
		warp "event_escal",70,305;
		end;
	}
	else if ((Class == Job_Novice) && (BaseLevel > 25) && (Weight > 0))  {
		mes "[Super Novice]";
		mes "Lo siento, no puedes pasar,necesito que vayas sin peso";
		close;
	}
	else if ((Class == Job_Novice) && (BaseLevel > 25)) {
		mes "[Super Novice]";
		mes "Lo siento, no puedes pasar, superas el nivel 25 de base";
		close;
	}
	mes "[Super Novice]";
	mes "No cumples ningun requisito para poder acceder, necesito que seas ^0000FFNovice^000000, no superes el ^0000FFLevel Base 25^000000 lleves ^0000FFcero peso^000000 Gracias";
	close;
}

event_escal,1,1,0	script	escalf	-1,{
OnInit:
	disablenpc "escalf";
	end;

OnEnable:
	if (getmapusers("event_escal") > 0)
	mapwarp "event_escal","aldebaran",132,115;
	end;
}
	
					
event_escal,177,193,5	script	Super Novice::SN3	729,{
	mes "[Super Novice]";
	mes "Enorabuena, has conseguido terminar la escalada con exito";
	announce ""+strcharinfo(0)+" llego a la cima... enorabuena",bc_all;
	next;
	mes "[Super Novice]";
	mes "Ahora puedes obtener tu recompensa";
	getitem 5147,1; //Baseball Cap (OBJETO A DECIDIR POR LOS ADMIN DEL SERVIDOR)
	next;
	mes "[Super Novice]";
	mes "Es hora de que todos se vayan fuera de aquí";
	donpcevent "escalf::OnEnable";
	disablenpc "SN2";
	enablenpc "SN1";
	disablenpc "SN4";
	disablenpc "SN3";
	close;
}	

//trampas

event_escal,107,308,0	script	#tramp1	-1,5,5,{

OnTouch:
	sc_start SC_QUAGMIRE,5000,5;
	end;

}

event_escal,139,324,0	script	#tramp2	-1,3,3,{

OnTouch:
	sc_start SC_BLIND,20000,5;
	end;

}

event_escal,222,345,0	script	#tramp3	-1,5,5,{

OnTouch:
	sc_start SC_BLIND,20000,5;
	end;

}

event_escal,274,304,0	script	#tramp4	-1,5,5,{

OnTouch:
	sc_start SC_CONFUSION,20000,1;
	end;

}

event_escal,325,234,0	script	#tramp5	-1,3,3,{

OnTouch:
	sc_start SC_DECREASEAGI,6000,1;
	end;

}

event_escal,310,165,0	script	#tramp6	-1,5,5,{

OnTouch:
	sc_start SC_BLIND,20000,5;
	end;

}

event_escal,263,90,0	script	#tramp7	-1,5,5,{

OnTouch:
	sc_start SC_COMA,1000,1;
	end;

}

event_escal,246,75,0	script	#tramp8	-1,8,8,{

OnTouch:
	sc_start SC_QUAGMIRE,5000,5;
	end;

}

event_escal,170,87,0	script	#tramp9	-1,8,8,{

OnTouch:
	sc_start SC_BLIND,300000,5;
	end;

}

event_escal,90,156,0	script	#tramp10	-1,5,5,{

OnTouch:
	sc_start SC_CONFUSION,5000,1;
	end;

}

event_escal,117,276,0	script	#tramp16	-1,5,5,{

OnTouch:
	sc_start SC_INCREASEAGI,10000,1;
	end;

}

event_escal,264,260,0	script	#tramp11	-1,5,5,{

OnTouch:
	sc_start SC_COMA,1000,1;
	end;

}

event_escal,285,212,0	script	#tramp12	-1,5,5,{

OnTouch:
	sc_start SC_INCREASEAGI,10000,1;
	end;

}

event_escal,236,123,0	script	#tramp13	-1,9,9,{

OnTouch:
	sc_start SC_QUAGMIRE,5000,5;
	end;

}

event_escal,155,139,0	script	#tramp14	-1,9,9,{

OnTouch:
	sc_start SC_QUAGMIRE,5000,5;
	end;

}

event_escal,240,214,0	script	#tramp15	-1,8,8,{

OnTouch:
	sc_start SC_CONFUSION,20000,1;
	end;

}

//mapflag
event_escal	mapflag	nobranch
event_escal	mapflag	nomemo
event_escal	mapflag	noteleport
event_escal	mapflag	nosave
event_escal	mapflag	nopenalty
event_escal	mapflag	noexp
event_escal	mapflag	nodrop

event_escal,0,0,0,0	monster	Cazador Novices	1524,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1562,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1462,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1457,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1106,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1430,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1035,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1604,30,0,0,0
event_escal,0,0,0,0	monster	Reina Montaña	1059,1,600000,0,0
event_escal,158,77,0,0	monster	Blue Flower	1934,1,0,0,0
event_escal,159,77,0,0	monster	Red Flower	1935,1,0,0,0
event_escal,160,77,0,0	monster	Yellow Flower	1936,1,0,0,0
event_escal,161,77,0,0	monster	Blue Flower	1934,1,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1111,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1005,30,0,0,0
event_escal,0,0,0,0	monster	Cazador Novices	1041,30,0,0,0