//BÚSQUEDA DEL TESORO

//Sistema búsqueda del tesoro
-	script	sistemabusq	-1,{
end;
onbusqstart:
	if ($@busqtesor == 1){
	announce "¡Usuarios de ShadowRO, se ha activado el evento [Búsqueda del tesoro]!.",0;
	sleep 5000;
	if (!$@busqtesor) {end;}
	announce "A continuación se ofrecerán una serie de pistas que os ayudarán a encontrar el lugar donde está escondido el tesoro.",0;
	sleep 5000;
	if (!$@busqtesor) {end;}
	announce "Disponéis de un tiempo limitado para encontrar el tesoro y haceros con él.",0;
	sleep 5000;
	if (!$@busqtesor) {end;}
	switch (rand(8)) {
	//PRT_FILD01
		case 0: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"hay muchos árboles verdes";
				if (!$@infor3) set $@infor3$,"se oye a los pájaros cantar";
				if (!$@infor4) set $@infor4$,"hay un pequeño lago";
				if (!$@infor5) set $@infor5$,"se oye el ajetreto de una ciudad cercana";
				if (!$@infor6) set $@infor6$,"parece que hay un castillo cerca";
				break;
	//GEF_FILD01
		case 1: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"hay un montón de palmeras";
				if (!$@infor3) set $@infor3$,"se oye a las ranas croar.";
				if (!$@infor4) set $@infor4$,"se ve el mar";
				if (!$@infor5) set $@infor5$,"aquí cerca está la llamada ciudad de la magia";
				if (!$@infor6) set $@infor6$,"más de medio mapa está compuesto por agua";
				break;
	//PRT_FILD11
		case 2: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"la vegetación es bastante abundante";
				if (!$@infor3) set $@infor3$,"unos seres diminutos portan máscaras";
				if (!$@infor4) set $@infor4$,"no parece que haya ninguna ciudad cerca";
				if (!$@infor5) set $@infor5$,"hay un pequeño río";
				if (!$@infor6) set $@infor6$,"hay tres puentes paralelos";
				break;
	//CMD_FILD09
		case 3: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"está todo desértico";
				if (!$@infor3) set $@infor3$,"hay algunas ruinas antiguas";
				if (!$@infor4) set $@infor4$,"se puede ver el mar, de hecho hay mucha agua";
				if (!$@infor5) set $@infor5$,"hay dos puentes perpendiculares";
				if (!$@infor6) set $@infor6$,"desde aquí se puede avistar un faro a lo lejos";
				break;
	//PAY_FILD10
		case 4: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"está lleno de cañas de bambú";
				if (!$@infor3) set $@infor3$,"se oye el ruido de madera crujiendo";
				if (!$@infor4) set $@infor4$,"se puede ver el mar, pero muy poco";
				if (!$@infor5) set $@infor5$,"hay dos montículos en el centro del mapa";
				if (!$@infor6) set $@infor6$,"los arqueros entrenaban aquí antes";
				break;
	//PAY_FILD05
		case 5: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"hay un montón de vegetación";
				if (!$@infor3) set $@infor3$,"hay 2 islotes diminutos";
				if (!$@infor4) set $@infor4$,"hay dos puentes para llegar a ellos";
				if (!$@infor5) set $@infor5$,"detesto las libelulas";
				if (!$@infor6) set $@infor6$,"se ve un gran lago";
				break;
	//GEF_FILD02
		case 6: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"tiene una forma serpenteante";
				if (!$@infor3) set $@infor3$,"tanta vegetación no te deja ver por donde caminas";
				if (!$@infor4) set $@infor4$,"apenas hay un poco de agua en el centro";
				if (!$@infor5) set $@infor5$,"no está cerca de ninguna ciudad";
				if (!$@infor6) set $@infor6$,"la forma del mapa parece se asemeja a una serpiente";
				break;
	//PRT_FILD03
		case 7: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"se ve el mar en una esquina del mapa";
				if (!$@infor3) set $@infor3$,"hay abundante vegetación";
				if (!$@infor4) set $@infor4$,"yo no vendría aquí con plátanos";
				if (!$@infor5) set $@infor5$,"no hay ninguna ciudad cerca";
				if (!$@infor6) set $@infor6$,"se oyen oraciones aquí al lado";
				break;
	//MJOLNIR_05
		case 8: if (!$@infor1) set $@infor1$,"Rune Midgard";
				if (!$@infor2) set $@infor2$,"hay mucha vegetación";
				if (!$@infor3) set $@infor3$,"las flores son gigantescas";
				if (!$@infor4) set $@infor4$,"hay 3 grandes montículos";
				if (!$@infor5) set $@infor5$,"no hay ninguna ciudad cerca";
				if (!$@infor6) set $@infor6$,"las hojas de los árboles están comidas por los gusanos";
				break;
		//case 9: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 10: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 11: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 12: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 13: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 14: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 15: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 16: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 17: if (!$@infor1) set $@infor1,"República de Schwarzwald.";
		//case 18: if (!$@infor1) set $@infor1,"Arunafeltz.";
		//case 19: if (!$@infor1) set $@infor1,"Arunafeltz.";
		//case 20: if (!$@infor1) set $@infor1,"Arunafeltz.";
		//case 21: if (!$@infor1) set $@infor1,"Arunafeltz.";
		//case 22: if (!$@infor1) set $@infor1,"Arunafeltz.";
		//case 23: if (!$@infor1) set $@infor1,"Arunafeltz.";
		//case 24: if (!$@infor1) set $@infor1,"Arunafeltz.";
	}
	announce "[PRIMERA PISTA]: El lugar que tenéis que buscar está en "+$@infor1$+".",0;
	sleep 9000;
	if (!$@busqtesor) {end;}
	announce "[SEGUNDA PISTA]: Por aquí "+$@infor2$+".",0;
	sleep 60000;
	if (!$@busqtesor) {end;}
	announce "[TERCERA PISTA]: ¿He mencionado que "+$@infor3$+"?",0;
	sleep 60000;
	if (!$@busqtesor) {end;}
	announce "[CUARTA PISTA]: Por cierto... "+$@infor4$+".",0;
	sleep 60000;
	if (!$@busqtesor) {end;}
	announce "[QUINTA PISTA]: Casi olvido que "+$@infor5$+".",0;
	sleep 60000;
	if (!$@busqtesor) {end;}
	announce "[ÚLTIMA PISTA]: Sólo puedo decir que "+$@infor6$+".",0;
	sleep 60000;
	if (!$@busqtesor) {end;}
	end;
	}
	end;

onbusqend:
announce "¡El evento ha sido cancelado! Disculpad las molestias.",0;
end;
}