Jump to content
aepa1940

como poner contador de muertes de mob en este npc

By aepa1940, in Sección de Scripts

Recommended Posts

aepa1940 Santa Poring

aepa1940

Posted
Posted (edited)

buenas tardes quisiera saber como poner un contador de mob de muerte regresiva a este survival arena al igual como esta en endless tower en cada round de mob y boss.

//================ NusantaraRO SURVIVAL ARENA ====================
//= Survival Arena Event
//================================================================
//= Created by Ichal Moned
//================================================================
//= Version 1.0
//================================================================
//===== Custom Configuration =====================================
// Please Check on at this fuction to custom configuration
//========= Min Level to Join ====================================
//set @minlevel,<BaseLevel>; // Set Min Level to Join
//========= Time Configuration ===================================
//OnClock0800: // This Mean, Event will run at 08.00 AM
//OnClock1600: // This Mean, Event will run at 16.00 PM
//OnClock2000: // This Mean, Event will run at 20.00 PM

//================================================================
//= Survival Arena Warper and Announcer NPC
prontera,171,181,3 script Survival Arena 106,{
//================================================================

//===== Configuration Settings ================================================================================
set @minlevel,150;
set @gmlvl,40;
//=============================================================================================================
//======== Prize Configuration =====================================
//==================================================================
OnDefaultPrize:
set .prizeone, 7619;
set .prizetwo, 7620;
set .prizethree, 12210;
set .prizefour, 0;
set .prizebonus, 0;
set .zenyprice, 40000000;
set .amountprizeone, 4;
set .amountprizetwo, 4;
set .amountprizethree, 1;
set .amountprizefour, 0;
set .amountprizebonus, 0;
//==================================================================
//==================================================================

OnInit:
 {
  hideonnpc "Survival Arena Guard";
}

  if(getgmlevel() >= @gmlvl){
  mes "[survival System Management]";
  mes "Welcome GM "+strcharinfo(0)+", Can I help you?";
  next;
  switch(select("Set Prize","Open Survival Arena Now!","Go To Survival Arena","Nothing")){

case 1:
next;
mes "[survival System Management]";
mes "The Prize Now is :";
mes "Prize 1: ^0000FF"+.amountprizeone+" ^FF0000"+getitemname(.prizeone)+"^000000";
mes "Prize 2: ^0000FF"+.amountprizetwo+" ^FF0000"+getitemname(.prizetwo)+"^000000";
mes "Prize 3: ^0000FF"+.amountprizethree+" ^FF0000"+getitemname(.prizethree)+"^000000";
mes "Prize 4: ^0000FF"+.amountprizefour+" ^FF0000"+getitemname(.prizefour)+"^000000";
mes "Prize Bonus Round : ^0000FF"+.amountprizebonus+" ^FF0000"+getitemname(.prizebonus)+"^000000";
mes "and ^FF0000"+.zenyprice+"^000000 Zeny";
next;
mes "[survival System Management]";
mes "Do You want to change the prize?";
menu "No",L_No,"Yes",L_ChangePrize;

  L_No:
  mes "Alright, Set Prize to Default";
  close;

   L_ChangePrize:
   mes "What Prize you want change?";
   switch(select("Prize 1","Prize 2","Prize 3","Prize 4","Bonus Round Prize","Zeny")){

   case 1:
   next;
   mes "[survival System Management]";
   mes "Please Input the Item ID";
   next;
   input [email protected];
   next;
   mes "[survival System Management]";
   mes "Please Input the Prize Amount";
   next;
   input [email protected];
   set .prizeone,[email protected];
   set .amountprizeone,[email protected];
   next;
   mes "[survival System Management]";
   mes "Now Prize 1 Changed to:";
   mes "^0000FF"+.amountprizeone+" ^FF0000"+getitemname(.prizeone)+"^000000";
   mes "Do you want to change another Prize?";
   if(select("Yes","No") == 1) goto L_ChangePrize;
   close;

   case 2:
   next;
   mes "[survival System Management]";
   mes "Please Input the Item ID";
   next;
   input [email protected];
   next;
   mes "[survival System Management]";
   mes "Please Input the Prize Amount";
   next;
   input [email protected];
   set .prizetwo,[email protected];
   set .amountprizetwo,[email protected];
   next;
   mes "[survival System Management]";
   mes "Now Prize 2 Changed to:";
   mes "^0000FF"+.amountprizetwo+" ^FF0000"+getitemname(.prizetwo)+"^000000";
   mes "Do you want to change another Prize?";
   if(select("Yes","No") == 1) goto L_ChangePrize;
   close;

   case 3:
   next;
   mes "[survival System Management]";
   mes "Please Input the Item ID";
   next;
   input [email protected];
   next;
   mes "[survival System Management]";
   mes "Please Input the Prize Amount";
   next;
   input [email protected];
   set .prizethree,[email protected];
   set .amountprizethree,[email protected];
   next;
   mes "[survival System Management]";
   mes "Now Prize 3 Changed to:";
   mes "^0000FF"+.amountprizethree+" ^FF0000"+getitemname(.prizethree)+"^000000";
   mes "Do you want to change another Prize?";
   if(select("Yes","No") == 1) goto L_ChangePrize;
   close;

   case 4:
   next;
   mes "[survival System Management]";
   mes "Please Input the Item ID";
   next;
   input [email protected];
   next;
   mes "[survival System Management]";
   mes "Please Input the Prize Amount";
   next;
   input [email protected];
   set .prizefour,[email protected];
   set .amountprizefour,[email protected];
   next;
   mes "[survival System Management]";
   mes "Now Prize 4 Changed to:";
   mes "^0000FF"+.amountprizefour+" ^FF0000"+getitemname(.prizefour)+"^000000";
   mes "Do you want to change another Prize?";
   if(select("Yes","No") == 1) goto L_ChangePrize;
   close;

   case 5:
   next;
   mes "[survival System Management]";
   mes "Please Input the Item ID";
   next;
   input [email protected];
   next;
   mes "[survival System Management]";
   mes "Please Input the Prize Amount";
   next;
   input [email protected];
   set .prizebonus,[email protected];
   set .amountprizebonus,[email protected];
   next;
   mes "[survival System Management]";
   mes "Now Bonus Prize Changed to:";
   mes "^0000FF"+.amountprizebonus+" ^FF0000"+getitemname(.prizebonus)+"^000000";
   mes "Do you want to change another Prize?";
   if(select("Yes","No") == 1) goto L_ChangePrize;
   close;

   case 6:
   next;
   mes "[survival System Management]";
   mes "Please Input the Zeny amount";
   next;
   input .zenypriceamount;
   set .zenyprice,.zenypriceamount;
   next;
   mes "[survival System Management]";
   mes "Now Zeny Prize Changed to ^FF0000"+.zenyprice+"^000000 Zeny";
   mes "Do you want to change another Prize?";
   if(select("Yes","No") == 1) goto L_ChangePrize;
   close;
   }


case 2:
next;
mes "[survival System Management]";
mes "Are You Sure want to Start the Event?";
 if(select("No","Yes") == 1){
   close;
   }
mes "Alright, I'll Open it Now";
donpcevent "Survival Arena::OnWarpOpen";
close;

case 3:
next;
mes "[survival System Management]";
mes "Alright, here we go";
close2;
warp "ordeal_1-2",153,153;

case 4:
next;
mes "Alright, Come to me to Set The Survival Arena";
close;

}
  }	


  mes "[survival Arena]";
  mes "Survival Arena Open at:";
  mes "^FF0000 08.00AM Server Time^000000";
  mes "^FF0000 16.00PM Server Time^000000";
  mes "^FF0000 20.00PM Server Time^000000";
  callsub survivalopen;
  close;


survivalopen:
 if(.eventsurvival == 0){
  return;
}
next;
mes "[survival Arena]";
mes "Do you want join Survival Arena?";
if(select("Yeah","No") == 2){
mes "Well, no problem";
close;
}
 if(BaseLevel <= @minlevel){
 mes "Sorry, you must level ^FF0000"[email protected]+"^000000 or higher to join this";
 close;
}
mes "Alright, be careful";
next;
warp "ordeal_1-2",153,153;
close;

OnClock0800:
OnClock1600:
OnClock2000:
OnWarpOpen:
{
  initnpctimer;
  set .eventsurvival,1;  
  announce "Survival Arena Now Has Been Open",0;
  sleep 10000;
  announce "Go to Survival Arena Warper NPC to join",0;
  sleep 10000;
  announce "After 5 minute, the warp will closed",0;
  sleep 10000;
  end;

  OnTimer60000:
announce "4 Minute before Survival warp closed",0;
end;

  OnTimer120000:
announce "3 Minute before Survival warp closed",0;
end;

  OnTimer180000:
announce "2 Minute before Survival warp closed",0;
end;

  OnTimer240000:
announce "1 Minute before Survival warp closed",0;
end;

  OnTimer270000:
announce "30 Seconds before Survival warp closed",0;
end;

  OnTimer290000:
announce "10 Seconds before Survival warp closed",0;
end;

  OnTimer295000:
announce "5",0;
end;

  OnTimer296000:
announce "4",0;
end;

  OnTimer297000:
announce "3",0;
end;

  OnTimer298000:
announce "2",0;
end;

  OnTimer299000:
announce "1",0;
end;

  OnTimer300000:
announce "Warp Closed, Survival arena now begins",bc_blue|bc_all;
set .eventsurvival,0;
stopnpctimer;
donpcevent "Blue Memi::OnSurvivalBegins";
end;
}

}


