//========================================================
//= ._._____ _ _ _ ___ __ __ =
//= | |____ | / \ | | | |_ _| \/ | =
//= | | |_ | / _ \ | |_| || || |\/| | =
//= ___| |___| |/ ___ \| _ || || | | | =
//= |_____|_____/_/ \_\_| |_|___|_| |_| =
//= www.forum.cronus-emulator.com =
//========================================================
//= Caça aos Porings
//===== Por : ============================================
//= Leahim
//===== Versão Atual: ====================================
//= 1.0
//===== Descrição: =======================================
//= Um simples evento automático que abre 3 vezes ao dia.
//= Ao iniciar você poderá acessar o mapa do evento onde
//= um número x de Monstros Cristalóides serão invocados,
//= mate todos para dropar Bandeiras Nacionais, terminando
//= o evento todos os players do mapa serão teleportados a
//= prontera...
//==== Pedido do Autor : =================================
//= Não retire os créditos, pois dá trabalho para fazer.
//========================================================
prontera,160,186,4 script Sala dos Cristais 4_M_BOSSCAT,{
mes .n$;
mes "Olá "+strcharinfo(0)+", eu sou o Mestre";
mes "do Evento Sala dos Cristais !";
mes "Posso te ajudar em alguma coisa ?";
set .@menu$, "Entrar no Evento (" + (($cri==1) ? "^0055FF Aberto ^000000":"^FF0000 Fechado ^000000")+"):Como Funciona ?:Cancelar";
switch(select(.@menu$)) {
case 1:
if($cri == 0){
next;
mes .n$;
mes "Sinto muito, mas nós estamos fechados no momento...";
mes "Nós abrimos 3 vezes ao dia ás :";
mes "• ^FF000009:15H ~ 15:15H ~ 01:15H^000000 •";
mes "Enfim ~ Aguardo sua Presença !";
close;
}
next;
mes .n$;
mes "Corra, estamos para começar o evento !";
next;
warp .mp$,.@x,.@y;
sleep2 4000;
message strcharinfo(0),"[ Sala dos Cristais ] : Começaremos o Evento em Instantes !";
end;
case 2:
next;
mes .n$;
mes "Ah, então você quer saber como funciona? certo, irei te explicar.";
next;
mes .n$;
mes "A idéia é simples, o evento irá abrir todos os dias.";
mes "Quando aberto todos poderam acessar a Sala dos Cristais, onde vários monstros";
mes "seram invocados. Seu objetivo é de caçá-los e adquirir o máximo de";
mes "Bandeiras Nacionais possiveis !";
next;
mes .n$;
mes "Enfim... vence aquele que obter mais bandeiras, bem é isso, qualquer coisa é só me chamar novamente.";
mes "Tenha um ótimo dia "+strcharinfo(0)+".";
close;
case 3:
next;
mes .n$;
mes "Certo, volte quando precisar de meus serviços...";
close;
}
OnClock0915:
OnClock1515:
OnClock0115:
set $cri,1;
killmonsterall .mp$;
for(set .x,5; .x > 0; set .x,.x-1){
announce "[ Sala dos Cristais ] : A Entrada para o evento está aberta e começaremos em "+.x+" minutos.",bc_all;
sleep 60000;
}
announce "[ Sala dos Cristais ] : A Entrada para o evento foi fechada... mais sorte da próxima vez!",bc_all;
sleep2 3000;
mapannounce .mp$,"[ Sala dos Cristais ] : Atenção! Iniciaremos em instantes, boa sorte a todos!",bc_map;
set $cri,0;
sleep 10000;
if(getmapusers("nyd_dun02") < 2) {
announce "[ Sala dos Cristais ] : O evento foi cancelado por falta de participantes...",bc_all;
sleep2 4000;
mapwarp .mp$,"prontera",156,191;
end;
}
mapannounce .mp$,"[ Sala dos Cristais ] : Os Cristais Apareceram !!!",bc_map;
monster .mp$,0,0,"Cristal Encantado",1953,400,"Sala dos Cristais::OnMatou";
end;
OnMatou:
if(mobcount(.mp$,"all") == 0){
announce "[ Sala dos Cristais ] : Parece que todos os Cristais Encantados foram derrotados...",bc_all;
sleep2 2000;
announce "[ Sala dos Cristais ] : O Evento Acabou, agradecemos a todos por participarem!",bc_all;
sleep2 4000;
mapwarp .mp$,"prontera",156,191;
end;
}
set .rd, rand(getarraysize(.pm));
getitem .pm[.rd],.qn[.rd];
end;
OnInit:
//=== Nome do Npc ==========================================================
set .n$,"[^FF0000 Sala dos Cristais ^000000]";
//=== Id da Premiação que será dada. =======================================
setarray .pm[0], 7549,7549,7549,7549,7549;
//=== Quantidade Sorteada ==================================================
setarray .qn[0], 1,3,5,7,10;
//=== Mapa que o evento ocorrerá ===========================================
set .mp$,"nyd_dun02";
//=== Coordenada de Teleporte X ============================================
set .@x, 0;
//=== Coordenada de Teleporte Y ============================================
set .@y, 0;
//=== Balão de Chat sobre o Npc ============================================
waitingroom "Sala dos Cristais",0;
//==========================================================================
end;
}
//=== Mapflags =============================================================
nyd_dun02 mapflag nomemo
nyd_dun02 mapflag noreturn
nyd_dun02 mapflag nosave
nyd_dun02 mapflag nobranch
nyd_dun02 mapflag noteleport
nyd_dun02 mapflag nowarp
nyd_dun02 mapflag nowarpto
nyd_dun02 mapflag noicewall
nyd_dun02 mapflag nodrop
nyd_dun02 mapflag noskill