//===== Cronus Script ========================================
//= Evento de Natal
//===== Por ==================================================
//= Banned
//===== Versão ===============================================
//= 1.5
//===== Descrição ============================================
//= Sumona Monstros Natalinos.
//===== Changelog ============================================
//= 1.0 Script inicial. [Banned]
//= 1.1 Adicionado set de mapflags. [Banned]
//= 1.2 Reformulado, coisas inúteis retiradas. [Banned]
//= 1.3 Corrigida contagem de pontos. [Banned]
//= 1.4 Script Reestruturado. [Mehah]
//= 1.5 Otimizado e algumas correções. [RoM]
//= 1.6 Atualizado ao emulador atual. [Hodor]
//============================================================
prontera,142,174,5	script	Evento de Natal::Evento de Natal	718,{
 
mes "[Papai Noel]";
mes "Olá "+strcharinfo(0)+"!";
mes "O que você gostaria de fazer?";
next;
if(getgroupid() > 80) set .@m$,"Manipular o Evento";
while(1){
	switch(select(.@m$,"Contar Meus Pontos","Pegar meu Prêmio!","Cancelar")){
	 
		case 1:
		mes "[Papai Noel]";
		mes "O que gostaria de fazer com o Evento?";
		next;
		switch(select("Vamos Começar!","Parar o Evento!","Cancelar")){
			Case 1:
			mes "[Papai Noel]";
			mes "Inciado!";
			close2;
			goto start_event;
			 
			Case 2:
			mes "[Papai Noel]";
			mes "Finalizado!";
			close2;
			announce "O GM "+strcharinfo(0)+" finalizou o Evento de Natal!",8;
			stopnpctimer;
			killmonsterall "prontera.gat";
			end;
			 
			Case 3:
			close;
		}
	 
		case 2:
		mes "[Papai Noel]";
		mes "Você tem "+@Mob_Killed+" pontos!";
		next;
		break;
		 
		case 3:
		mes "[Papai Noel]";
		mes "Escolha seu prêmio!";
		next;
		switch(select("1 Velha Caixa Azul [^00FF0070 Pontos^000000]",
		"1 Caixa de Presente [^00FF0050 Pontos^000000]",
		"1 Gorro de Natal [^00FF0025 Pontos^000000]",
		"50 Bengala Doce [^00FF0020 Pontos^000000]",
		"75 Biscoito de Gengibre [^00FF0015 Pontos^000000]",
		"100 Doce da Sorte [^00FF0010 Pontos^000000]",
		"Nenhum")){ 
		case 1: callsub mobKillCheck,70,603,1;
		case 2: callsub mobKillCheck,50,644,1;
		case 3: callsub mobKillCheck,25,2236,1;
		case 4: callsub mobKillCheck,20,530,50;
		case 5: callsub mobKillCheck,15,538,75; 
		case 6: callsub mobKillCheck,10,570,100; 
		}
	 
		case 4:
		close;
	}
}

OnClock0000:
OnClock0300:
OnClock0600:
OnClock0900:
OnClock1200:
OnClock1500:
OnClock1800:
OnClock2100:

start_event:
announce "O GM "+strcharinfo(0)+" deu Início ao Evento de Natal!",8;
set $@MapMobs,250;
monster "prontera.gat",0,0,"Antônio",1247,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Cookie Natalino",1246,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Poring Noel",1062,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Presente",1249,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Goblin Natalino",1245,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Cavaleiro da Tempestade",1251,2,"Evento de Natal::OnMobDead";
initnpctimer;
end;
 
mobKillCheck:
mes "[Papai Noel]";
if(@Mob_Killed < getarg(0)) mes "Você não tem pontos o suficiente.";
else {
	mes "Muito Bem, aí está seu prêmio!";
	getitem getarg(1),getarg(2);
	set @Mob_Killed,@Mob_Killed-getarg(0);
}
close;
 
OnMobDead:
set @Mob_Killed,@Mob_Killed+1;
set $@MapMobs,$@MapMobs-1;
if(!$@MapMobs){
	announce "Todos os Monstros foram Mortos, portanto o Evento acabou!",bc_blue|bc_all;
	stopnpctimer;
}
end;
 
OnTimer2000:
announce "[Papai Noel]: Vocês tem 3 minutos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer62000:
announce "[Papai Noel]: Vocês tem 2 minutos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer92000:
announce "[Papai Noel]: Matandos os Monstros você ganha pontos e pode trocar por prêmios!",bc_blue|bc_all;
end;
OnTimer122000:
announce "[Papai Noel]: Vocês tem 1  minutos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer152000:
announce "[Papai Noel]: Vocês só tem 30 segundos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer172000:
announce "[Papai Noel]: Vocês só tem 10 segundos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer182000:
announce "[Papai Noel]: O Tempo do Evento acabou, vá trocar seus prêmios!",bc_blue|bc_all;
killmonsterall "prontera.gat";
stopnpctimer;
end;
}