//NPC Activador, sólo para GM de Eventos y Superiores

prontera,153,178,5	script	Eventos Automáticos::activador	408,{
	if (getgmlevel()<50) {
		mes "[Eventos Automáticos]";
		mes "No puedes activar eventos automáticos puesto que no eres GM de eventos o superior.";
		close;
	}

mes "[Eventos Automáticos]";
mes "Hola, " + strcharinfo(0) + ".";
mes "¿Qué tal? ¿Preparamos un evento?";
	switch(select("¡Hagamos un evento!:¡Detengamos un evento!:Salir")){
	case 1:
		{
		next;
		mes "[Eventos Automáticos]";
		mes "¿Qué evento quieres empezar?";
				switch(select("¡Caza del Cucco!:Búsqueda del tesoro:Salir"))
				{
					case 1:{
					next;
						if ($@cuccoevent == 1) {
						mes "[Eventos Automáticos]";
						mes "El evento ya ha sido iniciado, debes esperar a que finalice para volverlo a activar de nuevo.";
						close;
						}
					mes "[Eventos Automáticos]";
					mes "Entendido, demos comienzo a ^FF0000[¡Caza del Cucco!]";
					if (!$@cuccoevent) set $@cuccoevent, 1;
					donpcevent "sistemacucco::oncuccostart";
					close;
					}
					case 2:{
					next;
						if (busqtesor == 1) {
						mes "[Eventos Automáticos]";
						mes "El evento ya ha sido iniciado, debes esperar a que finalice para volverlo a activar de nuevo.";
						close;
						}
					mes "[Eventos Automáticos]";
					mes "Entendido, demos comienzo a ^FF0000[Búsqueda del tesoro]";
					if (!$@busqtesor) set $@busqtesor, 1;
					startnpctimer "sistemabusq";
					close;
					}
					case 3:{
					next;
					mes "[Eventos Automáticos]";
					mes "Nos vemos, " + strcharinfo(0) + ".";
					close;
					}
				}
		}
	case 2:
		{
		next;
		mes "[Eventos Automáticos]";
		mes "¿Qué evento quieres finalizar?";
		switch(select("¡Caza del Cucco!:Búsqueda del tesoro:Salir"))
				{
					case 1:{
					next;
					if ($@cuccoevent == 1) {
						mes "[Eventos Automáticos]";
						mes "Entendido, finalicemos ^FF0000[¡Caza del Cucco!]";
						donpcevent "sistemacucco::oncuccoend";
						set $@cuccoevent, 0;
						close;
						}
					mes "[Eventos Automáticos]";
					mes "No se puede finalizar este evento porque no ha sido iniciado.";
					close;
					}
					case 2:{
					next;
					if ($@busqtesor == 1) {
						mes "[Eventos Automáticos]";
						mes "Entendido, finalicemos ^FF0000[¡Búsqueda del tesoro!]";
						donpcevent "sistemabusq::onbusqend";
						set $@busqtesor,0;
						close;
						}
					mes "[Eventos Automáticos]";
					mes "No se puede finalizar este evento porque no ha sido iniciado.";
					close;
					}
					case 3:{
					next;
					mes "[Eventos Automáticos]";
					mes "Nos vemos, " + strcharinfo(0) + ".";
					close;
					}
				}
		close;
		}
	case 3:
		{
		next;
		mes "[Eventos Automáticos]";
		mes "Nos vemos, " + strcharinfo(0) + ".";
		close;
		}
	}

close;
}