//================================================================
//= Monster and Event Survival Arena Spawn NPC
prontera,168,179,3 script Blue Memi 868,{
//================================================================
set @gmlvl,40;
//==================================================================
//======== Default Configuration ===================================
//==================================================================
//======== Monster Spawn Configuration =============================
OnDefaultSpawnMonster:
set [email protected], 1379; // Nightmare Terror
set [email protected], 1605; // Dark Illusion
set [email protected], 1507; // Bloody Murderer
set [email protected], 1777; // Ice Titan
set [email protected], 2018; // Duneyrr
set [email protected], 1831; // Salamander
set [email protected], 1645; // High Wizard Kathryne ( Non MVP )
set [email protected], 1190; // Orc Lord ( MVP )

set [email protected], 1046; // Doppelganger
set [email protected], 1583; // Tao Gunka
set [email protected], 1373; // Lord of the Dead
set [email protected], 1779; // Ktullanux
set [email protected], 1708; // Memory of Thanatos / Thanatos Boss
set [email protected], 1832; // Ifrit
set [email protected], 1651; // High Wizard Kathryne ( MVP )
set [email protected], 2022; // Nidhoggr's Shadow
//==================================================================
//======= Spawn Amount =============================================
//==================================================================
set [email protected], 40;
set [email protected], 40;
set [email protected], 40;
set [email protected], 40;
set [email protected], 25;
set [email protected], 35;
set [email protected], 25;
set [email protected], 20;

set [email protected], 10;
set [email protected], 8;
set [email protected], 6;
set [email protected], 4;
set [email protected], 5;
set [email protected], 4;
set [email protected], 5;
set [email protected], 2;

//==================================================================

if(getgmlevel() >= @gmlvl){
  mes "[survival System Management]";
  mes "Welcome GM "+strcharinfo(0)+", Can I help you?";
  next;
if(select("Change Survival Arena Spawn Monster","Nothing") == 2){
mes "Okay, Come to me if you want to set spawn monster!";
close;
}
  mes "[survival System Management]";
  mes "Are you want to set the monster spawn?";
  if(select("No","Yes") == 1){
   close;
   }
 mes "What set type you want?";
 switch(select("Set as Default","Set as My mind","Check Spawn Information")){

  case 1:
  next;
  mes "[survival System Management]";
  mes "Alright, Set as to default";
  doevent "Blue Memi::OnDefaultSpawnMonster";
  close;

  case 2:
  next;
  if(.checkenable == 0){
  mes "[survival System Management]";
  mes "You must set as Default before you change it";
  mes "Want change to default spawn?";
  if(select("Yes","No") == 1){
	mes "Alright, Set as to default";
	doevent "Blue Memi::OnDefaultSpawnMonster";
	close;
	}
   close;
   }
  mes "[survival System Management]";
  mes "Alright, Please Wait";
  L_Spawnset:
  next;
  mes "[survival System Management]";
  mes "What Round do you want change?";
   switch(select("Round 1","Round 2","Round 3","Round 4","Round 5","Round 6","Round 7","Round 8")){

	case 1:
	next;
	mes "[survival System Management]";
	mes "Round 1 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 1 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;

	case 2:
	next;
	mes "[survival System Management]";
	mes "Round 2 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 2 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;

	case 3:
	next;
	mes "[survival System Management]";
	mes "Round 3 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 3 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;

	case 4:
	next;
	mes "[survival System Management]";
	mes "Round 1 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 4 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;

	case 5:
	next;
	mes "[survival System Management]";
	mes "Round 5 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 5 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;

	case 6:
	next;
	mes "[survival System Management]";
	mes "Round 6 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 6 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;

	case 7:
	next;
	mes "[survival System Management]";
	mes "Round 7 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 7 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;

	case 8:
	next;
	mes "[survival System Management]";
	mes "Round 8 Spawn set :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Please Insert Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Boss Monster ID";
	next;
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Please Insert Spawn Amount";
	input [email protected];
	next;
	mes "[survival System Management]";
	mes "Round 8 Spawn Change to:";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	next;
	mes "[survival System Management]";
	mes "Do you want to change another round?";
	if(select("Yes","No") == 1) goto L_Spawnset;
	close;
	}


   case 3:
	mes "[survival System Management]";
	mes "Information Spawn Right?";
	mes "Please Wait!";
	next;
	mes "[survival System Management]";
	mes "Rustle .. Rustle ..";
	mes "Nah .. this it!";
	next;
	mes "[survival System Management]";
	mes "Round 1 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Round 2 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Round 3 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Round 4 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Round 5 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Round 6 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Round 7 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Round 8 :";
	mes "Monster : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	mes "Boss : ^0000FF"[email protected]+"^FF0000 "+getmonsterinfo([email protected],0)+"^000000";
	close;
   }
  }

if(getgmlevel() <= 40){
mes "[blue Memi]";
mes "Oh Hello "+strcharinfo(0)+"";
mes "What are you looking for?";
next;
mes "Do you know?, how I can know your name?";
close;
}


OnSurvivalBegins:
{
 set .bonusprize,0;
 mapannounce "ordeal_1-2","Survival Guard : Welcome to Survival Arena",bc_blue;
 sleep 3000;
 mapannounce "ordeal_1-2","Survival Guard : Ok, I'll start this event",bc_blue;
 sleep 3000;
 mapannounce "ordeal_1-2","Survival Guard : Please preapare your self before the event is started!, 1 minute for preparing",bc_blue;
 sleep 60000;
 mapannounce "ordeal_1-2","Survival Guard : Okay, Survival Arena Begins!",bc_blue;
 sleep 3000;
 donpcevent "Blue Memi::OnEventStart";
 end;

OnEventStart:
 //Round 1 :
 mapannounce "ordeal_1-2","Round 1",bc_blue;
 monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob1Death";
 end;

  OnMob1Death:
  set $Mob1Death,$Mob1Death+1;
  if($Mob1Death == [email protected]) goto spawnmonster1death;
  end;

spawnmonster1death:
set $Mob1Death,0;
mapannounce "ordeal_1-2","What the?, My Monster has been Killed?",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","Thats my Turn, Get ready for death!",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss1Death";
end;

OnBoss1Death:
 set $Boss1Death,$Boss1Death+1;
 if($Boss1Death == [email protected]) goto spawnboss1death;
 end;

 spawnboss1death:
 //Round 2 :
 set $Boss1Death,0;
 mapannounce "ordeal_1-2","Survival Guard : Round 1 Has Been Defeat!",bc_blue;
 sleep 5000;
 mapannounce "ordeal_1-2","Round 2",bc_blue;
 monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob2Death";
 end;

  OnMob2Death:
  set $Mob2Death,$Mob2Death+1;
  if($Mob2Death == [email protected]) goto spawnmonster2death;
  end;

spawnmonster2death:
set $Mob2Death,0;
mapannounce "ordeal_1-2","Whoaa.. This is my turn!",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","Get Ready for Death Humaan !!",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss2Death";
end;

OnBoss2Death:
 set $Boss2Death,$Boss2Death+1;
 if($Boss2Death == [email protected]) goto spawnboss2death;
 end;

  spawnboss2death:
  set $Boss2Death,0;
  mapannounce "ordeal_1-2","Survival Guard : Round 2 Has Been Defeat!",bc_blue;
  sleep 5000;
  mapannounce "ordeal_1-2","Round 3",bc_blue;
  monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob3Death";
  end;

  OnMob3Death:
  set $Mob3Death,$Mob3Death+1;
  if($Mob3Death == [email protected]) goto spawnmonster3death;
  end;

spawnmonster3death:
set $Mob3Death,0;
mapannounce "ordeal_1-2","Hahahaha .. Humaan!",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","I'll Kill The HUMAN!!!",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss3Death";
end;
OnBoss3Death:
 set $Boss3Death,$Boss3Death+1;
 if($Boss3Death == [email protected]) goto spawnboss3death;
 end;

  spawnboss3death:
  set $Boss3Death,0;
  mapannounce "ordeal_1-2","Survival Guard : Round 3 Has Been Defeat!",bc_blue;
  sleep 5000;
  mapannounce "ordeal_1-2","Round 4",bc_blue;
  monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob4Death";
  end;

  OnMob4Death:
  set $Mob4Death,$Mob4Death+1;
  if($Mob4Death == [email protected]) goto spawnmonster4death;
  end;

spawnmonster4death:
set $Mob4Death,0;
mapannounce "ordeal_1-2","Hmm .. Very nice!",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","Send Human to Hell!!!",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss4Death";
end;


OnBoss4Death:
 set $Boss4Death,$Boss4Death+1;
 if($Boss4Death == [email protected]) goto spawnboss4death;
 end;

  spawnboss4death:
  set $Boss4Death,0;
  mapannounce "ordeal_1-2","Survival Guard : Round 4 Has Been Defeat!",bc_blue;
  sleep 5000;
  mapannounce "ordeal_1-2","Round 5",bc_blue;
  monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob5Death";
  end;

  OnMob5Death:
  set $Mob5Death,$Mob5Death+1;
  if($Mob5Death == [email protected]) goto spawnmonster5death;
  end;

spawnmonster5death:
set $Mob5Death,0;
mapannounce "ordeal_1-2","I like it..!",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","The Human Taste is very nice!!!",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss5Death";
end;

 OnBoss5Death:
 set $Boss5Death,$Boss5Death+1;
 if($Boss5Death == [email protected]) goto spawnboss5death;
 end;

  spawnboss5death:
  set $Boss5Death,0;
  mapannounce "ordeal_1-2","Survival Guard : Round 5 Has Been Defeat!",bc_blue;
  sleep 5000;
  mapannounce "ordeal_1-2","Round 6",bc_blue;
  monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob6Death";
  end;

  OnMob6Death:
  set $Mob6Death,$Mob6Death+1;
  if($Mob6Death == [email protected]) goto spawnmonster6death;
  end;

spawnmonster6death:
set $Mob6Death,0;
mapannounce "ordeal_1-2","Human, Very dangerous!",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","I must kill Human now!!!",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss6Death";
end;

 OnBoss6Death:
 set $Boss6Death,$Boss6Death+1;
 if($Boss6Death == [email protected]) goto spawnboss6death;
 end;

  spawnboss6death:
  set $Boss6Death,0;
  mapannounce "ordeal_1-2","Survival Guard : Round 6 Has Been Defeat!",bc_blue;
  sleep 5000;
  mapannounce "ordeal_1-2","Round 7",bc_blue;
  monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob7Death";
  end;

  OnMob7Death:
  set $Mob7Death,$Mob7Death+1;
  if($Mob7Death == [email protected]) goto spawnmonster7death;
  end;

spawnmonster7death:
set $Mob7Death,0;
mapannounce "ordeal_1-2","Alright.. Before you beat my boss, beat me first!!",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","Right .. !!!",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss7Death";
end;

 OnBoss7Death:
 set $Boss7Death,$Boss7Death+1;
 if($Boss7Death == [email protected]) goto spawnboss7death;
 end;

  spawnboss7death:
  set $Boss7Death,0;
  mapannounce "ordeal_1-2","Hahahaa .. you will killed by my boss!!",bc_yellow;
  sleep 1000;
  mapannounce "ordeal_1-2","Survival Guard : Round 7 Has Been Defeat!",bc_blue;
  sleep 5000;
  mapannounce "ordeal_1-2","Final Round !",bc_blue;
  monster "ordeal_1-2",169,141,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnMob8Death";
  end;

  OnMob8Death:
  set $Mob8Death,$Mob8Death+1;
  if($Mob8Death == [email protected]) goto spawnmonster8death;
  end;

spawnmonster8death:
set $Mob8Death,0;
mapannounce "ordeal_1-2","Wonderful, Alright Prepare for Final Battle Human!!",bc_yellow;
sleep 2000;
mapannounce "ordeal_1-2","Hahahaha ..",bc_yellow;
monster "ordeal_1-2",169,162,""+getmonsterinfo([email protected],0)+"",[email protected],[email protected],"Blue Memi::OnBoss8Death";
end;

 OnBoss8Death:
 set $Boss8Death,$Boss8Death+1;
 if($Boss8Death == [email protected]) goto spawnboss8death;
 end;

  spawnboss8death:
  set $Boss8Death,0;
  mapannounce "ordeal_1-2","Survival Guard : Survival Arena Defeat",bc_blue;
  hideoffnpc "Survival Arena Guard";
  sleep 3000;
  announce "Survival Guard : "+getmapusers("ordeal_1-2")+" Players Beat the Survival Arena",bc_blue|bc_all;
  end;

  }
}
//==================================================================
//== Script on Survival Arena ======================================
ordeal_1-2,158,147,5 script Survival Arena Guard 106,{
//==================================================================
//==================================================================
//======== Check Variable Another NPC ==============================
set [email protected],getvariableofnpc(.prizeone,"Survival Arena");
set [email protected],getvariableofnpc(.prizetwo,"Survival Arena");
set [email protected],getvariableofnpc(.prizethree,"Survival Arena");
set [email protected],getvariableofnpc(.prizefour,"Survival Arena");
set [email protected],getvariableofnpc(.prizebonus,"Survival Arena");
set [email protected],getvariableofnpc(.amountprizeone,"Survival Arena");
set [email protected],getvariableofnpc(.amountprizetwo,"Survival Arena");
set [email protected],getvariableofnpc(.amountprizethree,"Survival Arena");
set [email protected],getvariableofnpc(.amountprizefour,"Survival Arena");
set [email protected],getvariableofnpc(.amountprizebonus,"Survival Arena");
set [email protected],getvariableofnpc(.zenyprice,"Survival Arena");
//==================================================================
 if(getmapusers("ordeal_1-2") == 0){
 announce ""+strnpcinfo(0)+" : No Player in Survival Arena, Survival Arena now Closed.",bc_blue|bc_all;
 disablenpc "Survival Arena Guard";
 end;
 }

if(.survivalend == 1){
  mes "[survival Arena Guard]";
  mes "Congratulations, This is Your Prize";
  next;
  getitem [email protected],[email protected];
  getitem [email protected]o,[email protected];
  getitem [email protected],[email protected];
  getitem [email protected],[email protected];
  set zeny, zeny + [email protected];
if(.bonusprize == 1){
mes "and This your Round Bonus";
getitem [email protected],[email protected];
mes "I'll send you bact to prontera";
close2;
warp "prontera",155,182;
}
  mes "I'll send you bact to prontera";
  close2;
  warp "prontera",155,182;
 }
}
//===== Map Configuration Settings ===================================================
//====================================================================================
ordeal_1-2 mapflag noloot
ordeal_1-2 mapflag nomemo
ordeal_1-2 mapflag noteleport
ordeal_1-2 mapflag nowarp
ordeal_1-2 mapflag noreturn
ordeal_1-2 mapflag noicewall
//=====================================================================================
//=====================================================================================

atte aepa1940

surv_arena.txt

Edited by aepa1940
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
Go to topic listing
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use and Privacy Policy.

  I accept