Psst.. new poll here.
Psst.. new forums here.
Microsoft is blocking us again (TY IP Reputation!) so just use oauth login instead. :)
Paste
Pasted as HTML by Matsu ( 14 years ago )
prontera,145,173,6 script Evento Sobrevivente 752,{
//---------------------------CONFIGURAÇÕES---------------------------+
// |
//+=-=-=-=-=+-=-=-=-=-=+=-=-=-=-=-=-=+=-=-=-=-=-=-=-=-=+=-=-=-=-=-=-=+
set .nome$,"^800000[Sobrevivente]^000000"; // Nome do NPC de Entrada.
//-=-=--=-=-=-=--=-=-=-=--=--=-=-=--=-=--=-=-=-=-=--===-=-=-=-=--=-=-|
set $max,15; // Limite máximo de Players
//-=-=--=-=-=-=--=-=-=-=--=--=-=-=--=-=--=-=-=-=-=--===-=-=-=-=--=-=-|
setarray $@Sobrevivente[0],607,50,608,100,7253,1; // Id dos premeios e quantidade ,Os premeios são sorteado entre eles.
//-=-=--=-=-=-=--=-=-=-=--=--=-=-=--=-=--=-=-=-=-=--===-=-=-=-=--=-=-|
set .item$,"Yggdrazil,Fruto de Yggdrazil"; // Nome dos premios
//+=-=-=-=-=+=-=-=-=-=-+-=-=-=-=-=-=-+=-=--=-=-=-=-=-=-+=-=-=-=-=-=-=+
mes .nome$;
mes "^ff6600Olá Bravo Guerreiro, o que deseja?^000000";
next;
switch(select("^0000ffEntra no evento^000000 ["+getmapusers ("g_room1-1")+"]","^0000ffInformações^000000","^0000ffO que eu ganho?^000000")){
case 1:
if($sob_on == 0){ mes .nome$; mes "^ff6600O Evento sobrevivente não está aberto. Ele abre a cada 30 Minutos.^000000"; close; }
if(getmapusers("g_room1-1") == $max){ mes .nome$; mes "^ff6600Desculpe, o evento está lotado!^000000"; close; }
if($sob_on == 1){
mes .nome$;
mes "^FF6600Desejo uma Boa Sorte!^000000";
close2;
if(GetGmLeveL()<20) announce strcharinfo(0)+" conseguiu entrar no Evento Sobrevivente",8;
percentheal 100,100; warp "g_room1-1",74,182; end; }
case 2:
mes .nome$;
mes "^0000FFEvento Sobrevivente, tente fica vivo até o final do evento.";
mes "Suporta até "+$max+" Players no mapa.";
mes "Mate quantos puder e se você chega ate o final Ganhara um Item";
mes "que e Escolhido pela Administração.^000000";
close;
case 3:
mes .nome$;
mes "^ff6600Você pode ganhar:^000000";
mes "^ff6600Um Desse itens..^000000";
Mes .item$;
close;
}
close;
}
g_room1-1,64,183,3 script Saída 708,{
set .nome2$,"^0000FF[Saída]^000000"; // Nome do NPC de Saída.
if($ganhou == 0){
set @n,Rand(GetArraySize($Sobrevivente)/2);
additem $@Sobrevivente[@n*2],$@Sobrevivente[@n*2+1];
set $sob_on,0; warp "prontera",150,150; end; }
mes .nome2$;
mes "^008000Você foi muito bem hoje!";
mes "Como recompensa, um item de presente.^000000";
close2;
set @n,Rand(GetArraySize($@Sobrevivente)/2);
additem $@Sobrevivente[@n*2],$@Sobrevivente[@n*2+1];
set $ganhou,0;
set $sob_on,0;
warp "prontera",138,171;
end;
}
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
// sobreviventeiHide |
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=+
g_room1-1,64,181,5 script sobreviventeiHide -1,{
OnMinute53:
OnMinute25:
Announce "O Evento Sobrevivente está aberto, e em 5 minutos ele começará! Venha pegue sua vaga!",8;
disablenpc "Saída"; enablenpc "Buff"; initnpctimer; set $sob_on,1; killmonsterall "g_room1-1"; end;
OnTimer60000: Announce "O Evento Sobrevivente está aberto, e em 4 minutos ele começará!",8; end;
OnTimer90000: Announce "Corra para conseguir sua vaga no O Evento Sobrevivente, são só "+$max+"!",8; end;
OnTimer120000: Announce "O Evento Sobrevivente está aberto, e em 3 minutos ele começará!",8; end;
OnTimer150000: Announce "Corra para conseguir sua vaga no O Evento Sobrevivente, são só "+$max+"!",8; end;
OnTimer180000: Announce "O Evento Sobrevivente está aberto, e em 2 minutos ele começará!",8; end;
OnTimer210000: Announce "Corra para conseguir sua vaga no O Evento Sobrevivente, são só "+$max+"!",8; end;
OnTimer240000: Announce "O Evento Sobrevivente está aberto, e em 1 minuto ele começará!",8; end;
OnTimer270000: Announce "Corra para conseguir sua vaga no O Evento Sobrevivente, são só "+$max+"!",8; end;
OnTimer300000: Announce "O Evento Sobrevivente começou!",8;
disablenpc "Buff";
pvpon "g_room1-1";
set $sob_on,0;
end;
OnTimer400000: MapAnnounce "g_room1-1","Em alguns segundos O 2° Round Tera inicio!!",8;
pvpoff "g_room1-1";
OnTimer420000: MapAnnounce "g_room1-1","Enquanto isso recarregue suas Energias!!",0;
enablenpc "Buff";
end;
OnTimer430000: MapAnnounce "g_room1-1","O 2° Round Começou LUTEM!!!",8;
disablenpc "Buff";
pvpon "g_room1-1";;
end;
OnTimer500000: MapAnnounce "g_room1-1","Em alguns segundos O 3° Round Tera inicio!!",8;
pvpoff "g_room1-1";
OnTimer530000: MapAnnounce "g_room1-1","Enquanto isso recarregue suas Energias!!",0;
enablenpc "Buff";
end;
OnTimer540000: MapAnnounce "g_room1-1","O 3° Round Começou LUTEM!!!",8;
pvpon "g_room1-1";
disablenpc "Buff";
end;
OnTimer600000: Announce "O vento Subrevivente termino Parabens Aos vencendores!!!",8;
pvpoff "g_room1-1";
end;
OnTimer610000: MapAnnounce "g_room1-1","Parabéns! Vocês Sobreviveram ao Evento sobrevivente Retirem seus Prêmios com o NPC 'Saída'!",8;
enablenpc "Saída";
end;
}
g_room1-1,74,185,3 script Buff 90,{
percentheal 100,100;
skilleffect 384,0; sc_start SC_MELTDOWN,360000,5;
skilleffect 383,0; sc_start SC_WINDWALK,360000,5;
skilleffect 465,0; sc_start SC_KAITE,360000,7;
skilleffect 464,0; sc_start SC_KAUPE,360000,3;
skilleffect 463,0; sc_start SC_KAAHI,360000,7;
skilleffect 462,0; sc_start SC_KAIZEL,360000,7;
skilleffect 8,0; sc_start SC_ENDURE,360000,10;
skilleffect 33,0; sc_start SC_ANGELUS,360000,10;
skilleffect 45,0; sc_start SC_CONCENTRATE,360000,10;
skilleffect 74,0; sc_start SC_MAGNIFICAT,360000,5;
skilleffect 75,0; sc_start SC_GLORIA,360000,5;skilleffect 459,0;
sc_start SC_ADRENALINE2,360000,1;skilleffect 66,0;
sc_start SC_IMPOSITIO,360000,5;skilleffect 67,0;
sc_start SC_SUFFRAGIUM,360000,3;skilleffect 34,0;
sc_start SC_BLESSING,360000,10;skilleffect 29,0;
sc_start SC_INCREASEAGI,360000,10;skilleffect 112,0;
sc_start SC_WEAPONPERFECTION,360000,10;skilleffect 113,0;
sc_start SC_OVERTHRUST,360000,5;skilleffect 114,0;
sc_start SC_MAXIMIZEPOWER,360000,5;
end;
}
// Map-Flags
g_room1-1 mapflag nowarp
g_room1-1 mapflag nowarpto
g_room1-1 mapflag noteleport
g_room1-1 mapflag nogo
g_room1-1 mapflag nosave SavePoint
g_room1-1 mapflag nomemo
g_room1-1 mapflag nobranch
g_room1-1 mapflag nopenalty
g_room1-1 mapflag monster_noteleport
Revise this Paste