Instance Dungeons Update

As requested by the community in http://hercules.ws/board/topic/1702-implement-rathena-npc/ we're merging in the latest of rAthena's dungeons, this includes the rewriting of all instance dungeons and the addition of 4 dungeons that were not present previously (BakonawaLake, BangungotHospital, BuwayaCave and OldGlastHeim).
Update also includes the ability for instances to reset (or be destroyed if instance files were disabled/removed) upon @reloadscript, instance scripts are able to control to what stage the instances are to be reset via the instance_set_respawn (reload spawn) script command, OnInstanceInit labels are now triggered when the instance starts via instance_init (and upon reload), they may be used alongside instance variables (which are persistent to @reloadscript) to save players' progress.

- NPC Changelog:
-- npc/instances/EndlessTower.txt
--- 2.2 Instance system rewrite. [Euphy]
--- 2.3 Added some missing announcements. [Euphy]
--- 2.4 Added GM management function. [Euphy]
-- npc/instances/NydhoggsNest.txt
--- 1.5 Instance system rewrite. [Euphy]
--- 1.6 Added GM management NPCs. [Euphy]
-- npc/instances/OrcsMemory.txt
--- 1.7 Instance system rewrite. [Euphy]
-- npc/instances/SealedShrine.txt
--- 2.3 Instance system rewrite. [Euphy]
-- npc/other/gm_npcs.txt
--- 1.0 First version. [Euphy]
-- npc/re/instances/BakonawaLake.txt
--- 1.0 First version. [Euphy]
--- 1.1 Added GM management NPC. [Euphy]
-- npc/re/instances/BangungotHospital.txt
--- 1.0 First version. [Euphy]
--- 1.1 Added GM management function. [Euphy]
-- npc/re/instances/BuwayaCave.txt
--- 1.0 First version. [Euphy]
-- npc/re/instances/HazyForest.txt
--- 1.1 Instance system rewrite. [Euphy]
-- npc/re/instances/MalangdoCulvert.txt
--- 1.0b Fixed incorrect use of 'close'. [Joseph]
--- 1.1 Instance system rewrite. [Euphy]
-- npc/re/instances/OctopusCave.txt
--- 1.1 Instance system rewrite. [Euphy]
-- npc/re/instances/OldGlastHeim.txt
--- 1.0 First version. [Euphy]

Special Thanks to Haru, Uziel for their contributions to this update, and ossi0110 for helping us debug it.

Signed-off-by: shennetsind <ind@henn.et>

4 files changed, 2404 insertions, 6208 deletions

diff --git a/npc/instances/EndlessTower.txt b/npc/instances/EndlessTower.txt
index 68cf25000..3f6109f3a 100644
--- a/npc/instances/EndlessTower.txt
+++ b/npc/instances/EndlessTower.txt
@@ -1,14 +1,14 @@
 //===== Hercules Script ======================================
 //= Endless Tower
-//===== By: ==================================================
+//===== By: ================================================== 
 //= L0ne_W0lf
-//===== Current Version: =====================================
-//= 2.1
-//===== Description: =========================================
+//===== Current Version: ===================================== 
+//= 2.4
+//===== Description: ========================================= 
 //= [Official Conversion]
-//= Endless Tower Memorial Dungeon
+//= Endless Tower Memorial Dungeon.
 //= Consists of 101 floors.
-//===== Additional Comments: =================================
+//===== Additional Comments: ================================= 
 //= 1.0 First version.
 //= 1.1 Removed a disablenpc from #102FShadowDust1. (bugreport:4415)
 //= 1.2 Added ends to several NPCs which would allow you to restart timers.
@@ -28,11 +28,21 @@
 //= 1.8 Adjusted Instance Attach Map to Validate ALL Maps, instead of 
 //=     only 1@tower -> 5@tower (bugreport:4983)
 //= 1.9 Added 'instance_check_party' command to the script for proper checking if
-//=		the invoking party meets the requirements to join the Memorial Dungeon.
+//=     the invoking party meets the requirements to join the Memorial Dungeon.
 //= 2.0 Fixed broken else/if chaining. [Joseph]
 //= 2.1 Updated to match latest official script. [Euphy]
+//= 2.2 Instance system rewrite. [Euphy]
+//= 2.3 Added some missing announcements. [Euphy]
+//= 2.4 Added GM management function. [Euphy]
+//============================================================ 
+
+1@tower	mapflag	src4instance
+2@tower	mapflag	src4instance
+3@tower	mapflag	src4instance
+4@tower	mapflag	src4instance
+5@tower	mapflag	src4instance
+6@tower	mapflag	src4instance
 //============================================================
-
 alberta,214,77,6	script	Captain Janssen	709,{
 	if (checkweight(1201,1) == 0) {
 		mes "^008800Wait here!!";
@@ -67,8 +77,7 @@ alberta,214,77,6	script	Captain Janssen	709,{
 		mes "^0000ffAt least half of his story sounded grossly exaggerated, but something caught your ear: he insists that a humongous tower exists on the ocean, and that it's so tall, it scrapes across the sky.^000000";
 		set in_102tower,2;
 		close;
-	}
-	else if (in_102tower == 2) {
+	} else if (in_102tower == 2) {
 		mes "[Captain Janssen]";
 		mes "So all I could do was cast anchor at that humongous tower after my fleet was wrecked. At first, we were only going to stay there until the rainstorm was over, but it didn't end as soon as we had hoped.";
 		next;
@@ -112,8 +121,7 @@ alberta,214,77,6	script	Captain Janssen	709,{
 		mes "Welcome aboard, first mate.";
 		set in_102tower,3;
 		close;
-	}
-	else if (in_102tower == 3) {
+	} else if (in_102tower == 3) {
 		mes "[Captain Janssen]";
 		mes "Shall we leave now?";
 		next;
@@ -130,8 +138,7 @@ alberta,214,77,6	script	Captain Janssen	709,{
 			mes "Sure, no problem. Come back when you're ready.";
 			close;
 		}
-	}
-	else if (in_102tower > 3) {
+	} else if (in_102tower > 3) {
 		mes "[Captain Janssen]";
 		mes "Well, to travel the ocean again, we need to restock on goods. If you give me 10,000 Zeny, I'll take care of the rest.";
 		next;
@@ -144,7 +151,7 @@ alberta,214,77,6	script	Captain Janssen	709,{
 			mes "Sure, no problem. I'll be waiting for your return.";
 			close;
 		case 2:
-			if (zeny < 10000) {
+			if (Zeny < 10000) {
 				mes "[Captain Janssen]";
 				mes "I'm sorry, but you don't have enough money. I need at least 10,000 Zeny to restock our supplies...";
 				close;
@@ -152,14 +159,13 @@ alberta,214,77,6	script	Captain Janssen	709,{
 			else {
 				mes "[Captain Janssen]";
 				mes "Excellent! Now we're good to go. Let's pull up the anchor again!";
-				set zeny,zeny-10000;
+				set Zeny, Zeny-10000;
 				close2;
 				warp "e_tower",70,114;
 				end;
 			}
 		}
-	}
-	else {
+	} else {
 		mes "[Captain Janssen]";
 		mes "Excuse me, are you an adventurer?";
 		next;
@@ -181,12 +187,11 @@ alberta,214,77,6	script	Captain Janssen	709,{
 			mes "[Captain Janssen]";
 			mes "Huh? Are you sure that you don't mind giving me that much money? Wow, thank you so much!";
 			next;
-			if (zeny < 10000) {
+			if (Zeny < 10000) {
 				mes "[Captain Janssen]";
 				mes "...I'm sorry, but I don't think you have 10,000 Zeny. Thank you for your kindness, but I need more than that.";
 				close;
-			}
-			else {
+			} else {
 				mes "["+.@name$+"]";
 				mes "I don't know why you'd need so much money, but here. You can take it.";
 				next;
@@ -194,7 +199,7 @@ alberta,214,77,6	script	Captain Janssen	709,{
 				next;
 				mes "[Captain Janssen]";
 				mes "Thank you so much! Now I can stock up on food and materials for my ship. You're kind, very kind!";
-				set zeny,zeny-10000;
+				set Zeny, Zeny-10000;
 				set in_102tower,1;
 				close;
 			}
@@ -205,164 +210,69 @@ alberta,214,77,6	script	Captain Janssen	709,{
 e_tower,81,105,0	script	Tower Protection Stone	406,{
 
 	set .@party_id,getcharid(1);
-	set .@ins_mas,getpartyleader(.@party_id,2);
 	set .@p_name$,getpartyname(.@party_id);
-	set .@p_reader$,strcharinfo(0);
 	set .@md_name$,"Endless Tower";
-	set .@p_name2$,strcharinfo(0);
 
 	set .@etower_timer,checkquest(60200,PLAYTIME); // 1 week
 	set .@etower_timer2,checkquest(60201,PLAYTIME); // 4 hours
 
-	set .@dun_lim_time,etower_timer+604800; // 1 week
-	set .@dun_lim_time2,etower_timer+14400; // 4 hours
-	set .@dun_cur_time,gettimetick(2);
-	set .@dun_ent_t,(.@dun_lim_time - .@dun_cur_time);
-	set .@dun_h,(.@dun_ent_t / 3600);
-	set .@dun_m,(.@dun_ent_t - (.@dun_h * 3600)) / 60;
-	set .@dun_s,.@dun_ent_t - ((.@dun_h * 3600) + (.@dun_m * 60));
-
-	if(!instance_check_party(.@party_id,2)){
-		mes "I'm sorry but your Party does not meet the requirements to join the Memorial Dungeon.";
+	if (!instance_check_party(.@party_id,2)) {
+		mes "Make or join a party with more than 1 member and try again.";
 		close;
 	}
-
 	if (.@etower_timer == -1) {
-		if (.@ins_mas == getcharid(0)) {
+		if (getcharid(0) == getpartyleader(.@party_id,2)) {
 			mes "Confirmed the party has been made. Would you like to reserve entrance to the Endless Tower?";
 			next;
-			switch(select(.@md_name$ + " Dungeon Generated:Enter the dungeon:Return to Alberta:Cancel")) {
+			switch(select("Generate dungeon "+.@md_name$+":Enter the dungeon:Return to Alberta:Cancel")) {
 			case 1:
-				set .@instance, instance_create(.@md_name$, .@party_id);
+				set .@instance, instance_create(.@md_name$,.@party_id);
 				if (.@instance < 0) {
-					mes "Party Name:"+.@p_name$+"";
-					mes "Party Leader:"+.@p_reader$+"";
+					mes "Party Name: "+.@p_name$;
+					mes "Party Leader: "+strcharinfo(0);
 					mes "^0000ff"+.@md_name$+" ^000000- Reservation Failed!";
-				} else {
-					mes "^0000ff"+.@md_name$+"^000000 - Try to reserve";
-					mes "After making a reservation, you have to talk to NPC behind and select the menu 'Enter the Dungeon' to enter the dungeon.";
-					// 1,2,3,4,5,6
-					for( set .@i, 1; .@i <= 6; set .@i, .@i + 1 ) {
-						if( instance_attachmap(.@i + "@tower", .@instance) == "" ) {
-							mes "^0000ff"+.@md_name$+" ^000000- Reservation Failed!";
-							instance_destroy(.@instance);
-							close;
-						}
+					close;
+				}
+				mes "^0000ff"+.@md_name$+"^000000 - Try to reserve";
+				mes "After making a reservation, you have to talk to NPC behind and select the menu 'Enter the Dungeon' to enter the dungeon.";
+				for( set .@i, 1; .@i <= 6; set .@i, .@i + 1 ) {
+					if( instance_attachmap(.@i + "@tower", .@instance) == "" ) {
+						mes "^0000ff"+.@md_name$+" ^000000- Reservation Failed!";
+						instance_destroy(.@instance);
+						close;
 					}
-					instance_attach(.@instance);
-					instance_set_timeout 14400,300,.@instance;
-					instance_init(.@instance);
-					// Spawn the first floor of each map, which will then spawn the rest when cleared.
-					donpcevent instance_npcname("#1F Controller", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Immortal Furnace#1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Immortal Furnace#2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Immortal Furnace#3", instance_id())+"::OnInstanceInit";
-					// Disable the warps on all floor. (enable as floors are cleared)
-					for( set .@i, 1; .@i <= 99; set .@i, .@i + 1 )
-						donpcevent instance_npcname(.@i+"FGate102tower", instance_id())+"::OnInstanceInit";
-					// Warps activate on timer, so players can't get unlimited Ashes.
-					donpcevent instance_npcname("25FGate102tower-2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("50FGate102tower-2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("75FGate102tower-2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("99FGate102tower-2", instance_id())+"::OnInstanceInit";
-					// Disable and ready NPCs for the 100th and 101st floors.
-					donpcevent instance_npcname("Lucid Crystal#102", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#102Effect1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#102Effect2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#102FShadowDust1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#102FShadowDust", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Life Spring#1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Tyrant's Throne#", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Lost Soul#102", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Effect30", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Effect31", instance_id())+"::OnInstanceInit";
 				}
-				break;
+				instance_set_timeout 14400,300,.@instance;
+				instance_init(.@instance);
+				close;
 			case 2:
-				if (has_instance("1@tower") == "") {
-					mes "The memorial dungeon " + .@md_name$ + " does not exist.";
-					mes "The party leader did not generate the dungeon yet.";
-				} else if((party_instance_id != 0) && (party_instance_id != getcharid(1))) {
-					mes "Due to the tower's aftereffects, you cannot enter the dungeon right now, " + .@dun_h + "hours " + .@dun_m + "minutes " + .@dun_s + "seconds left to enter the next dungeon.";
-					next;
-					mes "It is dangerous here. Let me move you to Alberta.";
-					close2;
-					warp "alberta",223,36;
-					end;
-				} else {
-					mapannounce "e_tower", .@p_name2$ + " of the party, " + .@p_name$ + ", is entering the dungeon, " + .@md_name$ + ".",bc_map,"0x00ff99",FW_NORMAL,12;
-					set party_instance_id,getcharid(1);
-					set etower_timer,gettimetick(2);
-					setquest 60200;
-					setquest 60201;
-					warp "1@tower",52,354;
-					end;
-				}
-				break;
+				callsub L_Enter,0,1;
 			case 3:
 				mes "I will move you to Alberta.";
 				close2;
 				warp "alberta",223,36;
 				end;
 			case 4:
-				break;
-			}
-			close;
-		} else {
-			switch(select(.@md_name$ + " Enter the dungeon:Return to Alberta:Cancel")) {
-			case 1:
-				if (has_instance("1@tower") == "") {
-					mes "The memorial dungeon " + .@md_name$ + " does not exist.";
-					mes "The party leader did not generate the dungeon yet.";
-				} else if((party_instance_id != 0) && (party_instance_id != getcharid(1))) {
-					mes "Due to the tower's aftereffects, you cannot enter the dungeon right now, " + .@dun_h + "hours " + .@dun_m + "minutes " + .@dun_s + "seconds left to enter the next dungeon.";
-					next;
-					mes "It is dangerous here. Let me move you to Alberta.";
-					close2;
-					warp "alberta",223,36;
-					end;
-				} else {
-					mapannounce "e_tower", .@p_name2$ + " of the party, " + .@p_name$ + ", is entering the dungeon, " + .@md_name$ + ".",bc_map,"0x00ff99",FW_NORMAL,12;
-					set party_instance_id,getcharid(1);
-					set etower_timer,gettimetick(2);
-					setquest 60200;
-					setquest 60201;
-					warp "1@tower",52,354;
-					end;
-				}
-				break;
-			case 2:
-				mes "I will move you to Alberta.";
-				close2;
-				warp "alberta",223,36;
-				end;
-			case 3:
-				break;
+				close;
 			}
-			close;
+		}
+		switch(select("Enter the "+.@md_name$+":Return to Alberta:Cancel")) {
+		case 1:
+			callsub L_Enter,1,1;
+		case 2:
+			mes "I will move you to Alberta.";
+			close2;
+			warp "alberta",223,36;
+			end;
+		case 3:
+			end;
 		}
 	} else if ((.@etower_timer >= 0) && (.@etower_timer2 < 2)) {
 		mes "If you have the dungeon generated already, you can enter it. ";
 		next;
-		switch(select(.@md_name$ + " Enter the dungeon:Return to Alberta:Cancel")) {
+		switch(select("Enter the "+.@md_name$+":Return to Alberta:Cancel")) {
 		case 1:
-			if (has_instance("1@tower") == "") {
-				mes "The memorial dungeon " + .@md_name$ + " does not exist.";
-				mes "The party leader did not generate the dungeon yet.";
-			} else if((party_instance_id != 0) && (party_instance_id != getcharid(1))) {
-				mes "Due to the tower's aftereffects, you cannot enter the dungeon right now, " + .@dun_h + "hours " + .@dun_m + "minutes " + .@dun_s + "seconds left to enter the next dungeon.";
-				next;
-				mes "It is dangerous here. Let me move you to Alberta.";
-				close2;
-				warp "alberta",223,36;
-				end;
-			} else {
-				mapannounce "e_tower", .@p_name2$ + " of the party, " + .@p_name$ + ", is entering the dungeon, " + .@md_name$ + ".",bc_map,"0x00ff99",FW_NORMAL,12;
-				set party_instance_id,getcharid(1);
-				warp "1@tower",52,354;
-				end;
-			}
-			break;
+			callsub L_Enter,0,0;
 		case 2:
 			mes "I will move you to Alberta.";
 			close2;
@@ -373,6 +283,15 @@ e_tower,81,105,0	script	Tower Protection Stone	406,{
 		}
 		close;
 	} else if ((.@etower_timer >= 0) && (.@etower_timer < 2) && (.@etower_timer2 == 2)) {
+
+		set .@dun_lim_time,etower_timer+604800; // 1 week
+		set .@dun_lim_time2,etower_timer+14400; // 4 hours
+		set .@dun_cur_time,gettimetick(2);
+		set .@dun_ent_t,(.@dun_lim_time - .@dun_cur_time);
+		set .@dun_h,(.@dun_ent_t / 3600);
+		set .@dun_m,(.@dun_ent_t - (.@dun_h * 3600)) / 60;
+		set .@dun_s,.@dun_ent_t - ((.@dun_h * 3600) + (.@dun_m * 60));
+
 		mes "Due to the tower's aftereffects, you cannot enter the dungeon right now, " + .@dun_h + "hours " + .@dun_m + "minutes " + .@dun_s + "seconds left to enter the next dungeon.";
 		next;
 		mes "It is dangerous here. Let me move you to Alberta.";
@@ -383,27 +302,45 @@ e_tower,81,105,0	script	Tower Protection Stone	406,{
 		set etower_timer,0;
 		erasequest 60200;
 		erasequest 60201;
-		set party_instance_id,0;
 		mes "^0000ffThe records and after effects related to the Endless Tower have been removed. You can generate and enter the Endless Tower again.^000000";
 		close;
 	}
-	mes "Make or join a party with more than 1 member and try again.";
-	close;
+
+L_Enter:
+	if (has_instance("1@tower") == "") {
+		mes "The memorial dungeon " + .@md_name$ + " does not exist.";
+		mes "The party leader did not generate the dungeon yet.";
+		close;
+	} else {
+		mapannounce "e_tower", strcharinfo(0)+" of the party, "+.@p_name$+", is entering the dungeon, Endless Tower.",bc_map,"0x00ff99",FW_NORMAL,12;
+		if (getarg(1)) {
+			set etower_timer,gettimetick(2);
+			setquest 60200;
+			setquest 60201;
+		}
+		warp "1@tower",52,354;
+		if (getarg(0) == 0)
+			close;
+		else
+			end;
+	}
 }
 
 e_tower,30,30,2	script	Huge Vortex	844,2,2,{
+	end;
 OnTouch:
 	mapannounce "e_tower","[ " + strcharinfo(0) + " ], seems to be engulfed by a huge vortex",bc_map,"0x00ff99",FW_NORMAL,12;
 	warp "alberta",223,36;
 	end;
 }
 
-/*
-e_tower,1,1,2	script	#102Administrator Mode104	844,{
+// Original name: "#102Administrator Mode104"
+e_tower,1,1,2	script	#102Administrator Mode	844,{
+	callfunc "F_GM_NPC";
 	mes "Please enter the password";
-	input .@inputstr$;
+	set .@i, callfunc("F_GM_NPC","dmc2008",1);
 	next;
-	if (.@inputstr$ == "dmc2008") {
+	if (.@i == 1) {
 		switch(select("Generate Purification Stone:Remove Purification Stone:Cancel")) {
 		case 1:
 			mes "Create the Purification Stone that stays for 30 minutes.";
@@ -418,8 +355,7 @@ e_tower,1,1,2	script	#102Administrator Mode104	844,{
 			break;
 		}
 		close;
-	}
-	else {
+	} else {
 		mes "Enter the password exactly.";
 		close;
 	}
@@ -457,1000 +393,999 @@ OnTimer1800000:
 }
 
 e_tower,151,185,4	script	Purification Stone#et2	844,{
+	callfunc "F_GM_NPC";
 	set etower_timer,0;
 	mes "^0000ffThe records and aftereffects related to the Endless Tower have been removed. You can generate and enter the Endless Tower again.^000000";
-	close;
+	close2;
 	warp "e_tower",75,108;
 	end;
 }
-*/
 
-// Levels 1-25
+// Core Functions
 //============================================================
-1@tower,50,360,0	script	Immortal Brazier#	844,{
-	mes "- A Message is Engraved on the Brazier -";
-	mes "The one who scatters the ashes of the darkness in this place shall become one step closer to Nacht Sieger, the Hegemon King of the Darkness...";
-	next;
-	set .@move_name$,strcharinfo(0);
-	switch(select("26th Level:51st Level:76th Level")) {
+function	script	F_Tower_Monster	{
+
+	set .@level, getarg(0);
+	set .@map$, getarg(1);
+	set .@label$, getarg(2);
+
+	switch(.@level) {
 	case 1:
-		if (countitem(6000) < 1) {
-			mes "-Warning-";
-			mes "To warp to the 26th Level, you need 1 Ashes of the Darkness.";
-			close;
-		}
-		else {
-			delitem 6000,1; //Dark_Ashes
-			instance_announce -1, .@move_name$ + ". You will be warped to the 26th Level.",bc_map,"0x00ff99";
-			warp "2@tower",52,354;
-		}
+		areamonster .@map$,7,351,17,387,"Metaling",1613,15,.@label$;
+		areamonster .@map$,7,351,17,387,"Marin",1242,5,.@label$;
+		areamonster .@map$,7,351,17,387,"Poporing",1031,5,.@label$;
+		areamonster .@map$,7,351,17,387,"Drops",1113,5,.@label$;
+		areamonster .@map$,7,351,17,387,"Mastering",1090,1,.@label$;
+		areamonster .@map$,7,351,17,387,"Poring",1002,5,.@label$;
 		break;
 	case 2:
-		if (countitem(6000) < 2) {
-			mes "-Warning-";
-			mes "To warp to the 51st Level, you need 2 Ashes of the Darkness.";
-			close;
-		}
-		else {
-			delitem 6000,2; //Dark_Ashes
-			instance_announce -1, .@move_name$ + ". You will be warped to the 51st Level.",bc_map,"0x00ff99";
-			warp "3@tower",52,354;
-		}
+		areamonster .@map$,93,351,103,387,"Desert Wolf",1106,20,.@label$;
+		areamonster .@map$,93,351,103,387,"Vagabond Wolf",1092,1,.@label$;
+		areamonster .@map$,93,351,103,387,"Baby Desert Wolf",1107,10,.@label$;
 		break;
 	case 3:
-		if (countitem(6000) < 3) {
-			mes "-Warning-";
-			mes "To warp to the 76th Level, you need 3 Ashes of the Darkness.";
-			close;
-		}
-		else {
-			delitem 6000,3; //Dark_Ashes
-			instance_announce -1, .@move_name$ + ". You will be warped to the 76th Level.",bc_map,"0x00ff99";
-			warp "4@tower",52,354;
+		areamonster .@map$,181,351,191,387,"Archer Skeleton",1016,5,.@label$;
+		areamonster .@map$,181,351,191,387,"Skel Worker",1169,5,.@label$;
+		areamonster .@map$,181,351,191,387,"Soldier Skeleton",1028,5,.@label$;
+		areamonster .@map$,181,351,191,387,"Orc Skeleton",1152,5,.@label$;
+		areamonster .@map$,181,351,191,387,"Pirate Skeleton",1071,5,.@label$;
+		areamonster .@map$,181,351,191,387,"Skeleton",1076,5,.@label$;
+		break;
+	case 4:
+		areamonster .@map$,267,351,277,387,"Argiope",1099,15,.@label$;
+		areamonster .@map$,267,351,277,387,"Mantis",1139,5,.@label$;
+		areamonster .@map$,267,351,277,387,"Argos",1100,5,.@label$;
+		areamonster .@map$,267,351,277,387,"Vocal",1088,1,.@label$;
+		areamonster .@map$,267,351,277,387,"Rocker",1052,5,.@label$;
+		areamonster .@map$,267,351,277,387,"Hornet",1004,5,.@label$;
+		break;
+	case 5:
+		areamonster .@map$,352,351,362,387,"Golden Thief Bug",1086,1,.@label$;
+		areamonster .@map$,352,351,362,387,"Thief Bug Male",1054,15,.@label$;
+		areamonster .@map$,352,351,362,387,"Thief Bug Female",1053,15,.@label$;
+		areamonster .@map$,352,351,362,387,"Thief Bug",1051,15,.@label$;
+		areamonster .@map$,352,351,362,387,"Thief Bug Egg",1048,5,.@label$;
+		break;
+	case 6:
+		areamonster .@map$,9,267,19,303,"Dragon Egg",1721,5,.@label$;
+		areamonster .@map$,9,267,19,303,"Thief Bug Egg",1048,5,.@label$;
+		areamonster .@map$,9,267,19,303,"Ant Egg",1097,5,.@label$;
+		areamonster .@map$,9,267,19,303,"Pupa",1008,5,.@label$;
+		break;
+	case 7:
+		areamonster .@map$,93,267,103,303,"Explosion",1383,15,.@label$;
+		areamonster .@map$,93,267,103,303,"Drainliar",1111,15,.@label$;
+		areamonster .@map$,93,267,103,303,"Anopheles",1627,15,.@label$;
+		areamonster .@map$,93,267,103,303,"Farmiliar",1005,15,.@label$;
+		break;
+	case 8:
+		areamonster .@map$,181,267,191,303,"Firelock Soldier",1403,15,.@label$;
+		areamonster .@map$,181,267,191,303,"Cruiser",1248,15,.@label$;
+		break;
+	case 9:
+		areamonster .@map$,267,267,277,303,"Obsidian",1615,15,.@label$;
+		areamonster .@map$,267,267,277,303,"Golem",1040,15,.@label$;
+		areamonster .@map$,267,267,277,303,"Stapo",1784,10,.@label$;
+		break;
+	case 10:
+		areamonster .@map$,352,267,362,303,"Mistress",1059,1,.@label$;
+		areamonster .@map$,352,267,362,303,"Giant Hornet",1303,25,.@label$;
+		areamonster .@map$,352,267,362,303,"Hornet",1004,20,.@label$;
+		break;
+	case 11:
+		areamonster .@map$,9,180,19,216,"Dryad",1493,15,.@label$;
+		areamonster .@map$,9,180,19,216,"Parasite",1500,15,.@label$;
+		areamonster .@map$,9,180,19,216,"Hermit Plant",1413,15,.@label$;
+		areamonster .@map$,9,180,19,216,"Rafflesia",1162,5,.@label$;
+		break;
+	case 12:
+		areamonster .@map$,93,180,103,216,"Demon Pungus",1378,25,.@label$;
+		areamonster .@map$,93,180,103,216,"Punk",1199,25,.@label$;
+		break;
+	case 13:
+		areamonster .@map$,181,180,191,216,"Yao Yun",1512,15,.@label$;
+		areamonster .@map$,181,180,191,216,"Bongunn",1188,15,.@label$;
+		areamonster .@map$,181,180,191,216,"Munak",1026,10,.@label$;
+		break;
+	case 14:
+		areamonster .@map$,267,180,277,216,"High Orc",1213,15,.@label$;
+		areamonster .@map$,267,180,277,216,"Orc Archer",1189,10,.@label$;
+		areamonster .@map$,267,180,277,216,"Orc Lady",1273,10,.@label$;
+		areamonster .@map$,267,180,277,216,"Orc Warrior",1023,5,.@label$;
+		areamonster .@map$,267,180,277,216,"Orc Baby",1686,5,.@label$;
+		break;
+	case 15:
+		areamonster .@map$,352,180,362,216,"Maya",1147,1,.@label$;
+		areamonster .@map$,352,180,362,216,"Phreeoni",1159,1,.@label$;
+		areamonster .@map$,352,180,362,216,"Deniro",1105,15,.@label$;
+		areamonster .@map$,352,180,362,216,"Pierre",1160,15,.@label$;
+		areamonster .@map$,352,180,362,216,"Andre",1095,15,.@label$;
+		areamonster .@map$,352,180,362,216,"Ant Egg",1097,5,.@label$;
+		break;
+	case 16:
+		areamonster .@map$,9,96,19,132,"Raydric Archer",1276,10,.@label$;
+		areamonster .@map$,9,96,19,132,"Orc Archer",1189,10,.@label$;
+		areamonster .@map$,9,96,19,132,"Gargoyle",1253,10,.@label$;
+		areamonster .@map$,9,96,19,132,"Archer Skeleton",1016,10,.@label$;
+		break;
+	case 17:
+		areamonster .@map$,93,96,103,132,"Merman",1264,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Baphomet Jr.",1101,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Strouf",1065,15,.@label$;
+		areamonster .@map$,93,96,103,132,"Hill Wind",1629,5,.@label$;
+		break;
+	case 18:
+		areamonster .@map$,181,96,191,132,"Cramp",1209,25,.@label$;
+		areamonster .@map$,181,96,191,132,"Tarou",1175,15,.@label$;
+		break;
+	case 19:
+		areamonster .@map$,267,96,277,132,"Deviace",1108,10,.@label$;
+		areamonster .@map$,267,96,277,132,"Megalodon",1064,10,.@label$;
+		areamonster .@map$,267,96,277,132,"Swordfish",1069,10,.@label$;
+		areamonster .@map$,267,96,277,132,"Phen",1158,10,.@label$;
+		break;
+	case 20:
+		areamonster .@map$,352,96,362,132,"Drake",1112,1,.@label$;
+		areamonster .@map$,352,96,362,132,"Pirate Skeleton",1071,50,.@label$;
+		break;
+	case 21:
+		areamonster .@map$,9,9,19,45,"Plasma",1693,10,.@label$;
+		areamonster .@map$,9,9,19,45,"Plasma",1696,10,.@label$;
+		areamonster .@map$,9,9,19,45,"Plasma",1695,5,.@label$;
+		areamonster .@map$,9,9,19,45,"Plasma",1697,5,.@label$;
+		areamonster .@map$,9,9,19,45,"Plasma",1694,5,.@label$;
+		break;
+	case 22:
+		areamonster .@map$,93,9,103,45,"Muscipular",1780,15,.@label$;
+		areamonster .@map$,93,9,103,45,"Drosera",1781,15,.@label$;
+		areamonster .@map$,93,9,103,45,"Flora",1118,15,.@label$;
+		areamonster .@map$,93,9,103,45,"Hydra",1068,15,.@label$;
+		areamonster .@map$,93,9,103,45,"Mandragora",1020,10,.@label$;
+		areamonster .@map$,93,9,103,45,"Rafflesia",1162,10,.@label$;
+		break;
+	case 23:
+		areamonster .@map$,181,9,191,45,"Penomena",1216,15,.@label$;
+		areamonster .@map$,181,9,191,45,"Obeaune",1044,10,.@label$;
+		areamonster .@map$,181,9,191,45,"Marse",1144,10,.@label$;
+		areamonster .@map$,181,9,191,45,"Swordfish",1069,10,.@label$;
+		areamonster .@map$,181,9,191,45,"Hydra",1068,5,.@label$;
+		break;
+	case 24:
+		areamonster .@map$,267,9,277,45,"Joker",1131,15,.@label$;
+		areamonster .@map$,267,9,277,45,"Carat",1267,15,.@label$;
+		areamonster .@map$,267,9,277,45,"Jakk",1130,10,.@label$;
+		break;
+	case 25:
+		areamonster .@map$,352,9,362,45,"Cat o' Nine Tails",1307,15,.@label$;
+		areamonster .@map$,352,9,362,45,"Moonlight",1150,1,.@label$;
+		areamonster .@map$,352,9,362,45,"Nine Tail",1180,15,.@label$;
+		break;
+	case 26:
+		areamonster .@map$,9,351,19,387,"Gibbet",1503,10,.@label$;
+		areamonster .@map$,9,351,19,387,"Enchanted Peach Tree",1410,10,.@label$;
+		areamonster .@map$,9,351,19,387,"Wooden Golem",1497,10,.@label$;
+		areamonster .@map$,9,351,19,387,"Stone Shooter",1495,10,.@label$;
+		areamonster .@map$,9,351,19,387,"Elder Willow",1033,5,.@label$;
+		break;
+	case 27:
+		areamonster .@map$,93,351,103,387,"Goblin Archer",1258,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Goblin",1122,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Goblin",1123,5,.@label$;
+		areamonster .@map$,93,351,103,387,"Goblin",1124,5,.@label$;
+		areamonster .@map$,93,351,103,387,"Gobin",1125,5,.@label$;
+		areamonster .@map$,93,351,103,387,"Goblin",1126,5,.@label$;
+		break;
+	case 28:
+		areamonster .@map$,181,351,191,387,"Arclouse",1194,30,.@label$;
+		areamonster .@map$,181,351,191,387,"Neraid",1255,15,.@label$;
+		areamonster .@map$,181,351,191,387,"Pest",1256,15,.@label$;
+		areamonster .@map$,181,351,191,387,"Kukre",1070,10,.@label$;
+		break;
+	case 29:
+		areamonster .@map$,267,351,277,387,"Dark Frame",1260,10,.@label$;
+		areamonster .@map$,267,351,277,387,"The Paper",1375,10,.@label$;
+		areamonster .@map$,267,351,277,387,"Hylozoist",1510,10,.@label$;
+		areamonster .@map$,267,351,277,387,"Quve",1508,5,.@label$;
+		areamonster .@map$,267,351,277,387,"Lude",1509,5,.@label$;
+		areamonster .@map$,267,351,277,387,"Whisper",1179,10,.@label$;
+		break;
+	case 30:
+		areamonster .@map$,352,351,362,387,"White Lady",1630,1,.@label$;
+		areamonster .@map$,352,351,362,387,"Evil Nymph",1416,30,.@label$;
+		break;
+	case 31:
+		areamonster .@map$,9,267,19,303,"Gig",1387,20,.@label$;
+		areamonster .@map$,9,267,19,303,"Iron Fist",1212,15,.@label$;
+		areamonster .@map$,9,267,19,303,"Argiope",1099,10,.@label$;
+		areamonster .@map$,9,267,19,303,"Scorpion",1001,5,.@label$;
+		break;
+	case 32:
+		areamonster .@map$,93,267,103,303,"Goblin Leader",1299,1,.@label$;
+		areamonster .@map$,93,267,103,303,"Goblin Archer",1258,10,.@label$;
+		areamonster .@map$,93,267,103,303,"Goblin",1122,10,.@label$;
+		areamonster .@map$,93,267,103,303,"Goblin",1123,5,.@label$;
+		areamonster .@map$,93,267,103,303,"Goblin",1124,5,.@label$;
+		areamonster .@map$,93,267,103,303,"Goblin",1125,5,.@label$;
+		areamonster .@map$,93,267,103,303,"Goblin",1126,5,.@label$;
+		break;
+	case 33:
+		areamonster .@map$,181,267,191,303,"Kobold Leader",1296,1,.@label$;
+		areamonster .@map$,181,267,191,303,"Kobold",1133,15,.@label$;
+		areamonster .@map$,181,267,191,303,"Kobold_Archer",1282,15,.@label$;
+		areamonster .@map$,181,267,191,303,"Kobold",1134,10,.@label$;
+		areamonster .@map$,181,267,191,303,"Kobold",1135,5,.@label$;
+		break;
+	case 34:
+		areamonster .@map$,267,267,277,303,"Flame Skull",1869,20,.@label$;
+		areamonster .@map$,267,267,277,303,"Whisper",1179,10,.@label$;
+		areamonster .@map$,267,267,277,303,"Giant Whisper",1186,10,.@label$;
+		break;
+	case 35:
+		areamonster .@map$,352,267,362,303,"Turtle General",1312,1,.@label$;
+		areamonster .@map$,352,267,362,303,"Freezer",1319,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Solider",1316,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Heater",1318,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Permeter",1314,10,.@label$;
+		break;
+	case 36:
+		areamonster .@map$,9,180,19,216,"Anolian",1206,30,.@label$;
+		areamonster .@map$,9,180,19,216,"Grove",1687,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Alligator",1271,10,.@label$;
+		break;
+	case 37:
+		areamonster .@map$,93,180,103,216,"Clock Tower Manager",1270,10,.@label$;
+		areamonster .@map$,93,180,103,216,"Clock",1269,10,.@label$;
+		areamonster .@map$,93,180,103,216,"Alarm",1193,30,.@label$;
+		break;
+	case 38:
+		areamonster .@map$,181,180,191,216,"Death Word",1698,25,.@label$;
+		areamonster .@map$,181,180,191,216,"Rideword",1195,25,.@label$;
+		break;
+	case 39:
+		areamonster .@map$,267,180,277,216,"Evil Nymph",1416,10,.@label$;
+		areamonster .@map$,267,180,277,216,"Mao Gui",1513,10,.@label$;
+		areamonster .@map$,267,180,277,216,"Taoist Hermit",1412,10,.@label$;
+		areamonster .@map$,267,180,277,216,"Zhu Po Long",1514,10,.@label$;
+		areamonster .@map$,267,180,277,216,"Jin Guai",1517,5,.@label$;
+		break;
+	case 40:
+		areamonster .@map$,352,180,362,216,"Samurai Specter",1492,1,.@label$;
+		areamonster .@map$,352,180,362,216,"Shinobi",1401,10,.@label$;
+		areamonster .@map$,352,180,362,216,"Tengu",1405,10,.@label$;
+		areamonster .@map$,352,180,362,216,"Firelock Soldier",1403,5,.@label$;
+		areamonster .@map$,352,180,362,216,"Miyabi Doll",1404,10,.@label$;
+		areamonster .@map$,352,180,362,216,"Karakasa",1400,5,.@label$;
+		break;
+	case 41:
+		areamonster .@map$,9,96,19,132,"Kraben",1587,50,.@label$;
+		break;
+	case 42:
+		areamonster .@map$,93,96,103,132,"Sleeper",1386,20,.@label$;
+		areamonster .@map$,93,96,103,132,"Sting",1207,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Mi Gao",1516,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Sandman",1165,5,.@label$;
+		areamonster .@map$,93,96,103,132,"Hode",1127,5,.@label$;
+		break;
+	case 43:
+		areamonster .@map$,181,96,191,132,"Medusa",1148,10,.@label$;
+		areamonster .@map$,181,96,191,132,"Sidewinder",1037,40,.@label$;
+		areamonster .@map$,181,96,191,132,"Anacondaq",1030,5,.@label$;
+		areamonster .@map$,181,96,191,132,"Boa",1025,5,.@label$;
+		break;
+	case 44:
+		areamonster .@map$,267,96,277,132,"Hatii Baby",1515,20,.@label$;
+		areamonster .@map$,267,96,277,132,"Baphomet Jr.",1101,20,.@label$;
+		areamonster .@map$,267,96,277,132,"Orc Baby",1686,1,.@label$;
+		areamonster .@map$,267,96,277,132,"Baby Desert Wolf",1107,10,.@label$;
+		areamonster .@map$,267,96,277,132,"Savage Babe",1167,10,.@label$;
+		break;
+	case 45:
+		areamonster .@map$,352,96,362,132,"Osiris",1038,1,.@label$;
+		areamonster .@map$,352,96,362,132,"Ancient Mummy",1297,15,.@label$;
+		areamonster .@map$,352,96,362,132,"Verit",1032,15,.@label$;
+		areamonster .@map$,352,96,362,132,"Mummy",1041,20,.@label$;
+		break;
+	case 46:
+		areamonster .@map$,9,9,19,45,"Seeker",1774,20,.@label$;
+		areamonster .@map$,9,9,19,45,"Beholder",1633,20,.@label$;
+		break;
+	case 47:
+		areamonster .@map$,93,9,103,45,"Deleter",1384,20,.@label$;
+		areamonster .@map$,93,9,103,45,"Deleter",1385,10,.@label$;
+		areamonster .@map$,93,9,103,45,"Petite",1156,10,.@label$;
+		areamonster .@map$,93,9,103,45,"Petite",1155,10,.@label$;
+		break;
+	case 48:
+		areamonster .@map$,181,9,191,45,"Ancient Worm",1305,10,.@label$;
+		areamonster .@map$,181,9,191,45,"Ancient Mummy",1297,10,.@label$;
+		areamonster .@map$,181,9,191,45,"Ancient Mimic",1699,10,.@label$;
+		break;
+	case 49:
+		areamonster .@map$,267,9,277,45,"Grizzly",1381,20,.@label$;
+		areamonster .@map$,267,9,277,45,"Leib Olmai",1306,7,.@label$;
+		areamonster .@map$,267,9,277,45,"Zipper Bear",1417,5,.@label$;
+		areamonster .@map$,267,9,277,45,"Sasquatch",1243,5,.@label$;
+		areamonster .@map$,267,9,277,45,"Bigfoot",1060,5,.@label$;
+		break;
+	case 50:
+		areamonster .@map$,352,9,362,45,"Pharaoh",1157,1,.@label$;
+		areamonster .@map$,352,9,362,45,"Amon Ra",1511,1,.@label$;
+		areamonster .@map$,352,9,362,45,"Anubis",1098,10,.@label$;
+		areamonster .@map$,352,9,362,45,"Marduk",1140,10,.@label$;
+		areamonster .@map$,352,9,362,45,"Matyr",1146,10,.@label$;
+		break;
+	case 51:
+		areamonster .@map$,9,351,19,387,"Mini Demon",1292,20,.@label$;
+		areamonster .@map$,9,351,19,387,"Diabolic",1382,20,.@label$;
+		areamonster .@map$,9,351,19,387,"Deviruchi",1109,10,.@label$;
+		break;
+	case 52:
+		areamonster .@map$,93,351,103,387,"Harpy",1376,20,.@label$;
+		areamonster .@map$,93,351,103,387,"Grand Peco",1369,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Bloody Butterfly",1408,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Gargoyle",1253,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Hill Wind",1680,5,.@label$;
+		areamonster .@map$,93,351,103,387,"Hill Wind",1629,5,.@label$;
+		break;
+	case 53:
+		areamonster .@map$,181,351,191,387,"Assaulter",1315,25,.@label$;
+		areamonster .@map$,181,351,191,387,"Shinobi",1401,30,.@label$;
+		break;
+	case 54:
+		areamonster .@map$,267,351,277,387,"Chepet",1250,10,.@label$;
+		areamonster .@map$,267,351,277,387,"Mariontte",1143,10,.@label$;
+		areamonster .@map$,267,351,277,387,"Miyabi Doll",1404,10,.@label$;
+		break;
+	case 55:
+		areamonster .@map$,352,351,362,387,"Medusa",1148,25,.@label$;
+		areamonster .@map$,352,351,362,387,"Evil Snake Lord",1418,1,.@label$;
+		areamonster .@map$,352,351,362,387,"Isis",1029,15,.@label$;
+		areamonster .@map$,352,351,362,387,"Sidewinder",1037,15,.@label$;
+		break;
+	case 56:
+		areamonster .@map$,9,267,19,303,"Freezer",1319,10,.@label$;
+		areamonster .@map$,9,267,19,303,"Hatii Baby",1515,10,.@label$;
+		areamonster .@map$,9,267,19,303,"Ice Titan",1777,15,.@label$;
+		areamonster .@map$,9,267,19,303,"Snowier",1775,10,.@label$;
+		areamonster .@map$,9,267,19,303,"Gazeti",1778,10,.@label$;
+		break;
+	case 57:
+		areamonster .@map$,93,267,103,303,"Arc Angeling",1388,1,.@label$;
+		areamonster .@map$,93,267,103,303,"Deviling",1582,1,.@label$;
+		areamonster .@map$,93,267,103,303,"Angeling",1096,1,.@label$;
+		areamonster .@map$,93,267,103,303,"Ghostring",1120,1,.@label$;
+		areamonster .@map$,93,267,103,303,"Mastering",1090,1,.@label$;
+		areamonster .@map$,93,267,103,303,"Metaling",1613,25,.@label$;
+		areamonster .@map$,93,267,103,303,"Marin",1242,5,.@label$;
+		areamonster .@map$,93,267,103,303,"Poporing",1031,5,.@label$;
+		areamonster .@map$,93,267,103,303,"Drops",1113,5,.@label$;
+		break;
+	case 58:
+		areamonster .@map$,181,267,191,303,"Phendark",1202,20,.@label$;
+		areamonster .@map$,181,267,191,303,"Rybio",1201,10,.@label$;
+		areamonster .@map$,181,267,191,303,"Zombie Prisoner",1197,10,.@label$;
+		areamonster .@map$,181,267,191,303,"Skeleton Prisoner",1196,5,.@label$;
+		areamonster .@map$,181,267,191,303,"Injustice",1257,5,.@label$;
+		break;
+	case 59:
+		areamonster .@map$,267,267,277,303,"Ancient Mimic",1699,30,.@label$;
+		areamonster .@map$,267,267,277,303,"Mimic",1191,20,.@label$;
+		areamonster .@map$,267,267,277,303,"Mystcase",1249,10,.@label$;
+		break;
+	case 60:
+		areamonster .@map$,352,267,362,303,"Egnigem Cenia",1658,1,.@label$;
+		areamonster .@map$,352,267,362,303,"Doppelganger",1046,1,.@label$;
+		areamonster .@map$,352,267,362,303,"Armeyer Dinze",1654,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Wickebine Tres",1653,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Laurell Winder",1657,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Kavach Icarus",1656,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Errende Ebecee",1655,10,.@label$;
+		areamonster .@map$,352,267,362,303,"Egnigem Cenia",1652,10,.@label$;
+		break;
+	case 61:
+		areamonster .@map$,9,180,19,216,"Agav",1769,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Echio",1770,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Isilla",1772,5,.@label$;
+		areamonster .@map$,9,180,19,216,"Mobster",1313,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Pasana",1154,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Vanberk",1771,5,.@label$;
+		break;
+	case 62:
+		areamonster .@map$,93,180,103,216,"Wanderer",1208,35,.@label$;
+		break;
+	case 63:
+		areamonster .@map$,181,180,191,216,"Ragged Zombie",1865,20,.@label$;
+		areamonster .@map$,181,180,191,216,"Zombie Master",1298,10,.@label$;
+		areamonster .@map$,181,180,191,216,"Zombie Prisoner",1197,5,.@label$;
+		areamonster .@map$,181,180,191,216,"Orc Zombie",1153,5,.@label$;
+		areamonster .@map$,181,180,191,216,"Zombie",1015,5,.@label$;
+		break;
+	case 64:
+		areamonster .@map$,267,180,277,216,"Ungoliant",1618,30,.@label$;
+		areamonster .@map$,267,180,277,216,"Ancient Worm",1305,2,.@label$;
+		areamonster .@map$,267,180,277,216,"Caterpillar",1300,2,.@label$;
+		areamonster .@map$,267,180,277,216,"Creamy Fear",1293,2,.@label$;
+		areamonster .@map$,267,180,277,216,"Killer Mantis",1294,2,.@label$;
+		areamonster .@map$,267,180,277,216,"Giant Hornet",1303,2,.@label$;
+		break;
+	case 65:
+		areamonster .@map$,352,180,362,216,"Atros",1785,1,.@label$;
+		areamonster .@map$,352,180,362,216,"Galion",1783,20,.@label$;
+		break;
+	case 66:
+		areamonster .@map$,9,96,19,132,"Incubus",1374,20,.@label$;
+		areamonster .@map$,9,96,19,132,"Aliot",1736,20,.@label$;
+		areamonster .@map$,9,96,19,132,"Injustice",1257,10,.@label$;
+		break;
+	case 67:
+		areamonster .@map$,93,96,103,132,"Acidus",1716,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Acidus",1713,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Deleter",1384,5,.@label$;
+		areamonster .@map$,93,96,103,132,"Mutant Dragonoid",1262,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Petite",1156,5,.@label$;
+		break;
+	case 68:
+		areamonster .@map$,181,96,191,132,"Lava Golem",1366,10,.@label$;
+		areamonster .@map$,181,96,191,132,"Stalactic Golem",1278,10,.@label$;
+		areamonster .@map$,181,96,191,132,"Ice Titan",1777,10,.@label$;
+		areamonster .@map$,181,96,191,132,"Wooden Golem",1497,5,.@label$;
+		areamonster .@map$,181,96,191,132,"Golem",1040,5,.@label$;
+		break;
+	case 69:
+		areamonster .@map$,267,96,277,132,"Dame of Sentinel",1700,20,.@label$;
+		areamonster .@map$,267,96,277,132,"Mistress of Shelter",1701,10,.@label$;
+		areamonster .@map$,267,96,277,132,"Baroness of Retribution",1702,10,.@label$;
+		areamonster .@map$,267,96,277,132,"Lady Solace",1703,10,.@label$;
+		areamonster .@map$,267,96,277,132,"False Angel",1371,10,.@label$;
+		break;
+	case 70:
+		areamonster .@map$,352,96,362,132,"Orc Hero",1087,1,.@label$;
+		areamonster .@map$,352,96,362,132,"Orc Lord",1190,1,.@label$;
+		areamonster .@map$,352,96,362,132,"Orc Baby",1686,20,.@label$;
+		break;
+	case 71:
+		areamonster .@map$,9,9,19,45,"Succubus",1370,20,.@label$;
+		areamonster .@map$,9,9,19,45,"Nightmare Terror",1379,20,.@label$;
+		areamonster .@map$,9,9,19,45,"Incubus",1374,20,.@label$;
+		areamonster .@map$,9,9,19,45,"Nightmare",1061,5,.@label$;
+		break;
+	case 72:
+		areamonster .@map$,93,9,103,45,"Margaretha Sorin",1637,10,.@label$;
+		areamonster .@map$,93,9,103,45,"Permeter",1314,10,.@label$;
+		areamonster .@map$,93,9,103,45,"Errende Ebecee",1655,10,.@label$;
+		areamonster .@map$,93,9,103,45,"Enchanted Peach Tree",1410,10,.@label$;
+		break;
+	case 73:
+		areamonster .@map$,181,9,191,45,"Succubus",1370,10,.@label$;
+		areamonster .@map$,181,9,191,45,"Loli Ruri",1505,20,.@label$;
+		areamonster .@map$,181,9,191,45,"Aliza",1737,10,.@label$;
+		areamonster .@map$,181,9,191,45,"Zealotus",1200,5,.@label$;
+		areamonster .@map$,181,9,191,45,"Alice",1275,5,.@label$;
+		areamonster .@map$,181,9,191,45,"Green Maiden",1631,10,.@label$;
+		break;
+	case 74:
+		areamonster .@map$,267,9,277,45,"Dimik",1671,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Dimik",1673,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Dimik",1672,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Venatu",1677,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Dimik",1670,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Archdam",1668,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Venatu",1678,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Venatu",1679,6,.@label$;
+		areamonster .@map$,267,9,277,45,"Venatu",1676,6,.@label$;
+		break;
+	case 75:
+		areamonster .@map$,352,9,362,45,"Baphomet",1039,1,.@label$;
+		areamonster .@map$,352,9,362,45,"Dark Lord",1272,1,.@label$;
+		areamonster .@map$,352,9,362,45,"Baphomet Jr.",1101,20,.@label$;
+		areamonster .@map$,352,9,362,45,"Dark Illusion",1302,10,.@label$;
+		break;
+	case 76:
+		areamonster .@map$,9,351,19,387,"Abysmal Knight",1219,30,.@label$;
+		areamonster .@map$,9,351,19,387,"Nightmare Terror",1379,20,.@label$;
+		areamonster .@map$,9,351,19,387,"Nightmare",1061,10,.@label$;
+		break;
+	case 77:
+		areamonster .@map$,93,351,103,387,"Banshee",1867,30,.@label$;
+		areamonster .@map$,93,351,103,387,"Wraith Dead",1291,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Evil Druid",1117,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Wraith",1192,10,.@label$;
+		areamonster .@map$,93,351,103,387,"Wind Ghost",1263,10,.@label$;
+		break;
+	case 78:
+		areamonster .@map$,181,351,191,387,"Sword Master",1829,5,.@label$;
+		areamonster .@map$,181,351,191,387,"Bloody Knight",1268,10,.@label$;
+		areamonster .@map$,181,351,191,387,"Abysmal Knight",1219,5,.@label$;
+		areamonster .@map$,181,351,191,387,"Dullahan",1504,10,.@label$;
+		areamonster .@map$,181,351,191,387,"Raydric",1163,20,.@label$;
+		break;
+	case 79:
+		areamonster .@map$,267,351,277,387,"Hydro",1720,10,.@label$;
+		areamonster .@map$,267,351,277,387,"Ferus",1714,10,.@label$;
+		areamonster .@map$,267,351,277,387,"Ferus",1717,10,.@label$;
+		areamonster .@map$,267,351,277,387,"Deleter",1385,5,.@label$;
+		areamonster .@map$,267,351,277,387,"Petite",1155,5,.@label$;
+		break;
+	case 80:
+		areamonster .@map$,352,351,362,387,"Falling Bishop",1871,1,.@label$;
+		areamonster .@map$,352,351,362,387,"Necromancer",1870,15,.@label$;
+		break;
+	case 81:
+		areamonster .@map$,9,267,19,303,"Mysteltainn",1203,20,.@label$;
+		areamonster .@map$,9,267,19,303,"Ogretooth",1204,20,.@label$;
+		areamonster .@map$,9,267,19,303,"Executioner",1205,20,.@label$;
+		break;
+	case 82:
+		areamonster .@map$,93,267,103,303,"Bloody Knight",1268,10,.@label$;
+		areamonster .@map$,93,267,103,303,"Agav",1769,10,.@label$;
+		areamonster .@map$,93,267,103,303,"Bloody Murderer",1507,10,.@label$;
+		areamonster .@map$,93,267,103,303,"Skogul",1752,10,.@label$;
+		areamonster .@map$,93,267,103,303,"Injustice",1257,10,.@label$;
+		break;
+	case 83:
+		areamonster .@map$,181,267,191,303,"Skeggiold",1754,10,.@label$;
+		areamonster .@map$,181,267,191,303,"Dark Illusion",1302,10,.@label$;
+		areamonster .@map$,181,267,191,303,"Gryphon",1259,10,.@label$;
+		areamonster .@map$,181,267,191,303,"Chimera",1283,10,.@label$;
+		break;
+	case 84:
+		areamonster .@map$,267,267,277,303,"Succubus",1370,10,.@label$;
+		areamonster .@map$,267,267,277,303,"Dark Illusion",1302,20,.@label$;
+		areamonster .@map$,267,267,277,303,"Owl Duke",1320,10,.@label$;
+		areamonster .@map$,267,267,277,303,"Owl Baron",1295,10,.@label$;
+		areamonster .@map$,267,267,277,303,"Incubus",1374,10,.@label$;
+		break;
+	case 85:
+		areamonster .@map$,352,267,362,303,"Ifrit",1832,1,.@label$;
+		break;
+	case 86:
+		areamonster .@map$,9,180,19,216,"Hydro",1720,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Gryphon",1259,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Chimera",1283,10,.@label$;
+		areamonster .@map$,9,180,19,216,"Majoruros",1310,10,.@label$;
+		break;
+	case 87:
+		areamonster .@map$,93,180,103,216,"Salamander",1831,15,.@label$;
+		areamonster .@map$,93,180,103,216,"Kasa",1833,20,.@label$;
+		areamonster .@map$,93,180,103,216,"Lava Golem",1366,15,.@label$;
+		areamonster .@map$,93,180,103,216,"Gajomart",1309,10,.@label$;
+		break;
+	case 88:
+		areamonster .@map$,181,180,191,216,"Necromancer",1870,15,.@label$;
+		areamonster .@map$,181,180,191,216,"Anubis",1098,15,.@label$;
+		areamonster .@map$,181,180,191,216,"Wraith Dead",1291,10,.@label$;
+		areamonster .@map$,181,180,191,216,"Ancient Mummy",1297,10,.@label$;
+		areamonster .@map$,181,180,191,216,"Khalitzburg",1132,10,.@label$;
+		break;
+	case 89:
+		areamonster .@map$,267,180,277,216,"Odium of Thanatos",1704,6,.@label$;
+		areamonster .@map$,267,180,277,216,"Despero of Thanatos",1705,6,.@label$;
+		areamonster .@map$,267,180,277,216,"Maero of Thanatos",1706,6,.@label$;
+		areamonster .@map$,267,180,277,216,"Dolor of Thanatos",1707,6,.@label$;
+		break;
+	case 90:
+		areamonster .@map$,352,180,362,216,"Valkyrie Randgris",1751,1,.@label$;
+		areamonster .@map$,352,180,362,216,"Baroness of Retribution",1702,10,.@label$;
+		areamonster .@map$,352,180,362,216,"Lady Solace",1703,10,.@label$;
+		areamonster .@map$,352,180,362,216,"False Angel",1371,10,.@label$;
+		break;
+	case 91:
+		areamonster .@map$,9,96,19,132,"Cecil Damon",1638,10,.@label$;
+		areamonster .@map$,9,96,19,132,"Bow Master",1830,10,.@label$;
+		areamonster .@map$,9,96,19,132,"Kavac",1656,30,.@label$;
+		break;
+	case 92:
+		areamonster .@map$,93,96,103,132,"Kathryne Keyron",1639,15,.@label$;
+		areamonster .@map$,93,96,103,132,"Elder",1377,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Laurell Weinder",1657,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Wind Ghost",1263,10,.@label$;
+		areamonster .@map$,93,96,103,132,"Marduk",1140,10,.@label$;
+		break;
+	case 93:
+		areamonster .@map$,181,96,191,132,"Seyren Windsor",1634,15,.@label$;
+		areamonster .@map$,181,96,191,132,"Bloody Knight",1268,10,.@label$;
+		areamonster .@map$,181,96,191,132,"Abysmal Knight",1219,10,.@label$;
+		areamonster .@map$,181,96,191,132,"Wanderer",1208,10,.@label$;
+		break;
+	case 94:
+		areamonster .@map$,267,96,277,132,"Sword Master",1829,15,.@label$;
+		areamonster .@map$,267,96,277,132,"Bow Master",1830,15,.@label$;
+		break;
+	case 95:
+		areamonster .@map$,352,96,362,132,"Beelzebub",1873,1,.@label$;
+		areamonster .@map$,352,96,362,132,"Hunter Fly",1035,30,.@label$;
+		areamonster .@map$,352,96,362,132,"Steel Chonchon",1042,5,.@label$;
+		areamonster .@map$,352,96,362,132,"Dragon FLy",1091,5,.@label$;
+		areamonster .@map$,352,96,362,132,"Chonchon",1011,5,.@label$;
+		break;
+	case 96:
+		areamonster .@map$,9,9,19,45,"Valkyrie",1765,5,.@label$;
+		areamonster .@map$,9,9,19,45,"Skeggiold",1755,10,.@label$;
+		areamonster .@map$,9,9,19,45,"Skeggiold",1754,10,.@label$;
+		break;
+	case 97:
+		areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1918,5,.@label$;
+		areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1919,5,.@label$;
+		areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1920,5,.@label$;
+		areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1921,5,.@label$;
+		break;
+	case 98:
+		areamonster .@map$,181,9,191,45,"Kathryne Keyron",1639,2,.@label$;
+		areamonster .@map$,181,9,191,45,"Seyren Windsor",1634,2,.@label$;
+		areamonster .@map$,181,9,191,45,"Margaretha Sorin",1637,2,.@label$;
+		areamonster .@map$,181,9,191,45,"Eremes Guile",1635,2,.@label$;
+		areamonster .@map$,181,9,191,45,"Howard Alt-Eisen",1636,2,.@label$;
+		areamonster .@map$,181,9,191,45,"Cecil Damon",1638,2,.@label$;
+		break;
+	case 99:
+		for(set .@i,1; .@i<=7; set .@i,.@i+1) {
+			set .@mob_ran,rand(1,30);
+			if (.@mob_ran == 1) 
+				areamonster .@map$,267,9,277,45,"Kathryne Keyron",1639,2,.@label$;
+			else if (.@mob_ran == 2) 
+				areamonster .@map$,267,9,277,45,"Seyren Windsor",1634,2,.@label$;
+			else if (.@mob_ran == 3) 
+				areamonster .@map$,267,9,277,45,"Margaretha Sorin",1637,2,.@label$;
+			else if (.@mob_ran == 4) 
+				areamonster .@map$,267,9,277,45,"Eremes Guile",1635,2,.@label$;
+			else if (.@mob_ran == 5) 
+				areamonster .@map$,267,9,277,45,"Howard Alt-Eisen",1636,2,.@label$;
+			else if (.@mob_ran == 6) 
+				areamonster .@map$,267,9,277,45,"Cecil Damon",1638,2,.@label$;
+			else if (.@mob_ran == 7) 
+				areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1918,5,.@label$;
+			else if (.@mob_ran == 8) 
+				areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1919,5,.@label$;
+			else if (.@mob_ran == 9) 
+				areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1920,5,.@label$;
+			else if (.@mob_ran == 10) 
+				areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1921,5,.@label$;
+			else if (.@mob_ran == 11) 
+				areamonster .@map$,267,9,277,45,"Valkyrie",1765,5,.@label$;
+			else if (.@mob_ran == 12) 
+				areamonster .@map$,267,9,277,45,"Skeggiold",1755,10,.@label$;
+			else if (.@mob_ran == 13) 
+				areamonster .@map$,267,9,277,45,"Skeggiold",1754,10,.@label$;
+			else if (.@mob_ran == 14) 
+				areamonster .@map$,267,9,277,45,"Seyren Windsor",1634,15,.@label$;
+			else if (.@mob_ran == 15) 
+				areamonster .@map$,267,9,277,45,"Bloody Knight",1268,10,.@label$;
+			else if (.@mob_ran == 16) 
+				areamonster .@map$,267,9,277,45,"Abysmal Knight",1219,10,.@label$;
+			else if (.@mob_ran == 17) 
+				areamonster .@map$,267,9,277,45,"Wanderer",1208,10,.@label$;
+			else if (.@mob_ran == 18) 
+				areamonster .@map$,267,9,277,45,"Sword Master",1829,15,.@label$;
+			else if (.@mob_ran == 19) 
+				areamonster .@map$,267,9,277,45,"Bow Master",1830,15,.@label$;
+			else if (.@mob_ran == 20) 
+				areamonster .@map$,267,9,277,45,"Kathryne Keyron",1639,15,.@label$;
+			else if (.@mob_ran == 21) 
+				areamonster .@map$,267,9,277,45,"Elder",1377,10,.@label$;
+			else if (.@mob_ran == 22) 
+				areamonster .@map$,267,9,277,45,"Laurell Weinder",1657,10,.@label$;
+			else if (.@mob_ran == 23) 
+				areamonster .@map$,267,9,277,45,"Wind Ghost",1263,10,.@label$;
+			else if (.@mob_ran == 24) 
+				areamonster .@map$,267,9,277,45,"Marduk",1140,10,.@label$;
+			else if (.@mob_ran == 25) 
+				areamonster .@map$,267,9,277,45,"Cecil Damon",1638,10,.@label$;
+			else if (.@mob_ran == 26) 
+				areamonster .@map$,267,9,277,45,"Bow Master",1830,10,.@label$;
+			else if (.@mob_ran == 27) 
+				areamonster .@map$,267,9,277,45,"Kavach Icarus",1656,30,.@label$;
+			else if (.@mob_ran == 28) 
+				areamonster .@map$,267,9,277,45,"Baroness of Retribution",1702,10,.@label$;
+			else if (.@mob_ran == 29) 
+				areamonster .@map$,267,9,277,45,"Lady Solace",1703,10,.@label$;
+			else 
+				areamonster .@map$,267,9,277,45,"False Angel",1371,10,.@label$;
 		}
 		break;
 	}
-	end;
-}
-
-1@tower,29,365,1	script	#1F Controller	844,{
-	end;
-
-OnInstanceInit:
-	areamonster "1@tower",7,351,17,387,"Metaling",1613,15,instance_npcname("#1F Controller", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",7,351,17,387,"Marin",1242,5,instance_npcname("#1F Controller", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",7,351,17,387,"Poporing",1031,5,instance_npcname("#1F Controller", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",7,351,17,387,"Drops",1113,5,instance_npcname("#1F Controller", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",7,351,17,387,"Mastering",1090,1,instance_npcname("#1F Controller", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",7,351,17,387,"Poring",1002,5,instance_npcname("#1F Controller", instance_id())+"::OnMyMobDead";
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("#1F Controller", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 1
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 1st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 1st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("1FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,12,393,0	script	1FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("1FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("1FGate102tower", instance_id());
-	areamonster "1@tower",93,351,103,387,"Desert Wolf",1106,20,instance_npcname("1FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,351,103,387,"Vagabond Wolf",1092,1,instance_npcname("1FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,351,103,387,"Baby Desert Wolf",1107,10,instance_npcname("1FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",136,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("1FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 2
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 2nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 2nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("2FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,96,393,0	script	2FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("2FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("2FGate102tower", instance_id());
-	areamonster "1@tower",181,351,191,387,"Archer Skeleton",1016,5,instance_npcname("2FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,351,191,387,"Skel Worker",1169,5,instance_npcname("2FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,351,191,387,"Soldier Skeleton",1028,5,instance_npcname("2FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,351,191,387,"Orc Skeleton",1152,5,instance_npcname("2FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,351,191,387,"Pirate Skeleton",1071,5,instance_npcname("2FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,351,191,387,"Skeleton",1076,5,instance_npcname("2FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",224,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("2FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 3
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 3rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 3rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("3FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,184,393,0	script	3FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("3FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("3FGate102tower", instance_id());
-	areamonster "1@tower",267,351,277,387,"Argiope",1099,15,instance_npcname("3FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,351,277,387,"Mantis",1139,5,instance_npcname("3FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,351,277,387,"Argos",1100,5,instance_npcname("3FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,351,277,387,"Vocal",1088,1,instance_npcname("3FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,351,277,387,"Rocker",1052,5,instance_npcname("3FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,351,277,387,"Hornet",1004,5,instance_npcname("3FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",310,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("3FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 4
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 4th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 4th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("4FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,270,393,0	script	4FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("4FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("4FGate102tower", instance_id());
-	areamonster "1@tower",352,351,362,387,"Golden Thief Bug",1086,1,instance_npcname("4FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,351,362,387,"Thief Bug Male",1054,15,instance_npcname("4FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,351,362,387,"Thief Bug Female",1053,15,instance_npcname("4FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,351,362,387,"Thief Bug",1051,15,instance_npcname("4FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,351,362,387,"Thief Bug Egg",1048,5,instance_npcname("4FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",395,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("4FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 5
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 5th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 5th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("5FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,355,393,0	script	5FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("5FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("5FGate102tower", instance_id());
-	areamonster "1@tower",9,267,19,303,"Dragon Egg",1721,5,instance_npcname("5FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,267,19,303,"Thief Bug Egg",1048,5,instance_npcname("5FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,267,19,303,"Ant Egg",1097,5,instance_npcname("5FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,267,19,303,"Pupa",1008,5,instance_npcname("5FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",52,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("5FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 6
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 6th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 6th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("6FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,12,309,0	script	6FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("6FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("6FGate102tower", instance_id());
-	areamonster "1@tower",93,267,103,303,"Explosion",1383,15,instance_npcname("6FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,267,103,303,"Drainliar",1111,15,instance_npcname("6FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,267,103,303,"Anopheles",1627,15,instance_npcname("6FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,267,103,303,"Farmiliar",1005,15,instance_npcname("6FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",136,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("6FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 7
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 7th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 7th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("7FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,96,309,0	script	7FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("7FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("7FGate102tower", instance_id());
-	areamonster "1@tower",181,267,191,303,"Firelock Soldier",1403,15,instance_npcname("7FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,267,191,303,"Cruiser",1248,15,instance_npcname("7FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",224,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("7FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 8
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 8th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 8th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("8FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,184,309,0	script	8FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("8FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("8FGate102tower", instance_id());
-	areamonster "1@tower",267,267,277,303,"Obsidian",1615,15,instance_npcname("8FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,267,277,303,"Golem",1040,15,instance_npcname("8FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,267,277,303,"Stapo",1784,10,instance_npcname("8FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",310,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("8FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 9
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 9th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 9th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("9FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,270,309,0	script	9FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("9FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("9FGate102tower", instance_id());
-	areamonster "1@tower",352,267,362,303,"Mistress",1059,1,instance_npcname("9FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,267,362,303,"Giant Hornet",1303,25,instance_npcname("9FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,267,362,303,"Hornet",1004,20,instance_npcname("9FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",395,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("9FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 10
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 10th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 10th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("10FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,355,309,0	script	10FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("10FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("10FGate102tower", instance_id());
-	areamonster "1@tower",9,180,19,216,"Dryad",1493,15,instance_npcname("10FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,180,19,216,"Parasite",1500,15,instance_npcname("10FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,180,19,216,"Hermit Plant",1413,15,instance_npcname("10FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,180,19,216,"Rafflesia",1162,5,instance_npcname("10FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",52,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("10FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 11
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 11th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 11th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("11FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
+	return;
+}
+
+function	script	F_Tower_Warp	{
+
+	set .@level, getarg(0);
+	set .@map$, getarg(1);
+
+	switch(.@level) {
+		case 2: warp .@map$,136,354; break;
+		case 3: warp .@map$,224,354; break;
+		case 4: warp .@map$,310,354; break;
+		case 5: warp .@map$,395,354; break;
+		case 6: warp .@map$,52,270; break;
+		case 7: warp .@map$,136,270; break;
+		case 8: warp .@map$,224,270; break;
+		case 9: warp .@map$,310,270; break;
+		case 10: warp .@map$,395,270; break;
+		case 11: warp .@map$,52,183; break;
+		case 12: warp .@map$,136,183; break;
+		case 13: warp .@map$,224,183; break;
+		case 14: warp .@map$,310,183; break;
+		case 15: warp .@map$,395,183; break;
+		case 16: warp .@map$,52,99; break;
+		case 17: warp .@map$,136,99; break;
+		case 18: warp .@map$,224,99; break;
+		case 19: warp .@map$,310,99; break;
+		case 20: warp .@map$,395,99; break;
+		case 21: warp .@map$,52,12; break;
+		case 22: warp .@map$,136,12; break;
+		case 23: warp .@map$,224,12; break;
+		case 24: warp .@map$,310,12; break;
+		case 25: warp .@map$,395,12; break;
+
+		case 27: warp .@map$,136,354; break;
+		case 28: warp .@map$,224,354; break;
+		case 29: warp .@map$,310,354; break;
+		case 30: warp .@map$,395,354; break;
+		case 31: warp .@map$,52,270; break;
+		case 32: warp .@map$,136,270; break;
+		case 33: warp .@map$,224,270; break;
+		case 34: warp .@map$,310,270; break;
+		case 35: warp .@map$,395,270; break;
+		case 36: warp .@map$,52,183; break;
+		case 37: warp .@map$,136,183; break;
+		case 38: warp .@map$,224,183; break;
+		case 39: warp .@map$,310,183; break;
+		case 40: warp .@map$,395,183; break;
+		case 41: warp .@map$,52,99; break;
+		case 42: warp .@map$,136,99; break;
+		case 43: warp .@map$,224,99; break;
+		case 44: warp .@map$,310,99; break;
+		case 45: warp .@map$,395,99; break;
+		case 46: warp .@map$,52,12; break;
+		case 47: warp .@map$,136,12; break;
+		case 48: warp .@map$,224,12; break;
+		case 49: warp .@map$,310,12; break;
+		case 50: warp .@map$,395,12; break;
+
+		case 52: warp .@map$,136,354; break;
+		case 53: warp .@map$,224,354; break;
+		case 54: warp .@map$,310,354; break;
+		case 55: warp .@map$,395,354; break;
+		case 56: warp .@map$,52,270; break;
+		case 57: warp .@map$,136,270; break;
+		case 58: warp .@map$,224,270; break;
+		case 59: warp .@map$,310,270; break;
+		case 60: warp .@map$,395,270; break;
+		case 61: warp .@map$,52,183; break;
+		case 62: warp .@map$,136,183; break;
+		case 63: warp .@map$,224,183; break;
+		case 64: warp .@map$,310,183; break;
+		case 65: warp .@map$,395,183; break;
+		case 66: warp .@map$,52,99; break;
+		case 67: warp .@map$,136,99; break;
+		case 68: warp .@map$,224,99; break;
+		case 69: warp .@map$,310,99; break;
+		case 70: warp .@map$,395,99; break;
+		case 71: warp .@map$,52,12; break;
+		case 72: warp .@map$,136,12; break;
+		case 73: warp .@map$,224,12; break;
+		case 74: warp .@map$,310,12; break;
+		case 75: warp .@map$,395,12; break;
+
+		case 77: warp .@map$,136,354; break;
+		case 78: warp .@map$,224,354; break;
+		case 79: warp .@map$,310,354; break;
+		case 80: warp .@map$,395,354; break;
+		case 81: warp .@map$,52,270; break;
+		case 82: warp .@map$,136,270; break;
+		case 83: warp .@map$,224,270; break;
+		case 84: warp .@map$,310,270; break;
+		case 85: warp .@map$,395,270; break;
+		case 86: warp .@map$,52,183; break;
+		case 87: warp .@map$,136,183; break;
+		case 88: warp .@map$,224,183; break;
+		case 89: warp .@map$,310,183; break;
+		case 90: warp .@map$,395,183; break;
+		case 91: warp .@map$,52,99; break;
+		case 92: warp .@map$,136,99; break;
+		case 93: warp .@map$,224,99; break;
+		case 94: warp .@map$,310,99; break;
+		case 95: warp .@map$,395,99; break;
+		case 96: warp .@map$,52,12; break;
+		case 97: warp .@map$,136,12; break;
+		case 98: warp .@map$,224,12; break;
+		case 99: warp .@map$,309,12; break;
+	}
+	return;
 }
 
-1@tower,12,222,0	script	11FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("11FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("11FGate102tower", instance_id());
-	areamonster "1@tower",93,180,103,216,"Demon Pungus",1378,25,instance_npcname("11FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,180,103,216,"Punk",1199,25,instance_npcname("11FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",136,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("11FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 12
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 12th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 12th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("12FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,96,222,0	script	12FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("12FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("12FGate102tower", instance_id());
-	areamonster "1@tower",181,180,191,216,"Yao Yun",1512,15,instance_npcname("12FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,180,191,216,"Bongunn",1188,15,instance_npcname("12FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,180,191,216,"Munak",1026,10,instance_npcname("12FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",224,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("12FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 13
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 13th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 13th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("13FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,184,222,0	script	13FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("13FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("13FGate102tower", instance_id());
-	areamonster "1@tower",267,180,277,216,"High Orc",1213,15,instance_npcname("13FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,180,277,216,"Orc Archer",1189,10,instance_npcname("13FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,180,277,216,"Orc Lady",1273,10,instance_npcname("13FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,180,277,216,"Orc Warrior",1023,5,instance_npcname("13FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,180,277,216,"Orc Baby",1686,5,instance_npcname("13FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",310,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("13FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 14
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 14th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 14th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("14FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,270,222,0	script	14FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("14FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("14FGate102tower", instance_id());
-	areamonster "1@tower",352,180,362,216,"Maya",1147,1,instance_npcname("14FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,180,362,216,"Phreeoni",1159,1,instance_npcname("14FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,180,362,216,"Deniro",1105,15,instance_npcname("14FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,180,362,216,"Pierre",1160,15,instance_npcname("14FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,180,362,216,"Andre",1095,15,instance_npcname("14FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,180,362,216,"Ant Egg",1097,5,instance_npcname("14FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-
-	warp "1@tower",395,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("14FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 15
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 15th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 15th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("15FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,355,222,0	script	15FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("15FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("15FGate102tower", instance_id());
-	areamonster "1@tower",9,96,19,132,"Raydric Archer",1276,10,instance_npcname("15FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,96,19,132,"Orc Archer",1189,10,instance_npcname("15FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,96,19,132,"Gargoyle",1253,10,instance_npcname("15FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,96,19,132,"Archer Skeleton",1016,10,instance_npcname("15FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",52,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("15FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 16
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 16th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 16th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("16FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,12,138,0	script	16FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("16FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("16FGate102tower", instance_id());
-	areamonster "1@tower",93,96,103,132,"Merman",1264,10,instance_npcname("16FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,96,103,132,"Baphomet Jr.",1101,10,instance_npcname("16FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,96,103,132,"Strouf",1065,15,instance_npcname("16FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,96,103,132,"Hill Wind",1629,5,instance_npcname("16FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",136,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("16FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 17
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 17th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 17th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("17FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,96,138,0	script	17FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("17FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("17FGate102tower", instance_id());
-	areamonster "1@tower",181,96,191,132,"Cramp",1209,25,instance_npcname("17FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,96,191,132,"Tarou",1175,15,instance_npcname("17FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",224,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("17FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 18
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 18th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 18th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("18FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,184,138,0	script	18FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("18FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("18FGate102tower", instance_id());
-	areamonster "1@tower",267,96,277,132,"Deviace",1108,10,instance_npcname("18FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,96,277,132,"Megalodon",1064,10,instance_npcname("18FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,96,277,132,"Swordfish",1069,10,instance_npcname("18FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,96,277,132,"Phen",1158,10,instance_npcname("18FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
+// Levels 1-25
+//============================================================
+1@tower,50,360,0	script	Immortal Brazier#	844,{
+	mes "- A Message is Engraved on the Brazier -";
+	mes "The one who scatters the ashes of the darkness in this place shall become one step closer to Nacht Sieger, the Hegemon King of the Darkness...";
+	next;
 
-OnTouch_:
-	warp "1@tower",310,99;
-	end;
+	setarray .@level$[1],"26th","51st","76th";
+	setarray .@map$[1],"2@tower","3@tower","4@tower";
+	set .@i, select("26th Level:51st Level:76th Level");
 
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("18FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 19
+	if (countitem(6000) < .@i) {
+		mes "-Warning-";
+		mes "To warp to the "+.@level$[.@i]+" Level, you need "+.@i+" Ashes of the Darkness.";
+		close;
 	}
-	else
-		instance_announce -1, "Remaining Monsters on the 19th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 19th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("19FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-1@tower,270,138,0	script	19FGate102tower	45,2,2,{
-	end;
+	delitem 6000,.@i; //Dark_Ashes
+	mapannounce instance_mapname("1@tower"), strcharinfo(0)+". You will be warped to the "+.@level$[.@i]+" Level.",bc_map,"0x00ff99";
+	warp instance_mapname(.@map$[.@i]),52,354;
+	close;
 
 OnInstanceInit:
-	disablenpc instance_npcname("19FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("19FGate102tower", instance_id());
-	areamonster "1@tower",352,96,362,132,"Drake",1112,1,instance_npcname("19FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,96,362,132,"Pirate Skeleton",1071,50,instance_npcname("19FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",395,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("19FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 20
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 20th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
+	initnpctimer;
 	end;
 
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 20th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("20FGate102tower", instance_id())+"::OnEnable";
+OnTimer10000:
+	mapannounce instance_mapname("1@tower"), "Notice : Taming a monster does not count towards defeating them.",bc_map,"0xff0000";
 	stopnpctimer;
 	end;
 }
 
-1@tower,355,138,0	script	20FGate102tower	45,2,2,{
+1@tower,29,365,1	script	#1F Controller	844,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("20FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("20FGate102tower", instance_id());
-	areamonster "1@tower",9,9,19,45,"Plasma",1693,10,instance_npcname("20FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,9,19,45,"Plasma",1696,10,instance_npcname("20FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,9,19,45,"Plasma",1695,5,instance_npcname("20FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,9,19,45,"Plasma",1697,5,instance_npcname("20FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",9,9,19,45,"Plasma",1694,5,instance_npcname("20FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",52,12;
+	callfunc "F_Tower_Monster",
+		1,
+		instance_mapname("1@tower"),
+		instance_npcname("#1F Controller")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("20FGate102tower", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("1@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("#1F Controller")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
 		initnpctimer;
-		//SetItemPartyInMap in_102floor 21
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 21st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
+		//SetItemPartyInMap in_102floor 1
+	} else
+		mapannounce .@map$, "Remaining Monsters on the 1st Level - "+.@mob_dead_num,bc_map,"0x00ff99";
 	end;
 
 OnTimer5000:
-	instance_announce -1, "All Monsters on the 21st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("21FGate102tower", instance_id())+"::OnEnable";
+	mapannounce instance_mapname("1@tower"), "All Monsters on the 1st Level have been defeated.",bc_map,"0xffff00";
+	donpcevent instance_npcname("1FGate102tower")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
 
-1@tower,12,51,0	script	21FGate102tower	45,2,2,{
+1@tower,12,393,0	script	1FGate102tower	45,2,2,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("21FGate102tower", instance_id());
+	disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("21FGate102tower", instance_id());
-	areamonster "1@tower",93,9,103,45,"Muscipular",1780,15,instance_npcname("21FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,9,103,45,"Drosera",1781,15,instance_npcname("21FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,9,103,45,"Flora",1118,15,instance_npcname("21FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,9,103,45,"Hydra",1068,15,instance_npcname("21FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,9,103,45,"Mandragora",1020,10,instance_npcname("21FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",93,9,103,45,"Rafflesia",1162,10,instance_npcname("21FGate102tower", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname(strnpcinfo(0));
+	callfunc "F_Tower_Monster",
+		atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1,
+		strnpcinfo(4),
+		instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
 	end;
 
 OnTouch_:
-	warp "1@tower",136,12;
+	callfunc "F_Tower_Warp",
+		atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1,
+		strnpcinfo(4);
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("21FGate102tower", instance_id())+"::OnMyMobDead");
+	set .@map$, strnpcinfo(4);
+	set .@level, atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1;
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
 		initnpctimer;
-		//SetItemPartyInMap in_102floor 22
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 22nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
+		//SetItemPartyInMap in_102floor .@level
+	} else
+		mapannounce .@map$, "Remaining Monsters on the "+callsub(L_Display,.@level)+" Level - "+.@mob_dead_num,bc_map,"0x00ff99";
 	end;
 
 OnTimer5000:
-	instance_announce -1, "All Monsters on the 22nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("22FGate102tower", instance_id())+"::OnEnable";
+	set .@level, atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1;
+	mapannounce strnpcinfo(4), "All Monsters on the "+callsub(L_Display,.@level)+" Level have been defeated.",bc_map,"0xffff00";
+	donpcevent instance_npcname(.@level+"FGate102tower")+"::OnEnable";
 	stopnpctimer;
 	end;
-}
-
-1@tower,96,51,0	script	22FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("22FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("22FGate102tower", instance_id());
-	areamonster "1@tower",181,9,191,45,"Penomena",1216,15,instance_npcname("22FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,9,191,45,"Obeaune",1044,10,instance_npcname("22FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,9,191,45,"Marse",1144,10,instance_npcname("22FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,9,191,45,"Swordfish",1069,10,instance_npcname("22FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",181,9,191,45,"Hydra",1068,5,instance_npcname("22FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "1@tower",224,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("22FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 23
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 23rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
 
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 23rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("23FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
+L_Display:
+	// Display level properly.
+	set .@mod, getarg(0) % 10;
+	if (.@mod == 1 && getarg(0) != 11) return getarg(0)+"st";
+	else if (.@mod == 2 && getarg(0) != 12) return getarg(0)+"nd";
+	else if (.@mod == 3 && getarg(0) != 13) return getarg(0)+"rd";
+	else return getarg(0)+"th";
 }
+1@tower,96,393,0	duplicate(1FGate102tower)	2FGate102tower	45,2,2
+1@tower,184,393,0	duplicate(1FGate102tower)	3FGate102tower	45,2,2
+1@tower,270,393,0	duplicate(1FGate102tower)	4FGate102tower	45,2,2
+1@tower,355,393,0	duplicate(1FGate102tower)	5FGate102tower	45,2,2
+1@tower,12,309,0	duplicate(1FGate102tower)	6FGate102tower	45,2,2
+1@tower,96,309,0	duplicate(1FGate102tower)	7FGate102tower	45,2,2
+1@tower,184,309,0	duplicate(1FGate102tower)	8FGate102tower	45,2,2
+1@tower,270,309,0	duplicate(1FGate102tower)	9FGate102tower	45,2,2
+1@tower,355,309,0	duplicate(1FGate102tower)	10FGate102tower	45,2,2
+1@tower,12,222,0	duplicate(1FGate102tower)	11FGate102tower	45,2,2
+1@tower,96,222,0	duplicate(1FGate102tower)	12FGate102tower	45,2,2
+1@tower,184,222,0	duplicate(1FGate102tower)	13FGate102tower	45,2,2
+1@tower,270,222,0	duplicate(1FGate102tower)	14FGate102tower	45,2,2
+1@tower,355,222,0	duplicate(1FGate102tower)	15FGate102tower	45,2,2
+1@tower,12,138,0	duplicate(1FGate102tower)	16FGate102tower	45,2,2
+1@tower,96,138,0	duplicate(1FGate102tower)	17FGate102tower	45,2,2
+1@tower,184,138,0	duplicate(1FGate102tower)	18FGate102tower	45,2,2
+1@tower,270,138,0	duplicate(1FGate102tower)	19FGate102tower	45,2,2
+1@tower,355,138,0	duplicate(1FGate102tower)	20FGate102tower	45,2,2
+1@tower,12,51,0	duplicate(1FGate102tower)	21FGate102tower	45,2,2
+1@tower,96,51,0	duplicate(1FGate102tower)	22FGate102tower	45,2,2
+1@tower,184,51,0	duplicate(1FGate102tower)	23FGate102tower	45,2,2
+1@tower,270,51,0	duplicate(1FGate102tower)	24FGate102tower	45,2,2
 
-1@tower,184,51,0	script	23FGate102tower	45,2,2,{
+1@tower,355,51,0	script	25FGate102tower	45,2,2,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("23FGate102tower", instance_id());
+	disablenpc instance_npcname("25FGate102tower");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("23FGate102tower", instance_id());
-	areamonster "1@tower",267,9,277,45,"Joker",1131,15,instance_npcname("23FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,9,277,45,"Carat",1267,15,instance_npcname("23FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",267,9,277,45,"Jakk",1130,10,instance_npcname("23FGate102tower", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("25FGate102tower");
+	initnpctimer;
 	end;
 
 OnTouch_:
-	warp "1@tower",310,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("23FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 24
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 24th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
+	getitem 6000,1; //Dark_Ashes
+	warp instance_mapname("2@tower"),52,354;
 	end;
 
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 24th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("24FGate102tower", instance_id())+"::OnEnable";
+OnTimer120000:
+	disablenpc instance_npcname("25FGate102tower");
+	donpcevent instance_npcname("25FGate102tower-2")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
 
-1@tower,270,51,0	script	24FGate102tower	45,2,2,{
+1@tower,355,51,0	script	25FGate102tower-2	45,2,2,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("24FGate102tower", instance_id());
+	disablenpc instance_npcname("25FGate102tower-2");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("24FGate102tower", instance_id());
-	areamonster "1@tower",352,9,362,45,"Cat o' Nine Tails",1307,15,instance_npcname("24FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,9,362,45,"Moonlight",1150,1,instance_npcname("24FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "1@tower",352,9,362,45,"Nine Tail",1180,15,instance_npcname("24FGate102tower", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("25FGate102tower-2");
 	end;
 
 OnTouch_:
-	warp "1@tower",395,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@tower",instance_npcname("24FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 25
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 25th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 25th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("25FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
+	warp instance_mapname("2@tower"),52,354;
 	end;
 }
 
-1@tower,355,51,0	script	25FGate102tower	45,2,2,{
+1@tower,71,4,0	script	#Broadcast Mode1	844,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("25FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("25FGate102tower", instance_id());
 	initnpctimer;
 	end;
 
-OnTouch_:
-	getitem 6000,1; //Dark_Ashes
-	warp "2@tower",52,354;
+OnTimer15000:
+OnTimer60000:
+	mapannounce instance_mapname("1@tower"), "Notice : In any abnormal situation where you defeat a monster, you can't advance to the next level!",bc_map,"0xff0000";
 	end;
-
 OnTimer120000:
-	disablenpc instance_npcname("25FGate102tower", instance_id());
-	donpcevent instance_npcname("25FGate102tower-2", instance_id())+"::OnEnable";
+	mapannounce instance_mapname("1@tower"), "Notice : In any abnormal situation where you defeat a monster, you can't advance to the next level!",bc_map,"0xff0000";
 	stopnpctimer;
 	end;
 }
 
-1@tower,355,51,0	script	25FGate102tower-2	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("25FGate102tower-2", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("25FGate102tower-2", instance_id());
-	end;
-
-OnTouch_:
-	warp "2@tower",52,354;
-	end;
-}
-
-/*
 1@tower,71,1,0	script	#Manager Mode1	844,{
+	callfunc "F_GM_NPC";
 	mes "Please enter the password.";
-	input .@inputstr$;
+	set .@i, callfunc("F_GM_NPC","dmc2008",1);
 	next;
-	if (.@inputstr$ == "dmc2008") {
+	if (.@i == 1) {
 		mes "This NPC manages the tower from the 1st to the 25th Level.";
 		mes "Please enter the Level number to open.";
 		mes "(i.g.: 1F->1, 25F->25)";
@@ -1459,13 +1394,12 @@ OnTouch_:
 		if (.@input < 1 || .@input > 25)
 			mes "You can only enter a number from 1 to 25.";
 		else {
-			donpcevent instance_npcname(.@input+"FGate102tower", instance_id())+"::OnEnable";
+			donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable";
 			mes "*** Level "+ .@input + " is now being opened. ***";
 		}
 	}
 	close;
 }
-*/
 
 // Levels 26-50
 //============================================================
@@ -1473,917 +1407,75 @@ OnTouch_:
 	end;
 
 OnInstanceInit:
-	areamonster "2@tower",9,351,19,387,"Gibbet",1503,10,instance_npcname("Immortal Furnace#1", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,351,19,387,"Enchanted Peach Tree",1410,10,instance_npcname("Immortal Furnace#1", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,351,19,387,"Wooden Golem",1497,10,instance_npcname("Immortal Furnace#1", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,351,19,387,"Stone Shooter",1495,10,instance_npcname("Immortal Furnace#1", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,351,19,387,"Elder Willow",1033,5,instance_npcname("Immortal Furnace#1", instance_id())+"::OnMyMobDead";
+	callfunc "F_Tower_Monster",
+		26,
+		instance_mapname("2@tower"),
+		instance_npcname("Immortal Furnace#1")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("Immortal Furnace#1", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("2@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("Immortal Furnace#1")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
 		initnpctimer;
 		//SetItemPartyInMap in_102floor 26
 	}
 	else
-		instance_announce -1, "Remaining Monsters on the 26th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 26th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("26FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,12,393,0	script	26FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("26FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("26FGate102tower", instance_id());
-	areamonster "2@tower",93,351,103,387,"Goblin Archer",1258,10,instance_npcname("26FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,351,103,387,"Goblin",1122,10,instance_npcname("26FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,351,103,387,"Goblin",1123,5,instance_npcname("26FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,351,103,387,"Goblin",1124,5,instance_npcname("26FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,351,103,387,"Gobin",1125,5,instance_npcname("26FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,351,103,387,"Goblin",1126,5,instance_npcname("26FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",136,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("26FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 27
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 27th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 27th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("27FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,96,393,0	script	27FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("27FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("27FGate102tower", instance_id());
-	areamonster "2@tower",181,351,191,387,"Arclouse",1194,30,instance_npcname("27FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,351,191,387,"Neraid",1255,15,instance_npcname("27FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,351,191,387,"Pest",1256,15,instance_npcname("27FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,351,191,387,"Kukre",1070,10,instance_npcname("27FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",224,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("27FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 28
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 28th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 28th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("28FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,184,393,0	script	28FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("28FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("28FGate102tower", instance_id());
-	areamonster "2@tower",267,351,277,387,"Dark Frame",1260,10,instance_npcname("28FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,351,277,387,"The Paper",1375,10,instance_npcname("28FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,351,277,387,"Hylozoist",1510,10,instance_npcname("28FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,351,277,387,"Quve",1508,5,instance_npcname("28FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,351,277,387,"Lude",1509,5,instance_npcname("28FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,351,277,387,"Whisper",1179,10,instance_npcname("28FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",310,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("28FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 29
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 29th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 29th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("29FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,270,393,0	script	29FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("29FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("29FGate102tower", instance_id());
-	areamonster "2@tower",352,351,362,387,"White Lady",1630,1,instance_npcname("29FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,351,362,387,"Evil Nymph",1416,30,instance_npcname("29FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",395,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("29FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 30
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 30th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 30th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("30FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,355,393,0	script	30FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("30FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("30FGate102tower", instance_id());
-	areamonster "2@tower",9,267,19,303,"Gig",1387,20,instance_npcname("30FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,267,19,303,"Iron Fist",1212,15,instance_npcname("30FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,267,19,303,"Argiope",1099,10,instance_npcname("30FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,267,19,303,"Scorpion",1001,5,instance_npcname("30FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",52,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("30FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 31
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 31st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 31st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("31FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,12,309,0	script	31FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("31FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("31FGate102tower", instance_id());
-	areamonster "2@tower",93,267,103,303,"Goblin Leader",1299,1,instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,267,103,303,"Goblin Archer",1258,10,instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,267,103,303,"Goblin",1122,10,instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,267,103,303,"Goblin",1123,5,instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,267,103,303,"Goblin",1124,5,instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,267,103,303,"Goblin",1125,5,instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,267,103,303,"Goblin",1126,5,instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",136,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("31FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 32
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 32nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 32nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("32FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,96,309,0	script	32FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("32FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("32FGate102tower", instance_id());
-	areamonster "2@tower",181,267,191,303,"Kobold Leader",1296,1,instance_npcname("32FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,267,191,303,"Kobold",1133,15,instance_npcname("32FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,267,191,303,"Kobold_Archer",1282,15,instance_npcname("32FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,267,191,303,"Kobold",1134,10,instance_npcname("32FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,267,191,303,"Kobold",1135,5,instance_npcname("32FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",224,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("32FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 33
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 33rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 33rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("33FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,184,309,0	script	33FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("33FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("33FGate102tower", instance_id());
-	areamonster "2@tower",267,267,277,303,"Flame Skull",1869,20,instance_npcname("33FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,267,277,303,"Whisper",1179,10,instance_npcname("33FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,267,277,303,"Giant Whisper",1186,10,instance_npcname("33FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",310,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("33FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 34
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 34th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 34th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("34FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,270,309,0	script	34FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("34FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("34FGate102tower", instance_id());
-	areamonster "2@tower",352,267,362,303,"Turtle General",1312,1,instance_npcname("34FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,267,362,303,"Freezer",1319,10,instance_npcname("34FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,267,362,303,"Solider",1316,10,instance_npcname("34FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,267,362,303,"Heater",1318,10,instance_npcname("34FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,267,362,303,"Permeter",1314,10,instance_npcname("34FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",395,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("34FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 35
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 35th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 35th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("35FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,355,309,0	script	35FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("35FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("35FGate102tower", instance_id());
-	areamonster "2@tower",9,180,19,216,"Anolian",1206,30,instance_npcname("35FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,180,19,216,"Grove",1687,10,instance_npcname("35FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,180,19,216,"Alligator",1271,10,instance_npcname("35FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",52,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("35FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 36
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 36th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 36th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("36FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,12,222,0	script	36FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("36FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("36FGate102tower", instance_id());
-	areamonster "2@tower",93,180,103,216,"Clock Tower Manager",1270,10,instance_npcname("36FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,180,103,216,"Clock",1269,10,instance_npcname("36FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,180,103,216,"Alarm",1193,30,instance_npcname("36FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",136,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("36FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 37
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 37th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 37th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("37FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,96,222,0	script	37FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("37FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("37FGate102tower", instance_id());
-	areamonster "2@tower",181,180,191,216,"Death Word",1698,25,instance_npcname("37FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,180,191,216,"Rideword",1195,25,instance_npcname("37FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",224,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("37FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 38
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 38th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 38th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("38FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,184,222,0	script	38FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("38FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("38FGate102tower", instance_id());
-	areamonster "2@tower",267,180,277,216,"Evil Nymph",1416,10,instance_npcname("38FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,180,277,216,"Mao Gui",1513,10,instance_npcname("38FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,180,277,216,"Taoist Hermit",1412,10,instance_npcname("38FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,180,277,216,"Zhu Po Long",1514,10,instance_npcname("38FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,180,277,216,"Jin Guai",1517,5,instance_npcname("38FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",310,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("38FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 39
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 39th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 39th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("39FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,270,222,0	script	39FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("39FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("39FGate102tower", instance_id());
-	areamonster "2@tower",352,180,362,216,"Samurai Specter",1492,1,instance_npcname("39FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,180,362,216,"Shinobi",1401,10,instance_npcname("39FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,180,362,216,"Tengu",1405,10,instance_npcname("39FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,180,362,216,"Firelock Soldier",1403,5,instance_npcname("39FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,180,362,216,"Miyabi Doll",1404,10,instance_npcname("39FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,180,362,216,"Karakasa",1400,5,instance_npcname("39FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",395,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("39FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 40
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 40th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 40th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("40FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,355,222,0	script	40FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("40FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("40FGate102tower", instance_id());
-	areamonster "2@tower",9,96,19,132,"Kraben",1587,50,instance_npcname("40FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",52,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("40FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 41
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 41st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 41st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("41FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,12,138,0	script	41FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("41FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("41FGate102tower", instance_id());
-	areamonster "2@tower",93,96,103,132,"Sleeper",1386,20,instance_npcname("41FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,96,103,132,"Sting",1207,10,instance_npcname("41FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,96,103,132,"Mi Gao",1516,10,instance_npcname("41FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,96,103,132,"Sandman",1165,5,instance_npcname("41FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,96,103,132,"Hode",1127,5,instance_npcname("41FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",136,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("41FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 42
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 42nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 42nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("42FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,96,138,0	script	42FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("42FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("42FGate102tower", instance_id());
-	areamonster "2@tower",181,96,191,132,"Medusa",1148,10,instance_npcname("42FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,96,191,132,"Sidewinder",1037,40,instance_npcname("42FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,96,191,132,"Anacondaq",1030,5,instance_npcname("42FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,96,191,132,"Boa",1025,5,instance_npcname("42FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",224,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("42FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 43
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 43rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 43rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("43FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,184,138,0	script	43FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("43FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("43FGate102tower", instance_id());
-	areamonster "2@tower",267,96,277,132,"Hatii Baby",1515,20,instance_npcname("43FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,96,277,132,"Baphomet Jr.",1101,20,instance_npcname("43FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,96,277,132,"Orc Baby",1686,1,instance_npcname("43FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,96,277,132,"Baby Desert Wolf",1107,10,instance_npcname("43FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,96,277,132,"Savage Babe",1167,10,instance_npcname("43FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",310,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("43FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 44
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 44th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 44th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("44FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,270,138,0	script	44FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("44FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("44FGate102tower", instance_id());
-	areamonster "2@tower",352,96,362,132,"Osiris",1038,1,instance_npcname("44FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,96,362,132,"Ancient Mummy",1297,15,instance_npcname("44FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,96,362,132,"Verit",1032,15,instance_npcname("44FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,96,362,132,"Mummy",1041,20,instance_npcname("44FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",395,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("44FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 45
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 45th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 45th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("45FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,355,138,0	script	45FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("45FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("45FGate102tower", instance_id());
-	areamonster "2@tower",9,9,19,45,"Seeker",1774,20,instance_npcname("45FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",9,9,19,45,"Beholder",1633,20,instance_npcname("45FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",52,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("45FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 46
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 46th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 46th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("46FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,12,51,0	script	46FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("46FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("46FGate102tower", instance_id());
-	areamonster "2@tower",93,9,103,45,"Deleter",1384,20,instance_npcname("46FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,9,103,45,"Deleter",1385,10,instance_npcname("46FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,9,103,45,"Petite",1156,10,instance_npcname("46FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",93,9,103,45,"Petite",1155,10,instance_npcname("46FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",136,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("46FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 47
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 47 Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 47th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("47FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,96,51,0	script	47FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("47FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("47FGate102tower", instance_id());
-	areamonster "2@tower",181,9,191,45,"Ancient Worm",1305,10,instance_npcname("47FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,9,191,45,"Ancient Mummy",1297,10,instance_npcname("47FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",181,9,191,45,"Ancient Mimic",1699,10,instance_npcname("47FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",224,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("47FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 48
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 48th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
+		mapannounce .@map$, "Remaining Monsters on the 26th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
 	end;
 
 OnTimer5000:
-	instance_announce -1, "All Monsters on the 48th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("48FGate102tower", instance_id())+"::OnEnable";
+	mapannounce instance_mapname("2@tower"), "All Monsters on the 26th Level have been defeated.",bc_map,"0xffff00";
+	donpcevent instance_npcname("26FGate102tower")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
 
-2@tower,184,51,0	script	48FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("48FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("48FGate102tower", instance_id());
-	areamonster "2@tower",267,9,277,45,"Grizzly",1381,20,instance_npcname("48FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,9,277,45,"Leib Olmai",1306,7,instance_npcname("48FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,9,277,45,"Zipper Bear",1417,5,instance_npcname("48FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,9,277,45,"Sasquatch",1243,5,instance_npcname("48FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",267,9,277,45,"Bigfoot",1060,5,instance_npcname("48FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",310,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("48FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 49
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 49th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 49th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("49FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-2@tower,270,51,0	script	49FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("49FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("49FGate102tower", instance_id());
-	areamonster "2@tower",352,9,362,45,"Pharaoh",1157,1,instance_npcname("49FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,9,362,45,"Amon Ra",1511,1,instance_npcname("49FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,9,362,45,"Anubis",1098,10,instance_npcname("49FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,9,362,45,"Marduk",1140,10,instance_npcname("49FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "2@tower",352,9,362,45,"Matyr",1146,10,instance_npcname("49FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "2@tower",395,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@tower",instance_npcname("49FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 50
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 50th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 50th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("50FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
+2@tower,12,393,0	duplicate(1FGate102tower)	26FGate102tower	45,2,2
+2@tower,96,393,0	duplicate(1FGate102tower)	27FGate102tower	45,2,2
+2@tower,184,393,0	duplicate(1FGate102tower)	28FGate102tower	45,2,2
+2@tower,270,393,0	duplicate(1FGate102tower)	29FGate102tower	45,2,2
+2@tower,355,393,0	duplicate(1FGate102tower)	30FGate102tower	45,2,2
+2@tower,12,309,0	duplicate(1FGate102tower)	31FGate102tower	45,2,2
+2@tower,96,309,0	duplicate(1FGate102tower)	32FGate102tower	45,2,2
+2@tower,184,309,0	duplicate(1FGate102tower)	33FGate102tower	45,2,2
+2@tower,270,309,0	duplicate(1FGate102tower)	34FGate102tower	45,2,2
+2@tower,355,309,0	duplicate(1FGate102tower)	35FGate102tower	45,2,2
+2@tower,12,222,0	duplicate(1FGate102tower)	36FGate102tower	45,2,2
+2@tower,96,222,0	duplicate(1FGate102tower)	37FGate102tower	45,2,2
+2@tower,184,222,0	duplicate(1FGate102tower)	38FGate102tower	45,2,2
+2@tower,270,222,0	duplicate(1FGate102tower)	39FGate102tower	45,2,2
+2@tower,355,222,0	duplicate(1FGate102tower)	40FGate102tower	45,2,2
+2@tower,12,138,0	duplicate(1FGate102tower)	41FGate102tower	45,2,2
+2@tower,96,138,0	duplicate(1FGate102tower)	42FGate102tower	45,2,2
+2@tower,184,138,0	duplicate(1FGate102tower)	43FGate102tower	45,2,2
+2@tower,270,138,0	duplicate(1FGate102tower)	44FGate102tower	45,2,2
+2@tower,355,138,0	duplicate(1FGate102tower)	45FGate102tower	45,2,2
+2@tower,12,51,0	duplicate(1FGate102tower)	46FGate102tower	45,2,2
+2@tower,96,51,0	duplicate(1FGate102tower)	47FGate102tower	45,2,2
+2@tower,184,51,0	duplicate(1FGate102tower)	48FGate102tower	45,2,2
+2@tower,270,51,0	duplicate(1FGate102tower)	49FGate102tower	45,2,2
 
 2@tower,355,51,0	script	50FGate102tower	45,2,2,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("50FGate102tower", instance_id());
+	disablenpc instance_npcname("50FGate102tower");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("50FGate102tower", instance_id());
+	enablenpc instance_npcname("50FGate102tower");
 	initnpctimer;
 	end;
 
 OnTouch_:
 	getitem 6000,1; //Dark_Ashes
-	warp "3@tower",52,354;
+	warp instance_mapname("3@tower"),52,354;
 	end;
 
 OnTimer120000:
-	disablenpc instance_npcname("50FGate102tower", instance_id());
-	donpcevent instance_npcname("50FGate102tower-2", instance_id())+"::OnEnable";
+	disablenpc instance_npcname("50FGate102tower");
+	donpcevent instance_npcname("50FGate102tower-2")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
@@ -2392,24 +1484,24 @@ OnTimer120000:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("50FGate102tower-2", instance_id());
+	disablenpc instance_npcname("50FGate102tower-2");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("50FGate102tower-2", instance_id());
+	enablenpc instance_npcname("50FGate102tower-2");
 	end;
 
 OnTouch_:
-	warp "3@tower",52,354;
+	warp instance_mapname("3@tower"),52,354;
 	end;
 }
 
-/*
 2@tower,71,1,0	script	#Manager Mode2	844,{
+	callfunc "F_GM_NPC";
 	mes "Please enter the password.";
-	input .@inputstr$;
+	set .@i, callfunc("F_GM_NPC","dmc2008",1);
 	next;
-	if (.@inputstr$ == "dmc2008") {
+	if (.@i == 1) {
 		mes "This NPC manages the tower from the 26st to the 50th Level.";
 		mes "Please enter the Level number to open.";
 		mes "(i.g.: 26F->26, 50F->50)";
@@ -2418,13 +1510,12 @@ OnTouch_:
 		if (.@onput < 26 || .@input > 50)
 			mes "You can only enter a number from 26 to 50.";
 		else {
-			donpcevent instance_npcname(.@input+"FGate102tower", instance_id())+"::OnEnable";
+			donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable";
 			mes "*** Level "+ .@input + " is now being opened. ***";
 		}
 	}
 	close;
 }
-*/
 
 // Levels 51-75
 //============================================================
@@ -2432,929 +1523,75 @@ OnTouch_:
 	end;
 
 OnInstanceInit:
-	areamonster "3@tower",9,351,19,387,"Mini Demon",1292,20,instance_npcname("Immortal Furnace#2", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,351,19,387,"Diabolic",1382,20,instance_npcname("Immortal Furnace#2", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,351,19,387,"Deviruchi",1109,10,instance_npcname("Immortal Furnace#2", instance_id())+"::OnMyMobDead";
+	callfunc "F_Tower_Monster",
+		51,
+		instance_mapname("3@tower"),
+		instance_npcname("Immortal Furnace#2")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("Immortal Furnace#2", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("3@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("Immortal Furnace#2")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
 		initnpctimer;
 		//SetItemPartyInMap in_102floor 51
 	}
 	else
-		instance_announce -1, "Remaining Monsters on the 51st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 51st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("51FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,12,393,0	script	51FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("51FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("51FGate102tower", instance_id());
-	areamonster "3@tower",93,351,103,387,"Harpy",1376,20,instance_npcname("51FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,351,103,387,"Grand Peco",1369,10,instance_npcname("51FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,351,103,387,"Bloody Butterfly",1408,10,instance_npcname("51FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,351,103,387,"Gargoyle",1253,10,instance_npcname("51FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,351,103,387,"Hill Wind",1680,5,instance_npcname("51FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,351,103,387,"Hill Wind",1629,5,instance_npcname("51FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",136,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("51FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 52
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 52nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 52nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("52FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,96,393,0	script	52FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("52FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("52FGate102tower", instance_id());
-	areamonster "3@tower",181,351,191,387,"Assaulter",1315,25,instance_npcname("52FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,351,191,387,"Shinobi",1401,30,instance_npcname("52FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",224,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("52FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 53
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 53rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 53rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("53FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,184,393,0	script	53FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("53FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("53FGate102tower", instance_id());
-	areamonster "3@tower",267,351,277,387,"Chepet",1250,10,instance_npcname("53FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,351,277,387,"Mariontte",1143,10,instance_npcname("53FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,351,277,387,"Miyabi Doll",1404,10,instance_npcname("53FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",310,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("53FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 54
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 54th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 54th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("54FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,270,393,0	script	54FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("54FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("54FGate102tower", instance_id());
-	areamonster "3@tower",352,351,362,387,"Medusa",1148,25,instance_npcname("54FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,351,362,387,"Evil Snake Lord",1418,1,instance_npcname("54FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,351,362,387,"Isis",1029,15,instance_npcname("54FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,351,362,387,"Sidewinder",1037,15,instance_npcname("54FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",395,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("54FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 55
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 55th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 55th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("55FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,355,393,0	script	55FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("55FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("55FGate102tower", instance_id());
-	areamonster "3@tower",9,267,19,303,"Freezer",1319,10,instance_npcname("55FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,267,19,303,"Hatii Baby",1515,10,instance_npcname("55FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,267,19,303,"Ice Titan",1777,15,instance_npcname("55FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,267,19,303,"Snowier",1775,10,instance_npcname("55FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,267,19,303,"Gazeti",1778,10,instance_npcname("55FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",52,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("55FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 56
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 56th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 56th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("56FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,12,309,0	script	56FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("56FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("56FGate102tower", instance_id());
-	areamonster "3@tower",93,267,103,303,"Arc Angeling",1388,1,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Deviling",1582,1,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Angeling",1096,1,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Ghostring",1120,1,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Mastering",1090,1,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Metaling",1613,25,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Marin",1242,5,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Poporing",1031,5,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,267,103,303,"Drops",1113,5,instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",136,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("56FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 57
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 57th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 57th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("57FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,96,309,0	script	57FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("57FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("57FGate102tower", instance_id());
-	areamonster "3@tower",181,267,191,303,"Phendark",1202,20,instance_npcname("57FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,267,191,303,"Rybio",1201,10,instance_npcname("57FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,267,191,303,"Zombie Prisoner",1197,10,instance_npcname("57FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,267,191,303,"Skeleton Prisoner",1196,5,instance_npcname("57FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,267,191,303,"Injustice",1257,5,instance_npcname("57FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",224,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("57FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 58
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 58th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 58th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("58FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,184,309,0	script	58FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("58FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("58FGate102tower", instance_id());
-	areamonster "3@tower",267,267,277,303,"Ancient Mimic",1699,30,instance_npcname("58FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,267,277,303,"Mimic",1191,20,instance_npcname("58FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,267,277,303,"Mystcase",1249,10,instance_npcname("58FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",310,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("58FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 59
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 59th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 59th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("59FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,270,309,0	script	59FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("59FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("59FGate102tower", instance_id());
-	areamonster "3@tower",352,267,362,303,"Egnigem Cenia",1658,1,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,267,362,303,"Doppelganger",1046,1,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,267,362,303,"Armeyer Dinze",1654,10,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,267,362,303,"Wickebine Tres",1653,10,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,267,362,303,"Laurell Winder",1657,10,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,267,362,303,"Kavach Icarus",1656,10,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,267,362,303,"Errende Ebecee",1655,10,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,267,362,303,"Egnigem Cenia",1652,10,instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",395,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("59FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 60
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 60th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 60th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("60FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,355,309,0	script	60FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("60FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("60FGate102tower", instance_id());
-	areamonster "3@tower",9,180,19,216,"Agav",1769,10,instance_npcname("60FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,180,19,216,"Echio",1770,10,instance_npcname("60FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,180,19,216,"Isilla",1772,5,instance_npcname("60FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,180,19,216,"Mobster",1313,10,instance_npcname("60FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,180,19,216,"Pasana",1154,10,instance_npcname("60FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,180,19,216,"Vanberk",1771,5,instance_npcname("60FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",52,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("60FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 61
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 61st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 61st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("61FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,12,222,0	script	61FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("61FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("61FGate102tower", instance_id());
-	areamonster "3@tower",93,180,103,216,"Wanderer",1208,35,instance_npcname("61FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",136,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("61FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 62
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 62nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 62nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("62FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,96,222,0	script	62FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("62FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("62FGate102tower", instance_id());
-	areamonster "3@tower",181,180,191,216,"Ragged Zombie",1865,20,instance_npcname("62FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,180,191,216,"Zombie Master",1298,10,instance_npcname("62FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,180,191,216,"Zombie Prisoner",1197,5,instance_npcname("62FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,180,191,216,"Orc Zombie",1153,5,instance_npcname("62FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,180,191,216,"Zombie",1015,5,instance_npcname("62FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",224,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("62FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 63
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 63rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 63rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("63FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,184,222,0	script	63FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("63FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("63FGate102tower", instance_id());
-	areamonster "3@tower",267,180,277,216,"Ungoliant",1618,30,instance_npcname("63FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,180,277,216,"Ancient Worm",1305,2,instance_npcname("63FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,180,277,216,"Caterpillar",1300,2,instance_npcname("63FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,180,277,216,"Creamy Fear",1293,2,instance_npcname("63FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,180,277,216,"Killer Mantis",1294,2,instance_npcname("63FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,180,277,216,"Giant Hornet",1303,2,instance_npcname("63FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",310,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("63FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 64
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 64th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 64th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("64FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,270,222,0	script	64FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("64FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("64FGate102tower", instance_id());
-	areamonster "3@tower",352,180,362,216,"Atros",1785,1,instance_npcname("64FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,180,362,216,"Galion",1783,20,instance_npcname("64FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",395,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("64FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 65
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 65th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
+		mapannounce .@map$, "Remaining Monsters on the 51st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
 	end;
 
 OnTimer5000:
-	instance_announce -1, "All Monsters on the 65th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("65FGate102tower", instance_id())+"::OnEnable";
+	mapannounce instance_mapname("3@tower"), "All Monsters on the 51st Level have been defeated.",bc_map,"0xffff00";
+	donpcevent instance_npcname("51FGate102tower")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
 
-3@tower,355,222,0	script	65FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("65FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("65FGate102tower", instance_id());
-	areamonster "3@tower",9,96,19,132,"Incubus",1374,20,instance_npcname("65FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,96,19,132,"Aliot",1736,20,instance_npcname("65FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,96,19,132,"Injustice",1257,10,instance_npcname("65FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",52,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("65FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 66
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 66th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 66th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("66FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,12,138,0	script	66FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("66FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("66FGate102tower", instance_id());
-	areamonster "3@tower",93,96,103,132,"Acidus",1716,10,instance_npcname("66FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,96,103,132,"Acidus",1713,10,instance_npcname("66FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,96,103,132,"Deleter",1384,5,instance_npcname("66FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,96,103,132,"Mutant Dragonoid",1262,10,instance_npcname("66FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,96,103,132,"Petite",1156,5,instance_npcname("66FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",136,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("66FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 67
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 67th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 67th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("67FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,96,138,0	script	67FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("67FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("67FGate102tower", instance_id());
-	areamonster "3@tower",181,96,191,132,"Lava Golem",1366,10,instance_npcname("67FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,96,191,132,"Stalactic Golem",1278,10,instance_npcname("67FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,96,191,132,"Ice Titan",1777,10,instance_npcname("67FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,96,191,132,"Wooden Golem",1497,5,instance_npcname("67FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,96,191,132,"Golem",1040,5,instance_npcname("67FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",224,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("67FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 68
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 68th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 68th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("68FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,184,138,0	script	68FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("68FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("68FGate102tower", instance_id());
-	areamonster "3@tower",267,96,277,132,"Dame of Sentinel",1700,20,instance_npcname("68FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,96,277,132,"Mistress of Shelter",1701,10,instance_npcname("68FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,96,277,132,"Baroness of Retribution",1702,10,instance_npcname("68FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,96,277,132,"Lady Solace",1703,10,instance_npcname("68FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,96,277,132,"False Angel",1371,10,instance_npcname("68FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",310,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("68FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 69
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 69th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 69th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("69FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,270,138,0	script	69FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("69FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("69FGate102tower", instance_id());
-	areamonster "3@tower",352,96,362,132,"Orc Hero",1087,1,instance_npcname("69FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,96,362,132,"Orc Lord",1190,1,instance_npcname("69FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,96,362,132,"Orc Baby",1686,20,instance_npcname("69FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",395,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("69FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 70
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 70th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 70th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("70FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,355,138,0	script	70FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("70FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("70FGate102tower", instance_id());
-	areamonster "3@tower",9,9,19,45,"Succubus",1370,20,instance_npcname("70FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,9,19,45,"Nightmare Terror",1379,20,instance_npcname("70FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,9,19,45,"Incubus",1374,20,instance_npcname("70FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",9,9,19,45,"Nightmare",1061,5,instance_npcname("70FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",52,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("70FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 71
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 71st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 71st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("71FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,12,51,0	script	71FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("71FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("71FGate102tower", instance_id());
-	areamonster "3@tower",93,9,103,45,"Margaretha Sorin",1637,10,instance_npcname("71FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,9,103,45,"Permeter",1314,10,instance_npcname("71FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,9,103,45,"Errende Ebecee",1655,10,instance_npcname("71FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",93,9,103,45,"Enchanted Peach Tree",1410,10,instance_npcname("71FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",136,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("71FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 72
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 72nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 72nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("72FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,96,51,0	script	72FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("72FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("72FGate102tower", instance_id());
-	areamonster "3@tower",181,9,191,45,"Succubus",1370,10,instance_npcname("72FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,9,191,45,"Loli Ruri",1505,20,instance_npcname("72FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,9,191,45,"Aliza",1737,10,instance_npcname("72FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,9,191,45,"Zealotus",1200,5,instance_npcname("72FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,9,191,45,"Alice",1275,5,instance_npcname("72FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",181,9,191,45,"Green Maiden",1631,10,instance_npcname("72FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",224,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("72FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 73
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 73rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 73rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("73FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,184,51,0	script	73FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("73FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("73FGate102tower", instance_id());
-	areamonster "3@tower",267,9,277,45,"Dimik",1671,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Dimik",1673,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Dimik",1672,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Venatu",1677,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Dimik",1670,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Archdam",1668,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Venatu",1678,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Venatu",1679,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",267,9,277,45,"Venatu",1676,6,instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",310,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("73FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 74
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 74th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 74th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("74FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-3@tower,270,51,0	script	74FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("74FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("74FGate102tower", instance_id());
-	areamonster "3@tower",352,9,362,45,"Baphomet",1039,1,instance_npcname("74FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,9,362,45,"Dark Lord",1272,1,instance_npcname("74FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,9,362,45,"Baphomet Jr.",1101,20,instance_npcname("74FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "3@tower",352,9,362,45,"Dark Illusion",1302,10,instance_npcname("74FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "3@tower",395,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("3@tower",instance_npcname("74FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 75
-	}
-	else
-		instance_announce -1, "Remaining Monsters on the 75th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1, "All Monsters on the 75th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("75FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
+3@tower,12,393,0	duplicate(1FGate102tower)	51FGate102tower	45,2,2
+3@tower,96,393,0	duplicate(1FGate102tower)	52FGate102tower	45,2,2
+3@tower,184,393,0	duplicate(1FGate102tower)	53FGate102tower	45,2,2
+3@tower,270,393,0	duplicate(1FGate102tower)	54FGate102tower	45,2,2
+3@tower,355,393,0	duplicate(1FGate102tower)	55FGate102tower	45,2,2
+3@tower,12,309,0	duplicate(1FGate102tower)	56FGate102tower	45,2,2
+3@tower,96,309,0	duplicate(1FGate102tower)	57FGate102tower	45,2,2
+3@tower,184,309,0	duplicate(1FGate102tower)	58FGate102tower	45,2,2
+3@tower,270,309,0	duplicate(1FGate102tower)	59FGate102tower	45,2,2
+3@tower,355,309,0	duplicate(1FGate102tower)	60FGate102tower	45,2,2
+3@tower,12,222,0	duplicate(1FGate102tower)	61FGate102tower	45,2,2
+3@tower,96,222,0	duplicate(1FGate102tower)	62FGate102tower	45,2,2
+3@tower,184,222,0	duplicate(1FGate102tower)	63FGate102tower	45,2,2
+3@tower,270,222,0	duplicate(1FGate102tower)	64FGate102tower	45,2,2
+3@tower,355,222,0	duplicate(1FGate102tower)	65FGate102tower	45,2,2
+3@tower,12,138,0	duplicate(1FGate102tower)	66FGate102tower	45,2,2
+3@tower,96,138,0	duplicate(1FGate102tower)	67FGate102tower	45,2,2
+3@tower,184,138,0	duplicate(1FGate102tower)	68FGate102tower	45,2,2
+3@tower,270,138,0	duplicate(1FGate102tower)	69FGate102tower	45,2,2
+3@tower,355,138,0	duplicate(1FGate102tower)	70FGate102tower	45,2,2
+3@tower,12,51,0	duplicate(1FGate102tower)	71FGate102tower	45,2,2
+3@tower,96,51,0	duplicate(1FGate102tower)	72FGate102tower	45,2,2
+3@tower,184,51,0	duplicate(1FGate102tower)	73FGate102tower	45,2,2
+3@tower,270,51,0	duplicate(1FGate102tower)	74FGate102tower	45,2,2
 
 3@tower,355,51,0	script	75FGate102tower	45,1,1,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("75FGate102tower", instance_id());
+	disablenpc instance_npcname("75FGate102tower");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("75FGate102tower", instance_id());
+	enablenpc instance_npcname("75FGate102tower");
 	initnpctimer;
 	end;
 
 OnTouch_:
 	getitem 6000,1; //Dark_Ashes
-	warp "4@tower",52,354;
+	warp instance_mapname("4@tower"),52,354;
 	end;
 
 OnTimer120000:
-	disablenpc instance_npcname("75FGate102tower", instance_id());
-	donpcevent instance_npcname("75FGate102tower-2", instance_id())+"::OnEnable";
+	disablenpc instance_npcname("75FGate102tower");
+	donpcevent instance_npcname("75FGate102tower-2")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
@@ -3363,24 +1600,24 @@ OnTimer120000:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("75FGate102tower-2", instance_id());
+	disablenpc instance_npcname("75FGate102tower-2");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("75FGate102tower-2", instance_id());
+	enablenpc instance_npcname("75FGate102tower-2");
 	end;
 
 OnTouch_:
-	warp "4@tower",52,354;
+	warp instance_mapname("4@tower"),52,354;
 	end;
 }
 
-/*
 3@tower,71,1,0	script	#Manager Mode3	844,{
+	callfunc "F_GM_NPC";
 	mes "Please enter the password.";
-	input .@inputstr$;
+	set .@i, callfunc("F_GM_NPC","dmc2008",1);
 	next;
-	if (.@inputstr$ == "dmc2008") {
+	if (.@i == 1) {
 		mes "This NPC manages the tower from the 51st to the 75th Level.";
 		mes "Please enter the Level number to open.";
 		mes "(i.g.: 51F->51, 75F->75)";
@@ -3389,13 +1626,12 @@ OnTouch_:
 		if (.@input < 51 || .@input > 75)
 			mes "You can only enter a number from 51 to 75.";
 		else {
-			donpcevent instance_npcname(.@input+"FGate102tower", instance_id())+"::OnEnable";
+			donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable";
 			mes "*** Level "+ .@input + " is now being opened. ***";
 		}
 	}
 	close;
 }
-*/
 
 // Levels 76-99
 //============================================================
@@ -3403,935 +1639,74 @@ OnTouch_:
 	end;
 
 OnInstanceInit:
-	areamonster "4@tower",9,351,19,387,"Abysmal Knight",1219,30,instance_npcname("Immortal Furnace#3", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,351,19,387,"Nightmare Terror",1379,20,instance_npcname("Immortal Furnace#3", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,351,19,387,"Nightmare",1061,10,instance_npcname("Immortal Furnace#3", instance_id())+"::OnMyMobDead";
+	callfunc "F_Tower_Monster",
+		76,
+		instance_mapname("4@tower"),
+		instance_npcname("Immortal Furnace#3")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("Immortal Furnace#3", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("4@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("Immortal Furnace#3")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
 		initnpctimer;
 		//SetItemPartyInMap in_102floor 76
 	}
 	else
-		instance_announce -1,"Remaining Monsters on the 76th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 76th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("76FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,12,393,0	script	76FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("76FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("76FGate102tower", instance_id());
-	areamonster "4@tower",93,351,103,387,"Banshee",1867,30,instance_npcname("76FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,351,103,387,"Wraith Dead",1291,10,instance_npcname("76FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,351,103,387,"Evil Druid",1117,10,instance_npcname("76FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,351,103,387,"Wraith",1192,10,instance_npcname("76FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,351,103,387,"Wind Ghost",1263,10,instance_npcname("76FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",136,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("76FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 77
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 77th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 77th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("77FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,96,393,0	script	77FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("77FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("77FGate102tower", instance_id());
-	areamonster "4@tower",181,351,191,387,"Sword Master",1829,5,instance_npcname("77FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,351,191,387,"Bloody Knight",1268,10,instance_npcname("77FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,351,191,387,"Abysmal Knight",1219,5,instance_npcname("77FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,351,191,387,"Dullahan",1504,10,instance_npcname("77FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,351,191,387,"Raydric",1163,20,instance_npcname("77FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",224,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("77FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 78
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 78th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the Level 78th have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("78FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,184,393,0	script	78FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("78FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("78FGate102tower", instance_id());
-	areamonster "4@tower",267,351,277,387,"Hydro",1720,10,instance_npcname("78FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,351,277,387,"Ferus",1714,10,instance_npcname("78FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,351,277,387,"Ferus",1717,10,instance_npcname("78FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,351,277,387,"Deleter",1385,5,instance_npcname("78FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,351,277,387,"Petite",1155,5,instance_npcname("78FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",310,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("78FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 79
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 79th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
+		mapannounce .@map$,"Remaining Monsters on the 76th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
 	end;
 
 OnTimer5000:
-	instance_announce -1,"All Monsters on the 79th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("79FGate102tower", instance_id())+"::OnEnable";
+	mapannounce instance_mapname("4@tower"),"All Monsters on the 76th Level have been defeated.",bc_map,"0xffff00";
+	donpcevent instance_npcname("76FGate102tower")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
 
-4@tower,270,393,0	script	79FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("79FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("79FGate102tower", instance_id());
-	areamonster "4@tower",352,351,362,387,"Falling Bishop",1871,1,instance_npcname("79FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,351,362,387,"Necromancer",1870,15,instance_npcname("79FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",395,354;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("79FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 80
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 80th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 80th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("80FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,355,393,0	script	80FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("80FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("80FGate102tower", instance_id());
-	areamonster "4@tower",9,267,19,303,"Mysteltainn",1203,20,instance_npcname("80FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,267,19,303,"Ogretooth",1204,20,instance_npcname("80FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,267,19,303,"Executioner",1205,20,instance_npcname("80FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",52,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("80FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 81
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 81st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 81st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("81FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,12,309,0	script	81FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("81FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("81FGate102tower", instance_id());
-	areamonster "4@tower",93,267,103,303,"Bloody Knight",1268,10,instance_npcname("81FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,267,103,303,"Agav",1769,10,instance_npcname("81FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,267,103,303,"Bloody Murderer",1507,10,instance_npcname("81FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,267,103,303,"Skogul",1752,10,instance_npcname("81FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,267,103,303,"Injustice",1257,10,instance_npcname("81FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",136,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("81FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 82
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 82nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 82nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("82FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,96,309,0	script	82FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("82FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("82FGate102tower", instance_id());
-	areamonster "4@tower",181,267,191,303,"Skeggiold",1754,10,instance_npcname("82FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,267,191,303,"Dark Illusion",1302,10,instance_npcname("82FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,267,191,303,"Gryphon",1259,10,instance_npcname("82FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,267,191,303,"Chimera",1283,10,instance_npcname("82FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",224,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("82FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 83
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 83rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 83rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("83FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,184,309,0	script	83FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("83FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("83FGate102tower", instance_id());
-	areamonster "4@tower",267,267,277,303,"Succubus",1370,10,instance_npcname("83FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,267,277,303,"Dark Illusion",1302,20,instance_npcname("83FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,267,277,303,"Owl Duke",1320,10,instance_npcname("83FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,267,277,303,"Owl Baron",1295,10,instance_npcname("83FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,267,277,303,"Incubus",1374,10,instance_npcname("83FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",310,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("83FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 84
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 84th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 84th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("84FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,270,309,0	script	84FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("84FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("84FGate102tower", instance_id());
-	areamonster "4@tower",352,267,362,303,"Ifrit",1832,1,instance_npcname("84FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",395,270;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("84FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 85
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 85th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 85th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("85FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,355,309,0	script	85FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("85FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("85FGate102tower", instance_id());
-	areamonster "4@tower",9,180,19,216,"Hydro",1720,10,instance_npcname("85FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,180,19,216,"Gryphon",1259,10,instance_npcname("85FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,180,19,216,"Chimera",1283,10,instance_npcname("85FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,180,19,216,"Majoruros",1310,10,instance_npcname("85FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",52,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("85FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 86
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 86th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 86th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("86FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,12,222,0	script	86FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("86FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("86FGate102tower", instance_id());
-	areamonster "4@tower",93,180,103,216,"Salamander",1831,15,instance_npcname("86FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,180,103,216,"Kasa",1833,20,instance_npcname("86FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,180,103,216,"Lava Golem",1366,15,instance_npcname("86FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,180,103,216,"Gajomart",1309,10,instance_npcname("86FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",136,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("86FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 87
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 87th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 87th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("87FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,96,222,0	script	87FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("87FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("87FGate102tower", instance_id());
-	areamonster "4@tower",181,180,191,216,"Necromancer",1870,15,instance_npcname("87FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,180,191,216,"Anubis",1098,15,instance_npcname("87FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,180,191,216,"Wraith Dead",1291,10,instance_npcname("87FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,180,191,216,"Ancient Mummy",1297,10,instance_npcname("87FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,180,191,216,"Khalitzburg",1132,10,instance_npcname("87FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",224,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("87FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 88
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 88th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 88th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("88FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,184,222,0	script	88FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("88FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("88FGate102tower", instance_id());
-	areamonster "4@tower",267,180,277,216,"Odium of Thanatos",1704,6,instance_npcname("88FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,180,277,216,"Despero of Thanatos",1705,6,instance_npcname("88FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,180,277,216,"Maero of Thanatos",1706,6,instance_npcname("88FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,180,277,216,"Dolor of Thanatos",1707,6,instance_npcname("88FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",310,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("88FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 89
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 89th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 89th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("89FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,270,222,0	script	89FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("89FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("89FGate102tower", instance_id());
-	areamonster "4@tower",352,180,362,216,"Valkyrie Randgris",1751,1,instance_npcname("89FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,180,362,216,"Baroness of Retribution",1702,10,instance_npcname("89FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,180,362,216,"Lady Solace",1703,10,instance_npcname("89FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,180,362,216,"False Angel",1371,10,instance_npcname("89FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",395,183;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("89FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 90
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 90th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 90th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("90FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,355,222,0	script	90FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("90FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("90FGate102tower", instance_id());
-	areamonster "4@tower",9,96,19,132,"Cecil Damon",1638,10,instance_npcname("90FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,96,19,132,"Bow Master",1830,10,instance_npcname("90FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,96,19,132,"Kavac",1656,30,instance_npcname("90FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",52,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("90FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 91
-	}
-	else 
-		instance_announce -1,"Remaining Monsters on the 91st Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 91st Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("91FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,12,138,0	script	91FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("91FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("91FGate102tower", instance_id());
-	areamonster "4@tower",93,96,103,132,"Kathryne Keyron",1639,15,instance_npcname("91FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,96,103,132,"Elder",1377,10,instance_npcname("91FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,96,103,132,"Laurell Weinder",1657,10,instance_npcname("91FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,96,103,132,"Wind Ghost",1263,10,instance_npcname("91FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,96,103,132,"Marduk",1140,10,instance_npcname("91FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",136,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("91FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 92
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 92nd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 92nd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("92FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,96,138,0	script	92FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("92FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("92FGate102tower", instance_id());
-	areamonster "4@tower",181,96,191,132,"Seyren Windsor",1634,15,instance_npcname("92FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,96,191,132,"Bloody Knight",1268,10,instance_npcname("92FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,96,191,132,"Abysmal Knight",1219,10,instance_npcname("92FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,96,191,132,"Wanderer",1208,10,instance_npcname("92FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",224,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("92FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 93
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 93rd Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 93rd Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("93FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,184,138,0	script	93FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("93FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("93FGate102tower", instance_id());
-	areamonster "4@tower",267,96,277,132,"Sword Master",1829,15,instance_npcname("93FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",267,96,277,132,"Bow Master",1830,15,instance_npcname("93FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",310,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("93FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 94
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 94th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 94th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("94FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,270,138,0	script	94FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("94FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("94FGate102tower", instance_id());
-	areamonster "4@tower",352,96,362,132,"Beelzebub",1873,1,instance_npcname("94FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,96,362,132,"Hunter Fly",1035,30,instance_npcname("94FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,96,362,132,"Steel Chonchon",1042,5,instance_npcname("94FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,96,362,132,"Dragon FLy",1091,5,instance_npcname("94FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",352,96,362,132,"Chonchon",1011,5,instance_npcname("94FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",395,99;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("94FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 95
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 95th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 95th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("95FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,355,138,0	script	95FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("95FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("95FGate102tower", instance_id());
-	areamonster "4@tower",9,9,19,45,"Valkyrie",1765,5,instance_npcname("95FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,9,19,45,"Skeggiold",1755,10,instance_npcname("95FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",9,9,19,45,"Skeggiold",1754,10,instance_npcname("95FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",52,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("95FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 96
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 96th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 96th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("96FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,12,51,0	script	96FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("96FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("96FGate102tower", instance_id());
-	areamonster "4@tower",93,9,103,45,"Incarnation of Morroc",1918,5,instance_npcname("96FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,9,103,45,"Incarnation of Morroc",1919,5,instance_npcname("96FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,9,103,45,"Incarnation of Morroc",1920,5,instance_npcname("96FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",93,9,103,45,"Incarnation of Morroc",1921,5,instance_npcname("96FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",136,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("96FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 97
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 97th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 97th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("97FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,96,51,0	script	97FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("97FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("97FGate102tower", instance_id());
-	areamonster "4@tower",181,9,191,45,"Kathryne Keyron",1639,2,instance_npcname("97FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,9,191,45,"Seyren Windsor",1634,2,instance_npcname("97FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,9,191,45,"Margaretha Sorin",1637,2,instance_npcname("97FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,9,191,45,"Eremes Guile",1635,2,instance_npcname("97FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,9,191,45,"Howard Alt-Eisen",1636,2,instance_npcname("97FGate102tower", instance_id())+"::OnMyMobDead";
-	areamonster "4@tower",181,9,191,45,"Cecil Damon",1638,2,instance_npcname("97FGate102tower", instance_id())+"::OnMyMobDead";
-	end;
-
-OnTouch_:
-	warp "4@tower",224,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("97FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 98
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 98th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 98th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("98FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
-
-4@tower,184,51,0	script	98FGate102tower	45,2,2,{
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("98FGate102tower", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("98FGate102tower", instance_id());
-	for( set .@i, 1; .@i <= 7; set .@i, .@i + 1 ) {
-		set .@mob_ran,rand(1,30);
-		if (.@mob_ran == 1) 
-			areamonster "4@tower",267,9,277,45,"Kathryne Keyron",1639,2,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 2) 
-			areamonster "4@tower",267,9,277,45,"Seyren Windsor",1634,2,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 3) 
-			areamonster "4@tower",267,9,277,45,"Margaretha Sorin",1637,2,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 4) 
-			areamonster "4@tower",267,9,277,45,"Eremes Guile",1635,2,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 5) 
-			areamonster "4@tower",267,9,277,45,"Howard Alt-Eisen",1636,2,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 6) 
-			areamonster "4@tower",267,9,277,45,"Cecil Damon",1638,2,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 7) 
-			areamonster "4@tower",267,9,277,45,"Incarnation of Morroc",1918,5,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 8) 
-			areamonster "4@tower",267,9,277,45,"Incarnation of Morroc",1919,5,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 9) 
-			areamonster "4@tower",267,9,277,45,"Incarnation of Morroc",1920,5,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 10) 
-			areamonster "4@tower",267,9,277,45,"Incarnation of Morroc",1921,5,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 11) 
-			areamonster "4@tower",267,9,277,45,"Valkyrie",1765,5,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 12) 
-			areamonster "4@tower",267,9,277,45,"Skeggiold",1755,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 13) 
-			areamonster "4@tower",267,9,277,45,"Skeggiold",1754,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 14) 
-			areamonster "4@tower",267,9,277,45,"Seyren Windsor",1634,15,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 15) 
-			areamonster "4@tower",267,9,277,45,"Bloody Knight",1268,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 16) 
-			areamonster "4@tower",267,9,277,45,"Abysmal Knight",1219,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 17) 
-			areamonster "4@tower",267,9,277,45,"Wanderer",1208,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 18) 
-			areamonster "4@tower",267,9,277,45,"Sword Master",1829,15,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 19) 
-			areamonster "4@tower",267,9,277,45,"Bow Master",1830,15,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 20) 
-			areamonster "4@tower",267,9,277,45,"Kathryne Keyron",1639,15,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 21) 
-			areamonster "4@tower",267,9,277,45,"Elder",1377,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 22) 
-			areamonster "4@tower",267,9,277,45,"Laurell Weinder",1657,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 23) 
-			areamonster "4@tower",267,9,277,45,"Wind Ghost",1263,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 24) 
-			areamonster "4@tower",267,9,277,45,"Marduk",1140,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 25) 
-			areamonster "4@tower",267,9,277,45,"Cecil Damon",1638,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 26) 
-			areamonster "4@tower",267,9,277,45,"Bow Master",1830,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 27) 
-			areamonster "4@tower",267,9,277,45,"Kavach Icarus",1656,30,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 28) 
-			areamonster "4@tower",267,9,277,45,"Baroness of Retribution",1702,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else if (.@mob_ran == 29) 
-			areamonster "4@tower",267,9,277,45,"Lady Solace",1703,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-		else 
-			areamonster "4@tower",267,9,277,45,"False Angel",1371,10,instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead";
-	}
-	end;
-
-OnTouch_:
-	warp "4@tower",309,12;
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("4@tower",instance_npcname("98FGate102tower", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		initnpctimer;
-		//SetItemPartyInMap in_102floor 99
-	}
-	else
-		instance_announce -1,"Remaining Monsters on the 99th Level - " + .@mob_dead_num,bc_map,"0x00ff99";
-	end;
-
-OnTimer5000:
-	instance_announce -1,"All Monsters on the 99th Level have been defeated.",bc_map,"0xffff00";
-	donpcevent instance_npcname("99FGate102tower", instance_id())+"::OnEnable";
-	stopnpctimer;
-	end;
-}
+4@tower,12,393,0	duplicate(1FGate102tower)	76FGate102tower	45,2,2
+4@tower,96,393,0	duplicate(1FGate102tower)	77FGate102tower	45,2,2
+4@tower,184,393,0	duplicate(1FGate102tower)	78FGate102tower	45,2,2
+4@tower,270,393,0	duplicate(1FGate102tower)	79FGate102tower	45,2,2
+4@tower,355,393,0	duplicate(1FGate102tower)	80FGate102tower	45,2,2
+4@tower,12,309,0	duplicate(1FGate102tower)	81FGate102tower	45,2,2
+4@tower,96,309,0	duplicate(1FGate102tower)	82FGate102tower	45,2,2
+4@tower,184,309,0	duplicate(1FGate102tower)	83FGate102tower	45,2,2
+4@tower,270,309,0	duplicate(1FGate102tower)	84FGate102tower	45,2,2
+4@tower,355,309,0	duplicate(1FGate102tower)	85FGate102tower	45,2,2
+4@tower,12,222,0	duplicate(1FGate102tower)	86FGate102tower	45,2,2
+4@tower,96,222,0	duplicate(1FGate102tower)	87FGate102tower	45,2,2
+4@tower,184,222,0	duplicate(1FGate102tower)	88FGate102tower	45,2,2
+4@tower,270,222,0	duplicate(1FGate102tower)	89FGate102tower	45,2,2
+4@tower,355,222,0	duplicate(1FGate102tower)	90FGate102tower	45,2,2
+4@tower,12,138,0	duplicate(1FGate102tower)	91FGate102tower	45,2,2
+4@tower,96,138,0	duplicate(1FGate102tower)	92FGate102tower	45,2,2
+4@tower,184,138,0	duplicate(1FGate102tower)	93FGate102tower	45,2,2
+4@tower,270,138,0	duplicate(1FGate102tower)	94FGate102tower	45,2,2
+4@tower,355,138,0	duplicate(1FGate102tower)	95FGate102tower	45,2,2
+4@tower,12,51,0	duplicate(1FGate102tower)	96FGate102tower	45,2,2
+4@tower,96,51,0	duplicate(1FGate102tower)	97FGate102tower	45,2,2
+4@tower,184,51,0	duplicate(1FGate102tower)	98FGate102tower	45,2,2
 
 4@tower,271,51,0	script	99FGate102tower	45,2,2,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("99FGate102tower", instance_id());
+	disablenpc instance_npcname("99FGate102tower");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("99FGate102tower", instance_id());
+	enablenpc instance_npcname("99FGate102tower");
 	initnpctimer;
 	end;
 
 OnTouch_:
 	getitem 6000,1; //Dark_Ashes
-	warp "5@tower",101,72;
+	warp instance_mapname("5@tower"),101,72;
 	end;
 
 OnTimer120000:
-	disablenpc instance_npcname("99FGate102tower", instance_id());
-	donpcevent instance_npcname("99FGate102tower-2", instance_id())+"::OnEnable";
+	disablenpc instance_npcname("99FGate102tower");
+	donpcevent instance_npcname("99FGate102tower-2")+"::OnEnable";
 	stopnpctimer;
 	end;
 }
@@ -4340,24 +1715,24 @@ OnTimer120000:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("99FGate102tower-2", instance_id());
+	disablenpc instance_npcname("99FGate102tower-2");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("99FGate102tower-2", instance_id());
+	enablenpc instance_npcname("99FGate102tower-2");
 	end;
 
 OnTouch_:
-	warp "5@tower",101,72;
+	warp instance_mapname("5@tower"),101,72;
 	end;
 }
 
-/*
 4@tower,71,1,0	script	#Manager Mode4	844,{
+	callfunc "F_GM_NPC";
 	mes "Please enter the password.";
-	input .@inputstr$;
+	set .@i, callfunc("F_GM_NPC","dmc2008",1);
 	next;
-	if (.@inputstr$ == "dmc2008") {
+	if (.@i == 1) {
 		mes "This NPC manages the tower from the 76th to the 99th Level.";
 		mes "Please enter the Level number to open.";
 		mes "(i.g.: 76F->76, 99F->99)";
@@ -4366,13 +1741,12 @@ OnTouch_:
 		if (.@input < 76 || .@input > 99)
 			mes "You can only enter a number from 76 to 99.";
 		else {
-			donpcevent instance_npcname(.@input+"FGate102tower", instance_id())+"::OnEnable";
+			donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable";
 			mes "*** Level "+ .@input + " is now being opened. ***";
 		}
 	}
 	close;
 }
-*/
 
 // Level 100
 //============================================================
@@ -4413,21 +1787,18 @@ OnTouch_:
 		mes "[Mysterious Voice]";
 		mes "I now allow you to come receive an audience from me. Come to me, to Nacht Sieger the Hegemon-King of the Darkness!";
 		close2;
-		warp "6@tower",32,12;
+		warp instance_mapname("6@tower"),32,12;
 	}
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("Lucid Crystal#102", instance_id());
-	end;
-
 OnDisable:
-	disablenpc instance_npcname("Lucid Crystal#102", instance_id());
+	disablenpc instance_npcname("Lucid Crystal#102");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("Lucid Crystal#102", instance_id());
-	donpcevent instance_npcname("#102Effect1", instance_id())+"::OnEnable";
+	enablenpc instance_npcname("Lucid Crystal#102");
+	donpcevent instance_npcname("#102Effect1")+"::OnEnable";
 	end;
 }
 
@@ -4435,22 +1806,22 @@ OnEnable:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#102Effect1", instance_id());
+	disablenpc instance_npcname("#102Effect1");
 	end;
 
 OnDisable:
-	disablenpc instance_npcname("#102Effect1", instance_id());
+	disablenpc instance_npcname("#102Effect1");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#102Effect1", instance_id());
+	enablenpc instance_npcname("#102Effect1");
 	initnpctimer;
 	end;
 
 OnTimer500:
 	specialeffect EF_ENHANCE;
 	stopnpctimer;
-	donpcevent instance_npcname("#102Effect2", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("#102Effect2")+"::OnEnable";
 	end;
 }
 
@@ -4458,22 +1829,22 @@ OnTimer500:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#102Effect2", instance_id());
+	disablenpc instance_npcname("#102Effect2");
 	end;
 
 OnDisable:
-	disablenpc instance_npcname("#102Effect2", instance_id());
+	disablenpc instance_npcname("#102Effect2");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#102Effect2", instance_id());
+	enablenpc instance_npcname("#102Effect2");
 	initnpctimer;
 	end;
 
 OnTimer500:
 	specialeffect EF_ENHANCE;
 	stopnpctimer;
-	donpcevent instance_npcname("#102Effect1", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("#102Effect1")+"::OnEnable";
 	end;
 }
 
@@ -4481,16 +1852,17 @@ OnTimer500:
 	end;
 
 OnInstanceInit:
-	donpcevent instance_npcname("#102FShadowDust", instance_id())+"::OnEnable";
-	monster "5@tower",83,85,"Entweihen Crothen",1957,1,instance_npcname("#102FShadowDust1", instance_id())+"::OnMyMobDead";
+	donpcevent instance_npcname("#102FShadowDust")+"::OnEnable";
+	monster instance_mapname("5@tower"),83,85,"Entweihen Crothen",1957,1,instance_npcname("#102FShadowDust1")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("5@tower",instance_npcname("#102FShadowDust1", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("5@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("#102FShadowDust1")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		instance_announce -1, "Mysterious Voice: Who are you to dare intrude upon my sanctuary?!",bc_map,"0xffff00";
-		donpcevent instance_npcname("#102FShadowDust", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("Lucid Crystal#102", instance_id())+"::OnEnable";
+		mapannounce .@map$, "Mysterious Voice: Who are you to dare intrude upon my sanctuary?!",bc_map,"0xffff00";
+		donpcevent instance_npcname("#102FShadowDust")+"::OnDisable";
+		donpcevent instance_npcname("Lucid Crystal#102")+"::OnEnable";
 		//SetItemPartyInMap in_102floor 100
 	}
 	end;
@@ -4500,83 +1872,76 @@ OnMyMobDead:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#102FShadowDust", instance_id());
+	disablenpc instance_npcname("#102FShadowDust");
 	end;
 
 OnDisable:
-	killmonsterall "5@tower";
-	end;
-
-OnEnable:
-	monster "5@tower",72,93,"Thorny Skeleton",1958,1;
-	monster "5@tower",70,87,"Thorn of Magic",1960,1;
-	monster "5@tower",68,83,"Thorn of Pureness",1961,1;
-	monster "5@tower",70,80,"Thorny Skeleton",1958,1;
-	monster "5@tower",74,81,"Thorn of Magic",1960,1;
-	monster "5@tower",78,72,"Thorn of Magic",1960,1;
-	monster "5@tower",81,70,"Thorny Skeleton",1958,1;
-	monster "5@tower",78,84,"Thorn of Recovery",1959,1;
-	monster "5@tower",85,72,"Thorn of Magic",1960,1;
-	monster "5@tower",91,74,"Thorny Skeleton",1958,1;
-	monster "5@tower",79,77,"Thorn of Pureness",1961,1;
-	monster "5@tower",82,80,"Thorn of Recovery",1959,1;
-	monster "5@tower",87,83,"Thorn of Recovery",1959,1;
-	monster "5@tower",80,92,"Thorn of Pureness",1961,1;
-	monster "5@tower",81,89,"Thorny Skeleton",1958,1;
-	monster "5@tower",85,93,"Thorn of Magic",1960,1;
-	monster "5@tower",86,90,"Thorn of Recovery",1959,1;
-	monster "5@tower",88,88,"Thorny Skeleton",1958,1;
-	monster "5@tower",91,87,"Thorn of Magic",1960,1;
-	monster "5@tower",95,94,"Thorn of Magic",1960,1;
-	monster "5@tower",91,96,"Thorny Skeleton",1958,1;
-	monster "5@tower",90,82,"Thorn of Pureness",1961,1;
-	monster "5@tower",96,98,"Thorn of Magic",1960,1;
-	monster "5@tower",83,76,"Thorny Skeleton",1958,1;
-	monster "5@tower",74,85,"Thorny Skeleton",1958,1;
-	set .@mob_ran,rand(1,3);
-	if (.@mob_ran == 1)
-		monster "5@tower",82,85,"Thorny Skeleton",1958,1;
-	else if (.@mob_ran == 2)
-		monster "5@tower",82,85,"Thorn of Magic",1960,1;
-	else
-		monster "5@tower",82,85,"Thorn of Pureness",1961,1;
-	set .@mob_ran2,rand(1,3);
-	if (.@mob_ran2 == 1)
-		monster "5@tower",84,85,"Thorny Skeleton",1958,1;
-	else if (.@mob_ran2 == 2)
-		monster "5@tower",84,85,"Thorn of Magic",1960,1;
-	else
-		monster "5@tower",84,85,"Thorn of Pureness",1961,1;
+	killmonsterall instance_mapname("5@tower");
+	end;
+
+OnEnable:
+	set .@map$, instance_mapname("5@tower");
+	monster .@map$,72,93,"Thorny Skeleton",1958,1;
+	monster .@map$,70,87,"Thorn of Magic",1960,1;
+	monster .@map$,68,83,"Thorn of Pureness",1961,1;
+	monster .@map$,70,80,"Thorny Skeleton",1958,1;
+	monster .@map$,74,81,"Thorn of Magic",1960,1;
+	monster .@map$,78,72,"Thorn of Magic",1960,1;
+	monster .@map$,81,70,"Thorny Skeleton",1958,1;
+	monster .@map$,78,84,"Thorn of Recovery",1959,1;
+	monster .@map$,85,72,"Thorn of Magic",1960,1;
+	monster .@map$,91,74,"Thorny Skeleton",1958,1;
+	monster .@map$,79,77,"Thorn of Pureness",1961,1;
+	monster .@map$,82,80,"Thorn of Recovery",1959,1;
+	monster .@map$,87,83,"Thorn of Recovery",1959,1;
+	monster .@map$,80,92,"Thorn of Pureness",1961,1;
+	monster .@map$,81,89,"Thorny Skeleton",1958,1;
+	monster .@map$,85,93,"Thorn of Magic",1960,1;
+	monster .@map$,86,90,"Thorn of Recovery",1959,1;
+	monster .@map$,88,88,"Thorny Skeleton",1958,1;
+	monster .@map$,91,87,"Thorn of Magic",1960,1;
+	monster .@map$,95,94,"Thorn of Magic",1960,1;
+	monster .@map$,91,96,"Thorny Skeleton",1958,1;
+	monster .@map$,90,82,"Thorn of Pureness",1961,1;
+	monster .@map$,96,98,"Thorn of Magic",1960,1;
+	monster .@map$,83,76,"Thorny Skeleton",1958,1;
+	monster .@map$,74,85,"Thorny Skeleton",1958,1;
+	switch(rand(1,3)) {
+		case 1: monster .@map$,82,85,"Thorny Skeleton",1958,1; break;
+		case 2: monster .@map$,82,85,"Thorn of Magic",1960,1; break;
+		case 3: monster .@map$,82,85,"Thorn of Pureness",1961,1; break;
+	}
+	switch(rand(1,3)) {
+		case 1: monster .@map$,84,85,"Thorny Skeleton",1958,1; break;
+		case 2: monster .@map$,84,85,"Thorn of Magic",1960,1; break;
+		case 3: monster .@map$,84,85,"Thorn of Pureness",1961,1; break;
+	}
 	end;
 }
 
-/*
 5@tower,71,1,0	script	#Manager Mode5	844,{
+	callfunc "F_GM_NPC";
 	mes "This NPC manages the crystal on the 100th Level. Please enter the password.";
-	input .@inputstr$;
+	set .@i, callfunc("F_GM_NPC","dmc2008",1);
 	next;
-	if (.@inputstr$ == "dmc2008") {
-		donpcevent instance_npcname("Lucid Crystal#102", instance_id())+"::OnEnable";
+	if (.@i == 1) {
+		donpcevent instance_npcname("Lucid Crystal#102")+"::OnEnable";
 		mes "The 100th Level's crystal has been activated.";
-	}
-	else
+	} else
 		mes "Please enter the correct password.";
 	close;
-} */
+}
 
 // Level 101
 //============================================================
 6@tower,45,89,2	script	Life Spring#1	844,{
-	set .@pc_hp,MaxHp-Hp;
-	set .@pc_sp,MaxSp-Sp;
 	mes "^0066ffYou took a sip of the spring's clear water, and you feel invigorated.^000000";
-	percentheal .@pc_hp,.@pc_sp;
+	heal (MaxHp-Hp),(MaxSp-Sp);
 	close;
 
 OnInstanceInit:
-	donpcevent instance_npcname("Life Spring#2", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("Life Spring#2")+"::OnEnable";
 	end;
-
 }
 
 6@tower,45,89,2	script	Life Spring#2	844,{
@@ -4589,7 +1954,7 @@ OnEnable:
 
 OnTimer2000:
 	stopnpctimer;
-	donpcevent instance_npcname("Life Spring#3", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("Life Spring#3")+"::OnEnable";
 	end;
 }
 
@@ -4603,7 +1968,7 @@ OnEnable:
 
 OnTimer2000:
 	stopnpctimer;
-	donpcevent instance_npcname("Life Spring#2", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("Life Spring#2")+"::OnEnable";
 	end;
 }
 
@@ -4613,14 +1978,14 @@ OnTimer2000:
 	end;
 
 OnInstanceInit:
-	areamonster "6@tower",154,73,156,75,"Watcher's Son",1627,10,instance_npcname("Tyrant's Throne#", instance_id())+"::OnMyMobDead";
+	areamonster instance_mapname("6@tower"),154,73,156,75,"Watcher's Son",1627,10,instance_npcname("Tyrant's Throne#")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("6@tower",instance_npcname("Tyrant's Throne#", instance_id())+"::OnMyMobDead");
+	set .@mob_dead_num,mobcount(instance_mapname("6@tower"),instance_npcname("Tyrant's Throne#")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		donpcevent instance_npcname("#1st Beeper", instance_id())+"::OnEnable";
-		disablenpc instance_npcname("Tyrant's Throne#", instance_id());
+		donpcevent instance_npcname("#1st Beeper")+"::OnEnable";
+		disablenpc instance_npcname("Tyrant's Throne#");
 	}
 	end;
 }
@@ -4633,36 +1998,38 @@ OnEnable:
 	end;
 
 OnTimer500:
-	instance_announce -1,"Guests, huh? I hope you've come here knowing that you'll be buried in this place. If you didn't know, well... it's too late!",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"Guests, huh? I hope you've come here knowing that you'll be buried in this place. If you didn't know, well... it's too late!",bc_map,"0x00ffcc";
 	end;
 
 OnTimer5500:
-	instance_announce -1,"This is why you adventurers always end up dead.",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"This is why you adventurers always end up dead.",bc_map,"0x00ffcc";
 	end;
 
 OnTimer10500:
-	instance_announce -1,"I may applaud you for your courage... Of course, I intend to play with you a little bit first.",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"I may applaud you for your courage... Of course, I intend to play with you a little bit first.",bc_map,"0x00ffcc";
 	end;
 
 OnTimer15500:
-	instance_announce -1,"You know, I like watching humans running around in fear.",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"You know, I like watching humans running around in fear.",bc_map,"0x00ffcc";
 	end;
 
 OnTimer20500:
-	instance_announce -1,"Let's see who runs fastest. Are you ready?",bc_map,"0x00ffcc";
+	set .@map$, instance_mapname("6@tower");
+	mapannounce .@map$,"Let's see who runs fastest. Are you ready?",bc_map,"0x00ffcc";
 	stopnpctimer;
-	areamonster "6@tower",151,66,153,106,"Bone Guardian",1152,50,instance_npcname("#1st Beeper", instance_id())+"::OnMyMobDead";
-	areamonster "6@tower",158,66,160,106,"Bone Guardian",1152,50,instance_npcname("#1st Beeper", instance_id())+"::OnMyMobDead";
+	areamonster .@map$,151,66,153,106,"Bone Guardian",1152,50,instance_npcname("#1st Beeper")+"::OnMyMobDead";
+	areamonster .@map$,158,66,160,106,"Bone Guardian",1152,50,instance_npcname("#1st Beeper")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("6@tower",instance_npcname("#1st Beeper", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("6@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("#1st Beeper")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		donpcevent instance_npcname("#2nd Beeper", instance_id())+"::OnEnable";
+		donpcevent instance_npcname("#2nd Beeper")+"::OnEnable";
 		//SetItemPartyInMap in_102floor 101
 	}
 	else
-		instance_announce -1,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99";
+		mapannounce .@map$,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99";
 	end;
 }
 
@@ -4674,28 +2041,30 @@ OnEnable:
 	end;
 
 OnTimer500:
-	instance_announce -1,"Well, I guess they aren't too challenging for you.",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"Well, I guess they aren't too challenging for you.",bc_map,"0x00ffcc";
 	end;
 
 OnTimer5500:
-	instance_announce -1,"Let's speed up a little bit, shall we?",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"Let's speed up a little bit, shall we?",bc_map,"0x00ffcc";
 	end;
 
 OnTimer10500:
-	instance_announce -1,"I demand an encore!",bc_map,"0x00ffcc";
+	set .@map$, instance_mapname("6@tower");
+	mapannounce .@map$,"I demand an encore!",bc_map,"0x00ffcc";
 	stopnpctimer;
-	areamonster "6@tower",151,66,153,106,"Wind Guardian",1263,30,instance_npcname("#2nd Beeper", instance_id())+"::OnMyMobDead";
-	areamonster "6@tower",158,66,160,106,"Wind Guardian",1263,30,instance_npcname("#2nd Beeper", instance_id())+"::OnMyMobDead";
+	areamonster .@map$,151,66,153,106,"Wind Guardian",1263,30,instance_npcname("#2nd Beeper")+"::OnMyMobDead";
+	areamonster .@map$,158,66,160,106,"Wind Guardian",1263,30,instance_npcname("#2nd Beeper")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("6@tower",instance_npcname("#2nd Beeper", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("6@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("#2nd Beeper")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		donpcevent instance_npcname("#3rd Beeper", instance_id())+"::OnEnable";
+		donpcevent instance_npcname("#3rd Beeper")+"::OnEnable";
 		//SetItemPartyInMap in_102floor 102
 	}
 	else
-		instance_announce -1,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99";
+		mapannounce .@map$,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99";
 	end;
 }
 
@@ -4707,28 +2076,30 @@ OnEnable:
 	end;
 
 OnTimer500:
-	instance_announce -1,"Yes, this is getting exciting!",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"Yes, this is getting exciting!",bc_map,"0x00ffcc";
 	end;
 
 OnTimer5500:
-	instance_announce -1,"I'll remember you as one of a few that have managed to entertain me.",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"I'll remember you as one of a few that have managed to entertain me.",bc_map,"0x00ffcc";
 	end;
 
 OnTimer10500:
-	instance_announce -1,"How would you like to play one more round?",bc_map,"0x00ffcc";
+	set .@map$, instance_mapname("6@tower");
+	mapannounce .@map$,"How would you like to play one more round?",bc_map,"0x00ffcc";
 	stopnpctimer;
-	areamonster "6@tower",151,66,153,106,"Sword Edge Guardian",1132,20,instance_npcname("#3rd Beeper", instance_id())+"::OnMyMobDead";
-	areamonster "6@tower",158,66,160,106,"Sword Edge Guardian",1132,20,instance_npcname("#3rd Beeper", instance_id())+"::OnMyMobDead";
+	areamonster .@map$,151,66,153,106,"Sword Edge Guardian",1132,20,instance_npcname("#3rd Beeper")+"::OnMyMobDead";
+	areamonster .@map$,158,66,160,106,"Sword Edge Guardian",1132,20,instance_npcname("#3rd Beeper")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("6@tower",instance_npcname("#3rd Beeper", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("6@tower");
+	set .@mob_dead_num,mobcount(.@map$,instance_npcname("#3rd Beeper")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		donpcevent instance_npcname("#4th Beeper", instance_id())+"::OnEnable";
+		donpcevent instance_npcname("#4th Beeper")+"::OnEnable";
 		//SetItemPartyInMap in_102floor 103
 	}
 	else
-		instance_announce -1,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99";
+		mapannounce .@map$,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99";
 	end;
 }
 
@@ -4740,21 +2111,22 @@ OnEnable:
 	end;
 
 OnTimer500:
-	instance_announce -1,"Okay, the time has come to make my appearance!",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"Okay, the time has come to make my appearance!",bc_map,"0x00ffcc";
 	end;
 
 OnTimer5500:
-	instance_announce -1,"Do you want to know who I am?",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"Do you want to know who I am?",bc_map,"0x00ffcc";
 	end;
 
 OnTimer10500:
-	instance_announce -1,"You'll soon know. Mine is the face of death!",bc_map,"0x00ffcc";
+	set .@map$, instance_mapname("6@tower");
+	mapannounce .@map$,"You'll soon know. Mine is the face of death!",bc_map,"0x00ffcc";
 	stopnpctimer;
-	monster "6@tower",156,147,"Nacht Sieger",1956,1,instance_npcname("#4th Beeper", instance_id())+"::OnMyMobDead";
+	monster .@map$,156,147,"Nacht Sieger",1956,1,instance_npcname("#4th Beeper")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	donpcevent instance_npcname("Lost Soul#102", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("Lost Soul#102")+"::OnEnable";
 	end;
 }
 
@@ -4814,26 +2186,26 @@ OnMyMobDead:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("Lost Soul#102", instance_id());
+	disablenpc instance_npcname("Lost Soul#102");
 	end;
 
 OnEnable:
 	initnpctimer;
-	enablenpc instance_npcname("Lost Soul#102", instance_id());
-	donpcevent instance_npcname("#Effect30", instance_id())+"::OnEnable";
+	enablenpc instance_npcname("Lost Soul#102");
+	donpcevent instance_npcname("#Effect30")+"::OnEnable";
 	//SetItemPartyInMap in_102floor 104
 	end;
 
 OnTimer500:
-	instance_announce -1,"This... This can't be happening! I can't be defeated!",bc_map,"0xffff00";
+	mapannounce instance_mapname("6@tower"),"This... This can't be happening! I can't be defeated!",bc_map,"0xffff00";
 	end;
 
 OnTimer5500:
-	instance_announce -1,"Nooo! My soul... My shell...! Nooo~!",bc_map,"0xffff00";
+	mapannounce instance_mapname("6@tower"),"Nooo! My soul... My shell...! Nooo~!",bc_map,"0xffff00";
 	end;
 
 OnTimer10500:
-	instance_announce -1,"Nacht Sieger's body has turned into dark ashes that scattered in the wind.",bc_map,"0x00ffcc";
+	mapannounce instance_mapname("6@tower"),"Nacht Sieger's body has turned into dark ashes that scattered in the wind.",bc_map,"0x00ffcc";
 	stopnpctimer;
 	end;
 }
@@ -4842,7 +2214,7 @@ OnTimer10500:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#Effect30", instance_id());
+	disablenpc instance_npcname("#Effect30");
 	end;
 
 OnEnable:
@@ -4852,7 +2224,7 @@ OnEnable:
 
 OnTimer1000:
 	stopnpctimer;
-	donpcevent instance_npcname("#Effect31", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("#Effect31")+"::OnEnable";
 	end;
 }
 
@@ -4860,7 +2232,7 @@ OnTimer1000:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#Effect31", instance_id());
+	disablenpc instance_npcname("#Effect31");
 	end;
 
 OnEnable:
@@ -4870,6 +2242,6 @@ OnEnable:
 
 OnTimer1000:
 	stopnpctimer;
-	donpcevent instance_npcname("#Effect30", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("#Effect30")+"::OnEnable";
 	end;
-}
+}
\ No newline at end of file
diff --git a/npc/instances/NydhoggsNest.txt b/npc/instances/NydhoggsNest.txt
index f2fe3fc68..331aba3f7 100644
--- a/npc/instances/NydhoggsNest.txt
+++ b/npc/instances/NydhoggsNest.txt
@@ -3,19 +3,24 @@
 //===== By: ==================================================
 //= L0ne_W0lf, various sources
 //===== Current Version: =====================================
-//= 1.4
-//===== Description: =========================================
+//= 1.6
+//===== Description: ========================================= 
 //= [Official Conversion]
 //= Nidhoggr's Nest Instance
-//===== Additional Comments: =================================
+//===== Additional Comments: ================================= 
 //= 1.0 First version.
 //= 1.1 Minor dialog updates.
 //= 1.2 No longer glitches when anyone but party leader talks to the first NPC.
 //= 1.3 Added 'instance_check_party' command to the script for proper checking if
-//=		the invoking party meets the requirements to join the Memorial Dungeon.
+//=     the invoking party meets the requirements to join the Memorial Dungeon.
 //= 1.4 Cleaning. [Euphy]
-//============================================================
+//= 1.5 Instance system rewrite. [Euphy]
+//= 1.6 Added GM management NPCs. [Euphy]
+//============================================================ 
 
+1@nyd	mapflag	src4instance
+2@nyd	mapflag	src4instance
+//============================================================
 nyd_dun02,100,201,3	script	Yggdrasil Gatekeeper	111,8,8,{
 	if (ins_nyd == 0) {
 		mes "A great stone gate stands before you. The sculpture of a terrible dragon spreads its powerful looking wings.";
@@ -24,47 +29,25 @@ nyd_dun02,100,201,3	script	Yggdrasil Gatekeeper	111,8,8,{
 		next;
 		switch(select("Move closer to look more carefully.:Step back.")) {
 		case 1:
-			if (ep13_1_edq == 14) {
-				specialeffect2 EF_HOLYHIT;
-				pushpc 3,3;
+			specialeffect2 EF_HOLYHIT;
+			pushpc 3,3;
+			if (ep13_1_edq == 14)
 				set ep13_1_edq,15;
-				mes "A mysterious power prevents you from getting too close. It looks like there is something strong beyond the door...";
-				next;
-				mes "Perhaps there's a great hidden secret beyond the gate, beyond expectation.";
-				next;
-				mes "It would be better to go back to camp and inform the others and ask for help.";
-				set ins_nyd,1;
-				close;
-			}
-			else if (ep13_1_edq == 15) {
-				specialeffect2 EF_HOLYHIT;
-				pushpc 3,3;
-				mes "A mysterious power prevents you from getting too close. It looks like there is something strong beyond the door...";
-				next;
-				mes "Perhaps there's a great hidden secret beyond the gate, beyond expectation.";
-				next;
-				mes "It would be better to go back to camp and inform the others and ask for help.";
-				set ins_nyd,1;
-				close;
-			}
-			else {
-				specialeffect2 EF_HOLYHIT;
-				pushpc 3,3;
-				mes "A mysterious power prevents you from getting too close. It looks like there is something strong beyond the door...";
-				next;
-				mes "Perhaps there's a great hidden secret beyond the gate, beyond expectation.";
-				next;
-				mes "It would be better to go back to camp and inform the others and ask for help.";
+			mes "A mysterious power prevents you from getting too close. It looks like there is something strong beyond the door...";
+			next;
+			mes "Perhaps there's a great hidden secret beyond the gate, beyond expectation.";
+			next;
+			mes "It would be better to go back to camp and inform the others and ask for help.";
+			if (ep13_1_edq != 15) {
 				next;
 				mes "You'll have to obtain the others trust in the expendition camp by working hard.";
-				set ins_nyd,1;
-				close;
 			}
+			set ins_nyd,1;
+			close;
 		case 2:
 			close;
 		}
-	}
-	else if (ins_nyd == 1) {
+	} else if (ins_nyd == 1) {
 		mes "A mysterious power prevents you from getting too close. It looks like there is something strong beyond the door...";
 		next;
 		mes "Perhaps there's a great hidden secret beyond the gate, beyond expectation.";
@@ -74,13 +57,10 @@ nyd_dun02,100,201,3	script	Yggdrasil Gatekeeper	111,8,8,{
 			set ep13_1_edq,15;
 			close;
 		}
-		else {
-			next;
-			mes "You'll have to obtain the others trust in the expendition camp by working hard.";
-			close;
-		}
-	}
-	else if (ins_nyd == 111 || ins_nyd == 112) {
+		next;
+		mes "You'll have to obtain the others trust in the expendition camp by working hard.";
+		close;
+	} else if (ins_nyd == 111 || ins_nyd == 112) {
 		specialeffect2 EF_CHANGECOLD;
 		mes "The strange sensation surrounding your body has disappeared";
 		next;
@@ -107,177 +87,104 @@ nyd_dun02,100,201,3	script	Yggdrasil Gatekeeper	111,8,8,{
 		case 2:
 			close;
 		}
-	}
-	else if (ins_nyd == 131 || ins_nyd == 132 || ins_nyd > 199) {
+	} else if (ins_nyd == 131 || ins_nyd == 132 || ins_nyd > 199) {
+
+		set .@party_id,getcharid(1);
+		set .@md_name$,"Nidhoggur's Nest";
+
 		set .@ins_nyd_check,checkquest(3135,PLAYTIME); // 3 Day cooldown
 		set .@ins_nyd_check2,checkquest(3136,PLAYTIME); // 4 Hour play limit
-		if (.@ins_nyd_check == -1) {
-			mes "As I put my hands on the stone gate, a voice sounded from the depth of my heart.";
-			next;
-			mes "[Yggdrasil Gatekeeper]";
-			mes "The loyal servants of the Guardian... what can I do for you?";
-			next;
-			switch(select("Please allow me to enter.:I want to go in.:I want to leave.")) {
-			case 1:
-				set .@party,getcharid(1);
-				set .@leader,getpartyleader(.@party,2);
-				set .@md_name$,"Nidhoggur's Nest";
-
-				if(!instance_check_party(.@party,2,70)){
-					mes "I'm sorry but your Party does not meet the requirements to join the Memorial Dungeon.";
-					close;
-				}
 
-				if (.@leader == getcharid(0)) {
-					set .@instance, instance_create(.@md_name$, .@party);
+		mes "As I put my hands on the stone gate, a voice sounded from the depth of my heart.";
+		next;
+		if (.@ins_nyd_check == -1 && .@ins_nyd_check2 == -1) {
+			if (!instance_check_party(.@party_id,2,70)) {
+				mes "[Yggdrasil Gatekeeper]";
+				mes "Where are the other servants, so you can work together? Each servant cannot be admitted here individually...";
+				next;
+				mes "[Yggdrasil Gatekeeper]";
+				mes "Come with at least 1 more servant... Only party leaders can accept admission to Nidhoggur's Nest.";
+				next;
+				mes "[Yggdrasil Gatekeeper]";
+				mes "And only 1 representative of you needs to talk to me, so don't annoy me...";
+				close;
+			}
+			if (getcharid(0) == getpartyleader(.@party_id,2)) {
+				mes "[Yggdrasil Gatekeeper]";
+				mes "The loyal servants of the Guardian... what can I do for you?";
+				next;
+				switch(select("Please allow me to enter.:I want to go in.:I want to leave.")) {
+				case 1:
+					set .@instance, instance_create(.@md_name$, .@party_id);
 					if (.@instance < 0) {
 						mes "[Yggdrasil Gatekeeper]";
 						mes "The Guardian seems to wish to be alone. I will go in and check, please wait out here.";
 						close;
 					}
-					else {
-						for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) {
-							if( instance_attachmap(.@i + "@nyd", .@instance) == "" )
-								break;
-						}
-						if( .@i < 2 ) {
-							instance_destroy(.@instance);
-							close;
-						}
-						instance_attach(.@instance);
-						instance_set_timeout 144000,300,.@instance;
-						instance_init(.@instance);
-
-						// Spawn standard mobs
-						donpcevent instance_npcname("ins_nyd1_spawn_mobs", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("ins_nyd2_spawn_mobs", instance_id())+"::OnInstanceInit";
-						// Activate Floor 1
-						donpcevent instance_npcname("nyd_call_mon_1", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("ins_nyd_1f_timer", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_to2f_warp", instance_id())+"::OnInstanceInit";
-						// Active Floor 2
-						donpcevent instance_npcname("nyd_2f_enter_broad", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_boss_enter", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_boss_enter_call", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_boss_enter_logic", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("World Tree Yggdrasil#2F", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_red_c", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_red_warp1", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_red_warp2", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_red_warp3", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_white_c", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_white_warp1", instance_id())+"::OnInstanceInit";;
-						donpcevent instance_npcname("nyd_2f_white_warp2", instance_id())+"::OnInstanceInit";;
-						donpcevent instance_npcname("nyd_2f_white_warp3", instance_id())+"::OnInstanceInit";;
-						donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_yellow_warp1", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_yellow_warp2", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_yellow_warp3", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_green_c", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_green_warp1", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_green_warp2", instance_id())+"::OnInstanceInit";
-						donpcevent instance_npcname("nyd_2f_green_warp3", instance_id())+"::OnInstanceInit";
-
-						mes "[Yggdrasil Gatekeeper]";
-						mes "I've recorded your request, are you ready to go inside?";
-						next;
-						mes "[Yggdrasil Gatekeeper]";
-						mes "If you are ready, I will allow you to enter.";
+					for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) {
+						if( instance_attachmap(.@i + "@nyd", .@instance) == "" )
+							break;
+					}
+					if( .@i < 2 ) {
+						instance_destroy(.@instance);
 						close;
 					}
-				}
-				else {
+					instance_set_timeout 144000,300,.@instance;
+					instance_init(.@instance);
 					mes "[Yggdrasil Gatekeeper]";
-					mes "When you touch the stone gate, you can hear the voice in your heart.";
+					mes "I've recorded your request, are you ready to go inside?";
 					next;
 					mes "[Yggdrasil Gatekeeper]";
-					mes "Where are the other servants, so you can work together? Each servant cannot be admitted here individually...";
-					next;
+					mes "If you are ready, I will allow you to enter.";
+					close;
+				case 2:
+					goto L_Enter;
+				case 3:
+					close;
+				}
+			}
+			mes "[Yggdrasil Gatekeeper]";
+			mes "If you have the dungeon generated already, you can enter it.";
+			next;
+			if(select("I want to go in.:I want to leave.") == 2)
+				close;
+			goto L_Enter;
+		} else {
+			if (.@ins_nyd_check == 0 || .@ins_nyd_check == 1) {
+				if ('ins_nyd2 == 3 || 'ins_nyd2 == 4) {
 					mes "[Yggdrasil Gatekeeper]";
-					mes "Come with at least 1 more servant... Only party leaders can accept admission to Nidhoggur's Nest.";
+					mes "With the defeat of Nidhoggur's Shadow, the roots of the World Tree Yggdrasil are also affected.";
 					next;
 					mes "[Yggdrasil Gatekeeper]";
-					mes "And only 1 representative of you needs to talk to me, so don't annoy me...";
+					mes "After Nidhoggur's Shadow disappears, at least 3 days is needed for stabilizing.";
 					close;
 				}
-			case 2:
-				if (.@ins_nyd_check2 < 2) { // Added check to avoid people from re-partting up.
-					set .@party,getcharid(1);
-					set .@leader,getpartyleader(.@party,2);
-					set .@p_name$,getpartyname(.@party);
-					set .@p_name2$,strcharinfo(0);
-					set .@md_name$,"Nidhoggur's Nest";
-
-					if(!instance_check_party(.@party,2,70)){
-						mes "I'm sorry but your Party does not meet the requirements to join the Memorial Dungeon.";
-						close;
-					}
-
-					if (has_instance("1@nyd") == "") {
-						mes "[Yggdrasil Gatekeeper]";
-						mes "You did not request for entrance. Please let your leader request entrance.";
-						close;
-					}
-					if((party_instance_id2 != 0) && (party_instance_id2 != getcharid(1))) {
-						//Custom
-						mes "[Yggdrasil Gatekeeper]";
-						mes "You are no longer able to enter Nidhogger's Nest, as your instance has expired.";
-						next;
-						mes "[Yggdrasil Gatekeeper]";
-						mes "After Nidhoggur's Shadow disappears, at least 3 days is needed for stabilizing.";
-						close;
-					}
-					else {
-						mapannounce "nyd_dun02", .@p_name$ + "'s Party member " + .@p_name2$ + " has entered " + .@md_name$,bc_map,"0x00ff99";
-						set party_instance_id2,getcharid(1);
-						if (checkquest(3135) == -1) setquest 3135;
-						if (checkquest(3136) == -1) setquest 3136;
-						warp "1@nyd",32,37;
-						close;
-					}
-				}
-				else {
-					//Custom
+				mes "[Yggdrasil Gatekeeper]";
+				mes "If you have the dungeon generated already, you can enter it.";
+				next;
+				if(select("I want to go in.:I want to leave.") == 2)
+					close;
+				goto L_Enter;
+			} else if (.@ins_nyd_check == 2) {
+				if (.@ins_nyd_check2 == 0 || .@ins_nyd_check2 == 1) {
+					mes "[Yggdrasil Gatekeeper]";
+					mes "The time limit to enter the dungeon has expired. You must wait for the World Tree to stabilize its power before trying to re-enter.";
+					close;
+				} else if (.@ins_nyd_check2 == 2) {
 					mes "[Yggdrasil Gatekeeper]";
-					mes "You are no longer able to enter Nidhogger's Nest, as your instance has expired.";
+					mes "The World Tree Yggdrasil has stabilized. Would you like to enter Nidhoggur's Nest again?";
 					next;
 					mes "[Yggdrasil Gatekeeper]";
-					mes "After Nidhoggur's Shadow disappears, at least 3 days is needed for stabilizing.";
+					mes "If you would like to enter again, please register with me.";
+					erasequest 3135;
+					erasequest 3136;
+					set 'ins_nyd2,0;
 					close;
 				}
-			case 3:
-				close;
 			}
 		}
-		else if (.@ins_nyd_check == 0 || .@ins_nyd_check == 1) {
-			mes "[Yggdrasil Gatekeeper]";
-			mes "With the defeat of Nidhoggur's Shadow, the roots of the World Tree Yggdrasil are also affected.";
-			next;
-			mes "[Yggdrasil Gatekeeper]";
-			mes "After Nidhoggur's Shadow disappears, at least 3 days is needed for stabilizing.";
-			close;
-		}
-		else if (.@ins_nyd_check == 2) {
-			mes "[Yggdrasil Gatekeeper]";
-			mes "The World Tree Yggdrasil has stabilized. Would you like to enter Nidhoggur's Nest again?";
-			next;
-			mes "[Yggdrasil Gatekeeper]";
-			mes "If you would like to enter again, please register with me.";
-			set party_instance_id2,0;
-			erasequest 3135;
-			erasequest 3136;
-			set 'ins_nyd2,0;
-			close;
-		}
-		else {
-			close;
-		}
-	}
-	else {
+		close;
+	} else {
 		mes "A great stone gate stands before you. The sculpture of a terrible dragon spreads its powerful looking wings.";
 		next;
 		mes "Near the bottom of the gate, Laphine tribeswomen have been turned to stone and now look like they are part of the great door.";
@@ -296,10 +203,23 @@ nyd_dun02,100,201,3	script	Yggdrasil Gatekeeper	111,8,8,{
 	}
 	close;
 
+L_Enter:
+	if (has_instance("1@nyd") == "") {
+		mes "[Yggdrasil Gatekeeper]";
+		mes "You did not request for entrance. Please let your leader request entrance.";
+		close;
+	} else {
+		mapannounce "nyd_dun02", getpartyname(getcharid(1))+"'s party member "+strcharinfo(0)+" has entered Nidhoggur's Nest.",bc_map,"0x00ff99";
+		if (checkquest(3135) == -1) setquest 3135;
+		if (checkquest(3136) == -1) setquest 3136;
+		warp "1@nyd",32,37;
+		close;
+	}
+
 OnTouch_:
 	if (ins_nyd == 0) {
 		specialeffect2 EF_CHANGECOLD;
-		specialeffect EF_CHANGECOLD,"Yggdrasil Gatekeeper";
+		specialeffect EF_CHANGECOLD;
 	}
 	end;
 }
@@ -318,8 +238,7 @@ mid_camp,271,299,3	script	Historian Magnifier#edq	755,3,3,{
 		mes "[Historian Magniffer]";
 		mes "We are expecting a lot from you, expert adventurer. So, if you find anything... just tell me.";
 		close;
-	}
-	else if (ins_nyd == 2) {
+	} else if (ins_nyd == 2) {
 		mes "Does Commander Agip want to talk to me? Let's listen to his story.";
 		next;
 		mes "[Historian Magniffer]";
@@ -361,12 +280,10 @@ mid_camp,271,299,3	script	Historian Magnifier#edq	755,3,3,{
 		mes "I will definitely help you find a way to enter the World Tree directly so, just believe in me! Okay~!!";
 		set ins_nyd,3;
 		close;
-	}
-	else if (ins_nyd == 3) {
+	} else if (ins_nyd == 3) {
 		mes "Why are you standing there? Go to my assistant in the Prontera Library!";
 		close;
-	}
-	else if (ins_nyd == 4) {
+	} else if (ins_nyd == 4) {
 		mes "You've come back... Good, how's Naomi? Actually, I don't need to worry about her. She is always cheerful. Haha.";
 		next;
 		mes "[Historian Magnifier]";
@@ -422,8 +339,7 @@ mid_camp,271,299,3	script	Historian Magnifier#edq	755,3,3,{
 			set ins_nyd,5;
 			close;
 		}
-	}
-	else if ((ins_nyd == 5) || (ins_nyd == 51) || (ins_nyd == 52)) {
+	} else if ((ins_nyd == 5) || (ins_nyd == 51) || (ins_nyd == 52)) {
 		mes "Okay, let's try to contact them first, to be clear about any caves or treasures.";
 		next;
 		mes "[Historian Magnifier]";
@@ -432,8 +348,7 @@ mid_camp,271,299,3	script	Historian Magnifier#edq	755,3,3,{
 		mes "[Historian Magnifier]";
 		mes "I'll also keep searching here. If you find anything, come back and let me know.";
 		close;
-	}
-	else if ((ins_nyd == 61) || (ins_nyd == 62)) {
+	} else if ((ins_nyd == 61) || (ins_nyd == 62)) {
 		mes "Ah, you've come at a proper time. I found a curious thing while looking for reports from Arunafeltz.";
 		next;
 		mes "[Historian Magnifier]";
@@ -462,12 +377,10 @@ mid_camp,271,299,3	script	Historian Magnifier#edq	755,3,3,{
 		mes "Let's report to Commander Agip about the situation so far. Then, we wait on his decision.";
 		set ins_nyd,7;
 		close;
-	}
-	else if ((ins_nyd == 7) || (ins_nyd == 8)) {
+	} else if ((ins_nyd == 7) || (ins_nyd == 8)) {
 		mes "Report to Commander Hibba Agip about what we have discovered, since time is dependent on his decision.";
 		close;
-	}
-	else if ((ins_nyd == 121) || (ins_nyd == 122) || (ins_nyd == 131) || (ins_nyd == 132) || (ins_nyd ==14)) {
+	} else if ((ins_nyd == 121) || (ins_nyd == 122) || (ins_nyd == 131) || (ins_nyd == 132) || (ins_nyd ==14)) {
 		mes "So that's how it is... we were right about some parts of it... it's called the Guardian's Nest.";
 		next;
 		mes "[Historian Magnifier]";
@@ -482,8 +395,7 @@ mid_camp,271,299,3	script	Historian Magnifier#edq	755,3,3,{
 		mes "[Historian Magnifier]";
 		mes "First, report to Commander Agip, then act according to the situation. Let me organize my research findings...";
 		close;
-	}
-	else {
+	} else {
 		mes "Sure, the mainland also has lots of interesting adventures... Hello, I am Magnifier, a historian dispatched from the Prontera royal court.";
 		next;
 		mes "[Historian Magnifier]";
@@ -610,8 +522,7 @@ prt_in,171,94,3	script	Assistant Naomi#edq	893,3,3,{
 			set ins_nyd,4;
 			close;
 		}
-	}
-	else if (ins_nyd == 4) {
+	} else if (ins_nyd == 4) {
 		mes "Browse around, to take a look at the books.";
 		next;
 		switch(select("Discovery of Heterogeneity:Report of Indigenous Tribes")) {
@@ -676,8 +587,7 @@ prt_in,171,94,3	script	Assistant Naomi#edq	893,3,3,{
 			mes "They have declared they will attend to the high courts for the first time in 1000 human years, since the end of the battles of Gods vs. Magicians.";
 			close;
 		}
-	}
-	else {
+	} else {
 		mes "The doctor never ever tries to come back, and there're too many things to do... How can I do it all...";
 		next;
 		mes "[Assistant Naomi]";
@@ -723,8 +633,7 @@ splendide,198,178,3	script	Grumbling Soldier#edq	447,3,3,{
 			case 3:
 				close;
 			}
-		}
-		else {
+		} else {
 			mes "[Grumbling Soldier]";
 			mes "Nowadays, the world has turned unstable. I can't even fly comfortably anymore.";
 			next;
@@ -741,8 +650,7 @@ splendide,198,178,3	script	Grumbling Soldier#edq	447,3,3,{
 			mes "Although they ignore your track record, still, one should be careful...";
 			close;
 		}
-	}
-	else {
+	} else {
 		mes "SeLarsmar Di marThusVil U SeMushVohl";
 		close;
 	}
@@ -788,8 +696,7 @@ splendide,240,164,3	script	Sighing Soldier#edq	461,3,3,{
 			case 3:
 				close;
 			}
-		}
-		else {
+		} else {
 			mes "[Sighing Soldier]";
 			mes "When will we be finished with this combat with the Sapha? Ugghhhh...";
 			next;
@@ -800,8 +707,7 @@ splendide,240,164,3	script	Sighing Soldier#edq	461,3,3,{
 			mes "Is there no way to resolve this by communicating? There's no meaning in useless combat! Geez.";
 			close;
 		}
-	}
-	else {
+	} else {
 		mes "VohlLarsmar Ha DielCyatas";
 		close;
 	}
@@ -857,8 +763,7 @@ spl_in01,109,60,3	script	Commander Lebiordirr#edq	435,3,3,{
 			mes "Now, if you understand this, inform your friends.";
 			set ins_nyd,61;
 			close;
-		}
-		else if (ins_nyd == 61) {
+		} else if (ins_nyd == 61) {
 			mes "If you can't follow this rule, I will stop associating with you and ban all of your people from here.";
 			next;
 			mes "[Commander Lebiordirr]";
@@ -867,8 +772,7 @@ spl_in01,109,60,3	script	Commander Lebiordirr#edq	435,3,3,{
 			mes "[Commander Lebiordirr]";
 			mes "Now, if you understand this, inform your friends.";
 			close;
-		}
-		else if (ins_nyd == 81) {
+		} else if (ins_nyd == 81) {
 			mes "Why have you come back, outsider?";
 			next;
 			select("To ask the Laphines about exploring...");
@@ -941,12 +845,10 @@ spl_in01,109,60,3	script	Commander Lebiordirr#edq	435,3,3,{
 			mes "Here, outsider. Arioss will explain the situation with the giants. Talk with him...";
 			set ins_nyd,91;
 			close;
-		}
-		else if ((ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) {
+		} else if ((ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) {
 			mes "Outsider. Arioss here will explain the situation with the giants, talk with him...";
 			close;
-		}
-		else if ((ins_nyd == 72) || (ins_nyd == 82) || (ins_nyd == 92) || (ins_nyd == 102) || (ins_nyd == 112) || (ins_nyd == 122) || (ins_nyd == 132)) {
+		} else if ((ins_nyd == 72) || (ins_nyd == 82) || (ins_nyd == 92) || (ins_nyd == 102) || (ins_nyd == 112) || (ins_nyd == 122) || (ins_nyd == 132)) {
 			mes "Welcome to the Laphine camp in Splendide, outsider... I am Lebiordirr. I am in charge here.";
 			next;
 			mes "[Commander Lebiordirr]";
@@ -955,8 +857,7 @@ spl_in01,109,60,3	script	Commander Lebiordirr#edq	435,3,3,{
 			mes "[Commander Lebiordirr]";
 			mes "If you are cautious with your actions, I won't place any harm on you. Fare well.";
 			close;
-		}
-		else if (ins_nyd == 203) {
+		} else if (ins_nyd == 203) {
 			mes "I was waiting for you. You came back safe, that's good news. Did you find anything?";
 			next;
 			select("Explain about the guardian Nidhoggur's leave.");
@@ -1007,12 +908,10 @@ spl_in01,109,60,3	script	Commander Lebiordirr#edq	435,3,3,{
 			mes "Commander...";
 			set ins_nyd,121;
 			close;
-		}
-		else if ((ins_nyd == 121) || (ins_nyd == 131)) {
+		} else if ((ins_nyd == 121) || (ins_nyd == 131)) {
 			mes "Strange one, thank you for your cooperation in such situations... Please forget what has happened today...";
 			close;
-		}
-		else {
+		} else {
 			mes "Welcome to the Laphine camp in Splendide, outsider... I am Lebiordirr. I am in charge here.";
 			next;
 			mes "[Commander Lebiordirr]";
@@ -1022,8 +921,7 @@ spl_in01,109,60,3	script	Commander Lebiordirr#edq	435,3,3,{
 			mes "If you are cautious with your actions, I won't place any harm on you. Fare well.";
 			close;
 		}
-	}
-	else {
+	} else {
 		mes "ThusDurnah Ra SharVeldIyaz U UorAmanDur Yee neaOsaAdor Yee...";
 		close;
 	}
@@ -1082,8 +980,7 @@ spl_in01,104,56,3	script	Aide Arioss#edq	437,3,3,{
 			mes "I have already told you what you wanted to know... If you need anything else, just let me know.";
 			set ins_nyd,101;
 			close;
-		}
-		else if (ins_nyd == 101) {
+		} else if (ins_nyd == 101) {
 			mes "Ah, you said that there is a strange power blocking the entrance to the Guardian's nest, right?";
 			next;
 			mes "[Aide Arioss]";
@@ -1124,18 +1021,15 @@ spl_in01,104,56,3	script	Aide Arioss#edq	437,3,3,{
 			mes "Please meet the Guardian, and come back with an answer to everything. I believe in you.";
 			set ins_nyd,111;
 			close;
-		}
-		else if ((ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) {
+		} else if ((ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) {
 			mes "Please meet with the Guardian and take a wise answer from him. I will trust you.";
 			close;
-		}
-		else if ((ins_nyd == 72) || (ins_nyd == 82) || (ins_nyd == 92) || (ins_nyd == 102) || (ins_nyd == 112)) {
+		} else if ((ins_nyd == 72) || (ins_nyd == 82) || (ins_nyd == 92) || (ins_nyd == 102) || (ins_nyd == 112)) {
 			mes "... ...";
 			next;
 			mes "Not even caring about this a single bit? What a stupid woman...";
 			close;
-		}
-		else if (ins_nyd == 121) {
+		} else if (ins_nyd == 121) {
 			mes "Things have actually become like this... as priests of the Guardian, it's our responsibility...";
 			next;
 			mes "[Aide Arioss]";
@@ -1149,19 +1043,16 @@ spl_in01,104,56,3	script	Aide Arioss#edq	437,3,3,{
 			mes "[Aide Arioss]";
 			mes "If we can help you with anything in the future, we will do all we can to assist you. Once again, thank you.";
 			close;
-		}
-		else if (ins_nyd == 131) {
+		} else if (ins_nyd == 131) {
 			mes "If we can help you with anything in the future, we will do all we can to assist you. Once again, thank you.";
 			close;
-		}
-		else {
+		} else {
 			mes "... ...";
 			next;
 			mes "Never give attention to... um... a blunt woman...";
 			close;
 		}
-	}
-	else {
+	} else {
 		mes "AmanVilShar Ie DorLuShar Mu Re";
 		close;
 	}
@@ -1251,8 +1142,7 @@ man_in01,311,57,3	script	Neat Etorr#edq	453,3,3,{
 			mes "You have heard it all, now please report back to your race.";
 			set ins_nyd,62;
 			close;
-		}
-		else if (ins_nyd == 62) {
+		} else if (ins_nyd == 62) {
 			mes "That captive is the only reference for our tribe, so we have taken good care of her. She is related to your current investigation.";
 			next;
 			mes "[Neat Etorr]";
@@ -1261,15 +1151,13 @@ man_in01,311,57,3	script	Neat Etorr#edq	453,3,3,{
 			mes "[Neat Etorr]";
 			mes "If you don't accept our request, then do not expect any cooperations between our races in the future.";
 			close;
-		}
-		else if (ins_nyd == 72) {
+		} else if (ins_nyd == 72) {
 			mes "Recently, because you do not understand the current situations, you have done some things that I, as a leader, can't ignore any longer.";
 			next;
 			mes "[Neat Etorr]";
 			mes "I hope that your people will becareful of your actions on this land, and terminate any unnecessary interventions.";
 			close;
-		}
-		else if (ins_nyd == 82) {
+		} else if (ins_nyd == 82) {
 			mes "Do you need me for something, strange one?";
 			next;
 			select("Received invitation from the Sapha tribe to cooperate and investigate.");
@@ -1339,19 +1227,16 @@ man_in01,311,57,3	script	Neat Etorr#edq	453,3,3,{
 			mes "Strange one, we hope our cooperation will be a good one. Now please go interrogate the Laphine prisoner.";
 			set ins_nyd,92;
 			close;
-		}
-		else if ((ins_nyd == 92) || (ins_nyd == 102) || (ins_nyd == 112) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) {
+		} else if ((ins_nyd == 92) || (ins_nyd == 102) || (ins_nyd == 112) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) {
 			mes "Strange one, we hope our cooperation will be a good one. Now please go interrogate the Laphine prisoner.";
 			close;
-		}
-		else if ((ins_nyd == 71) || (ins_nyd == 81) || (ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 121) || (ins_nyd == 131)) {
+		} else if ((ins_nyd == 71) || (ins_nyd == 81) || (ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 121) || (ins_nyd == 131)) {
 			mes "Outsider. Welcome to Manuk, the village of the Sapha. I am its representative, Neat Etorr.";
 			next;
 			mes "[Neat Etorr]";
 			mes "We are just a small village, nothing special... but rest comfortably.";
 			close;
-		}
-		else if (ins_nyd == 203) {
+		} else if (ins_nyd == 203) {
 			mes "I was waiting for you. It's good that you're safe. Did you find anything?";
 			next;
 			select("Explain the sudden leave of the Guardian.");
@@ -1392,20 +1277,17 @@ man_in01,311,57,3	script	Neat Etorr#edq	453,3,3,{
 			getitem 6080,10; //Manuk_Coin
 			set ins_nyd,132;
 			close;
-		}
-		else if (ins_nyd == 132) {
+		} else if (ins_nyd == 132) {
 			mes "Strange one, thank you for helping us in the time of need. I will never forget your kindness.";
 			close;
-		}
-		else {
+		} else {
 			mes "Outsider. Welcome to the Manuk village of Sapha. I am its representative, Neat Etorr.";
 			next;
 			mes "[Neat Etorr]";
 			mes "We are just a small village, nothing special... but rest comfortably.";
 			close;
 		}
-	}
-	else {
+	} else {
 		mes "Tkeh likek Ohek QekhlHkl PkedlioH.";
 		close;
 	}
@@ -1484,8 +1366,7 @@ man_in01,291,62,3	script	Laphine Prisoner#edq	437,3,3,{
 			case 4:
 				close;
 			}
-		}
-		else if (ins_nyd == 92) {
+		} else if (ins_nyd == 92) {
 			mes "The sapha tribe went as far as cooperating with an unknown race?";
 			next;
 			mes "[Laphine Prisoner]";
@@ -1541,8 +1422,7 @@ man_in01,291,62,3	script	Laphine Prisoner#edq	437,3,3,{
 			mes "I have already told you everything you wanted to hear. If you have any other requests, please let me know.";
 			set ins_nyd,102;
 			close;
-		}
-		else if (ins_nyd == 102) {
+		} else if (ins_nyd == 102) {
 			mes "Ah, you said that there is a strange power blocking the entrance to the Guardian's nest, right?";
 			next;
 			mes "[Laphine Prisoner]";
@@ -1583,19 +1463,16 @@ man_in01,291,62,3	script	Laphine Prisoner#edq	437,3,3,{
 			mes "Please meet the Guardian, and come back with an answer to everything. And tell the answer to...";
 			set ins_nyd,112;
 			close;
-		}
-		else if ((ins_nyd == 71) || (ins_nyd == 81) || (ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 121) || (ins_nyd == 131)) {
+		} else if ((ins_nyd == 71) || (ins_nyd == 81) || (ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 121) || (ins_nyd == 131)) {
 			mes "... ...";
 			next;
 			mes "[Manuk Guard]";
 			mes "Hey, outsider! Step away from the prisoner!";
 			close;
-		}
-		else if (ins_nyd == 112) {
+		} else if (ins_nyd == 112) {
 			mes "Please meet the Guardian, and come back with an answer to everything. And tell the answer to...";
 			close;
-		}
-		else if (ins_nyd == 132) {
+		} else if (ins_nyd == 132) {
 			mes "Yes...I heard your conversation with the Sapha tribe...";
 			next;
 			mes "[Laphine Prisoner]";
@@ -1610,16 +1487,14 @@ man_in01,291,62,3	script	Laphine Prisoner#edq	437,3,3,{
 			mes "[Laphine Prisoner]";
 			mes "It's...it's better if you don't believe the one called Etorr...the minds of the Sapha tribe is unpredictable.";
 			close;
-		}
-		else {
+		} else {
 			mes "... ...";
 			next;
 			mes "[Manuk Guard]";
 			mes "Hey, outsider! Step away from the prisoner!";
 			close;
 		}
-	}
-	else {
+	} else {
 		mes "AmanVilShar Ie DorLuShar Mu Re";
 		close;
 	}
@@ -1648,7 +1523,7 @@ OnTouch_:
 		mes "[World Tree World Tree Yggdrasil]";
 		mes "It's all over... servants of the Guardian... Hurry up and leave this place.";
 		next;
-		while (1) {
+		while(1) {
 			switch(select("Who are you?:What do you mean?")) {
 			case 1:
 				mes "[World Tree World Tree Yggdrasil]";
@@ -1713,12 +1588,13 @@ OnTouch_:
 		mes "[World Tree Yggdrasil]";
 		mes "Are you willing to accept this mission? Even if it means to pay with your life?";
 		next;
-		if(select("Leave it to us.:We can't do it.")==2) close;
+		if(select("Leave it to us.:We can't do it.") == 2)
+			close;
 		mes "[World Tree Yggdrasil]";
 		mes "I thank you deeply for your decision. I will use what is left of my powers to open up the path towards the Guardian's Nest.";
 		next;
 		mes "[World Tree Yggdrasil]";
-		if (getpartyleader(getcharid(1),2) == getcharid(0)) {
+		if (getcharid(0) == getpartyleader(getcharid(1),2)) {
 			mes "The path to the Guardian's Nest is just past the waterfall by the large World Tree Yggdrasil to the North. The defensive mechanisms of the Sanctuary will start immediately.";
 			next;
 			mes "[World Tree Yggdrasil]";
@@ -1733,8 +1609,8 @@ OnTouch_:
 			mes "[World Tree Yggdrasil]";
 			mes "And... Be careful... Be careful of the shadow's power.";
 			set 'ins_nyd2,1;
-			donpcevent instance_npcname("ins_nyd_1f_timer", instance_id())+"::OnEnable";
-			donpcevent instance_npcname("nyd_call_mon_1", instance_id())+"::OnEnable";
+			donpcevent instance_npcname("ins_nyd_1f_timer")+"::OnEnable";
+			donpcevent instance_npcname("nyd_call_mon_1")+"::OnEnable";
 			close;
 		} else {
 			mes "The path to the Guardian's Nest is just past the waterfall by the large World Tree Yggdrasil to the North. The defensive mechanisms will start immediately.";
@@ -1752,8 +1628,7 @@ OnTouch_:
 			mes "And... Be careful... Be careful of the shadow's power.";
 			close;
 		}
-	}
-	else if ('ins_nyd2 == 1) {
+	} else if ('ins_nyd2 == 1) {
 		mes "[World Tree Yggdrasil]";
 		mes "The path to the Guardian's Nest is just past the waterfall by the large World Tree Yggdrasil to the North. The defensive mechanisms will start immediately.";
 		next;
@@ -1763,8 +1638,7 @@ OnTouch_:
 		mes "[World Tree Yggdrasil]";
 		mes "The gate will open soon. Go defeat all of the guardians.";
 		close;
-	}
-	else if ('ins_nyd2 == 2) {
+	} else if ('ins_nyd2 == 2) {
 		mes "[World Tree Yggdrasil]";
 		mes "The path to the Guardian's Nest is just past the waterfall by the large World Tree Yggdrasil to the North.";
 		next;
@@ -1772,11 +1646,9 @@ OnTouch_:
 		mes "Use your powers... and destroy the vile Shadow...";
 		next;
 		mes "[World Tree Yggdrasil]";
-		mes "This is.. all I can do for you...";
+		mes "This is... all I can do for you...";
 		close;
-
-	}
-	else {
+	} else {
 		mes "[World Tree Yggdrasil]";
 		mes "Those who want to taint the sacred Sanctuary of the Guardian... Get out.";
 		warp "mid_camp",100,100;
@@ -1791,121 +1663,139 @@ OnTouch:
 		close;
 	}
 	end;
+
+OnInstanceInit: // Temporary fix for @reloadscript.
+	set 'ins_nyd2,0;
+	end;
 }
 
 1@nyd,1,1,0	script	nyd_call_mon_1	-1,{
 OnInstanceInit:
-	enablenpc instance_npcname("nyd_call_mon_1", instance_id());
+	enablenpc instance_npcname("nyd_call_mon_1");
 	end;
 
 OnEnable:
-	monster "1@nyd",220,250,"Nidhoggur's Guardian#1",2020,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",220,252,"Nidhoggur's Guardian#2",2020,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",240,270,"Nidhoggur's Guardian#3",2020,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",240,272,"Nidhoggur's Guardian#4",2020,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",200,200,"Nidhoggur's Guardian#5",2020,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",210,210,"Nidhoggur's Guardian#6",2020,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",225,265,"Nidhoggur's Guardian#7",2021,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",225,270,"Nidhoggur's Guardian#8",2021,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",245,235,"Nidhoggur's Guardian#9",2021,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",255,255,"Nidhoggur's Guardian#10",2021,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",225,245,"Nidhoggur's Guardian#11",2021,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	monster "1@nyd",230,280,"Nidhoggur's Guardian#12",2021,1,instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	instance_announce -1, "Nidhoggur's Guardian : Protect the Guardian's Sanctuary. Get rid of the intruders.",bc_map,"0x00ff99";
+	set .@map$, instance_mapname("1@nyd");
+	monster .@map$,220,250,"Nidhoggur's Guardian#1",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,220,252,"Nidhoggur's Guardian#2",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,240,270,"Nidhoggur's Guardian#3",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,240,272,"Nidhoggur's Guardian#4",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,200,200,"Nidhoggur's Guardian#5",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,210,210,"Nidhoggur's Guardian#6",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,225,265,"Nidhoggur's Guardian#7",2021,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,225,270,"Nidhoggur's Guardian#8",2021,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,245,235,"Nidhoggur's Guardian#9",2021,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,255,255,"Nidhoggur's Guardian#10",2021,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,225,245,"Nidhoggur's Guardian#11",2021,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	monster .@map$,230,280,"Nidhoggur's Guardian#12",2021,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	mapannounce .@map$, "Nidhoggur's Guardian : Protect the Guardian's Sanctuary. Get rid of the intruders.",bc_map,"0x00ff99";
 	end;
 
 OnDisable:
-	killmonster "1@nyd",instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead";
-	disablenpc instance_npcname("nyd_call_mon_1", instance_id());
+	killmonster instance_mapname("1@nyd"),instance_npcname("nyd_call_mon_1")+"::OnMyMobDead";
+	disablenpc instance_npcname("nyd_call_mon_1");
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("1@nyd", instance_npcname("nyd_call_mon_1", instance_id())+"::OnMyMobDead");
+	set .@map$, instance_mapname("1@nyd");
+	set .@mob_dead_num,mobcount(.@map$, instance_npcname("nyd_call_mon_1")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		instance_announce -1, "All of Nidhoggur's Guardians have been defeated!",bc_map,"0x00ff99";
-		donpcevent instance_npcname("ins_nyd_1f_timer", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_to2f_warp", instance_id())+"::OnEnable";
+		mapannounce .@map$, "All of Nidhoggur's Guardians have been defeated!",bc_map,"0x00ff99";
+		donpcevent instance_npcname("ins_nyd_1f_timer")+"::OnDisable";
+		donpcevent instance_npcname("nyd_to2f_warp")+"::OnEnable";
 		set 'ins_nyd2,2;
 	}
 	end;
 }
 
 1@nyd,1,2,0	script	ins_nyd_1f_timer	-1,{
-
 OnInstanceInit:
-	disablenpc instance_npcname("ins_nyd_1f_timer", instance_id());
+	disablenpc instance_npcname("ins_nyd_1f_timer");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("ins_nyd_1f_timer", instance_id());
+	enablenpc instance_npcname("ins_nyd_1f_timer");
 	initnpctimer;
 	end;
 
 OnDisable:
-	disablenpc instance_npcname("ins_nyd_1f_timer", instance_id());
+	disablenpc instance_npcname("ins_nyd_1f_timer");
 	stopnpctimer;
-	killmonsterall "1@nyd";
+	killmonsterall instance_mapname("1@nyd");
 	end;
 
 OnTimer900000:
-	instance_announce -1, "World Tree Yggdrasil : There's not much time left. Please hurry.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@nyd"), "World Tree Yggdrasil : There's not much time left. Please hurry.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer1200000:
-	instance_announce -1, "World Tree Yggdrasil : My powers are slowly disappearing. Please hurry.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@nyd"), "World Tree Yggdrasil : My powers are slowly disappearing. Please hurry.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer1500000:
-	instance_announce -1, "World Tree Yggdrasil : I'm... almost at my limit... please hurry up."	,bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@nyd"), "World Tree Yggdrasil : I'm... almost at my limit... please hurry up.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer1800000:
-	instance_announce -1, "World Tree Yggdrasil : You've failed... but I will use what power I have left... to send you out of here.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@nyd"), "World Tree Yggdrasil : You've failed... but I will use what power I have left... to send you out of here.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer1830000:
-	instance_announce -1, "Opening of the Gate has failed.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@nyd"), "Opening of the Gate has failed.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer1850000:
-	donpcevent instance_npcname("ins_nyd_1f_timer", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_call_mon_1", instance_id())+"::OnDisable";
+	donpcevent instance_npcname("ins_nyd_1f_timer")+"::OnDisable";
+	donpcevent instance_npcname("nyd_call_mon_1")+"::OnDisable";
 	instance_warpall "mid_camp",310,150;
 	stopnpctimer;
 	end;
 }
 
 1@nyd,195,320,0	script	nyd_to2f_warp	45,5,5,{
-
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_to2f_warp", instance_id());
+OnDisable:
+	disablenpc instance_npcname("nyd_to2f_warp");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("nyd_to2f_warp", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_to2f_warp", instance_id());
+	enablenpc instance_npcname("nyd_to2f_warp");
 	end;
 
 OnTouch:
-	warp "2@nyd",200,10;
+	set 'ins_nyd2,3;
+	warp instance_mapname("2@nyd"),200,10;
 	end;
 }
 
 1@nyd,1,1,0	script	ins_nyd1_spawn_mobs	-1,{
 OnInstanceInit:
-	monster "1@nyd",0,0,"Ancient Tree",2019,20;
-	monster "1@nyd",0,0,"Rhyncho",2020,15;
-	monster "1@nyd",0,0,"Phylla",2021,15;
-	monster "1@nyd",0,0,"Aqua Elemental",2016,15;
-	monster "1@nyd",0,0,"Dark Pinguicula",2015,15;
-	monster "1@nyd",0,0,"Ancient Tree",2019,20;
-	monster "1@nyd",0,0,"Rhyncho",2020,15;
-	monster "1@nyd",0,0,"Phylla",2021,15;
-	monster "1@nyd",0,0,"Aqua Elemental",2016,15;
-	monster "1@nyd",0,0,"Dark Pinguicula",2015,15;
+	set .@map$, instance_mapname("1@nyd");
+	monster .@map$,0,0,"Ancient Tree",2019,40,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyTreeDead";
+	monster .@map$,0,0,"Rhyncho",2020,30,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyRhynDead";
+	monster .@map$,0,0,"Phylla",2021,30,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyPhyDead";
+	monster .@map$,0,0,"Aqua Elemental",2016,30,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyAquaDead";
+	monster .@map$,0,0,"Dark Pinguicula",2015,30,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyPingDead";
+	end;
+
+OnMyTreeDead:
+	monster instance_mapname("1@nyd"),0,0,"Ancient Tree",2019,1,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyTreeDead";
+	end;
+
+OnMyRhynDead:
+	monster instance_mapname("1@nyd"),0,0,"Rhyncho",2020,1,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyRhynDead";
+	end;
+
+OnMyPhyDead:
+	monster instance_mapname("1@nyd"),0,0,"Phylla",2021,1,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyPhyDead";
+	end;
+
+OnMyAquaDead:
+	monster instance_mapname("1@nyd"),0,0,"Aqua Elemental",2016,1,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyAquaDead";
+	end;
+
+OnMyPingDead:
+	monster instance_mapname("1@nyd"),0,0,"Dark Pinguicula",2015,1,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyPingDead";
 	end;
 }
 
@@ -1913,41 +1803,35 @@ OnInstanceInit:
 //============================================================
 2@nyd,200,14,0	script	nyd_2f_enter	-1,6,6,{
 OnTouch_:
-	donpcevent instance_npcname("nyd_2f_enter_broad", instance_id())+"::OnEnable";
-	disablenpc instance_npcname("nyd_2f_enter", instance_id());
+	donpcevent instance_npcname("nyd_2f_enter_broad")+"::OnEnable";
+	disablenpc instance_npcname("nyd_2f_enter");
 	end;
 }
 
 2@nyd,1,1,0	script	nyd_2f_enter_broad	-1,{
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_enter_broad", instance_id());
+OnDisable:
+	disablenpc instance_npcname("nyd_2f_enter_broad");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("nyd_2f_enter_broad", instance_id());
+	enablenpc instance_npcname("nyd_2f_enter_broad");
 	initnpctimer;
 	end;
 
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_enter_broad", instance_id());
-	end;
-
 OnTimer12000:
-	instance_announce -1, "Nidhoggur's Shadow : No more...I can't stand this anymore...",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@nyd"), "Nidhoggur's Shadow : No more... I can't stand this anymore...",bc_map,"0xFFFF00";
 	end;
 
 OnTimer15000:
-	instance_announce -1, "Nidhoggur's Shadow : I need...I need the World Tree Yggdrasil's powers...",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@nyd"), "Nidhoggur's Shadow : I need... I need the World Tree Yggdrasil's powers...",bc_map,"0xFFFF00";
 	end;
 
 OnTimer18000:
-	instance_announce -1, "Nidhoggur's Shadow : Destroy...everything...",bc_map,"0xFFFF00";
-	end;
-	/*
+	mapannounce instance_mapname("2@nyd"), "Nidhoggur's Shadow : Destroy... everything...",bc_map,"0xFFFF00";
 	stopnpctimer;
-	disablenpc instance_npcname("nyd_2f_enter_broad", instance_id());
+	disablenpc instance_npcname("nyd_2f_enter_broad");
 	end;
-	*/
 }
 
 2@nyd,199,178,0	script	nyd_2f_ddr_control	-1,6,6,{
@@ -1957,19 +1841,15 @@ OnTouch:
 	next;
 	mes "The strange power slowly surrounds your body, the dimension is starting to shift.";
 	close2;
-	warp "2@nyd",199,255;
+	warp instance_mapname("2@nyd"),199,255;
 	end;
 }
 
 2@nyd,199,268,0	script	nyd_2f_boss_enter	-1,8,8,{
-OnInstanceInit:
-	enablenpc instance_npcname("nyd_2f_boss_enter", instance_id());
-	end;
-
 OnTouch_:
-	if (getpartyleader(getcharid(1),2) == getcharid(0)) {
-		donpcevent instance_npcname("nyd_2f_boss_enter_call", instance_id())+"::OnEnable";
-		disablenpc instance_npcname("nyd_2f_boss_enter", instance_id());
+	if (getcharid(0) == getpartyleader(getcharid(1),2)) {
+		donpcevent instance_npcname("nyd_2f_boss_enter_call")+"::OnEnable";
+		disablenpc instance_npcname("nyd_2f_boss_enter");
 		end;
 	}
 	end;
@@ -1977,84 +1857,83 @@ OnTouch_:
 
 2@nyd,2,2,0	script	nyd_2f_boss_enter_call	-1,{
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_boss_enter_call", instance_id());
+	disablenpc instance_npcname("nyd_2f_boss_enter_call");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("nyd_2f_boss_enter_call", instance_id());
-	monster "2@nyd",199,327,"Nidhoggur's Shadow#",2022,1,instance_npcname("nyd_2f_boss_enter_call", instance_id())+"::OnMyMobDead";
-	instance_announce -1, "Nidhoggur's Shadow : I will devour all of you...you and the World Tree Yggdrasil.",bc_map,"0x00ff99";
-	//donpcevent instance_npcname("nyd_2f_boss_enter_call", instance_id())+"::Ongo";
+	enablenpc instance_npcname("nyd_2f_boss_enter_call");
+	set .@map$, instance_mapname("2@nyd");
+	monster .@map$,199,327,"Nidhoggur's Shadow",2022,1,instance_npcname("nyd_2f_boss_enter_call")+"::OnMyMobDead";
+	mapannounce .@map$, "Nidhoggur's Shadow : I will devour all of you... you and the World Tree Yggdrasil.",bc_map,"0x00ff99";
+	//donpcevent instance_npcname("nyd_2f_boss_enter_call")+"::Ongo";
 	initnpctimer;
 	end;
 
 OnDisable:
-	disablenpc instance_npcname("nyd_2f_boss_enter_call", instance_id());
-	killmonster "2@nyd",instance_npcname("nyd_2f_boss_enter_call", instance_id())+"::OnMyMobDead";
+	killmonster instance_mapname("2@nyd"),instance_npcname("nyd_2f_boss_enter_call")+"::OnMyMobDead";
+	disablenpc instance_npcname("nyd_2f_boss_enter_call");
 	end;
 
 OnTimer180000:
-	set .@rullet,rand(1,4);
-	if (.@rullet == 1) {
-		instance_announce -1, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,278;
+	stopnpctimer;
+OnWarpColor:
+	set .@map$, instance_mapname("2@nyd");
+	switch(rand(1,4)) {
+	case 1:
+		mapannounce .@map$, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00";
+		donpcevent instance_npcname("nyd_2f_white")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_yellow")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_green")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_red")+"::OnEnable";
+		instance_warpall .@map$,115,278;
 		end;
-	}
-	else if (.@rullet == 2) {
-		instance_announce -1, "Nidhoggur's Shadow : I will freeze every last drop of your blood.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,373;
+	case 2:
+		mapannounce .@map$, "Nidhoggur's Shadow : I will freeze every last drop of your blood.",bc_map,"0xFFFF00";
+		donpcevent instance_npcname("nyd_2f_red")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_yellow")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_green")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_white")+"::OnEnable";
+		instance_warpall .@map$,115,373;
 		end;
-	}
-	else if (.@rullet == 3) {
-		instance_announce -1, "Nidhoggur's Shadow : Sleep for eternity in an empty illusion.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,278;
+	case 3:
+		mapannounce .@map$, "Nidhoggur's Shadow : Sleep for eternity in an empty illusion.",bc_map,"0xFFFF00";
+		donpcevent instance_npcname("nyd_2f_red")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_white")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_green")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_yellow")+"::OnEnable";
+		instance_warpall .@map$,284,278;
 		end;
-	}
-	else if (.@rullet == 4) {
-		instance_announce -1, "Nidhoggur's Shadow : I'll let you enjoy the pain of dying slowly.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,374;
+	case 4:
+		mapannounce .@map$, "Nidhoggur's Shadow : I'll let you enjoy the pain of dying slowly.",bc_map,"0xFFFF00";
+		donpcevent instance_npcname("nyd_2f_red")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_white")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_yellow")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_green")+"::OnEnable";
+		instance_warpall .@map$,284,374;
 		end;
 	}
-	stopnpctimer;
 	end;
 
 OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@nyd",instance_npcname("nyd_2f_boss_enter_call", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		instance_announce -1, "Nidhoggur's Shadow : World Tree Yggdrasil's guardian... his powers are disappearing...",bc_map,"0x00ff99";
-		donpcevent instance_npcname("World Tree Yggdrasil#2F", instance_id())+"::OnEnable";
-		donpcevent instance_npcname("nyd_2f_boss_enter_call", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_boss_enter_logic", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_red_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green_c", instance_id())+"::OnDisable";
+	set .@map$, instance_mapname("2@nyd");
+	if (mobcount(.@map$,instance_npcname("nyd_2f_boss_enter_call")+"::OnMyMobDead") < 1) {
+		mapannounce .@map$, "Nidhoggur's Shadow : World Tree Yggdrasil's guardian... his powers are disappearing...",bc_map,"0x00ff99";
+		donpcevent instance_npcname("World Tree Yggdrasil#2F")+"::OnEnable";
+		donpcevent instance_npcname("nyd_2f_boss_enter_call")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_boss_enter_logic")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_red_c")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_white_c")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_yellow_c")+"::OnDisable";
+		donpcevent instance_npcname("nyd_2f_green_c")+"::OnDisable";
+		set 'ins_nyd2,4;
 		end;
 	}
-	 else {
-		end;
-	 }
+	end;
 }
 
 2@nyd,2,4,0	script	nyd_2f_boss_enter_logic	-1,{
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_boss_enter_logic", instance_id());
+	disablenpc instance_npcname("nyd_2f_boss_enter_logic");
 	end;
 
 OnEnable:
@@ -2064,48 +1943,12 @@ OnEnable:
 
 OnDisable:
 	stopnpctimer;
-	disablenpc instance_npcname("nyd_2f_boss_enter_logic", instance_id());
+	disablenpc instance_npcname("nyd_2f_boss_enter_logic");
 	end;
 
 OnTimer180000:
-	set .@rullet,rand(1,4);
-	if (.@rullet == 1) {
-		instance_announce -1, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,278;
-		end;
-	}
-	else if (.@rullet == 2) {
-		instance_announce -1, "Nidhoggur's Shadow : I will freeze every last drop of your blood.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,373;
-		end;
-	}
-	else if (.@rullet == 3) {
-		instance_announce -1, "Nidhoggur's Shadow : Sleep for eternity in an empty illusion.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,278;
-		end;
-	}
-	else if (.@rullet == 4) {
-		instance_announce -1, "Nidhoggur's Shadow : I'll let you enjoy the pain of dying slowly.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,374;
-		end;
-	}
 	stopnpctimer;
+	donpcevent instance_npcname("nyd_2f_boss_enter_call")+"::OnWarpColor";
 	end;
 }
 
@@ -2145,684 +1988,298 @@ OnTimer180000:
 	}
 
 OnInstanceInit:
-	disablenpc instance_npcname("World Tree Yggdrasil#2F", instance_id());
+OnDisable:
+	disablenpc instance_npcname("World Tree Yggdrasil#2F");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("World Tree Yggdrasil#2F", instance_id());
-	instance_announce -1, "World Tree Yggdrasil : You did good. Have everyone go to the Magic Circle in the middle, and get ready for the destruction of the nest.",bc_map,"0x00ff99";
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("World Tree Yggdrasil#2F", instance_id());
+	enablenpc instance_npcname("World Tree Yggdrasil#2F");
+	mapannounce instance_mapname("2@nyd"), "World Tree Yggdrasil : You did good. Have everyone go to the Magic Circle in the middle, and get ready for the destruction of the nest.",bc_map,"0x00ff99";
 	end;
 }
 
 2@nyd,115,278,0	script	nyd_2f_red	-1,5,5,{
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_red", instance_id());
+	disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("nyd_2f_red", instance_id());
-	donpcevent instance_npcname("nyd_2f_red_warp1", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_red_warp2", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_red_warp3", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_red_c", instance_id())+"::OnEnable";
+	enablenpc instance_npcname(strnpcinfo(0));
+	donpcevent instance_npcname(strnpcinfo(0)+"_warp1")+"::OnEnable";
+	donpcevent instance_npcname(strnpcinfo(0)+"_warp2")+"::OnEnable";
+	donpcevent instance_npcname(strnpcinfo(0)+"_warp3")+"::OnEnable";
+	donpcevent instance_npcname(strnpcinfo(0)+"_c")+"::OnEnable";
 	initnpctimer;
 	end;
 
 OnDisable:
-	donpcevent instance_npcname("nyd_2f_red_warp1", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_red_warp2", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_red_warp3", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_red", instance_id());
+	donpcevent instance_npcname(strnpcinfo(0)+"_warp1")+"::OnDisable";
+	donpcevent instance_npcname(strnpcinfo(0)+"_warp2")+"::OnDisable";
+	donpcevent instance_npcname(strnpcinfo(0)+"_warp3")+"::OnDisable";
+	disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnTouch:
-	percentheal -50,0;
-	percentheal -30,0;
-	sc_start SC_BLOODING,60000,0;
+	if (compare(strnpcinfo(0),"red")) {
+		percentheal -50,0;
+		percentheal -30,0;
+		sc_start SC_BLEEDING,60000,0;
+	} else if (compare(strnpcinfo(0),"white")) {
+		percentheal -50,0;
+		sc_start SC_FREEZE,20000,0;
+	} else if (compare(strnpcinfo(0),"yellow")) {
+		percentheal 0,-50;
+		sc_start SC_SLEEP,20000,0;
+		sc_start SC_CONFUSION,60000,0;
+	} else if (compare(strnpcinfo(0),"green")) {
+		percentheal -50,-50;
+		sc_start SC_POISON,60000,0;
+	}
 	end;
 
 OnTimer10000:
-	disablenpc instance_npcname("nyd_2f_red", instance_id());
+	disablenpc instance_npcname(strnpcinfo(0));
 	stopnpctimer;
 	end;
 }
 
 2@nyd,6,6,0	script	nyd_2f_red_c	-1,{
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_red_c", instance_id());
+	disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("nyd_2f_red_c", instance_id());
+	enablenpc instance_npcname(strnpcinfo(0));
 	initnpctimer;
-	monster "2@nyd",120,285,"Nidhoggur's Guardian#1",2020,1,instance_npcname("nyd_2f_red_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",119,286,"Nidhoggur's Guardian#2",2020,1,instance_npcname("nyd_2f_red_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",120,270,"Nidhoggur's Guardian#3",2020,1,instance_npcname("nyd_2f_red_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",119,269,"Nidhoggur's Guardian#4",2021,1,instance_npcname("nyd_2f_red_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",118,270,"Nidhoggur's Guardian#5",2021,1,instance_npcname("nyd_2f_red_c", instance_id())+"::OnMyMobDead";
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@nyd",instance_npcname("nyd_2f_red_c", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		instance_announce -1, "Nidhoggur's Shadow : You're not bad... but I will be your opponent this time.",bc_map,"0x00ff99";
-		donpcevent instance_npcname("nyd_2f_red_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_boss_enter_logic", instance_id())+"::OnEnable";
-		end;
+	set .@map$, instance_mapname("2@nyd");
+	set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+	if (compare(strnpcinfo(0),"red")) {
+		monster .@map$,120,285,"Nidhoggur's Guardian#1",2020,1,.@label$;
+		monster .@map$,119,286,"Nidhoggur's Guardian#2",2020,1,.@label$;
+		monster .@map$,120,270,"Nidhoggur's Guardian#3",2020,1,.@label$;
+		monster .@map$,119,269,"Nidhoggur's Guardian#4",2021,1,.@label$;
+		monster .@map$,118,270,"Nidhoggur's Guardian#5",2021,1,.@label$;
+	} else if (compare(strnpcinfo(0),"white")) {
+		monster .@map$,120,380,"Nidhoggur's Guardian#1",2020,1,.@label$;
+		monster .@map$,119,381,"Nidhoggur's Guardian#2",2020,1,.@label$;
+		monster .@map$,120,367,"Nidhoggur's Guardian#3",2020,1,.@label$;
+		monster .@map$,119,366,"Nidhoggur's Guardian#4",2021,1,.@label$;
+		monster .@map$,118,365,"Nidhoggur's Guardian#5",2021,1,.@label$;
+	} else if (compare(strnpcinfo(0),"yellow")) {
+		monster .@map$,282,284,"Nidhoggur's Guardian#1",2020,1,.@label$;
+		monster .@map$,283,283,"Nidhoggur's Guardian#2",2020,1,.@label$;
+		monster .@map$,280,275,"Nidhoggur's Guardian#3",2020,1,.@label$;
+		monster .@map$,281,276,"Nidhoggur's Guardian#4",2021,1,.@label$;
+		monster .@map$,281,277,"Nidhoggur's Guardian#5",2021,1,.@label$;
+	} else if (compare(strnpcinfo(0),"green")) {
+		monster .@map$,282,378,"Nidhoggur's Guardian#1",2020,1,.@label$;
+		monster .@map$,283,377,"Nidhoggur's Guardian#2",2020,1,.@label$;
+		monster .@map$,280,368,"Nidhoggur's Guardian#3",2020,1,.@label$;
+		monster .@map$,281,368,"Nidhoggur's Guardian#4",2021,1,.@label$;
+		monster .@map$,281,367,"Nidhoggur's Guardian#5",2021,1,.@label$;
 	}
 	end;
 
-OnDisable:
-	donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_red_c", instance_id());
-	stopnpctimer;
-	end;
-
-OnTimer180000:
-	killmonster "2@nyd",instance_npcname("nyd_2f_red_c", instance_id())+"::OnMyMobDead";;
-	stopnpctimer;
-	set .@rullet,rand(1,4);
-	if (.@rullet == 1) {
-		instance_announce -1, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,278;
-		end;
-	}
-	else if (.@rullet == 2) {
-		instance_announce -1, "Nidhoggur's Shadow : I will freeze every last drop of your blood.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,373;
-		end;
-	}
-	else if (.@rullet == 3) {
-		instance_announce -1, "Nidhoggur's Shadow : Sleep for eternity in an empty illusion.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,278;
-		end;
-	}
-	else if (.@rullet == 4) {
-		instance_announce -1, "Nidhoggur's Shadow : I'll let you enjoy the pain of dying slowly.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,374;
+OnMyMobDead:
+	set .@map$, instance_mapname("2@nyd");
+	if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) {
+		mapannounce .@map$, "Nidhoggur's Shadow : You're not bad... but I will be your opponent this time.",bc_map,"0x00ff99";
+		donpcevent instance_npcname("nyd_2f_boss_enter_logic")+"::OnEnable";
+		donpcevent instance_npcname(strnpcinfo(0))+"::OnDisable";
 		end;
 	}
 	end;
-}
 
-2@nyd,130,298,0	script	nyd_2f_red_warp1	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_red_warp1", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_red_warp1", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_red_warp1", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",115,278;
-	end;
-}
-
-2@nyd,142,296,0	script	nyd_2f_red_warp2	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_red_warp2", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_red_warp2", instance_id());
+/*
+OnReset:	// Label not called.
+	killmonster instance_mapname("2@nyd"),instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+	donpcevent instance_npcname(strnpcinfo(0))+"::OnDisable";
 	end;
+*/
 
 OnDisable:
-	disablenpc instance_npcname("nyd_2f_red_warp2", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",115,278;
-	end;
-}
-
-2@nyd,145,283,0	script	nyd_2f_red_warp3	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_red_warp3", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_red_warp3", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_red_warp3", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",115,278;
-	end;
-}
-
-2@nyd,115,373,0	script	nyd_2f_white	-1,5,5,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_white", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_white", instance_id());
-	donpcevent instance_npcname("nyd_2f_white_warp1", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_white_warp2", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_white_warp3", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_white_c", instance_id())+"::OnEnable";
-	initnpctimer;
-	end;
-
-OnDisable:
-	donpcevent instance_npcname("nyd_2f_white_warp1", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_white_warp2", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_white_warp3", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_white", instance_id());
-	end;
-
-OnTouch:
-	percentheal -50,0;
-	sc_start SC_FREEZE,20000,0;
-	end;
-
-OnTimer10000:
-	disablenpc instance_npcname("nyd_2f_white", instance_id());
-	stopnpctimer;
-	end;
-}
-
-2@nyd,6,7,0	script	nyd_2f_white_c	-1,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_white_c", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_white_c", instance_id());
-	initnpctimer;
-	monster "2@nyd",120,380,"Nidhoggur's Guardian#1",2020,1,instance_npcname("nyd_2f_white_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",119,381,"Nidhoggur's Guardian#2",2020,1,instance_npcname("nyd_2f_white_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",120,367,"Nidhoggur's Guardian#3",2020,1,instance_npcname("nyd_2f_white_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",119,366,"Nidhoggur's Guardian#4",2021,1,instance_npcname("nyd_2f_white_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",118,365,"Nidhoggur's Guardian#5",2021,1,instance_npcname("nyd_2f_white_c", instance_id())+"::OnMyMobDead";
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@nyd",instance_npcname("nyd_2f_white_c", instance_id())+"::OnMyMobDead");
-	 if (.@mob_dead_num < 1) {
-		instance_announce -1, "Nidhoggur's Shadow : You're not bad... but I will be your opponent this time.",bc_map,"0x00ff99";
-		donpcevent instance_npcname("nyd_2f_white_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_boss_enter_logic", instance_id())+"::OnEnable";
-		end;
-	}
-	end;
-
-OnDisable:
-	donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_white_c", instance_id());
 	stopnpctimer;
+	killmonster instance_mapname("2@nyd"),instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; //custom
+	donpcevent instance_npcname(substr(strnpcinfo(0),0,getstrlen(strnpcinfo(0))-3))+"::OnDisable";
+	disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnTimer180000:
-	killmonster "2@nyd",instance_npcname("nyd_2f_white_c", instance_id())+"::OnMyMobDead";
+	killmonster instance_mapname("2@nyd"),instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
 	stopnpctimer;
-	set .@rullet,rand(1,4);
-	if (.@rullet == 1) {
-		instance_announce -1, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,278;
-		end;
-	}
-	else if (.@rullet == 2) {
-		instance_announce -1, "Nidhoggur's Shadow : I will freeze every last drop of your blood.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,373;
-		end;
-	}
-	else if (.@rullet == 3) {
-		instance_announce -1, "Nidhoggur's Shadow : Sleep for eternity in an empty illusion.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,278;
-		end;
-	}
-	else if (.@rullet == 4) {
-		instance_announce -1, "Nidhoggur's Shadow : I'll let you enjoy the pain of dying slowly.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,374;
-		end;
-	}
+	donpcevent instance_npcname("nyd_2f_boss_enter_call")+"::OnWarpColor";
 	end;
 }
 
-2@nyd,127,354,0	script	nyd_2f_white_warp1	-1,6,6,{
+2@nyd,130,298,0	script	nyd_2f_red_warp1	-1,6,6,{
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_white_warp1", instance_id());;
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_white_warp1", instance_id());;
-	end;
-
 OnDisable:
-	disablenpc instance_npcname("nyd_2f_white_warp1", instance_id());;
-	end;
-
-OnTouch:
-	warp "2@nyd",115,373;
-	end;
-}
-
-2@nyd,140,357,0	script	nyd_2f_white_warp2	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_white_warp2", instance_id());;
+	disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("nyd_2f_white_warp2", instance_id());;
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_white_warp2", instance_id());;
+	enablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnTouch:
-	warp "2@nyd",115,373;
+	if (compare(strnpcinfo(0),"red"))
+		warp instance_mapname("2@nyd"),115,278;
+	else if (compare(strnpcinfo(0),"white"))
+		warp instance_mapname("2@nyd"),115,373;
+	else if (compare(strnpcinfo(0),"yellow"))
+		warp instance_mapname("2@nyd"),284,278;
+	else if (compare(strnpcinfo(0),"green"))
+		warp instance_mapname("2@nyd"),284,374;
 	end;
 }
+2@nyd,142,296,0	duplicate(nyd_2f_red_warp1)	nyd_2f_red_warp2	-1,6,6
+2@nyd,145,283,0	duplicate(nyd_2f_red_warp1)	nyd_2f_red_warp3	-1,6,6
+
+2@nyd,115,373,0	duplicate(nyd_2f_red)	nyd_2f_white	-1,5,5
+2@nyd,6,7,0	duplicate(nyd_2f_red_c)	nyd_2f_white_c	-1
+2@nyd,127,354,0	duplicate(nyd_2f_red_warp1)	nyd_2f_white_warp1	-1,6,6,
+2@nyd,140,357,0	duplicate(nyd_2f_red_warp1)	nyd_2f_white_warp2	-1,6,6
+2@nyd,145,367,0	duplicate(nyd_2f_red_warp1)	nyd_2f_white_warp3	-1,6,6
+
+2@nyd,284,278,0	duplicate(nyd_2f_red)	nyd_2f_yellow	-1,5,5
+2@nyd,6,8,0	duplicate(nyd_2f_red_c)	nyd_2f_yellow_c	-1
+2@nyd,255,285,0	duplicate(nyd_2f_red_warp1)	nyd_2f_yellow_warp1	-1,6,6
+2@nyd,257,296,0	duplicate(nyd_2f_red_warp1)	nyd_2f_yellow_warp2	-1,6,6
+2@nyd,268,300,0	duplicate(nyd_2f_red_warp1)	nyd_2f_yellow_warp3	-1,6,6
+
+2@nyd,284,374,0	duplicate(nyd_2f_red)	nyd_2f_green	-1,5,5
+2@nyd,6,9,0	duplicate(nyd_2f_red_c)	nyd_2f_green_c	-1
+2@nyd,274,356,0	duplicate(nyd_2f_red_warp1)	nyd_2f_green_warp1	-1,6,6
+2@nyd,260,356,0	duplicate(nyd_2f_red_warp1)	nyd_2f_green_warp2	-1,6,6
+2@nyd,258,368,0	duplicate(nyd_2f_red_warp1)	nyd_2f_green_warp3	-1,6,6
 
-2@nyd,145,367,0	script	nyd_2f_white_warp3	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_white_warp3", instance_id());;
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_white_warp3", instance_id());;
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_white_warp3", instance_id());;
-	end;
-
-OnTouch:
-	warp "2@nyd",115,373;
-	end;
-}
-
-2@nyd,284,278,0	script	nyd_2f_yellow	-1,5,5,{
+2@nyd,1,1,0	script	ins_nyd2_spawn_mobs	-1,{
 OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_yellow", instance_id());
+	set .@map$, instance_mapname("2@nyd");
+	areamonster .@map$,200,92,180,80,"Rhyncho",2020,40,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyRhynDead";
+	areamonster .@map$,200,92,180,80,"Phylla",2021,40,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyPhyDead";
+	areamonster .@map$,200,92,180,80,"Dark Shadow",2023,40,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyDarkshaDead";
+	areamonster .@map$,200,92,180,80,"Dark Pinguicula",2015,40,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyPingDead";
 	end;
 
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_yellow", instance_id());
-	donpcevent instance_npcname("nyd_2f_yellow_warp1", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_yellow_warp2", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_yellow_warp3", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnEnable";
-	initnpctimer;
+OnMyRhynDead:
+	areamonster instance_mapname("2@nyd"),200,92,180,80,"Rhyncho",2020,1,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyRhynDead";
 	end;
 
-OnDisable:
-	donpcevent instance_npcname("nyd_2f_yellow_warp1", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_yellow_warp2", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_yellow_warp3", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_yellow", instance_id());
+OnMyPhyDead:
+	areamonster instance_mapname("2@nyd"),200,92,180,80,"Phylla",2021,1,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyPhyDead";
 	end;
 
-OnTouch:
-	percentheal 0,-50;
-	sc_start SC_SLEEP,20000,0;
-	sc_start SC_CONFUSION,60000,0;
+OnMyDarkshaDead:
+	areamonster instance_mapname("2@nyd"),200,92,180,80,"Dark Shadow",2023,1,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyDarkshaDead";
 	end;
 
-OnTimer10000:
-	disablenpc instance_npcname("nyd_2f_yellow", instance_id());
-	stopnpctimer;
+OnMyPingDead:
+	areamonster instance_mapname("2@nyd"),200,92,180,80,"Dark Pinguicula",2015,1,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyPingDead";
 	end;
 }
 
-2@nyd,6,8,0	script	nyd_2f_yellow_c	-1,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_yellow_c", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_yellow_c", instance_id());
-	initnpctimer;
-	monster "2@nyd",282,284,"Nidhoggur's Guardian#1",2020,1,instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",283,283,"Nidhoggur's Guardian#2",2020,1,instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",280,275,"Nidhoggur's Guardian#3",2020,1,instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",281,276,"Nidhoggur's Guardian#4",2021,1,instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",281,277,"Nidhoggur's Guardian#5",2021,1,instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead";
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@nyd",instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		instance_announce -1, "Nidhoggur's Shadow : You're not bad...but I will be your opponent this time.",bc_map,"0x00ff99";
-		donpcevent instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_boss_enter_logic", instance_id())+"::OnEnable";
-		end;
+// GM Management NPCs
+//============================================================
+sec_in02,36,167,3	script	Nidhoggur Manager	447,1,1,{
+	callfunc "F_GM_NPC";
+	mes "Enter the password.";
+	next;
+	if (callfunc("F_GM_NPC","1854",1) == 0) {
+		mes "Incorrect password.";
+		close;
 	}
-	else {
-		end;
+	mes "What do you need to do?";
+	next;
+	switch(select("Reset variables to allow entrance to Nidhoggur:change variable 'ins_nyd':Remove 3 day timer 3135:Confirm variable number")) {
+	case 1:
+		set ins_nyd,200;
+		set ins_nyd2,0;
+		erasequest 3135;
+		mes "ins_nyd set to 200 ins_nyd2 set to 0";
+		mes "quest 3135 erased.";
+		close;
+	case 2:
+		mes "Which variable do you want to change?";
+		next;
+		switch(select("ins_nyd:ins_nyd2")) {
+			case 1: set .@var$,"ins_nyd"; break;
+			case 2: set .@var$,"ins_nyd2"; break;
+		}
+		mes "Input the variable number";
+		next;
+		input .@input;
+		setd .@var$, .@input;
+		mes .@var$+" has been set to "+.@input+" .";
+		close;
+	case 3:
+		mes "The 3 day timer will be removed when you close this dialog.";
+		next;
+		erasequest 3135;
+		mes "Finished removing Quest Timer.";
+		close;
+	case 4:
+		mes "ins_nyd is at "+ins_nyd+".";
+		mes "ins_nyd2 is at "+ins_nyd2+".";
+		close;
 	}
+}
 
-Onreset:
-	killmonster "2@nyd",instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead";
-	donpcevent instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnDisable";
-	end;
-
-OnDisable:
-	donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_yellow_c", instance_id());
-	stopnpctimer;
-	end;
-
-OnTimer180000:
-	killmonster "2@nyd",instance_npcname("nyd_2f_yellow_c", instance_id())+"::OnMyMobDead";
-	stopnpctimer;
-	set .@rullet,rand(1,4);
-	if (.@rullet == 1) {
-		instance_announce -1, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,278;
-		end;
-	}
-	else if (.@rullet == 2) {
-		instance_announce -1, "Nidhoggur's Shadow : I will freeze every last drop of your blood.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,373;
-		end;
-	}
-	else if (.@rullet == 3) {
-		instance_announce -1, "Nidhoggur's Shadow : Sleep for eternity in an empty illusion.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,278;
-		end;
+nyd_dun02,7,7,2	script	Purification Admin#nyd2	844,2,0,{
+	callfunc "F_GM_NPC";
+	mes "Please enter the password";
+	set .@i, callfunc("F_GM_NPC","dragonslayer",1);
+	next;
+	if (.@i == 0) {
+		mes "Enter the password exactly.";
+		close;
 	}
-	else if (.@rullet == 4) {
-		instance_announce -1, "Nidhoggur's Shadow : I'll let you enjoy the pain of dying slowly.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,374;
-		end;
+	switch(select("Generate Purification Stone:Remove Purification Stone:Turn Entrance NPC OFF:Turn Entrance NPC On:Cancel")) {
+	case 1:
+		mes "Purification stone has been created and will stay on for 30 minutes.";
+		donpcevent "Purification Stone#nyd2::OnEnable";
+		close;
+	case 2:
+		mes "The Purification Stone has been destroyed.";
+		donpcevent "Purification Stone#nyd2::OnDisable";
+		close;
+	case 3:
+		mes "The Yggdrasil Gatekeeper at nyd_dun02 100 201 is now OFF.";
+		disablenpc "Yggdrasil Gatekeeper";
+		close;
+	case 4:
+		mes "The Yggdrasil Gatekeeper at nyd_dun02 100 201 is now On.";
+		enablenpc "Yggdrasil Gatekeeper";
+		close;
+	case 5:
+		close;
 	}
-	end;
-}
-
-2@nyd,255,285,0	script	nyd_2f_yellow_warp1	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_yellow_warp1", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_yellow_warp1", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_yellow_warp1", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",284,278;
-	end;
-}
-
-2@nyd,257,296,0	script	nyd_2f_yellow_warp2	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_yellow_warp2", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_yellow_warp2", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_yellow_warp2", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",284,278;
-	end;
 }
 
-2@nyd,268,300,0	script	nyd_2f_yellow_warp3	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_yellow_warp3", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_yellow_warp3", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_yellow_warp3", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",284,278;
-	end;
-}
-
-2@nyd,284,374,0	script	nyd_2f_green	-1,5,5,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_green", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_green", instance_id());
-	donpcevent instance_npcname("nyd_2f_green_warp1", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_green_warp2", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_green_warp3", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("nyd_2f_green_c", instance_id())+"::OnEnable";
-	initnpctimer;
-	end;
-
-OnDisable:
-	donpcevent instance_npcname("nyd_2f_green_warp1", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_green_warp2", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("nyd_2f_green_warp3", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_green", instance_id());
-	end;
-
-OnTouch:
-	percentheal -50,-50;
-	sc_start SC_POISON,60000,0;
-	end;
-
-OnTimer10000:
-	disablenpc instance_npcname("nyd_2f_green", instance_id());
-	stopnpctimer;
-	end;
-}
-
-2@nyd,6,9,0	script	nyd_2f_green_c	-1,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_green_c", instance_id());
+nyd_dun02,88,195,4	script	Purification Stone#nyd2	406,{
+	erasequest 3135;
+	erasequest 3136;
+	set ins_nyd,200;
+	set ins_nyd2,0;
+	mes "^0000FFThe records and after-effect related to the Nidhoggur's Nest have been removed. You can generate and enter the dungeon again.^000000";
+	close;
+OnInit:
+	disablenpc "Purification Stone#nyd2";
 	end;
-
 OnEnable:
-	enablenpc instance_npcname("nyd_2f_green_c", instance_id());
 	initnpctimer;
-	monster "2@nyd",282,378,"Nidhoggur's Guardian#1",2020,1,instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",283,377,"Nidhoggur's Guardian#2",2020,1,instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",280,368,"Nidhoggur's Guardian#3",2020,1,instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",281,368,"Nidhoggur's Guardian#4",2021,1,instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead";
-	monster "2@nyd",281,367,"Nidhoggur's Guardian#5",2021,1,instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead";
-	end;
-
-OnMyMobDead:
-	set .@mob_dead_num,mobcount("2@nyd",instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead");
-	if (.@mob_dead_num < 1) {
-		instance_announce -1, "Nidhoggur's Shadow : You're not bad... but I will be your opponent this time.",bc_map,"0x00ff99";
-		donpcevent instance_npcname("nyd_2f_green_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_boss_enter_logic", instance_id())+"::OnEnable";
-		end;
-	}
-	else {
-		end;
-	}
-
-Onreset:
-	killmonster "2@nyd",instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead";
-	donpcevent instance_npcname("nyd_2f_green_c", instance_id())+"::OnDisable";
 	end;
-
 OnDisable:
-	donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("nyd_2f_green_c", instance_id());
-	stopnpctimer;
-	end;
-
-OnTimer180000:
-	killmonster "2@nyd",instance_npcname("nyd_2f_green_c", instance_id())+"::OnMyMobDead";
 	stopnpctimer;
-	set .@rullet,rand(1,4);
-	if (.@rullet == 1) {
-		instance_announce -1, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,278;
-		end;
-	}
-	else if (.@rullet == 2) {
-		instance_announce -1, "Nidhoggur's Shadow : I will freeze every last drop of your blood.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",115,373;
-		end;
-	}
-	else if (.@rullet == 3) {
-		instance_announce -1, "Nidhoggur's Shadow : Sleep for eternity in an empty illusion.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,278;
-		end;
-	}
-	else if (.@rullet == 4) {
-		instance_announce -1, "Nidhoggur's Shadow : I'll let you enjoy the pain of dying slowly.",bc_map,"0xFFFF00";
-		donpcevent instance_npcname("nyd_2f_red", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_white", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_yellow", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("nyd_2f_green", instance_id())+"::OnEnable";
-		instance_warpall "2@nyd",284,374;
-		end;
-	}
-	end;
-}
-
-2@nyd,274,356,0	script	nyd_2f_green_warp1	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_green_warp1", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_green_warp1", instance_id());
+	disablenpc "Purification Stone#nyd2";
 	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_green_warp1", instance_id());
+OnTimer1000:
+	enablenpc "Purification Stone#nyd2";
 	end;
-
-OnTouch:
-	warp "2@nyd",284,374;
+OnTimer1740000:
+	mapannounce "nyd_dun02","The Purification Stone will be destroyed in one minute.",bc_map,"0x00FF99",FW_NORMAL,12;
 	end;
-}
-
-2@nyd,260,356,0	script	nyd_2f_green_warp2	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_green_warp2", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_green_warp2", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_green_warp2", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",284,374;
-	end;
-}
-
-2@nyd,258,368,0	script	nyd_2f_green_warp3	-1,6,6,{
-OnInstanceInit:
-	disablenpc instance_npcname("nyd_2f_green_warp3", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("nyd_2f_green_warp3", instance_id());
-	end;
-
-OnDisable:
-	disablenpc instance_npcname("nyd_2f_green_warp3", instance_id());
-	end;
-
-OnTouch:
-	warp "2@nyd",284,374;
-	end;
-}
-
-2@nyd,1,1,0	script	ins_nyd2_spawn_mobs	-1,{
-OnInstanceInit:
-	areamonster "2@nyd",200,92,180,80,"Rhyncho",2020,20;
-	areamonster "2@nyd",200,92,180,80,"Phylla",2021,20;
-	areamonster "2@nyd",200,92,180,80,"Dark Shadow",2023,20;
-	areamonster "2@nyd",200,92,180,80,"Dark Pinguicula",2015,20;
-	areamonster "2@nyd",200,92,180,80,"Rhyncho",2020,20;
-	areamonster "2@nyd",200,92,180,80,"Phylla",2021,20;
-	areamonster "2@nyd",200,92,180,80,"Dark Shadow",2023,20;
-	areamonster "2@nyd",200,92,180,80,"Dark Pinguicula",2015,20;
+OnTimer1800000:
+	disablenpc "Purification Stone#nyd2";
 	end;
 }
diff --git a/npc/instances/OrcsMemory.txt b/npc/instances/OrcsMemory.txt
index 325b1a739..03fa2da05 100644
--- a/npc/instances/OrcsMemory.txt
+++ b/npc/instances/OrcsMemory.txt
@@ -3,11 +3,14 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.6
+//= 1.7
 //===== Description: =========================================
 //= [Official Conversion]
 //= Relive the memory of an orc.
-//===== Additional Comments: =================================
+//===== Description: ========================================= 
+//= [Official Conversion]
+//= Relive the memory of an orc.
+//===== Additional Comments: ================================= 
 //= 1.0 First version. [L0ne_W0lf]
 //= 1.1 First round of bugfixes. (bugreport:3928) [L0ne_W0lf]
 //=     Fixed some npcs calling wrong events. 
@@ -27,7 +30,12 @@
 //= 1.4 Fixed donpcevent calling non-existant npc. (bugreport:4039) [L0ne_W0lf]
 //= 1.5 Fixed a checkquest condition never setting quest. [L0ne_W0lf]
 //= 1.6 Added 'instance_check_party' command to the script for proper checking if
-//=		the invoking party meets the requirements to join the Memorial Dungeon.
+//=     the invoking party meets the requirements to join the Memorial Dungeon.
+//= 1.7 Instance system rewrite. [Euphy]
+//============================================================ 
+
+1@orcs	mapflag	src4instance
+2@orcs	mapflag	src4instance
 //============================================================
 
 // Entrance
@@ -35,153 +43,77 @@
 gef_fild10,242,202,0	script	Dimensional Gorge Piece	406,{
 
 	set .@party_id,getcharid(1);
-	set .@ins_mas,getpartyleader(.@party_id,1);
 	set .@p_name$,getpartyname(.@party_id);
-	set .@p_leader$,rid2name(.@ins_mas);
 	set .@md_name$,"Orc's Memory";
 
-	if(!instance_check_party(.@party_id,2,30,80)){
-		mes "I'm sorry but your Party does not meet the requirements to join the Memorial Dungeon.";
+	if (!instance_check_party(.@party_id,2,30,80)) {
+		mes "Only users between Levels ^ff000030 ~ 80^000000 can enter this Dungeon.";
 		close;
 	}
 
 	set .@orctime,checkquest(12059,PLAYTIME);
 	if (.@orctime == -1) {
-		if (.@ins_mas == getcharid(3)) {
+		if (getcharid(0) == getpartyleader(.@party_id,2)) {
 			mes "Party status confirmed. Would you like to book entrance to the "+.@md_name$+"?";
 			next;
 			switch(select("Reserve the "+.@md_name$+":Enter the Dungeon:Cancel")) {
 			case 1:
 				set .@instance,instance_create(.@md_name$,.@party_id);
 				if (.@instance < 0) {
-					mes "Party Name: "+.@p_name$+"";
-					mes "Party Leader: "+.@p_leader$+"";
+					mes "Party Name: "+.@p_name$;
+					mes "Party Leader: "+strcharinfo(0);
 					mes "^0000ff"+.@md_name$+" ^000000 - Reservation Failed.";
 					close;
-				} else {
-					mes "^0000ff"+.@md_name$+"^000000- Attempting to book an entrance";
-					mes "After making a reservation, you have to select 'Enter the Dungeon' from the menu if you wish to enter the "+.@md_name$+".";
-					for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) {
-						if( instance_attachmap(.@i + "@orcs", .@instance) == "" )
-							break;
-					}
-					if( .@i < 2 ) {
-						instance_destroy(.@instance);
-						close;
-					}
-					instance_attach(.@instance);
-					instance_set_timeout 7200,300,.@instance;
-					instance_init(.@instance);
-
-					// First Floor
-					donpcevent instance_npcname("#Resurrect Monsters1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Resurrect Monsters2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Resurrect Monsters3", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Resurrect Monsters4", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("B1 Area 1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("B1 Area 2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("B1 Area 3", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("B1 Area 4", instance_id())+"::OnInstanceInit";
-					disablenpc instance_npcname("Kurger#1-2", instance_id());
-
-					// Second Floor
-					donpcevent instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#1-1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#1-2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#1-3", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#1-4", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#2-2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#2-3", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#2-4", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#3-2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#3-3", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Torch#3-4", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Warp2-1", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Warp2-2", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Warp2-3", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Boss Control", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("#Warp Outside Orc Dun", instance_id())+"::OnInstanceInit";
-					donpcevent instance_npcname("Kruger#", instance_id())+"::OnInstanceInit";
-					disablenpc instance_npcname("Kruger#2-2", instance_id());
-					close;
 				}
-			case 2:
-				if (has_instance("1@orcs") == "") {
-					mes "Memorial Dungeon "+.@md_name$+" does not exist.";
-					mes "The party leader has not reserved entrance to the dungeon yet.";
-					next;
-					mes "Once the reservation is complete, the dungeon will be generated.";
-					mes "If your dungeon has been destroyed you must wait 7 days before re-entering.";
-					close;
+				mes "^0000ff"+.@md_name$+"^000000- Attempting to book an entrance";
+				for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) {
+					if( instance_attachmap(.@i + "@orcs", .@instance) == "" )
+						break;
 				}
-				if((party_instance_id3 != 0) && (party_instance_id3 != getcharid(1))) {
-					mes "The Memorial Dungeon "+.@md_name$+" does not exist.";
-					mes "The Memorial Dungeon has been destroyed by the Party Leader or because of the time limit. Please try again after 2 hours.";
+				if( .@i < 2 ) {
+					instance_destroy(.@instance);
 					close;
 				}
-				mapannounce "gef_fild10", .@p_leader$ + " of the party, " + .@p_name$ + " is entering the "+.@md_name$+".",bc_map,"0x00ff99";
-				if (checkquest(12059)== -1) setquest 12059;
-				set party_instance_id3,getcharid(1);
-				warp "1@orcs",179,15;
-				end;
+				instance_set_timeout 7200,300,.@instance;
+				instance_init(.@instance);
+				mes "After making a reservation, you have to select 'Enter the Dungeon' from the menu if you wish to enter the "+.@md_name$+".";
+				close;
+			case 2:
+				callsub L_Enter,0;
 			case 3:
 				close;
 			}
 		}
-		switch(select(.@md_name$ + " Enter the Memorial Dungeon:Cancel")) {
-		case 1:
-			if (has_instance("1@orcs") == "") {
-				mes "The Memorial Dungeon "+.@md_name$+" does not exist.";
-				mes "The Memorial Dungeon has been destroyed by the Party Leader or because of the time limit. Please try again after 2 hours.";
-				close;
-			}
-			if((party_instance_id3 != 0) && (party_instance_id3 != getcharid(1))) {
-				mes "The Memorial Dungeon "+.@md_name$+" does not exist.";
-				mes "The Memorial Dungeon has been destroyed by the Party Leader or because of the time limit. Please try again after 2 hours.";
-				close;
-			}
-			mapannounce "gef_fild10",.@p_name$+" Party's member "+.@p_leader$+" has entered the "+.@md_name$+".",bc_map,"0x00ff99";
-			set party_instance_id3,getcharid(1);
-			if (checkquest(12059)== -1) setquest 12059;
-			warp "1@orcs",179,15;
+		if(select(.@md_name$ + " Enter the Memorial Dungeon:Cancel") == 2)
 			end;
-		case 2:
-			close;
-		}
+		callsub L_Enter,1;
 	} else if (.@orctime == 0 || .@orctime == 1) {
 		mes "You can enter the Dungeon if it has been generated.";
 		next;
-		switch(select("Enter the Dungeon "+.@md_name$+":Cancel")) {
-		case 1:
-			if (has_instance("1@orcs") == "") {
-				mes "The Memorial Dungeon "+.@md_name$+" does not exist.";
-				mes "The Memorial Dungeon has been destroyed by the Party Leader or because of the time limit. Please try again after 2 hours.";
-				close;
-			}
-			if((party_instance_id3 != 0) && (party_instance_id3 != getcharid(1))) {
-				mes "The Memorial Dungeon "+.@md_name$+" does not exist.";
-				mes "The Memorial Dungeon has been destroyed by the Party Leader or because of the time limit. Please try again after 2 hours.";
-				close;
-			}
-			mapannounce "gef_fild10",.@p_name$+" Party's member "+.@p_leader$+" has entered the "+.@md_name$+".",bc_map,"0x00ff99";
-			if (checkquest(12059)== -1) setquest 12059;
-			set party_instance_id3,getcharid(1);
-			warp "1@orcs",179,15;
-			end;
-		case 2:
+		if(select("Enter the Dungeon "+.@md_name$+":Cancel") == 2)
 			close;
-		}
-	}
-	else if (.@orctime == 2) {
+		callsub L_Enter,0;
+	} else if (.@orctime == 2) {
 		mes "^0000ffAll records and after-effects related to the Orc's Memory Dungeon are deleted. You can now regenerate or re-enter the dungeon.^000000";
-		set party_instance_id3,0;
 		erasequest 12059;
 		close;
 	}
 	mes "In order to generate a dungeon you must be the Party Leader and have at least 2 members in the party.";
 	close;
+L_Enter:
+	if (has_instance("1@orcs") == "") {
+		mes "Memorial Dungeon "+.@md_name$+" does not exist.";
+		mes "The party leader has not reserved entrance to the dungeon yet.";
+		next;
+		mes "Once the reservation is complete, the dungeon will be generated.";
+		mes "If your dungeon has been destroyed you must wait 7 days before re-entering.";
+		close;
+	} else {
+		mapannounce "gef_fild10", .@p_leader$ + " of the party, " + .@p_name$ + " is entering the "+.@md_name$+".",bc_map,"0x00ff99";
+		if (checkquest(12059)== -1) setquest 12059;
+		warp "1@orcs",179,15;
+		end;
+	}
 }
 
 gef_fild10,238,202,6	script	Mad Scientist#orc	865,{
@@ -189,10 +121,7 @@ gef_fild10,238,202,6	script	Mad Scientist#orc	865,{
 		mes "The Mad Scientist doesn't seem to notice you and keeps mumbling to himself...";
 		close;
 	}
-	if (mad > 1) {
-		set mad,1;
-	}
-	else if (mad < 1) {
+	if (mad == 0) {
 		mes "[Mad Scientist]";
 		mes "Haha, no Orcs are coming near me!";
 		mes "The power of the Dimensional Gorge is undefeatable!!";
@@ -211,43 +140,39 @@ gef_fild10,238,202,6	script	Mad Scientist#orc	865,{
 			next;
 			break;
 		}
-		switch(select("Oh? Like what, travel to alternate space?")) {
-		case 1:
-			mes "[Mad Scientist]";
-			mes "Very smart! I have actually just done that! See that statue over there? It's not your normal Monolith!";
-			next;
-			mes "[Mad Scientist]";
-			mes "I have created it with a combination of our technology and the unlimited energy I discovered from the Gorge! Want to try it?";
-			next;
-			break;
-		}
-		switch(select("... Um, that doesn't sound legal?")) {
-		case 1:
-			mes "[Mad Scientist]";
-			mes "Hey, since when did something so interesting have to be legal!? How about it! You can talk to the Orcs! C'mon!";
-			next;
-			mes "[Mad Scientist]";
-			mes "Chances are they'll just give you lots of instructions once they see you, so just wing it! They're always saying the same thing, to the point where I memorized them!";
-			next;
-			break;
-		}
+		select("Oh? Like what, travel to alternate space?");
+		mes "[Mad Scientist]";
+		mes "Very smart! I have actually just done that! See that statue over there? It's not your normal Monolith!";
+		next;
+		mes "[Mad Scientist]";
+		mes "I have created it with a combination of our technology and the unlimited energy I discovered from the Gorge! Want to try it?";
+		next;
+		select("...Um, that doesn't sound legal?");
+		mes "[Mad Scientist]";
+		mes "Hey, since when did something so interesting have to be legal!? How about it! You can talk to the Orcs! C'mon!";
+		next;
+		mes "[Mad Scientist]";
+		mes "Chances are they'll just give you lots of instructions once they see you, so just wing it! They're always saying the same thing, to the point where I memorized them!";
+		next;
 		switch(select("Alright... What do I do?:Umm, maybe not.")) {
 		case 1:
 			mes "[Mad Scientist]";
 			mes "Very good! Just sit in the hands of this statue! And try to act natural when you're in there!";
 			set mad,1;
-			break;
+			close;
 		case 2:
 			mes "[Mad Scientist]";
 			mes "Oh fine, be that way!";
-			break;
+			close;
 		}
-	}
-	else {
+	} else if (mad == 1) {
 		mes "[Mad Scientist]";
 		mes "Hmm? Put your hand on that Monemus Statue if you want to experience traveling through dimensions!";
+		close;
+	} else {
+		set mad,1;
+		end;
 	}
-	close;
 }
 
 // Orc's Memory Floor 1
@@ -256,72 +181,43 @@ gef_fild10,238,202,6	script	Mad Scientist#orc	865,{
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#Resurrect Monsters1", instance_id());
+	disablenpc instance_npcname("#Resurrect Monsters1");
 	end;
 
 OnDisable:
-	killmonster "1@orcs",instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+	stopnpctimer;
+	killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead";
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#Resurrect Monsters1", instance_id());
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Warrior",1023,1,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("#Resurrect Monsters1");
+	monster instance_mapname("1@orcs"),0,0,"Orc Warrior",1023,30,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@callnum,30;
-	set .@c_mob_num,mobcount("1@orcs",instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead");
-	set .@mob_dead_num,.@callnum - .@c_mob_num;
+	set .@map$, instance_mapname("1@orcs");
+	set .@mob_dead_num, 30 - mobcount(.@map$,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead");
 	if (.@mob_dead_num > 0) {
 		set .@mob_ran,rand(1,30);
 		if (.@mob_ran > 29) {
-			monster "1@orcs",0,0,"Orc Warrior",1023,.@mob_dead_num,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+			monster .@map$,0,0,"Orc Warrior",1023,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead";
 		}
 		else if ((.@mob_ran > 28) && (.@mob_ran < 30)) {
-			monster "1@orcs",0,0,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+			monster .@map$,0,0,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead";
 			if (rand(1,10) == 9) {
-				instance_announce -1, "High Orc: We need more defenses! Get more people here!",bc_map,"0xff4444";
+				mapannounce .@map$, "High Orc: We need more defenses! Get more people here!",bc_map,"0xff4444";
 			}
 		}
 		else if ((.@mob_ran > 26) && (.@mob_ran < 29)) {
-			areamonster "1@orcs",41,91,51,81,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,41,91,51,81,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead";
 			if (rand(1,10) == 9) {
-				instance_announce -1, "Where are the High Orcs!? Get them to stop the enemies!",bc_map,"0xff4444";
+				mapannounce .@map$, "Where are the High Orcs!? Get them to stop the enemies!",bc_map,"0xff4444";
 			}
 		}
 		else {
-			areamonster "1@orcs",17,187,27,177,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,17,187,27,177,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead";
 			if (rand(1,5) == 3) {
-				instance_announce -1, "Caution: The army's starting to concentrate at Zone No. 4.",bc_map,"0x77ff77";
+				mapannounce .@map$, "Caution: The army's starting to concentrate at Zone No. 4.",bc_map,"0x77ff77";
 			}
 			if (rand(1,100) == 50) {
 				initnpctimer;
@@ -331,12 +227,13 @@ OnMyMobDead:
 	end;
 
 OnTimer10:
-	instance_announce -1, "Shouts of the Chief Orc of Safeguards: Looks like this will take longer than expected. Summon the Stalactic Golems!",bc_map,"0xff4444";
+	mapannounce instance_mapname("1@orcs"), "Shouts of the Chief Orc of Safeguards: Looks like this will take longer than expected. Summon the Stalactic Golems!",bc_map,"0xff4444";
 	end;
 
 OnTimer4010:
-	instance_announce -1, "Stalactic Golems are digging out of the deep underground.",bc_map,"0x77ff77";
-	areamonster "1@orcs",17,187,27,177,"Stalactic Golem",1278,20,instance_npcname("#Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+	set .@map$, instance_mapname("1@orcs");
+	mapannounce .@map$, "Stalactic Golems are digging out of the deep underground.",bc_map,"0x77ff77";
+	areamonster .@map$,17,187,27,177,"Stalactic Golem",1278,20,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead";
 	stopnpctimer;
 	end;
 }
@@ -345,44 +242,29 @@ OnTimer4010:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#Resurrect Monsters2", instance_id());
+	disablenpc instance_npcname("#Resurrect Monsters2");
 	end;
 
 OnDisable:
-	killmonster "1@orcs",instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
+	killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead";
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#Resurrect Monsters2", instance_id());
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Trained Wolf",1106,1,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("#Resurrect Monsters2");
+	monster instance_mapname("1@orcs"),0,0,"Trained Wolf",1106,15,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@callnum,15;
-	set .@c_mob_num,mobcount("1@orcs",instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead");
-	set .@mob_dead_num,.@callnum - .@c_mob_num;
+	set .@map$, instance_mapname("1@orcs");
+	set .@mob_dead_num, 15 - mobcount(.@map$,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead");
 	if (rand(1,30) > 15) {
 		if (.@mob_dead_num > 0) {
-			monster "1@orcs",0,0,"Trained Wolf",1106,.@mob_dead_num,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
+			monster .@map$,0,0,"Trained Wolf",1106,.@mob_dead_num,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead";
 		}
 	}
 	else {
 		if (.@mob_dead_num > 0) {
-			areamonster "1@orcs",17,187,27,177,"Trained Wolf",1106,.@mob_dead_num,instance_npcname("#Resurrect Monsters2", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,17,187,27,177,"Trained Wolf",1106,.@mob_dead_num,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead";
 		}
 	}
 	end;
@@ -392,53 +274,38 @@ OnMyMobDead:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#Resurrect Monsters3", instance_id());
+	disablenpc instance_npcname("#Resurrect Monsters3");
 	end;
 
 OnDisable:
-	killmonster "1@orcs",instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+	killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead";
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#Resurrect Monsters3", instance_id());
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "1@orcs",0,0,"Orc Archer",1189,1,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("#Resurrect Monsters3");
+	monster instance_mapname("1@orcs"),0,0,"Orc Archer",1189,15,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@callnum,15;
-	set .@c_mob_num,mobcount("1@orcs",instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead");
-	set .@mob_dead_num,.@callnum - .@c_mob_num;
+	set .@map$, instance_mapname("1@orcs");
+	set .@mob_dead_num, 15 - mobcount(.@map$,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead");
 	set .@mob_ran,rand(1,30);
 	if (.@mob_ran > 29) {
 		if (.@mob_dead_num > 0) {
-			monster "1@orcs",0,0,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+			monster .@map$,0,0,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead";
 		}
 	}
 	else if ((.@mob_ran > 26) && (.@mob_ran < 30)) {
 		if (.@mob_dead_num > 0) {
-			areamonster "1@orcs",43,155,47,159,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,43,155,47,159,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead";
 			if (rand(1,3) == 3) {
-				instance_announce -1, "High Orc: Attack them from behind! Cut off their support!",bc_map,"0xff4444";
+				mapannounce .@map$, "High Orc: Attack them from behind! Cut off their support!",bc_map,"0xff4444";
 			}
 		}
 	}
 	else {
 		if (.@mob_dead_num > 0) {
-			areamonster "1@orcs",17,187,27,177,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,17,187,27,177,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead";
 		}
 	}
 	end;
@@ -448,89 +315,83 @@ OnMyMobDead:
 	end;
 
 OnInstanceInit:
-	enablenpc instance_npcname("#Resurrect Monsters4", instance_id());
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	areamonster "1@orcs",98,35,178,115,"Anopheles",1627,1,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("#Resurrect Monsters4");
+	areamonster instance_mapname("1@orcs"),98,35,178,115,"Anopheles",1627,10,instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@callnum,10;
-	set .@c_mob_num,mobcount("1@orcs",instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead");
-	set .@mob_dead_num,.@callnum - .@c_mob_num;
+	set .@map$, instance_mapname("1@orcs");
+	set .@mob_dead_num, 10 - mobcount(.@map$,instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead");
 	if (.@mob_dead_num > 0) {
-		monster "1@orcs",0,0,"Anopheles",1627,.@mob_dead_num,instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
+		monster .@map$,0,0,"Anopheles",1627,.@mob_dead_num,instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead";
 	}
 	end;
 
 OnDisable:
-	killmonster "1@orcs",instance_npcname("#Resurrect Monsters4", instance_id())+"::OnMyMobDead";
+	killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead";
 	end;
 }
 
-1@orcs,180,29,4	script	Kurger#1-1	433,{
-	donpcevent instance_npcname("Kurger#1-2", instance_id())+"::OnEnable";
+1@orcs,180,29,4	script	Kruger#1-1	433,{
+	donpcevent instance_npcname("Kruger#1-2")+"::OnEnable";
 	end;
 }
 
-1@orcs,180,29,4	script	Kurger#1-2	433,{
+1@orcs,180,29,4	script	Kruger#1-2	433,{
+	end;
+
+OnInstanceInit:
+	disablenpc instance_npcname("Kruger#1-2");
 	end;
 
 OnEnable:
-	disablenpc instance_npcname("Kurger#1-1", instance_id());
-	enablenpc instance_npcname("Kurger#1-2", instance_id());
+	disablenpc instance_npcname("Kruger#1-1");
+	enablenpc instance_npcname("Kruger#1-2");
 	initnpctimer;
 	end;
 
 OnTimer10:
-	instance_announce -1, "Kruger: Damn... What took you so long!! I don't have all day!!",bc_map,"0xffff00";
+	mapannounce instance_mapname("1@orcs"), "Kruger: Damn... What took you so long!! I don't have all day!!",bc_map,"0xffff00";
 	end;
 
 OnTimer5710:
-	instance_announce -1, "Kruger: My plan was to let our comrades open the gate, but it's all ruined since I got busted by the Orc Shaman.",bc_map,"0xffff00";
+	mapannounce instance_mapname("1@orcs"), "Kruger: My plan was to let our comrades open the gate, but it's all ruined since I got busted by the Orc Shaman.",bc_map,"0xffff00";
 	end;
 
 OnTimer14610:
-	instance_announce -1, "Shouts of the Chief Orc of Safeguards: I smell a rat.. Send some patrols to the entrance!!",bc_map,"0xff4444";
+	mapannounce instance_mapname("1@orcs"), "Shouts of the Chief Orc of Safeguards: I smell a rat.. Send some patrols to the entrance!!",bc_map,"0xff4444";
 	end;
 
 OnTimer20210:
-	instance_announce -1, "Kruger: Darn it.. They'll be here any minute. Ok. Listen to me now.",bc_map,"0xffff00";
+	mapannounce instance_mapname("1@orcs"), "Kruger: Darn it.. They'll be here any minute. Ok. Listen to me now.",bc_map,"0xffff00";
 	end;
 
 OnTimer24910:
-	instance_announce -1, "Kruger: The Orc Shaman has sealed the 1st basement by dividing it into 4 zones. Each zone has one Enchanted Orc who has the power to unseal the next zone.",bc_map,"0xffff00";
+	mapannounce instance_mapname("1@orcs"), "Kruger: The Orc Shaman has sealed the 1st basement by dividing it into 4 zones. Each zone has one Enchanted Orc who has the power to unseal the next zone.",bc_map,"0xffff00";
 	end;
 
 OnTimer34310:
-	instance_announce -1, "Kruger: Find those Enchanted Orcs and get rid of them to move to the next zone.",bc_map,"0xffff00";
+	mapannounce instance_mapname("1@orcs"), "Kruger: Find those Enchanted Orcs and get rid of them to move to the next zone.",bc_map,"0xffff00";
 	end;
 
 OnTimer39710:
-	instance_announce -1, "Kruger: Try to avoid encountering Orcs other then the Enchanted ones. Everytime you kill a normal Orc, High Orcs will gather at the last path to the 2nd floor.",bc_map,"0xffff00";
+	mapannounce instance_mapname("1@orcs"), "Kruger: Try to avoid encountering Orcs other then the Enchanted ones. Everytime you kill a normal Orc, High Orcs will gather at the last path to the 2nd floor.",bc_map,"0xffff00";
 	end;
 
 OnTimer49210:
-	instance_announce -1, "Kruger: In the worst case, the path to the 2nd floor could be completely blocked. For your own sake, you should be as sneaky as possible.",bc_map,"0xffff00";
+	mapannounce instance_mapname("1@orcs"), "Kruger: In the worst case, the path to the 2nd floor could be completely blocked. For your own sake, you should be as sneaky as possible.",bc_map,"0xffff00";
 	end;
 
 OnTimer56310:
-	instance_announce -1, "Mission: Sneak in and get rid of the 'Enchanted Orcs'. Avoiding battles with other Orcs is the best way of getting into the 2nd floor.",bc_map,"0x44ffff";
-	donpcevent instance_npcname("#Resurrect Monsters1", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("#Resurrect Monsters2", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("#Resurrect Monsters3", instance_id())+"::OnEnable";
-	disablenpc instance_npcname("Kurger#1-2", instance_id());
+	mapannounce instance_mapname("1@orcs"), "Mission: Sneak in and get rid of the 'Enchanted Orcs'. Avoiding battles with other Orcs is the best way of getting into the 2nd floor.",bc_map,"0x44ffff";
+	donpcevent instance_npcname("#Resurrect Monsters1")+"::OnEnable";
+	donpcevent instance_npcname("#Resurrect Monsters2")+"::OnEnable";
+	donpcevent instance_npcname("#Resurrect Monsters3")+"::OnEnable";
+	disablenpc instance_npcname("Kruger#1-2");
 	end;
 
 OnTimer60000:
-	areamonster "1@orcs",137,83,143,89,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs", instance_id())+"::OnMyMobDead";
+	areamonster instance_mapname("1@orcs"),137,83,143,89,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead";
 	stopnpctimer;
 	end;
 
@@ -538,106 +399,106 @@ OnTimer60000:
 
 1@orcs,168,125,0	script	B1 Area 1	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("B1 Area 1", instance_id());
+	disablenpc instance_npcname("B1 Area 1");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("B1 Area 1", instance_id());
-	areamonster "1@orcs",103,105,109,111,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs", instance_id())+"::OnMyMobDead1";
+	enablenpc instance_npcname("B1 Area 1");
+	areamonster instance_mapname("1@orcs"),103,105,109,111,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead1";
 	end;
 
 OnTouch:
-	warp "1@orcs",168,130;
+	warp instance_mapname("1@orcs"),168,130;
 	end;
 
 OnContinue:
-	donpcevent instance_npcname("B1 Area 2", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("B1 Area 2")+"::OnEnable";
 	initnpctimer;
 	end;
 
 OnTimer10300:
-	instance_announce -1, "Kruger's Whisper: The Orcs here used to be my companions. They just lost their will ever since the Orc Shaman started to control them with her magic.",bc_map,"0xff4499";
+	mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: The Orcs here used to be my companions. They just lost their will ever since the Orc Shaman started to control them with her magic.",bc_map,"0xff4499";
 	end;
 
 OnTimer18700:
-	instance_announce -1, "Kruger's Whisper: There's nothing we can do but to defeat the Orc Shaman if we want to save the remaining tribes.",bc_map,"0xff4499";
+	mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: There's nothing we can do but to defeat the Orc Shaman if we want to save the remaining tribes.",bc_map,"0xff4499";
 	stopnpctimer;
 	end;
 }
 
 1@orcs,89,94,0	script	B1 Area 2	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("B1 Area 2", instance_id());
+	disablenpc instance_npcname("B1 Area 2");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("B1 Area 2", instance_id());
-	areamonster "1@orcs",32,40,38,46,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs", instance_id())+"::OnMyMobDead2";
+	enablenpc instance_npcname("B1 Area 2");
+	areamonster instance_mapname("1@orcs"),32,40,38,46,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead2";
 	end;
 
 OnTouch:
-	warp "1@orcs",85,85;
+	warp instance_mapname("1@orcs"),85,85;
 	end;
 
 OnContinue:
-	donpcevent instance_npcname("B1 Area 3", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("B1 Area 3")+"::OnEnable";
 	initnpctimer;
 	end;
 
 OnTimer30300:
-	instance_announce -1, "Kruger's Whisper: I saw the bodies of our tribe. It seems that the Orc Shaman used those Orcs for her rituals.",bc_map,"0xff4499";
+	mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: I saw the bodies of our tribe. It seems that the Orc Shaman used those Orcs for her rituals.",bc_map,"0xff4499";
 	end;
 
 OnTimer37600:
-	instance_announce -1, "Kruger's Whisper: ... It all has to do with me. I am responsible for this evil.",bc_map,"0xff4499";
+	mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: ... It all has to do with me. I am responsible for this evil.",bc_map,"0xff4499";
 	stopnpctimer;
 	end;
 }
 
 1@orcs,38,105,0	script	B1 Area 3	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("B1 Area 3", instance_id());
+	disablenpc instance_npcname("B1 Area 3");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("B1 Area 3", instance_id());
-	areamonster "1@orcs",19,177,25,183,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs", instance_id())+"::OnMyMobDead3";
+	enablenpc instance_npcname("B1 Area 3");
+	areamonster instance_mapname("1@orcs"),19,177,25,183,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead3";
 	end;
 
 OnTouch:
-	warp "1@orcs",38,110;
+	warp instance_mapname("1@orcs"),38,110;
 	end;
 
 OnContinue:
-	donpcevent instance_npcname("B1 Area 4", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("B1 Area 4")+"::OnEnable";
 	initnpctimer;
 	end;
 
 OnTimer30300:
-	instance_announce -1, "Please, hang in there!",bc_map,"0xff4499";
+	mapannounce instance_mapname("1@orcs"), "Please, hang in there!",bc_map,"0xff4499";
 	end;
 
 OnTimer32700:
-	instance_announce -1, "We'll get some rest when we get to the 2nd basement after passing through here.",bc_map,"0xff4499";
+	mapannounce instance_mapname("1@orcs"), "We'll get some rest when we get to the 2nd basement after passing through here.",bc_map,"0xff4499";
 	stopnpctimer;
 	end;
 }
 
 1@orcs,21,189,0	script	B1 Area 4	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("B1 Area 4", instance_id());
+	disablenpc instance_npcname("B1 Area 4");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("B1 Area 4", instance_id());
-	donpcevent instance_npcname("#Resurrect Monsters1", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("#Resurrect Monsters2", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("#Resurrect Monsters3", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("#Resurrect Monsters4", instance_id())+"::OnDisable";
+	enablenpc instance_npcname("B1 Area 4");
+	donpcevent instance_npcname("#Resurrect Monsters1")+"::OnDisable";
+	donpcevent instance_npcname("#Resurrect Monsters2")+"::OnDisable";
+	donpcevent instance_npcname("#Resurrect Monsters3")+"::OnDisable";
+	donpcevent instance_npcname("#Resurrect Monsters4")+"::OnDisable";
 	end;
 
 OnTouch:
-	warp "2@orcs",32,171;
+	warp instance_mapname("2@orcs"),32,171;
 	end;
 }
 
@@ -645,19 +506,19 @@ OnTouch:
 	end;
 
 OnMyMobDead:
-	donpcevent instance_npcname("B1 Area 1", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("B1 Area 1")+"::OnEnable";
 	end;
 
 OnMyMobDead1:
-	donpcevent instance_npcname("B1 Area 1", instance_id())+"::OnContinue";
+	donpcevent instance_npcname("B1 Area 1")+"::OnContinue";
 	end;
 
 OnMyMobDead2:
-	donpcevent instance_npcname("B1 Area 2", instance_id())+"::OnContinue";
+	donpcevent instance_npcname("B1 Area 2")+"::OnContinue";
 	end;
 
 OnMyMobDead3:
-	donpcevent instance_npcname("B1 Area 3", instance_id())+"::OnContinue";
+	donpcevent instance_npcname("B1 Area 3")+"::OnContinue";
 	end;
 }
 
@@ -667,70 +528,40 @@ OnMyMobDead3:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#2Resurrect Monsters1", instance_id());
+	disablenpc instance_npcname("#2Resurrect Monsters1");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#2Resurrect Monsters1", instance_id());
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Vengeful Orc",1152,1,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("#2Resurrect Monsters1");
+	monster instance_mapname("2@orcs"),0,0,"Vengeful Orc",1152,30,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead";
 	end;
 
 OnDisable:
-	killmonster "2@orcs",instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+	stopnpctimer;
+	killmonster instance_mapname("2@orcs"),instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@callnum,30;
-	set .@c_mob_num,mobcount("2@orcs",instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead");
-	set .@mob_dead_num,.@callnum - .@c_mob_num;
+	set .@map$, instance_mapname("2@orcs");
+	set .@mob_dead_num, 30 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead");
 	if (.@mob_dead_num > 0) {
 		set .@mob_ran,rand(1,30);
 		if (.@mob_ran > 29) {
-			monster "2@orcs",0,0,"Vengeful Orc",1152,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+			monster .@map$,0,0,"Vengeful Orc",1152,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead";
 		}
 		else if ((.@mob_ran > 28) && (.@mob_ran < 30)) {
-			monster "2@orcs",0,0,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
-			set mob_ran2,rand(1,10);
+			monster .@map$,0,0,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead";
 		}
 		else if ((.@mob_ran > 26) && (.@mob_ran < 29)) {
-			areamonster "2@orcs",157,112,167,122,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,157,112,167,122,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead";
 			if (rand(1,10) == 9) {
-				instance_announce -1, "Warning: High Orcs are gathering near area 3.",bc_map,"0xff4444";
+				mapannounce .@map$, "Warning: High Orcs are gathering near area 3.",bc_map,"0xff4444";
 			}
 		}
 		else {
-			areamonster "2@orcs",173,13,183,23,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,173,13,183,23,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead";
 			if (rand(1,5) == 3) {
-				instance_announce -1, "Caution: The Forces have started to concentrate at the Shaman's Altar.",bc_map,"0x77ff77";
+				mapannounce .@map$, "Caution: The Forces have started to concentrate at the Shaman's Altar.",bc_map,"0x77ff77";
 			}
 			if (rand(1,70) == 50) {
 				initnpctimer;
@@ -740,12 +571,13 @@ OnMyMobDead:
 	end;
 
 OnTimer10:
-	instance_announce -1, "Voice from somewhere: Foolish... Do you really think the altar would fall like that?",bc_map,"0xff4444";
+	mapannounce instance_mapname("2@orcs"), "Voice from somewhere: Foolish... Do you really think the altar would fall like that?",bc_map,"0xff4444";
 	end;
 
 OnTimer4010:
-	instance_announce -1, "[ Wraiths were summoned by an unknown power ]",bc_map,"0x77ff77";
-	areamonster "2@orcs",167,25,177,35,"Wraith",1475,30,instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnMyMobDead";
+	set .@map$, instance_mapname("2@orcs");
+	mapannounce .@map$, "[ Wraiths were summoned by an unknown power ]",bc_map,"0x77ff77";
+	areamonster .@map$,167,25,177,35,"Wraith",1475,30,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead";
 	stopnpctimer;
 	end;
 }
@@ -754,55 +586,40 @@ OnTimer4010:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#2Resurrect Monsters3", instance_id());
+	disablenpc instance_npcname("#2Resurrect Monsters3");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#2Resurrect Monsters3", instance_id());
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Orc Zombie",1153,1,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("#2Resurrect Monsters3");
+	monster instance_mapname("2@orcs"),0,0,"Orc Zombie",1153,15,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@callnum,15;
-	set .@c_mob_num,mobcount("2@orcs",instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead");
-	set .@mob_dead_num,.@callnum - .@c_mob_num;
+	set .@map$, instance_mapname("2@orcs");
+	set .@mob_dead_num, 15 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead");
 	set .@mob_ran,rand(1,30);
 	if (.@mob_ran > 29) {
 		if (.@mob_dead_num > 0) {
-			monster "2@orcs",0,0,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+			monster .@map$,0,0,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead";
 		}
 	}
 	else if ((.@mob_ran > 6) && (.@mob_ran < 30)) {
 		if (.@mob_dead_num > 0) {
-			areamonster "2@orcs",168,10,184,26,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,168,10,184,26,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead";
 			if (rand(1,15) == 3) {
-				instance_announce -1, "Warning: Orc Archer teams are gathering near the altar.",bc_map,"0xff4444";
+				mapannounce .@map$, "Warning: Orc Archer teams are gathering near the altar.",bc_map,"0xff4444";
 			}
 		}
 	}
 	else {
 		if (.@mob_dead_num > 0) {
-			areamonster "2@orcs",168,21,184,21,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+			areamonster .@map$,168,21,184,21,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead";
 		}
 	}
 	end;
 
 OnDisable:
-	killmonster "2@orcs",instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnMyMobDead";
+	killmonster instance_mapname("2@orcs"),instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead";
 	end;
 }
 
@@ -810,164 +627,85 @@ OnDisable:
 	end;
 
 OnInstanceInit:
-	enablenpc instance_npcname("#2Resurrect Monsters4", instance_id());
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
+	enablenpc instance_npcname("#2Resurrect Monsters4");
+	monster instance_mapname("2@orcs"),0,0,"Anopheles",1627,10,instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	set .@callnum,10;
-	set .@c_mob_num,mobcount("2@orcs",instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead");
-	set .@mob_dead_num,.@callnum - .@c_mob_num;
+	set .@map$, instance_mapname("2@orcs");
+	set .@mob_dead_num, 10 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead");
 	if (.@mob_dead_num > 0) {
-		monster "2@orcs",0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4", instance_id())+"::OnMyMobDead";
+		monster .@map$,0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead";
 	}
 	end;
 }
 
 2@orcs,35,169,4	script	Kruger#2-1	433,{
-	donpcevent instance_npcname("Kruger#2-2", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("Kruger#2-2")+"::OnEnable";
 	end;
 }
 
 2@orcs,35,169,4	script	Kruger#2-2	433,{
 	end;
 
+OnInstanceInit:
+	disablenpc instance_npcname("Kruger#2-2");
+	end;
+
 OnEnable:
-	disablenpc instance_npcname("Kruger#2-1", instance_id());
-	enablenpc instance_npcname("Kruger#2-2", instance_id());
+	disablenpc instance_npcname("Kruger#2-1");
+	enablenpc instance_npcname("Kruger#2-2");
 	initnpctimer;
 	end;
 
 OnTimer10:
-	instance_announce -1, "Kruger's Whisper: I'll tell you how to get to the Shaman's altar.",bc_map,"0xffff00";
+	mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: I'll tell you how to get to the Shaman's altar.",bc_map,"0xffff00";
 	end;
 
 OnTimer3510:
-	instance_announce -1, "Kruger's Whisper: Do you see the braziers that light the path? Unseal the next zone by strengthening their flames.",bc_map,"0xffff00";
+	mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: Do you see the braziers that light the path? Unseal the next zone by strengthening their flames.",bc_map,"0xffff00";
 	end;
 
 OnTimer10710:
-	instance_announce -1, "Kruger's Whisper: Of course those monsters won't let you touch the braziers that easily.",bc_map,"0xffff00";
+	mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: Of course those monsters won't let you touch the braziers that easily.",bc_map,"0xffff00";
 	end;
 
 OnTimer16310:
-	instance_announce -1, "Kruger's Whisper: But still, try keep the battles not too noticable so the Shaman won't guard the altar with her army squad.",bc_map,"0xffff00";
+	mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: But still, try keep the battles not too noticable so the Shaman won't guard the altar with her army squad.",bc_map,"0xffff00";
 	end;
 
 OnTimer21910:
-	instance_announce -1, "Kruger's Whisper: Only the Party Leader can strengthen the flames, so protect your leader.",bc_map,"0xffff00";
+	mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: Only the Party Leader can strengthen the flames, so protect your leader.",bc_map,"0xffff00";
 	end;
 
 OnTimer23910:
-	instance_announce -1, "Mission: Unseal the zone by lighting the braziers. They can only be lit in a certain order, so be careful.",bc_map,"0x4444ff";
-	donpcevent instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("Torch#1-1", instance_id())+"::OnEnable";
-	disablenpc instance_npcname("Kruger#2-2", instance_id());
+	mapannounce instance_mapname("2@orcs"), "Mission: Unseal the zone by lighting the braziers. They can only be lit in a certain order, so be careful.",bc_map,"0x4444ff";
+	donpcevent instance_npcname("#2Resurrect Monsters1")+"::OnEnable";
+	donpcevent instance_npcname("#2Resurrect Monsters3")+"::OnEnable";
+	donpcevent instance_npcname("Torch#1-1")+"::OnEnable";
+	disablenpc instance_npcname("Kruger#2-2");
 	end;
 }
 
 2@orcs,26,164,0	script	Torch#1-1	844,{
 	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
 	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#1-2", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#1-1", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#1-1", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#1-1", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,55,155,0	script	Torch#1-2	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#1-3", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#1-2", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#1-2", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#1-2", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,108,146,0	script	Torch#1-3	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#1-4", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#1-3", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#1-3", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#1-3", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,98,171,0	script	Torch#1-4	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("#Warp2-1", instance_id())+"::OnEnable";
+	setarray .@id[0], atoi(charat(strnpcinfo(2),0)), atoi(charat(strnpcinfo(2),2));
+	if (.@id[1] == 4)
+		donpcevent instance_npcname("#Warp2-"+.@id[0])+"::OnEnable";
+	else
+		donpcevent instance_npcname("Torch#"+.@id[0]+"-"+(.@id[1]+1))+"::OnEnable";
 	initnpctimer;
-	disablenpc instance_npcname("Torch#1-4", instance_id());
+	disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("Torch#1-4", instance_id());
+	if (strnpcinfo(0) != "Torch#2-1" && strnpcinfo(0) != "Torch#3-1")
+		disablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("Torch#1-4", instance_id());
+	enablenpc instance_npcname(strnpcinfo(0));
 	end;
 
 OnTimer100:
@@ -979,285 +717,109 @@ OnTimer2000:
 	stopnpctimer;
 	end;
 }
+2@orcs,55,155,0	duplicate(Torch#1-1)	Torch#1-2	844
+2@orcs,108,146,0	duplicate(Torch#1-1)	Torch#1-3	844
+2@orcs,98,171,0	duplicate(Torch#1-1)	Torch#1-4	844
 
 2@orcs,48,100,0	script	#Warp2-1	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("#Warp2-1", instance_id());
+	disablenpc instance_npcname("#Warp2-1");
 	end;
 
 OnEnable:
-	monster "2@orcs",109,156,"Safeguard Chief",1981,1,instance_npcname("#Mobs Control", instance_id())+"::OnMyMobDead1";
-	instance_announce -1, "The Chief Orc of Safeguards: Oh!! Looks like I have company. Defeat me if you can!!",bc_map,"0xff8888";
+	set .@map$, instance_mapname("2@orcs");
+	monster .@map$,109,156,"Safeguard Chief",1981,1,instance_npcname("#Mobs Control")+"::OnMyMobDead1";
+	mapannounce .@map$, "The Chief Orc of Safeguards: Oh!! Looks like I have company. Defeat me if you can!!",bc_map,"0xff8888";
 	end;
 
 OnContinue:
-	enablenpc instance_npcname("#Warp2-1", instance_id());
+	enablenpc instance_npcname("#Warp2-1");
 	initnpctimer;
 	end;
 
 OnTimer10000:
-	areamonster "2@orcs",28,158,40,170,"Safeguard Chief",1981,1,instance_npcname("#Mobs Control", instance_id())+"::OnMyMobDead1";
+	areamonster instance_mapname("2@orcs"),28,158,40,170,"Safeguard Chief",1981,1,instance_npcname("#Mobs Control")+"::OnMyMobDead1";
 	stopnpctimer;
 	end;
 
 OnTouch:
-	warp "2@orcs",47,93;
+	warp instance_mapname("2@orcs"),47,93;
 	end;
 }
 
-2@orcs,35,92,0	script	Torch#2-1	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#2-2", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#2-1", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,32,70,0	script	Torch#2-2	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#2-3", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#2-2", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#2-2", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#2-2", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,70,31,0	script	Torch#2-3	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#2-4", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#2-3", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#2-3", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#2-3", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,84,51,0	script	Torch#2-4	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("#Warp2-2", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#2-4", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#2-4", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#2-4", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
+2@orcs,35,92,0	duplicate(Torch#1-1)	Torch#2-1	844
+2@orcs,32,70,0	duplicate(Torch#1-1)	Torch#2-2	844
+2@orcs,70,31,0	duplicate(Torch#1-1)	Torch#2-3	844
+2@orcs,84,51,0	duplicate(Torch#1-1)	Torch#2-4	844
 
 2@orcs,101,55,0	script	#Warp2-2	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("#Warp2-2", instance_id());
+	disablenpc instance_npcname("#Warp2-2");
 	end;
 
 OnEnable:
-	monster "2@orcs",67,64,"Orc Sniper",1982,1,instance_npcname("#Mobs Control", instance_id())+"::OnMyMobDead2";
-	instance_announce -1, "Orc Sniper: Hah! Pretty impressive that you made it this far, but your foolish little trip ends here...",bc_map,"0xff8888";
+	set .@map$, instance_mapname("2@orcs");
+	monster .@map$,67,64,"Orc Sniper",1982,1,instance_npcname("#Mobs Control")+"::OnMyMobDead2";
+	mapannounce .@map$, "Orc Sniper: Hah! Pretty impressive that you made it this far, but your foolish little trip ends here...",bc_map,"0xff8888";
 	end;
 
 OnContinue:
-	enablenpc instance_npcname("#Warp2-2", instance_id());
+	enablenpc instance_npcname("#Warp2-2");
 	initnpctimer;
 	end;
 
 OnTimer10000:
-	areamonster "2@orcs",40,91,52,103,"Orc Sniper",1982,1,instance_npcname("#Mobs Control", instance_id())+"::OnMyMobDead2";
+	areamonster instance_mapname("2@orcs"),40,91,52,103,"Orc Sniper",1982,1,instance_npcname("#Mobs Control")+"::OnMyMobDead2";
 	stopnpctimer;
 	end;
 
 OnTouch:
-	warp "2@orcs",107,55;
+	warp instance_mapname("2@orcs"),107,55;
 	end;
 }
 
-2@orcs,142,145,0	script	Torch#3-1	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#3-2", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#3-1", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,162,134,0	script	Torch#3-2	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#3-3", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#3-2", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#3-2", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#3-2", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,144,117,0	script	Torch#3-3	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("Torch#3-4", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#3-3", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#3-3", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#3-3", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
-
-2@orcs,136,98,0	script	Torch#3-4	844,{
-	if(getpartyleader(getcharid(1),2) != getcharid(0)) end;
-	progressbar "ffff00",5;
-	donpcevent instance_npcname("#Warp2-3", instance_id())+"::OnEnable";
-	initnpctimer;
-	disablenpc instance_npcname("Torch#3-4", instance_id());
-	end;
-
-OnInstanceInit:
-	disablenpc instance_npcname("Torch#3-4", instance_id());
-	end;
-
-OnEnable:
-	enablenpc instance_npcname("Torch#3-4", instance_id());
-	end;
-
-OnTimer100:
-	specialeffect EF_FIREPILLAR;
-	end;
-
-OnTimer2000:
-	specialeffect EF_FIREPILLARBOMB;
-	stopnpctimer;
-	end;
-}
+2@orcs,142,145,0	duplicate(Torch#1-1)	Torch#3-1	844
+2@orcs,162,134,0	duplicate(Torch#1-1)	Torch#3-2	844
+2@orcs,144,117,0	duplicate(Torch#1-1)	Torch#3-3	844
+2@orcs,136,98,0	duplicate(Torch#1-1)	Torch#3-4	844
 
 2@orcs,167,104,0	script	#Warp2-3	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("#Warp2-3", instance_id());
+	disablenpc instance_npcname("#Warp2-3");
 	end;
 
 OnEnable:
-	monster "2@orcs",152,147,"Depraved Orc Spirit",1983,1,instance_npcname("#Mobs Control", instance_id())+"::OnMyMobDead3";
-	instance_announce -1, "Depraved Orc Spirit: I smell flesh! Hungry! Wanna try some human meat!!",bc_map,"0xff8888";
+	set .@map$, instance_mapname("2@orcs");
+	monster .@map$,152,147,"Depraved Orc Spirit",1983,1,instance_npcname("#Mobs Control")+"::OnMyMobDead3";
+	mapannounce .@map$, "Depraved Orc Spirit: I smell flesh! Hungry! Wanna try some human meat!!",bc_map,"0xff8888";
 	end;
 
 OnContinue:
-	//areamonster "2@orcs",117,61,129,73,"Depraved Orc Spirit",1983,1,instance_npcname("#Mobs Control", instance_id())+"::OnMyMobDead3";
-	donpcevent instance_npcname("#Boss Control", instance_id())+"::OnEnable";
-	enablenpc instance_npcname("#Warp2-3", instance_id());
+	areamonster instance_mapname("2@orcs"),117,61,129,73,"Depraved Orc Spirit",1983,1;
+	donpcevent instance_npcname("#Boss Control")+"::OnEnable";
+	enablenpc instance_npcname("#Warp2-3");
 	initnpctimer;
 	end;
 
 OnTimer10:
-	instance_announce -1, "Shaman Cargalache: Hahaha!! So, you finally made it here. The assassin you sent was just terrible. That stupid Orc is getting cold under my feet.",bc_map,"0xffff00";
+	mapannounce instance_mapname("2@orcs"), "Shaman Cargalache: Hahaha!! So, you finally made it here. The assassin you sent was just terrible. That stupid Orc is getting cold under my feet.",bc_map,"0xffff00";
 	end;
 
 OnTimer6810:
-	instance_announce -1, "Shaman Cargalache: My loyal slave, go get those intruders!",bc_map,"0xffff00";
+	mapannounce instance_mapname("2@orcs"), "Shaman Cargalache: My loyal slave, go get those intruders!",bc_map,"0xffff00";
 	end;
 
 OnTimer10310:
-	instance_announce -1, "Depraved Orc Hero: Whatever you say, my lord.",bc_map,"0xff7777";
+	mapannounce instance_mapname("2@orcs"), "Depraved Orc Hero: Whatever you say, my lord.",bc_map,"0xff7777";
 	end;
 
 OnTimer13110:
-	instance_announce -1, "Caution: You have been discovered by Shaman Cargalache. Kruger's plan to assassinate the Shaman has failed. You must defeat Cargalache and find traces of Kruger.",bc_map,"0x8888ff";
+	mapannounce instance_mapname("2@orcs"), "Caution: You have been discovered by Shaman Cargalache. Kruger's plan to assassinate the Shaman has failed. You must defeat Cargalache and find traces of Kruger.",bc_map,"0x8888ff";
 	stopnpctimer;
 	end;
 
 OnTouch:
-	warp "2@orcs",167,95;
+	warp instance_mapname("2@orcs"),167,95;
 	end;
 }
 
@@ -1265,46 +827,48 @@ OnTouch:
 	end;
 
 OnInstanceInit:
-	disablenpc instance_npcname("#Boss Control", instance_id());
+	disablenpc instance_npcname("#Boss Control");
 	end;
 
 OnEnable:
-	monster "2@orcs",185,8,"Shaman Cargalache",1984,1,instance_npcname("#Boss Control", instance_id())+"::OnMyMobDead";
-	monster "2@orcs",179,15,"Depraved Orc Hero",1087,1;
-	enablenpc instance_npcname("#Boss Control", instance_id());
+	set .@map$, instance_mapname("2@orcs");
+	monster .@map$,185,8,"Shaman Cargalache",1984,1,instance_npcname("#Boss Control")+"::OnMyMobDead";
+	monster .@map$,179,15,"Depraved Orc Hero",1087,1;
+	enablenpc instance_npcname("#Boss Control");
 	end;
 
 OnMyMobDead:
-	donpcevent instance_npcname("Kruger#", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("Kruger#")+"::OnEnable";
+	set .@map$, instance_mapname("2@orcs");
 	set .@mob_ran,rand(1,5);
 	if (.@mob_ran == 1) {
-		instance_announce -1, "Shaman Cargalache: How... How could this be... How could someone like you...!!",bc_map,"0xffff00";
+		mapannounce .@map$, "Shaman Cargalache: How... How could this be... How could someone like you...!!",bc_map,"0xffff00";
 	}
 	else if (.@mob_ran == 2) {
-		instance_announce -1, "Shaman Cargalache: How is it that I've been overpowered by mere humans!",bc_map,"0xffff00";
+		mapannounce .@map$, "Shaman Cargalache: How is it that I've been overpowered by mere humans!",bc_map,"0xffff00";
 	}
 	else if (.@mob_ran == 3) {
-		instance_announce -1, "Shaman Cargalache: This... This can't be the end...",bc_map,"0xffff00";
+		mapannounce .@map$, "Shaman Cargalache: This... This can't be the end...",bc_map,"0xffff00";
 	}
 	else if (.@mob_ran == 4) {
-		instance_announce -1, "Shaman Cargalache: I... Can't die... Yet...!",bc_map,"0xffff00";
+		mapannounce .@map$, "Shaman Cargalache: I... Can't die... Yet...!",bc_map,"0xffff00";
 	}
 	else {
-		instance_announce -1, "Shaman Cargalache: Defeated by these fools... It can't be happening...!",bc_map,"0xffff00";
+		mapannounce .@map$, "Shaman Cargalache: Defeated by these fools... It can't be happening...!",bc_map,"0xffff00";
 	}
-	donpcevent instance_npcname("#2Resurrect Monsters1", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("#2Resurrect Monsters3", instance_id())+"::OnDisable";
-	donpcevent instance_npcname("#Warp Outside Orc Dun", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("#2Resurrect Monsters1")+"::OnDisable";
+	donpcevent instance_npcname("#2Resurrect Monsters3")+"::OnDisable";
+	donpcevent instance_npcname("#Warp Outside Orc Dun")+"::OnEnable";
 	end;
 }
 
 2@orcs,182,8,0	script	#Warp Outside Orc Dun	45,3,3,{
 OnInstanceInit:
-	disablenpc instance_npcname("#Warp Outside Orc Dun", instance_id());
+	disablenpc instance_npcname("#Warp Outside Orc Dun");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("#Warp Outside Orc Dun", instance_id());
+	enablenpc instance_npcname("#Warp Outside Orc Dun");
 	end;
 
 OnTouch:
@@ -1345,11 +909,11 @@ OnTouch:
 	}
 
 OnInstanceInit:
-	disablenpc instance_npcname("Kruger#", instance_id());
+	disablenpc instance_npcname("Kruger#");
 	end;
 
 OnEnable:
-	enablenpc instance_npcname("Kruger#", instance_id());
+	enablenpc instance_npcname("Kruger#");
 	end;
 }
 
@@ -1357,14 +921,14 @@ OnEnable:
 	end;
 
 OnMyMobDead1:
-	donpcevent instance_npcname("#Warp2-1", instance_id())+"::OnContinue";
+	donpcevent instance_npcname("#Warp2-1")+"::OnContinue";
 	end;
 
 OnMyMobDead2:
-	donpcevent instance_npcname("#Warp2-2", instance_id())+"::OnContinue";
+	donpcevent instance_npcname("#Warp2-2")+"::OnContinue";
 	end;
 
 OnMyMobDead3:
-	donpcevent instance_npcname("#Warp2-3", instance_id())+"::OnContinue";
+	donpcevent instance_npcname("#Warp2-3")+"::OnContinue";
 	end;
-}
+}
\ No newline at end of file
diff --git a/npc/instances/SealedShrine.txt b/npc/instances/SealedShrine.txt
index b893a1816..8f911b120 100644
--- a/npc/instances/SealedShrine.txt
+++ b/npc/instances/SealedShrine.txt
@@ -3,11 +3,11 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 2.2
-//===== Description: =========================================
+//= 2.3
+//===== Description: ========================================= 
 //= [Official Conversion]
 //= Seal away the Great Demon Baphomet.
-//===== Additional Comments: =================================
+//===== Additional Comments: ================================= 
 //= 1.0 First version. [L0ne_W0lf]
 //= 1.1 Added setquest for instance cooldown. [L0ne_W0lf]
 //= 1.2 Fixed Torch#12 not being disabled. (bugreport:4044) [L0ne_w0lf]
@@ -19,11 +19,16 @@
 //=     Removed checking quest 3045, unofficial check.
 //= 1.7 Fixed a checkquest condition never setting quest. [L0ne_W0lf]
 //= 1.8 Added 'instance_check_party' command to the script for proper checking if
-//=		the invoking party meets the requirements to join the Memorial Dungeon.
+//=     the invoking party meets the requirements to join the Memorial Dungeon.
 //= 1.9 Fixed broken else/if chaining. [Joseph]
 //= 2.0 Some optimization. [Euphy]
 //= 2.1 Fixed quest being removed before the 12 hours cool down. [Joseph]
 //= 2.2 Removed extra setquest (quest id:3040).	[Joseph]
+//= 2.3 Instance system rewrite. [Euphy]
+//============================================================ 
+
+1@cata	mapflag	src4instance
+2@cata	mapflag	src4instance
 //============================================================
 
 // Sealed Catacomb Entrance
@@ -92,7 +97,7 @@ monk_test,309,146,3	script	Friar Patrick#edq	412,{
 		}
 		break;
 	case 2:
-		if (BaseLevel > 74) {
+		if (BaseLevel >= 75) {
 
 			set .@party_id,getcharid(1);
 
@@ -105,22 +110,16 @@ monk_test,309,146,3	script	Friar Patrick#edq	412,{
 			// Two hour play limit
 			//set .@ins_bapho_check2,checkquest(3045,PLAYTIME);
 
-			if(!instance_check_party(.@party_id,2,75)){
-				mes "I'm sorry but your Party does not meet the requirements to join the Memorial Dungeon.";
-				close;
-			}
-
 			if (.@ins_bapho_check == -1) {
-				if (getpartyleader(.@party_id,2) == getcharid(0)) {
-					set .@instance, instance_create("Sealed Catacombs", .@party_id);
+				if (getpartyleader(.@party_id,2) == getcharid(0) && instance_check_party(.@party_id,2,75)) {
+					mes "[Friar Patrick]";
+					mes "Party name is "+getpartyname(.@party_id)+"...";
+					mes "Name of the leader is "+strcharinfo(0)+"...";
+					set .@instance, instance_create("Sealed Catacomb",.@party_id);
 					if (.@instance < 0) {
-						mes "[Friar Patrick]";
-						mes "Party name is "+getpartyname(.@party_id)+"...";
-						mes "Name of the leader is "+.@partymembername$[0]+"...";
 						mes "Umm... But it seems that there is a problem here... I'll check quickly. Please wait.";
 					}
 					else {
-
 						for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) {
 							if( instance_attachmap("" + .@i + "@cata", .@instance) == "" )
 								break;
@@ -130,47 +129,9 @@ monk_test,309,146,3	script	Friar Patrick#edq	412,{
 							close;
 						}
 
-						instance_attach(.@instance);
 						instance_set_timeout 7200,300,.@instance;
 						instance_init(.@instance);
-
-						// First Floor
-						disablenpc instance_npcname("Ancient Hero's Soul#1F", instance_id());
-						disablenpc instance_npcname("ins_bapho_to_2f", instance_id());
-
-						for( set .@i, 1; .@i < 13; set .@i, .@i + 1 ) {
-							disablenpc instance_npcname("Gravestone#1F_"+.@i+"T", instance_id());
-							disablenpc instance_npcname("Gravestone#1F_"+.@i+"F", instance_id());
-						}
-						for( set .@i, 1; .@i <= 12; set .@i, .@i + 1 ) {
-							disablenpc instance_npcname("Bobbing Torch#"+.@i, instance_id());
-						}
-
-						// Second Floor
-						disablenpc instance_npcname("ins_baphomet_1f_timer", instance_id());
-						disablenpc instance_npcname("ins_2f_enter_broad", instance_id());
-						disablenpc instance_npcname("Magical Seal#0", instance_id());
-						disablenpc instance_npcname("Magical Seal#2", instance_id());
-						disablenpc instance_npcname("Magical Seal#4", instance_id());
-						disablenpc instance_npcname("Magical Seal#8", instance_id());
-						disablenpc instance_npcname("Magical Seal#10", instance_id());
-						disablenpc instance_npcname("Ancient Hero's Soul#2F", instance_id());
-						disablenpc instance_npcname("control_baphomet", instance_id());
-						disablenpc instance_npcname("ins_2f_hero_broad2", instance_id());
-						disablenpc instance_npcname("2f_callmon_pattern_c", instance_id());
-						disablenpc instance_npcname("2f_callmon_pattern", instance_id());
-						disablenpc instance_npcname("ins_2f_hero_pattern_c", instance_id());
-						disablenpc instance_npcname("ins_2f_hero_pattern", instance_id());
-
-						// Pick proper grave
-						donpcevent instance_npcname("ins_baphomet_lotto", instance_id())+"::OnEnable";
-
-						// Spawn monsters.
-						donpcevent instance_npcname("ins_1f_spawn_mobs", instance_id())+"::OnEnable";
-
-						mes "[Friar Patrick]";
-						mes "Party name is "+getpartyname(.@party_id)+"...";
-						mes "Name of the leader is "+.@partymembername$[0]+"...";
+						
 						mes "Okay... I'll adjust the shrine's seal so that you and your group can enter.";
 						next;
 						mes "[Friar Patrick]";
@@ -208,10 +169,9 @@ monk_test,309,146,3	script	Friar Patrick#edq	412,{
 				mes "[Friar Patrick]";
 				mes "Haaaaaaap... Hocus Pocus Wingardium Abracadabra!!!!!";
 				next;
-				if (checkquest(3040)>=0) erasequest 3040;
+				erasequest 3040;
 				if (checkquest(3041)>=0) erasequest 3041;
 				if (checkquest(3045)>=0) erasequest 3045;
-				set party_instance_id4,0;
 				mes "[Friar Patrick]";
 				mes "Huu... It's over. Now that I've released Baphomet's Curse, you can enter again.";
 			}
@@ -260,55 +220,44 @@ monk_test,306,151,3	script	Grave of Baphomet#edq	111,{
 	if (countitem(6002)) delitem 6002,countitem(6002); //Token_Of_Apostle
 	mes "This gravestone has a carving of a wicked devil with large horns. It arouses an ominous feeling.";
 	next;
-	switch(select("Touch the stone.:Step back.")) {
-	case 1:
-		set .@party_id,getcharid(1);
-		
-		// 12 hour cooldown
-		set .@ins_bapho_check,checkquest(3040,PLAYTIME);
-		// Two hour play limit
-		//set .@ins_bapho_check2,checkquest(3045,PLAYTIME);
-		
-		if(!instance_check_party(.@party_id,2,75)){
-			mes "I'm sorry but your Party does not meet the requirements to join the Memorial Dungeon.";
+	if(select("Touch the stone.:Step back.") == 2)
+		close;
+
+	// 12 hour cooldown
+	set .@ins_bapho_check,checkquest(3040,PLAYTIME);
+	// Two hour play limit
+	//set .@ins_bapho_check2,checkquest(3045,PLAYTIME);
+
+	if (.@ins_bapho_check == -1) {
+		if (has_instance("1@cata") == "") {
+			mes "It's cold to the touch. It doesn't respond.";
 			close;
-		}
-		if (.@ins_bapho_check == -1) {
-			if (has_instance("1@cata") == "") {
-				mes "It's cold to the touch. It doesn't respond.";
-			} else if((party_instance_id4 != 0) && (party_instance_id4 != getcharid(1))) {
-				mes "It seems you have entered this shrine recently... You cannot reenter because Baphomet's Curse still remains. Baphomet's Curse disappears only after a certain amount of time has passed.";
-			} else {
-				mapannounce "monk_test","[" + strcharinfo(0) + "] member of the [" + getpartyname(.@party_id) + "] party has entered the Sealed Shrine.",bc_map,"0x00ff99";
-				if (checkquest(3040) == -1) setquest 3040;
-				set party_instance_id4,getcharid(1);
-				warp "1@cata",100,224;
-				end;
-			}
-		} else if (.@ins_bapho_check == 0 || .@ins_bapho_check == 1) {
-			mes "[Friar Patrick]";
-			mes "It seems you have entered this shrine recently... You cannot reenter because the curse of Baphomet still remains.";
-			mes "The curse of Baphomet disappears after a certain amount of time after you entered.";
-		} else if (.@ins_bapho_check == 2) {
-			mes "[Friar Patrick]";
-			mes "Umm... It seems the curse of Baphomet weakened. I'll clear the bad curse.";
-			next;
-			mes "[Friar Patrick]";
-			mes "Haaaaaaap... Wingardium Leviosa Expecto Patronum !!!!!";
-			specialeffect2 EF_HOLYHIT;
-			if (checkquest(3040)>=0) erasequest 3040;
-			if (checkquest(3041)>=0) erasequest 3041;
-			if (checkquest(3045)>=0) erasequest 3045;
-			set party_instance_id4,0;
-			next;
-			mes "[Friar Patrick]";
-			mes "Huu... It's over. Now I released all of the curses on you. You can enter again.";
-		}
-		break;
-	case 2:
-		break;
+		} else {
+			mapannounce "monk_test","[" + strcharinfo(0) + "] member of the [" + getpartyname(.@party_id) + "] party has entered the Sealed Shrine.",bc_map,"0x00ff99";
+			setquest 3040;
+			warp "1@cata",100,224;
+			end;
+		}		
+	} else if (.@ins_bapho_check == 0 || .@ins_bapho_check == 1) {
+		mes "[Friar Patrick]";
+		mes "It seems you have entered this shrine recently... You cannot reenter because the curse of Baphomet still remains.";
+		mes "The curse of Baphomet disappears after a certain amount of time after you entered.";
+		close;
+	} else if (.@ins_bapho_check == 2) {
+		mes "[Friar Patrick]";
+		mes "Umm... It seems the curse of Baphomet weakened. I'll clear the bad curse.";
+		next;
+		mes "[Friar Patrick]";
+		mes "Haaaaaaap... Wingardium Leviosa Expecto Patronum !!!!!";
+		specialeffect2 EF_HOLYHIT;
+		erasequest 3040;
+		if (checkquest(3041)>=0) erasequest 3041;
+		if (checkquest(3045)>=0) erasequest 3045;
+		next;
+		mes "[Friar Patrick]";
+		mes "Huu... It's over. Now I released all of the curses on you. You can enter again.";
+		close;
 	}
-	close;
 }
 
 prt_monk,261,91,3	script	Rust Blackhand#edq	826,{
@@ -340,7 +289,7 @@ prt_monk,261,91,3	script	Rust Blackhand#edq	826,{
 			delitem 2256,1; //Magestic_Goat
 			delitem 7799,30; //Dark_Crystal
 			delitem 7798,50; //Dark_Debris
-			set zeny,zeny-990000;
+			set Zeny, Zeny-990000;
 			completequest 3043;
 			getitem 5374,1; //L_Magestic_Goat
 			mes "[Rust Blackhand]";
@@ -481,250 +430,52 @@ prt_monk,261,91,3	script	Rust Blackhand#edq	826,{
 // Sealed Shrine Interior
 //============================================================
 1@cata,1,2,0	script	ins_baphomet_lotto	-1,{
-OnEnable:
-	switch(rand(1,13)) {
-	case 1:
-		enablenpc instance_npcname("Gravestone#1F_1T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 2:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 3:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 4:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 5:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 6:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 7:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 8:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 9:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 10:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 11:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 12:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12T", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13F", instance_id());
-		end;
-	case 13:
-		enablenpc instance_npcname("Gravestone#1F_1F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_2F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_3F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_4F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_5F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_6F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_7F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_8F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_9F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_10F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_11F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_12F", instance_id());
-		enablenpc instance_npcname("Gravestone#1F_13T", instance_id());
-		end;
+OnInstanceInit:
+	// Pick one "true" Gravestone and 12 "false" Gravestones.
+	set .@true, rand(1,13);
+	for(set .@i,1; .@i<13; set .@i,.@i+1) {
+		disablenpc instance_npcname("Gravestone#1F_1"+((.@i == .@true)?"F":"T"));
 	}
+	disablenpc instance_npcname("ins_baphomet_lotto");
 	end;
 }
 
 1@cata,3,2,0	script	ins_baphomet_lotto2	-1,{
 OnEnable:
-	enablenpc instance_npcname("Bobbing Torch#1", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#2", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#3", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#4", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#5", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#6", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#7", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#8", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#9", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#10", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#11", instance_id());
-	enablenpc instance_npcname("Bobbing Torch#12", instance_id());
+	for(set .@i,1; .@i<12; set .@i,.@i+1)
+		enablenpc instance_npcname("Bobbing Torch#"+.@i);
 	end;
 }
 
 1@cata,4,2,0	script	ins_baphomet_lotto3	-1,{
 OnEnable:
-	monster "1@cata",0,0,"Apostle of Baphomet",1869,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1291,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1869,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1291,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1869,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1291,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1869,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1132,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1117,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1132,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1117,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1132,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1291,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1117,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
-	monster "1@cata",0,0,"Apostle of Baphomet",1869,1,instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
+	set .@label$, instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead";
+	set .@map$, instance_mapname("1@cata");
+	monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1291,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1291,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1291,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1132,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1117,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1132,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1117,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1132,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1291,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1117,1,.@label$;
+	monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$;
 	end;
 
 OnDisable:
-	killmonster "1@cata",instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead";
+	killmonster instance_mapname("1@cata"),instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	if (mobcount("1@cata",instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnMyMobDead") < 1) {
-		instance_announce -1, "All apostles of Baphomet are dead!",bc_map,"0x00ff99";
+	set .@map$, instance_mapname("1@cata");
+	if (mobcount(.@map$,instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead") < 1) {
+		mapannounce .@map$, "All apostles of Baphomet are dead!",bc_map,"0x00ff99";
 	}
 	getitem 6002,1; //Token_Of_Apostle
 	end;
@@ -800,12 +551,12 @@ OnMyMobDead:
 			mes "Yes... This is... My pendant...";
 			next;
 			delitem 6003,1; //Soul_Pendant
-			enablenpc instance_npcname("Ancient Hero's Soul#1F", instance_id());
-			disablenpc instance_npcname("Gravestone#", instance_id());
+			enablenpc instance_npcname("Ancient Hero's Soul#1F");
+			disablenpc instance_npcname("Gravestone#");
 			mes "[Voice of the Gravestone]";
 			mes "Now I can substantialize my soul. I'll wait for you in front of the altar of fire located at the center of this grave. Let's meet there.";
 			next;
-			instance_announce -1, "Ancient Hero's Soul : I'll wait for you in front of the altar of fire located at the center",bc_map,"0xFFFF00";
+			mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : I'll wait for you in front of the altar of fire located at the center",bc_map,"0xFFFF00";
 			mes "I can feel the voice becoming faint.";
 			close;
 		}
@@ -833,6 +584,10 @@ OnTouch:
 		close;
 	}
 	end;
+
+OnInstanceInit: // Temporary fix for @reloadscript.
+	set 'ins_baphomet,0;
+	end;
 }
 
 1@cata,176,119,4	script	Ancient Hero's Soul#1F	411,{
@@ -954,9 +709,9 @@ OnTouch:
 			mes "[Ancient Hero's Soul]";
 			mes "To remind you again, I must be substantialized within the next hour. So everyone, finish your work within that time!";
 			set 'ins_baphomet,3;
-			donpcevent instance_npcname("ins_baphomet_1f_timer", instance_id())+"::OnEnable";
-			donpcevent instance_npcname("ins_baphomet_lotto2", instance_id())+"::OnEnable";
-			donpcevent instance_npcname("ins_baphomet_lotto3", instance_id())+"::OnEnable";
+			donpcevent instance_npcname("ins_baphomet_1f_timer")+"::OnEnable";
+			donpcevent instance_npcname("ins_baphomet_lotto2")+"::OnEnable";
+			donpcevent instance_npcname("ins_baphomet_lotto3")+"::OnEnable";
 		}
 		else {
 			mes "[Ancient Hero's Soul]";
@@ -1011,7 +766,7 @@ OnTouch:
 		next;
 		set 'ins_baphomet,5;
 		specialeffect EF_TELEPORTATION;
-		enablenpc instance_npcname("ins_bapho_to_2f", instance_id());
+		enablenpc instance_npcname("ins_bapho_to_2f");
 		mes "[Ancient Hero's Soul]";
 		mes "Now you can go to the main altar. It is located in the bottom right corner of this floor.";
 		next;
@@ -1021,7 +776,7 @@ OnTouch:
 		mes "[Ancient Hero's Soul]";
 		mes "Go ahead, warriors.";
 		cutin "",255;
-		instance_announce -1, "Ancient Hero's Soul : Now you can go to the Main Altar's gate. It is located in the Southeast",bc_map,"0xFFFF00";
+		mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : Now you can go to the Main Altar's gate. It is located in the Southeast",bc_map,"0xFFFF00";
 		close;
 	}
 	else if ('ins_baphomet == 4) {
@@ -1048,6 +803,10 @@ OnTouch:
 		cutin "",255;
 		close;
 	}
+
+OnInstanceInit:
+	disablenpc instance_npcname("Ancient Hero's Soul#1F");
+	end;
 }
 
 // To 2F Warp
@@ -1057,7 +816,7 @@ OnTouch:
 	if (countitem(6002) > 0) {
 		delitem 6002,countitem(6002); //Token_Of_Apostle
 		set 'ins_baphomet,5;
-		warp "2@cata",80,144;
+		warp instance_mapname("2@cata"),80,144;
 		end;
 	}
 	else {
@@ -1065,6 +824,10 @@ OnTouch:
 		mes "Where is your Token of Apostle? I said you should carry the Token of Apostle to pass this gate.";
 		close;
 	}
+
+OnInstanceInit:
+	disablenpc instance_npcname("ins_bapho_to_2f");
+	end;
 }
 
 // Gravestones
@@ -1129,7 +892,7 @@ OnTouch:
 			specialeffect2 EF_HOLYHIT;
 			getitem 6001,1; //Essence_Of_Fire
 			mes "The symbol of inheritor shines. Then a small crystal falls into my hand from the torch.";
-			disablenpc instance_npcname(strnpcinfo(0), instance_id());
+			disablenpc instance_npcname(strnpcinfo(0));
 			close;
 		}
 		else if (('ins_baphomet == 3) && (countitem(6001) > 10)) {
@@ -1150,6 +913,10 @@ OnTouch:
 		percentheal -50,0;
 		close;
 	}
+
+OnInstanceInit:
+	disablenpc instance_npcname(strnpcinfo(0));
+	end;
 }
 1@cata,267,210,0	duplicate(Bobbing Torch#SS)	Bobbing Torch#1	844
 1@cata,85,182,0	duplicate(Bobbing Torch#SS)	Bobbing Torch#2	844
@@ -1165,34 +932,38 @@ OnTouch:
 1@cata,155,14,0	duplicate(Bobbing Torch#SS)	Bobbing Torch#12	844
 
 1@cata,1,1,0	script	ins_baphomet_1f_timer	-1,{
+OnInstanceInit:
+	disablenpc instance_npcname("ins_baphomet_1f_timer");
+	end;
+
 OnEnable:
-	enablenpc instance_npcname("ins_baphomet_1f_timer", instance_id());
+	enablenpc instance_npcname("ins_baphomet_1f_timer");
 	initnpctimer;
 	end;
 
-OnDisable:;
-	disablenpc instance_npcname("ins_baphomet_1f_timer", instance_id());
+OnDisable:
+	disablenpc instance_npcname("ins_baphomet_1f_timer");
 	stopnpctimer;
 	end;
 
 OnTimer1800000:
-	instance_announce -1, "Ancient Hero's Soul : We don't have enough time! Hurry up!",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : We don't have enough time! Hurry up!",bc_map,"0xFFFF00";
 	end;
 
 OnTimer2400000:
-	instance_announce -1, "Ancient Hero's Soul : My body is disappearing... Hurry up!",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : My body is disappearing... Hurry up!",bc_map,"0xFFFF00";
 	end;
 
 OnTimer3000000:
-	instance_announce -1, "Ancient Hero's Soul : Everything is over... There is no other way but to wait for the next chance...",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : Everything is over... There is no other way but to wait for the next chance...",bc_map,"0xFFFF00";
 	end;
 
 OnTimer3050000:
-	instance_announce -1, "Ancient Hero's Soul : We failed... However... We still have a chance. I hope you will train yourselves until the time comes.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : We failed... However... We still have a chance. I hope you will train yourselves until the time comes.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer3100000:
-	instance_announce -1, "You've failed to open the seal of main altar.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("1@cata"), "You've failed to open the seal of main altar.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer3500000:
@@ -1203,106 +974,110 @@ OnTimer3500000:
 
 2@cata,80,144,0	script	ins_2f_enter	-1,3,3,{
 OnTouch:
-	donpcevent instance_npcname("ins_2f_enter_broad", instance_id())+"::OnEnable";
-	disablenpc instance_npcname("ins_2f_enter", instance_id());
+	donpcevent instance_npcname("ins_2f_enter_broad")+"::OnEnable";
+	disablenpc instance_npcname("ins_2f_enter");
 	end;
 }
 
 2@cata,1,1,0	script	ins_2f_enter_broad	-1,{
-OnEnable:
-	enablenpc instance_npcname("ins_2f_enter_broad", instance_id());
-	initnpctimer;
+OnInstanceInit:
+OnDisable:
+	disablenpc instance_npcname("ins_2f_enter_broad");
 	end;
 
-OnDisable:
-	disablenpc instance_npcname("ins_2f_enter_broad", instance_id());
+OnEnable:
+	enablenpc instance_npcname("ins_2f_enter_broad");
+	initnpctimer;
 	end;
 
 OnTimer10000:
-	instance_announce -1, "Baphomet : Humans... interfering again...",bc_map,"0xdb7093";
+	mapannounce instance_mapname("2@cata"), "Baphomet : Humans... interfering again...",bc_map,"0xdb7093";
 	end;
 
 OnTimer13000:
-	instance_announce -1, "Apostle of Baphomet : Humans! Humans have invaded our sanctum!",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Apostle of Baphomet : Humans! Humans have invaded our sanctum!",bc_map,"0xFFFF00";
 	end;
 
 OnTimer16000:
-	instance_announce -1, "Apostle of Baphomet : Kill the humans! Do not stop the revival of our Master!",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Apostle of Baphomet : Kill the humans! Do not stop the revival of our Master!",bc_map,"0xFFFF00";
 	end;
 
 OnTimer18000:
-	instance_announce -1, "Apostle of Baphomet : Hurry up and release the seals of the altars! Our Master's return is upon us!",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Apostle of Baphomet : Hurry up and release the seals of the altars! Our Master's return is upon us!",bc_map,"0xFFFF00";
 	stopnpctimer;
-	disablenpc instance_npcname("ins_2f_enter_broad", instance_id());
+	disablenpc instance_npcname("ins_2f_enter_broad");
 	end;
 }
 
 2@cata,50,67,0	script	slave_left	-1,5,5,{
 OnTouch:
-	disablenpc instance_npcname("slave_left", instance_id());
-	instance_announce -1, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00";
-	monster "2@cata",55,67,"Apostle of Baphomet",1869,1;
-	monster "2@cata",51,67,"Apostle of Baphomet",1291,1;
-	monster "2@cata",58,67,"Apostle of Baphomet",1292,1;
-	monster "2@cata",53,67,"Apostle of Baphomet",1291,1;
-	monster "2@cata",54,67,"Apostle of Baphomet",1869,1;
-	monster "2@cata",55,67,"Apostle of Baphomet",1291,1;
-	monster "2@cata",56,67,"Apostle of Baphomet",1117,1;
-	monster "2@cata",58,66,"Apostle of Baphomet",1869,1;
-	monster "2@cata",56,66,"Apostle of Baphomet",1117,1;
-	monster "2@cata",60,66,"Apostle of Baphomet",1132,1;
-	monster "2@cata",59,66,"Apostle of Baphomet",1117,1;
-	monster "2@cata",54,66,"Apostle of Baphomet",1132,1;
-	monster "2@cata",55,66,"Apostle of Baphomet",1292,1;
-	monster "2@cata",56,66,"Apostle of Baphomet",1132,1;
-	monster "2@cata",50,65,"Apostle of Baphomet",1867,1;
-	monster "2@cata",61,65,"Apostle of Baphomet",1292,1;
+	set .@map$, instance_mapname("2@cata");
+	mapannounce .@map$, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00";
+	monster .@map$,55,67,"Apostle of Baphomet",1869,1;
+	monster .@map$,51,67,"Apostle of Baphomet",1291,1;
+	monster .@map$,58,67,"Apostle of Baphomet",1292,1;
+	monster .@map$,53,67,"Apostle of Baphomet",1291,1;
+	monster .@map$,54,67,"Apostle of Baphomet",1869,1;
+	monster .@map$,55,67,"Apostle of Baphomet",1291,1;
+	monster .@map$,56,67,"Apostle of Baphomet",1117,1;
+	monster .@map$,58,66,"Apostle of Baphomet",1869,1;
+	monster .@map$,56,66,"Apostle of Baphomet",1117,1;
+	monster .@map$,60,66,"Apostle of Baphomet",1132,1;
+	monster .@map$,59,66,"Apostle of Baphomet",1117,1;
+	monster .@map$,54,66,"Apostle of Baphomet",1132,1;
+	monster .@map$,55,66,"Apostle of Baphomet",1292,1;
+	monster .@map$,56,66,"Apostle of Baphomet",1132,1;
+	monster .@map$,50,65,"Apostle of Baphomet",1867,1;
+	monster .@map$,61,65,"Apostle of Baphomet",1292,1;
+	disablenpc instance_npcname("slave_left");
 	end;
 }
 
 2@cata,109,67,0	script	slave_right	-1,5,5,{
 OnTouch:
-	disablenpc instance_npcname("slave_right", instance_id());
-	instance_announce -1, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00";
-	monster "2@cata",105,67,"Apostle of Baphomet",1869,1;
-	monster "2@cata",104,67,"Apostle of Baphomet",1291,1;
-	monster "2@cata",107,67,"Apostle of Baphomet",1869,1;
-	monster "2@cata",106,67,"Apostle of Baphomet",1291,1;
-	monster "2@cata",102,67,"Apostle of Baphomet",1869,1;
-	monster "2@cata",103,67,"Apostle of Baphomet",1291,1;
-	monster "2@cata",103,67,"Apostle of Baphomet",1117,1;
-	monster "2@cata",109,66,"Apostle of Baphomet",1117,1;
-	monster "2@cata",108,66,"Apostle of Baphomet",1132,1;
-	monster "2@cata",101,66,"Apostle of Baphomet",1117,1;
-	monster "2@cata",106,66,"Apostle of Baphomet",1292,1;
-	monster "2@cata",102,66,"Apostle of Baphomet",1132,1;
-	monster "2@cata",104,66,"Apostle of Baphomet",1292,1;
-	monster "2@cata",103,66,"Apostle of Baphomet",1132,1;
-	monster "2@cata",109,65,"Apostle of Baphomet",1867,1;
-	monster "2@cata",108,65,"Apostle of Baphomet",1292,1;
+	set .@map$, instance_mapname("2@cata");
+	mapannounce .@map$, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00";
+	monster .@map$,105,67,"Apostle of Baphomet",1869,1;
+	monster .@map$,104,67,"Apostle of Baphomet",1291,1;
+	monster .@map$,107,67,"Apostle of Baphomet",1869,1;
+	monster .@map$,106,67,"Apostle of Baphomet",1291,1;
+	monster .@map$,102,67,"Apostle of Baphomet",1869,1;
+	monster .@map$,103,67,"Apostle of Baphomet",1291,1;
+	monster .@map$,103,67,"Apostle of Baphomet",1117,1;
+	monster .@map$,109,66,"Apostle of Baphomet",1117,1;
+	monster .@map$,108,66,"Apostle of Baphomet",1132,1;
+	monster .@map$,101,66,"Apostle of Baphomet",1117,1;
+	monster .@map$,106,66,"Apostle of Baphomet",1292,1;
+	monster .@map$,102,66,"Apostle of Baphomet",1132,1;
+	monster .@map$,104,66,"Apostle of Baphomet",1292,1;
+	monster .@map$,103,66,"Apostle of Baphomet",1132,1;
+	monster .@map$,109,65,"Apostle of Baphomet",1867,1;
+	monster .@map$,108,65,"Apostle of Baphomet",1292,1;
+	disablenpc instance_npcname("slave_right");
 	end;
 }
 
 2@cata,79,39,0	script	slave_down	-1,5,5,{
 OnTouch:
-	disablenpc instance_npcname("slave_down", instance_id());
-	instance_announce -1, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00";
-	monster "2@cata",78,41,"Apostle of Baphomet",1869,1;
-	monster "2@cata",79,42,"Apostle of Baphomet",1291,1;
-	monster "2@cata",78,46,"Apostle of Baphomet",1869,1;
-	monster "2@cata",81,41,"Apostle of Baphomet",1291,1;
-	monster "2@cata",81,42,"Apostle of Baphomet",1869,1;
-	monster "2@cata",79,43,"Apostle of Baphomet",1291,1;
-	monster "2@cata",77,40,"Apostle of Baphomet",1117,1;
-	monster "2@cata",79,41,"Apostle of Baphomet",1132,1;
-	monster "2@cata",79,42,"Apostle of Baphomet",1117,1;
-	monster "2@cata",79,43,"Apostle of Baphomet",1132,1;
-	monster "2@cata",79,48,"Apostle of Baphomet",1117,1;
-	monster "2@cata",78,49,"Apostle of Baphomet",1132,1;
-	monster "2@cata",78,41,"Apostle of Baphomet",1292,1;
-	monster "2@cata",74,42,"Apostle of Baphomet",1292,1;
-	monster "2@cata",72,48,"Apostle of Baphomet",1867,1;
-	monster "2@cata",72,38,"Apostle of Baphomet",1292,1;
+	set .@map$, instance_mapname("2@cata");
+	mapannounce .@map$, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00";
+	monster .@map$,78,41,"Apostle of Baphomet",1869,1;
+	monster .@map$,79,42,"Apostle of Baphomet",1291,1;
+	monster .@map$,78,46,"Apostle of Baphomet",1869,1;
+	monster .@map$,81,41,"Apostle of Baphomet",1291,1;
+	monster .@map$,81,42,"Apostle of Baphomet",1869,1;
+	monster .@map$,79,43,"Apostle of Baphomet",1291,1;
+	monster .@map$,77,40,"Apostle of Baphomet",1117,1;
+	monster .@map$,79,41,"Apostle of Baphomet",1132,1;
+	monster .@map$,79,42,"Apostle of Baphomet",1117,1;
+	monster .@map$,79,43,"Apostle of Baphomet",1132,1;
+	monster .@map$,79,48,"Apostle of Baphomet",1117,1;
+	monster .@map$,78,49,"Apostle of Baphomet",1132,1;
+	monster .@map$,78,41,"Apostle of Baphomet",1292,1;
+	monster .@map$,74,42,"Apostle of Baphomet",1292,1;
+	monster .@map$,72,48,"Apostle of Baphomet",1867,1;
+	monster .@map$,72,38,"Apostle of Baphomet",1292,1;
+	disablenpc instance_npcname("slave_down");
 	end;
 }
 
@@ -1319,20 +1094,25 @@ OnTouch:
 	}
 	if (.@seal_check == 2) erasequest 3041;
 	specialeffect EF_LEXDIVINA;
-	disablenpc instance_npcname(strnpcinfo(0), instance_id());
-	if (strnpcinfo(2) == "0") areamobuseskill "2@cata",79,81,10,1929,686,1,0,0,26,0;
-	else if (strnpcinfo(2) == "2") areamobuseskill "2@cata",123,109,10,1929,686,1,0,0,26,0;
-	else if (strnpcinfo(2) == "4") areamobuseskill "2@cata",123,22,10,1929,686,1,0,0,26,0;
-	else if (strnpcinfo(2) == "8") areamobuseskill "2@cata",35,21,10,1929,686,1,0,0,26,0;
-	else if (strnpcinfo(2) == "10") areamobuseskill "2@cata",35,109,10,1929,686,1,0,0,26,0;
+	disablenpc instance_npcname(strnpcinfo(0));
+	set .@map$, instance_mapname("2@cata");
+	if (strnpcinfo(2) == "0") areamobuseskill .@map$,79,81,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0;
+	else if (strnpcinfo(2) == "2") areamobuseskill .@map$,123,109,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0;
+	else if (strnpcinfo(2) == "4") areamobuseskill .@map$,123,22,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0;
+	else if (strnpcinfo(2) == "8") areamobuseskill .@map$,35,21,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0;
+	else if (strnpcinfo(2) == "10") areamobuseskill .@map$,35,109,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0;
 	percentheal -50,0;
 	sc_start Eff_Stone,20000,0;
 	setquest 3041;
-	instance_announce -1, "The seal activated by putting magical power into the altar.",bc_map,"0x87ceeb";
+	mapannounce .@map$, "The seal activated by putting magical power into the altar.",bc_map,"0x87ceeb";
 	mes "I can feel the power of the altar came back by adding magical power.";
 	next;
 	mes "But you can't use your magic for 3 minutes because you used your SP on the altar.";
 	close;
+
+OnInstanceInit:
+	disablenpc instance_npcname(strnpcinfo(0));
+	end;
 }
 2@cata,79,81,0	duplicate(Magical Seal#SS)	Magical Seal#0	844
 2@cata,123,109,0	duplicate(Magical Seal#SS)	Magical Seal#2	844
@@ -1352,10 +1132,10 @@ OnTouch:
 		specialeffect EF_METEORSTORM;
 		specialeffect EF_METEORSTORM;
 		mes "[" + strcharinfo(0) + "]";
-		mes "Watch out! Something... Something is comming.";
+		mes "Watch out! Something... Something is coming.";
 		set 'ins_baphomet,6;
-		donpcevent instance_npcname("ins_2f_hero_broad", instance_id())+"::OnEnable";
-		disablenpc instance_npcname("The Main Altar#ss", instance_id());
+		donpcevent instance_npcname("ins_2f_hero_broad")+"::OnEnable";
+		disablenpc instance_npcname("The Main Altar#ss");
 		close;
 	}
 	else {
@@ -1374,8 +1154,6 @@ OnTouch:
 	mes "Good job, my descendants... You've finished the long-cherished task that me and my bretheren could not complete.";
 	next;
 	mes "[Ancient Hero's Soul]";
-	next;
-	mes "[Ancient Hero's Soul]";
 	mes "I really appreciate your help.";
 	mes "Our souls can finally rest in peace...";
 	next;
@@ -1399,291 +1177,316 @@ OnTouch:
 		cutin "",255;
 		close;
 	}
+
+OnInstanceInit:
+	disablenpc instance_npcname("Ancient Hero's Soul#2F");
+	end;
 }
 
 2@cata,1,2,0	script	ins_2f_hero_broad	-1,{
 OnEnable:
-	enablenpc instance_npcname("ins_2f_hero_broad", instance_id());
+	enablenpc instance_npcname("ins_2f_hero_broad");
 	initnpctimer;
 	end;
 
 OnDisable:
-	disablenpc instance_npcname("ins_2f_hero_broad", instance_id());
+	disablenpc instance_npcname("ins_2f_hero_broad");
 	end;
 
 OnTimer3000:
-	instance_announce -1, "Ancient Hero's Soul : My God! The seal of the Main Altar is weakening!",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : My God! The seal of the Main Altar is weakening!",bc_map,"0xFFFF00";
 	end;
 
 OnTimer6000:
-	instance_announce -1, "Ancient Hero's Soul : My descendants... Listen carefully to what I'm going to say.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : My descendants... Listen carefully to what I'm going to say.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer9000:
-	instance_announce -1, "Ancient Hero's Soul : The altars that control the Main Altar's power are located in the Northeast, Southeast, Southwest and Northwest corners of this room.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The altars that control the Main Altar's power are located in the Northeast, Southeast, Southwest and Northwest corners of this room.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer12000:
-	instance_announce -1, "Ancient Hero's Soul : Find these altars and activate their seals before Baphomet revives.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Find these altars and activate their seals before Baphomet revives.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer15000:
-	instance_announce -1, "Baphomet : It's too late, weaklings... Now, you'll feel the despair of death!",bc_map,"0xdb7093";
+	mapannounce instance_mapname("2@cata"), "Baphomet : It's too late, weaklings... Now, you'll feel the despair of death!",bc_map,"0xdb7093";
 	end;
 
 OnTimer17000:
-	instance_announce -1, "Baphomet : No one can harm me here. You will be my first sacrifice.",bc_map,"0xdb7093";
-	donpcevent instance_npcname("control_baphomet", instance_id())+"::OnEnable";
-	donpcevent instance_npcname("ins_2f_hero_broad2", instance_id())+"::OnEnable";
+	mapannounce instance_mapname("2@cata"), "Baphomet : No one can harm me here. You will be my first sacrifice.",bc_map,"0xdb7093";
+	donpcevent instance_npcname("control_baphomet")+"::OnEnable";
+	donpcevent instance_npcname("ins_2f_hero_broad2")+"::OnEnable";
 	stopnpctimer;
-	disablenpc instance_npcname("ins_2f_hero_broad", instance_id());
+	disablenpc instance_npcname("ins_2f_hero_broad");
 	end;
 }
 
 2@cata,3,3,0	script	control_baphomet	-1,{
-OnEnable:
-	enablenpc instance_npcname("control_baphomet", instance_id());
-	donpcevent instance_npcname("2f_callmon_pattern_c", instance_id())+"::OnEnable";
-	monster "2@cata",79,64,"Baphomet#",1929,1,instance_npcname("control_baphomet", instance_id())+"::OnMyMobDead";
+OnInstanceInit:
+OnDisable:
+	disablenpc instance_npcname("control_baphomet");
 	end;
 
-OnDisable:
-	disablenpc "control_baphomet";
+OnEnable:
+	enablenpc instance_npcname("control_baphomet");
+	donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnEnable";
+	monster instance_mapname("2@cata"),79,64,"Baphomet#",1929,1,instance_npcname("control_baphomet")+"::OnMyMobDead";
 	end;
 
 OnMyMobDead:
-	if (mobcount("2@cata",instance_npcname("control_baphomet", instance_id())+"::OnMyMobDead") < 1) {
+	set .@map$, instance_mapname("2@cata");
+	if (mobcount(.@map$,instance_npcname("control_baphomet")+"::OnMyMobDead") < 1) {
 		set 'ins_baphomet,7;
 		erasequest 3041;
-		instance_announce -1, "Baphomet : No! Nonono! How dare these weaklings defeat me!... No!!...",bc_map,"0xdb7093";
-		enablenpc instance_npcname("Ancient Hero's Soul#2F", instance_id());
-		disablenpc instance_npcname("slave_down", instance_id());
-		disablenpc instance_npcname("slave_left", instance_id());
-		disablenpc instance_npcname("slave_right", instance_id());
-		donpcevent instance_npcname("ins_2f_hero_broad", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("ins_2f_hero_broad2", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("ins_2f_hero_pattern_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("2f_callmon_pattern_c", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("2f_callmon_pattern", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("ins_2f_hero_pattern", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("ins_2f_enter_broad", instance_id())+"::OnDisable";
-		donpcevent instance_npcname("control_baphomet", instance_id())+"::OnDisable";
-		disablenpc instance_npcname("control_baphomet", instance_id());
+		mapannounce .@map$, "Baphomet : No! Nonono! How dare these weaklings defeat me!... No!!...",bc_map,"0xdb7093";
+		enablenpc instance_npcname("Ancient Hero's Soul#2F");
+		disablenpc instance_npcname("slave_down");
+		disablenpc instance_npcname("slave_left");
+		disablenpc instance_npcname("slave_right");
+		donpcevent instance_npcname("ins_2f_hero_broad")+"::OnDisable";
+		donpcevent instance_npcname("ins_2f_hero_broad2")+"::OnDisable";
+		donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnDisable";
+		donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnDisable";
+		donpcevent instance_npcname("2f_callmon_pattern")+"::OnDisable";
+		donpcevent instance_npcname("ins_2f_hero_pattern")+"::OnDisable";
+		donpcevent instance_npcname("ins_2f_enter_broad")+"::OnDisable";
+		donpcevent instance_npcname("control_baphomet")+"::OnDisable";
+		disablenpc instance_npcname("control_baphomet");
 	}
 	end;
 }
 
 2@cata,2,2,0	script	ins_2f_hero_broad2	-1,{
-OnEnable:
-	enablenpc instance_npcname("ins_2f_hero_broad2", instance_id());
-	initnpctimer;
+OnInstanceInit:
+OnDisable:
+	disablenpc instance_npcname("ins_2f_hero_broad2");
 	end;
 
-OnDisable:
-	disablenpc instance_npcname("ins_2f_hero_broad2", instance_id());
+OnEnable:
+	enablenpc instance_npcname("ins_2f_hero_broad2");
+	initnpctimer;
 	end;
 
 OnTimer8000:
-	instance_announce -1, "Ancient Hero's Soul : Don't be discouraged, Baphomet can still be defeated!",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Don't be discouraged, Baphomet can still be defeated!",bc_map,"0xFFFF00";
 	end;
 
 OnTimer11000:
-	instance_announce -1, "Ancient Hero's Soul : Go to the altars and activate their seals.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Go to the altars and activate their seals.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer13000:
-	instance_announce -1, "Ancient Hero's Soul : Once the seals recover their power, Baphomet will be vulnerable.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Once the seals recover their power, Baphomet will be vulnerable.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer16000:
-	instance_announce -1, "Ancient Hero's Soul : You should lure Baphomet to the unsealed Altars. Otherwise, your efforts will be futile.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : You should lure Baphomet to the unsealed Altars. Otherwise, your efforts will be futile.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer19000:
-	instance_announce -1, "Ancient Hero's Soul : We have only 1 hour to stop Baphomet. If time runs out, the power of the seals will be useless.",bc_map,"0xFFFF00";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : We have only 1 hour to stop Baphomet. If time runs out, the power of the seals will be useless.",bc_map,"0xFFFF00";
 	end;
 
 OnTimer22000:
-	instance_announce -1, "Baphomet : It's useless. Make more seals. I'll crush them all. None of you will survive!",bc_map,"0xdb7093";
+	mapannounce instance_mapname("2@cata"), "Baphomet : It's useless. Make more seals. I'll crush them all. None of you will survive!",bc_map,"0xdb7093";
 	end;
 
 OnTimer26000:
-	instance_announce -1, "Ancient Hero's Soul : The magical power of the central seal is running out. Go to the central seal and put the magical power.",bc_map,"0xFFFF00";
-	enablenpc instance_npcname("Magical Seal#0", instance_id());
-	disablenpc instance_npcname("Magical Seal#2", instance_id());
-	disablenpc instance_npcname("Magical Seal#4", instance_id());
-	disablenpc instance_npcname("Magical Seal#8", instance_id());
-	disablenpc instance_npcname("Magical Seal#10", instance_id());
-	donpcevent instance_npcname("ins_2f_hero_pattern_c", instance_id())+"::OnEnable";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the central seal is running out. Go to the central seal and put the magical power.",bc_map,"0xFFFF00";
+	enablenpc instance_npcname("Magical Seal#0");
+	disablenpc instance_npcname("Magical Seal#2");
+	disablenpc instance_npcname("Magical Seal#4");
+	disablenpc instance_npcname("Magical Seal#8");
+	disablenpc instance_npcname("Magical Seal#10");
+	donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnEnable";
 	stopnpctimer;
-	disablenpc instance_npcname("ins_2f_hero_broad2", instance_id());
+	disablenpc instance_npcname("ins_2f_hero_broad2");
 	end;
 }
 
 2@cata,4,1,0	script	2f_callmon_pattern_c	-1,{
+OnInstanceInit:
+	disablenpc instance_npcname("2f_callmon_pattern_c");
+	end;
+
 OnEnable:
-	enablenpc instance_npcname("2f_callmon_pattern_c", instance_id());
+	enablenpc instance_npcname("2f_callmon_pattern_c");
 	initnpctimer;
-	donpcevent instance_npcname("2f_callmon_pattern_c", instance_id())+"::Ongo";
+	donpcevent instance_npcname("2f_callmon_pattern_c")+"::Ongo";
 	end;
 
 OnDisable:
 	stopnpctimer;
-	disablenpc instance_npcname("2f_callmon_pattern_c", instance_id());
+	disablenpc instance_npcname("2f_callmon_pattern_c");
 	end;
 
 Ongo:
-	donpcevent instance_npcname("2f_callmon_pattern", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("2f_callmon_pattern")+"::OnEnable";
 	end;
 
 OnTimer3600000:
-	donpcevent instance_npcname("2f_callmon_pattern_c", instance_id())+"::OnDisable";
+	donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnDisable";
 	end;
 }
 
 2@cata,4,2,0	script	2f_callmon_pattern	-1,{
+OnInstanceInit:
+	disablenpc instance_npcname("2f_callmon_pattern");
+	end;
+
 OnEnable:
-	enablenpc instance_npcname("2f_callmon_pattern", instance_id());
+	enablenpc instance_npcname("2f_callmon_pattern");
 	stopnpctimer;
 	initnpctimer;
 	end;
 
 OnDisable:
-	disablenpc instance_npcname("2f_callmon_pattern", instance_id());
+	disablenpc instance_npcname("2f_callmon_pattern");
 	stopnpctimer;
 	end;
 
 OnTimer300000:
-	enablenpc instance_npcname("slave_down", instance_id());
-	enablenpc instance_npcname("slave_left", instance_id());
-	enablenpc instance_npcname("slave_right", instance_id());
-	donpcevent instance_npcname("2f_callmon_pattern_c", instance_id())+"::Ongo";
+	enablenpc instance_npcname("slave_down");
+	enablenpc instance_npcname("slave_left");
+	enablenpc instance_npcname("slave_right");
+	donpcevent instance_npcname("2f_callmon_pattern_c")+"::Ongo";
 	end;
 }
 
 2@cata,3,1,0	script	ins_2f_hero_pattern_c	-1,{
+OnInstanceInit:
+	disablenpc instance_npcname("ins_2f_hero_pattern_c");
+	end;
+
 OnEnable:
-	enablenpc instance_npcname("ins_2f_hero_pattern_c", instance_id());
+	enablenpc instance_npcname("ins_2f_hero_pattern_c");
 	initnpctimer;
-	donpcevent instance_npcname("ins_2f_hero_pattern_c", instance_id())+"::Ongo";
+	donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::Ongo";
 	end;
 
 Ongo:
-	donpcevent instance_npcname("ins_2f_hero_pattern", instance_id())+"::OnEnable";
+	donpcevent instance_npcname("ins_2f_hero_pattern")+"::OnEnable";
 	end;
 
 OnDisable:
 	stopnpctimer;
-	disablenpc instance_npcname("Magical Seal#0", instance_id());
-	disablenpc instance_npcname("Magical Seal#2", instance_id());
-	disablenpc instance_npcname("Magical Seal#4", instance_id());
-	disablenpc instance_npcname("Magical Seal#8", instance_id());
-	disablenpc instance_npcname("Magical Seal#10", instance_id());
-	donpcevent instance_npcname("ins_2f_hero_pattern", instance_id())+"::OnDisable";
-	disablenpc instance_npcname("ins_2f_hero_pattern_c", instance_id());
+	disablenpc instance_npcname("Magical Seal#0");
+	disablenpc instance_npcname("Magical Seal#2");
+	disablenpc instance_npcname("Magical Seal#4");
+	disablenpc instance_npcname("Magical Seal#8");
+	disablenpc instance_npcname("Magical Seal#10");
+	donpcevent instance_npcname("ins_2f_hero_pattern")+"::OnDisable";
+	disablenpc instance_npcname("ins_2f_hero_pattern_c");
 	end;
 
 OnTimer3600000:
-	instance_announce -1, "Baphomet : krrrr... Now you can't stop me with the seals. All you can do is wait for death!",bc_map,"0xdb7093";
+	mapannounce instance_mapname("2@cata"), "Baphomet : krrrr... Now you can't stop me with the seals. All you can do is wait for death!",bc_map,"0xdb7093";
 	end;
 
 OnTimer3605000:
-	instance_announce -1, "Ancient Hero's Soul : We can't stop Baphomet with the magical power of the seals anymore. Now everything depends on God...",bc_map,"0xFFFF00";
-	donpcevent instance_npcname("ins_2f_hero_pattern_c", instance_id())+"::OnDisable";
+	mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : We can't stop Baphomet with the magical power of the seals anymore. Now everything depends on God...",bc_map,"0xFFFF00";
+	donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnDisable";
 	end;
 }
 
 2@cata,3,2,0	script	ins_2f_hero_pattern	-1,{
+OnInstanceInit:
+	disablenpc instance_npcname("ins_2f_hero_pattern");
+	end;
+
 OnEnable:
-	enablenpc instance_npcname("ins_2f_hero_pattern", instance_id());
+	enablenpc instance_npcname("ins_2f_hero_pattern");
 	initnpctimer;
 	end;
 
 OnDisable:
-	disablenpc instance_npcname("ins_2f_hero_pattern", instance_id());
+	disablenpc instance_npcname("ins_2f_hero_pattern");
 	stopnpctimer;
 	end;
 
 OnTimer70000:
 	switch(rand(1,5)) {
 	case 1:
-		instance_announce -1, "Ancient Hero's Soul : The seal of the Main Altar is running out. Strengthen the Main Altar's seal!",bc_map,"0xFFFF00";
-		enablenpc instance_npcname("Magical Seal#0", instance_id());
-		disablenpc instance_npcname("Magical Seal#2", instance_id());
-		disablenpc instance_npcname("Magical Seal#4", instance_id());
-		disablenpc instance_npcname("Magical Seal#8", instance_id());
-		disablenpc instance_npcname("Magical Seal#10", instance_id());
+		mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The seal of the Main Altar is running out. Strengthen the Main Altar's seal!",bc_map,"0xFFFF00";
+		enablenpc instance_npcname("Magical Seal#0");
+		disablenpc instance_npcname("Magical Seal#2");
+		disablenpc instance_npcname("Magical Seal#4");
+		disablenpc instance_npcname("Magical Seal#8");
+		disablenpc instance_npcname("Magical Seal#10");
 		break;
 	case 2:
-		instance_announce -1, "Ancient Hero's Soul : The magical power of the seal at 2 o'clock is running out. Go to 2 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
-		disablenpc instance_npcname("Magical Seal#0", instance_id());
-		enablenpc instance_npcname("Magical Seal#2", instance_id());
-		disablenpc instance_npcname("Magical Seal#4", instance_id());
-		disablenpc instance_npcname("Magical Seal#8", instance_id());
-		disablenpc instance_npcname("Magical Seal#10", instance_id());
+		mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 2 o'clock is running out. Go to 2 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
+		disablenpc instance_npcname("Magical Seal#0");
+		enablenpc instance_npcname("Magical Seal#2");
+		disablenpc instance_npcname("Magical Seal#4");
+		disablenpc instance_npcname("Magical Seal#8");
+		disablenpc instance_npcname("Magical Seal#10");
 		break;
 	case 3:
-		instance_announce -1, "Ancient Hero's Soul : The magical power of the seal at 4 o'clock is running out. Go to 4 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
-		disablenpc instance_npcname("Magical Seal#0", instance_id());
-		disablenpc instance_npcname("Magical Seal#2", instance_id());
-		enablenpc instance_npcname("Magical Seal#4", instance_id());
-		disablenpc instance_npcname("Magical Seal#8", instance_id());
-		disablenpc instance_npcname("Magical Seal#10", instance_id());
+		mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 4 o'clock is running out. Go to 4 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
+		disablenpc instance_npcname("Magical Seal#0");
+		disablenpc instance_npcname("Magical Seal#2");
+		enablenpc instance_npcname("Magical Seal#4");
+		disablenpc instance_npcname("Magical Seal#8");
+		disablenpc instance_npcname("Magical Seal#10");
 		break;
 	case 4:
-		instance_announce -1, "Ancient Hero's Soul : The magical power of the seal at 8 o'clock is running out. Go to 8 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
-		disablenpc instance_npcname("Magical Seal#0", instance_id());
-		disablenpc instance_npcname("Magical Seal#2", instance_id());
-		disablenpc instance_npcname("Magical Seal#4", instance_id());
-		enablenpc instance_npcname("Magical Seal#8", instance_id());
-		disablenpc instance_npcname("Magical Seal#10", instance_id());
+		mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 8 o'clock is running out. Go to 8 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
+		disablenpc instance_npcname("Magical Seal#0");
+		disablenpc instance_npcname("Magical Seal#2");
+		disablenpc instance_npcname("Magical Seal#4");
+		enablenpc instance_npcname("Magical Seal#8");
+		disablenpc instance_npcname("Magical Seal#10");
 		break;
 	case 5:
-		instance_announce -1, "Ancient Hero's Soul : The magical power of the seal at 10 o'clock is running out. Go to 10 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
-		disablenpc instance_npcname("Magical Seal#0", instance_id());
-		disablenpc instance_npcname("Magical Seal#2", instance_id());
-		disablenpc instance_npcname("Magical Seal#4", instance_id());
-		disablenpc instance_npcname("Magical Seal#8", instance_id());
-		enablenpc instance_npcname("Magical Seal#10", instance_id());
+		mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 10 o'clock is running out. Go to 10 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00";
+		disablenpc instance_npcname("Magical Seal#0");
+		disablenpc instance_npcname("Magical Seal#2");
+		disablenpc instance_npcname("Magical Seal#4");
+		disablenpc instance_npcname("Magical Seal#8");
+		enablenpc instance_npcname("Magical Seal#10");
 	}
 	stopnpctimer;
-	donpcevent instance_npcname("ins_2f_hero_pattern_c", instance_id())+"::Ongo";
+	donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::Ongo";
 	end;
 }
 
 
 1@cata,1,1,0	script	ins_1f_spawn_mobs	-1,{
-OnEnable:
-	monster "1@cata",0,0,"Zombie Master",1298,10;
-	monster "1@cata",0,0,"Wraith Dead",1291,10;
-	//monster "1@cata",0,0,"Ancient Mimic",1699,10;
-	monster "1@cata",0,0,"Flame Skull",1869,10;
-	monster "1@cata",0,0,"Skeleton General",1290,10;
-	monster "1@cata",0,0,"Zombie Master",1298,10;
-	monster "1@cata",0,0,"Skeleton General",1290,10;
-	monster "1@cata",0,0,"Flame Skull",1869,10;
-	monster "1@cata",0,0,"Wraith Dead",1291,10;
-	monster "1@cata",0,0,"Wraith Dead",1291,10;
-	monster "1@cata",0,0,"Khalitzburg",1132,10;
-	monster "1@cata",0,0,"Khalitzburg",1132,10;
-	monster "1@cata",0,0,"Flame Skull",1869,10;
-	monster "1@cata",0,0,"Flame Skull",1869,10;
-	monster "1@cata",0,0,"Ancient Mimic",1699,10;
-	monster "1@cata",0,0,"Zombie Master",1298,10;
-	monster "1@cata",0,0,"Ancient Mimic",1699,10;
-	monster "1@cata",0,0,"Zombie Master",1298,10;
-	monster "1@cata",0,0,"Wraith Dead",1291,10;
-	monster "1@cata",0,0,"Skeleton General",1290,10;
-	monster "1@cata",0,0,"Skeleton General",1290,10;
-	monster "1@cata",0,0,"Wind Ghost",1263,10;
-	monster "1@cata",0,0,"Wind Ghost",1263,10;
-	monster "1@cata",0,0,"Wind Ghost",1263,10;
-	monster "1@cata",0,0,"Lude",1509,10;
-	monster "1@cata",0,0,"Lude",1509,10;
-	monster "1@cata",0,0,"Evil Druid",1117,10;
-	monster "1@cata",0,0,"Evil Druid",1117,10;
-	monster "1@cata",0,0,"Evil Druid",1117,10;
-	monster "1@cata",0,0,"Banshee",1867,10;
-	monster "1@cata",0,0,"Dark Illusion",1302,1;
+OnInstanceInit:
+	set .@map$, instance_mapname("1@cata");
+	monster .@map$,0,0,"Zombie Master",1298,10;
+	monster .@map$,0,0,"Wraith Dead",1291,10;
+	//monster .@map$,0,0,"Ancient Mimic",1699,10;
+	monster .@map$,0,0,"Flame Skull",1869,10;
+	monster .@map$,0,0,"Skeleton General",1290,10;
+	monster .@map$,0,0,"Zombie Master",1298,10;
+	monster .@map$,0,0,"Skeleton General",1290,10;
+	monster .@map$,0,0,"Flame Skull",1869,10;
+	monster .@map$,0,0,"Wraith Dead",1291,10;
+	monster .@map$,0,0,"Wraith Dead",1291,10;
+	monster .@map$,0,0,"Khalitzburg",1132,10;
+	monster .@map$,0,0,"Khalitzburg",1132,10;
+	monster .@map$,0,0,"Flame Skull",1869,10;
+	monster .@map$,0,0,"Flame Skull",1869,10;
+	monster .@map$,0,0,"Ancient Mimic",1699,10;
+	monster .@map$,0,0,"Zombie Master",1298,10;
+	monster .@map$,0,0,"Ancient Mimic",1699,10;
+	monster .@map$,0,0,"Zombie Master",1298,10;
+	monster .@map$,0,0,"Wraith Dead",1291,10;
+	monster .@map$,0,0,"Skeleton General",1290,10;
+	monster .@map$,0,0,"Skeleton General",1290,10;
+	monster .@map$,0,0,"Wind Ghost",1263,10;
+	monster .@map$,0,0,"Wind Ghost",1263,10;
+	monster .@map$,0,0,"Wind Ghost",1263,10;
+	monster .@map$,0,0,"Lude",1509,10;
+	monster .@map$,0,0,"Lude",1509,10;
+	monster .@map$,0,0,"Evil Druid",1117,10;
+	monster .@map$,0,0,"Evil Druid",1117,10;
+	monster .@map$,0,0,"Evil Druid",1117,10;
+	monster .@map$,0,0,"Banshee",1867,10;
+	monster .@map$,0,0,"Dark Illusion",1302,1;
+	disablenpc instance_npcname("ins_1f_spawn_mobs");
 	end;
 }