Update instance scripts to follow official behaviour

11 files changed, 148 insertions, 168 deletions

diff --git a/npc/re/instances/BakonawaLake.txt b/npc/re/instances/BakonawaLake.txt
index 65622171b..5226db6cc 100644
--- a/npc/re/instances/BakonawaLake.txt
+++ b/npc/re/instances/BakonawaLake.txt
@@ -82,18 +82,16 @@ ma_scene01,174,179,4	script	Taho	4_M_DEWZATIMAN,{
 		switch (.@i) {
 		case 1:
 			.@instance = instance_create(.@md_name$, .@party_id);
-			if (.@instance < 0) {
-				mes("[Taho]");
-				mes("Oh, the rope got dropped. I have to make a new one.");
-				close();
-			}
-			if (instance_attachmap("1@ma_b", .@instance) == "") {
-				mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
-				instance_destroy(.@instance);
-				close();
+			if (.@instance >= 0) {
+				if (instance_attachmap("1@ma_b", .@instance) == "") {
+					mes("[Taho]");
+					mes("Oh, the rope got dropped. I have to make a new one.");
+					instance_destroy(.@instance);
+					close();
+				}
+				instance_set_timeout(7200, 300, .@instance);
+				instance_init(.@instance);
 			}
-			instance_set_timeout(7200, 300, .@instance);
-			instance_init(.@instance);
 			mes("[Taho]");
 			mes("Now I'm weaving, so you can go down when I'm done.");
 			close();
diff --git a/npc/re/instances/BangungotHospital.txt b/npc/re/instances/BangungotHospital.txt
index 9e8e836c4..6972322e1 100644
--- a/npc/re/instances/BangungotHospital.txt
+++ b/npc/re/instances/BangungotHospital.txt
@@ -274,21 +274,19 @@ L_Enter:
 	switch(select(((getarg(0))?"Prepare to enter the second floor.":""), "Enter the second floor.", "Do not enter.")) {
 	case 1:
 		.@instance = instance_create(.@md_name$,getcharid(CHAR_ID_PARTY));
-		if (.@instance < 0) {
-			mes "[Nurse Maenne]";
-			mes "A critical situation has happened.";
-			mes "You can't go up to the 2nd floor.";
-			close2;
-			cutin "",255;
-			end;
-		}
-		if (instance_attachmap("1@ma_h",.@instance) == "") {
-			mes "^0000ff"+.@md_name$+"^000000 - Reservation Failed!";
-			instance_destroy(.@instance);
-			close;
+		if (.@instance >= 0) {
+			if (instance_attachmap("1@ma_h", .@instance) == "") {
+				mes("[Nurse Maenne]");
+				mes("A critical situation has happened.");
+				mes("You can't go up to the 2nd floor.");
+				instance_destroy(.@instance);
+				close2();
+				cutin("", 255);
+				end;
+			}
+			instance_set_timeout(3600, 300, .@instance);
+			instance_init(.@instance);
 		}
-		instance_set_timeout 3600,300,.@instance;
-		instance_init(.@instance);
 		mes "[Nurse Maenne]";
 		mes "We are preparing to go up";
 		mes "to the second floor.";
diff --git a/npc/re/instances/BuwayaCave.txt b/npc/re/instances/BuwayaCave.txt
index 393ac5d9e..1d3eddc6a 100644
--- a/npc/re/instances/BuwayaCave.txt
+++ b/npc/re/instances/BuwayaCave.txt
@@ -93,22 +93,19 @@ ma_fild02,312,317,5	script	Guard#buwaya_cave	4_MAL_SOLDIER,{
 					// fall through
 				}
 				.@instance = instance_create(.@md_name$, .@party_id);
-				if (.@instance < 0) {
-					mes("[Guard]");
-					mesf("Party name is... %s.", getpartyname(.@party_id));
-					mesf("Party leader is... %s", strcharinfo(PC_NAME));
-					mesf("^0000ff%s^000000 cannot be opened now.", .@md_name$);
-					mes("Please try a moment later.");
-					close();
+				if (.@instance >= 0) {
+					if (instance_attachmap("1@ma_c", .@instance) == "") {
+						mes("[Guard]");
+						mesf("Party name is... %s.", getpartyname(.@party_id));
+						mesf("Party leader is... %s", strcharinfo(PC_NAME));
+						mesf("^0000ff%s^000000 cannot be opened now.", .@md_name$);
+						mes("Please try a moment later.");
+						instance_destroy(.@instance);
+						close();
+					}
+					instance_set_timeout(3600, 300, .@instance);
+					instance_init(.@instance);
 				}
-				if (instance_attachmap("1@ma_c", .@instance) == "") {
-					mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
-					instance_destroy(.@instance);
-					close();
-				}
-				instance_set_timeout(3600, 300, .@instance);
-				instance_init(.@instance);
-
 				mes("[Guard]");
 				mesf("I will open up the tunnel to ^0000ff%s^000000.", .@md_name$);
 				mes("I wish you good luck.");
diff --git a/npc/re/instances/EclageInterior.txt b/npc/re/instances/EclageInterior.txt
index 6b2808e05..2b2117b93 100644
--- a/npc/re/instances/EclageInterior.txt
+++ b/npc/re/instances/EclageInterior.txt
@@ -55,20 +55,18 @@ ecl_hub01,132,12,3	script	Chief of Staff#tl01::EclInstance	4_F_FAIRY,{
 		switch (select("Enter it.", "Forget it.")) {
 		case 1:
 			.@instance = instance_create(.@md_name$, .@party_id);
-			if (.@instance < 0) {
-				mes("[Shenime]");
-				mes("There are some soldiers dispatched by Mayor not too long ago.");
-				mes("I should sure hope that you aren't the disturbance they're looking for, right?");
-				close();
-			}
-			if (instance_attachmap("1@ecl", .@instance) == "") {
-				mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
-				instance_destroy(.@instance);
-				close();
+			if (.@instance >= 0) {
+				if (instance_attachmap("1@ecl", .@instance) == "") {
+					mes("[Shenime]");
+					mes("There are some soldiers dispatched by Mayor not too long ago.");
+					mes("I should sure hope that you aren't the disturbance they're looking for, right?");
+					instance_destroy(.@instance);
+					close();
+				}
+				ecl_interior_time = gettimetick(2) + 20 * 60;
+				instance_set_timeout(1200, 1200, .@instance);
+				instance_init(.@instance);
 			}
-			ecl_interior_time = gettimetick(2) + 20 * 60;
-			instance_set_timeout(1200, 1200, .@instance);
-			instance_init(.@instance);
 			mes("[Shenime]");
 			mes("Given the tight internal security, you should prepare yourself.");
 			mes("Wait here for a minute.");
diff --git a/npc/re/instances/HazyForest.txt b/npc/re/instances/HazyForest.txt
index 291ce54db..24e03b22e 100644
--- a/npc/re/instances/HazyForest.txt
+++ b/npc/re/instances/HazyForest.txt
@@ -101,35 +101,34 @@ bif_fild01,158,340,5	script	Laphine Soldier#mist	4_M_FAIRYSOLDIER,{
 			mesf("Party Name %s...", getpartyname(.@party_id));
 			mesf("Party Leader %s...", strcharinfo(PC_NAME));
 			.@instance = instance_create(.@md_name$, .@party_id);
-			if (.@instance < 0) {
-				mes("Hmm...");
-				next();
-				mes("[Laphine Soldier]");
-				if (!.@playtime)
-					mes("It's dangerous in the forest.");
-				else
-					mes("The atmosphere is somewhat tense in the forest.");
-				mes("...Why don't you just go back today?");
-				close();
-			}
-			if (instance_attachmap("1@mist", .@instance) != "") {
+			if (.@instance >= 0) {
+				if (instance_attachmap("1@mist", .@instance) == "") {
+					mes("Hmm...");
+					next();
+					mes("[Laphine Soldier]");
+					if (!.@playtime)
+						mes("It's dangerous in the forest.");
+					else
+						mes("The atmosphere is somewhat tense in the forest.");
+					mes("...Why don't you just go back today?");
+					instance_destroy(.@instance);
+					close();
+				}
 				instance_set_timeout(7200, 300, .@instance);
 				instance_init(.@instance);
-				mes("I've got it. I've written them down on the report here.");
-				next();
-				mes("[Laphine Soldier]");
-				mes("You'll get permission soon.");
-				mes("Now go to the log tunnel, the only way to get into the Hazy Forest.");
-				mes("You understand?");
-				next();
-				mes("[Laphine Soldier]");
-				mes("We can't go against the forest,");
-				mes("but maybe you humans can.");
-				mes("Good luck!");
-				close();
-			} else {
-				instance_destroy(.@instance);
 			}
+			mes("I've got it. I've written them down on the report here.");
+			next();
+			mes("[Laphine Soldier]");
+			mes("You'll get permission soon.");
+			mes("Now go to the log tunnel, the only way to get into the Hazy Forest.");
+			mes("You understand?");
+			next();
+			mes("[Laphine Soldier]");
+			mes("We can't go against the forest,");
+			mes("but maybe you humans can.");
+			mes("Good luck!");
+			close();
 		case 2:
 			mes("[Laphine Soldier]");
 			mes("Well, you've made the right decision.");
diff --git a/npc/re/instances/MalangdoCulvert.txt b/npc/re/instances/MalangdoCulvert.txt
index 2e51f0fd5..d61509511 100644
--- a/npc/re/instances/MalangdoCulvert.txt
+++ b/npc/re/instances/MalangdoCulvert.txt
@@ -433,20 +433,19 @@ mal_in01,160,34,4	script	Missing, the Cleaner	4_CAT_SAILOR2,{
 				close();
 			case 2:
 				.@instance = instance_create(.@md_name$, .@party_id);
-				if (.@instance < 0) {
-					mesf("Party name: %s", getpartyname(.@party_id));
-					mesf("Party leader: %s", strcharinfo(PC_NAME));
-					mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
-					close();
+				if (.@instance >= 0) {
+					for (.@i = 1; .@i <= 2; .@i++) {
+						if (instance_attachmap(.@i + "@pump", .@instance) == "") {
+							mesf("Party name: %s", getpartyname(.@party_id));
+							mesf("Party leader: %s", strcharinfo(PC_NAME));
+							mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
+							instance_destroy(.@instance);
+							close();
+						}
+					}
+					instance_set_timeout(3600, 300, .@instance);
+					instance_init(.@instance);
 				}
-				if (instance_attachmap("1@pump", .@instance) == "" || instance_attachmap("2@pump", .@instance) == "") {
-					mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
-					instance_destroy(.@instance);
-					close();
-				}
-				instance_set_timeout(3600, 300, .@instance);
-				instance_init(.@instance);
-
 				mesf("^3333FF%s^000000 - Reserving", .@md_name$);
 				mes("After making the reservation, you");
 				mes("have to select Enter the Culvert.");
diff --git a/npc/re/instances/OldGlastHeim.txt b/npc/re/instances/OldGlastHeim.txt
index c317e7495..587de45bf 100644
--- a/npc/re/instances/OldGlastHeim.txt
+++ b/npc/re/instances/OldGlastHeim.txt
@@ -110,19 +110,19 @@ glast_01,204,273,6	script	Hugin#ghinstance	4_M_SAGE_C,{
 			if (getcharid(CHAR_ID_CHAR) != getpartyleader(.@party_id, 2))
 				end;
 			.@instance = instance_create(.@md_name$, .@party_id);
-			if (.@instance < 0) {
-				mesf("Party Name: %s", .@p_name$);
-				mesf("Party Leader: %s", strcharinfo(PC_NAME));
-				mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
-				close();
-			}
-			if (instance_attachmap("1@gl_k", .@instance) == "" || instance_attachmap("2@gl_k", .@instance) == "") {
-				mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
-				instance_destroy(.@instance);
-				close();
+			if (.@instance >= 0) {
+				for (.@i = 1; .@i <= 2; .@i++) {
+					if (instance_attachmap(.@i + "@gl_k", .@instance) == "") {
+						mesf("Party Name: %s", .@p_name$);
+						mesf("Party Leader: %s", strcharinfo(PC_NAME));
+						mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
+						instance_destroy(.@instance);
+						close();
+					}
+				}
+				instance_set_timeout(3600, 300, .@instance);
+				instance_init(.@instance);
 			}
-			instance_set_timeout(3600, 300, .@instance);
-			instance_init(.@instance);
 			mes("[Hugin]");
 			mes("The time gap was created. When you're ready, talk to me again.");
 			close();
diff --git a/npc/re/instances/WolfchevLaboratory.txt b/npc/re/instances/WolfchevLaboratory.txt
index d6c5516e5..efb32be7e 100644
--- a/npc/re/instances/WolfchevLaboratory.txt
+++ b/npc/re/instances/WolfchevLaboratory.txt
@@ -1859,30 +1859,29 @@ lhz_dun04,151,276,3	script	Researcher#memo	4_LGTSCIENCE,{
 				}
 				if (getpartyleader(getcharid(CHAR_ID_PARTY),2) == getcharid(CHAR_ID_CHAR)) {
 					.@instance = instance_create("Worsef", getcharid(CHAR_ID_PARTY));
-					if (.@instance < 0) {
-						mes "[Wolfchev]";
-						mes "Hmm.. Lab entering system is a bit weird. Would wait for me to check the system?";
-					} else {
-						mes "[Wolfchev]";
-						mes "Please hold on..";
-						next;
-						mes "Wolfchev starts to control certain gear.";
-						next;
-						progressbar "FF00FF", 2;
-						if (instance_attachmap("1@lhz", .@instance) != "") {
-							instance_set_timeout 14400, 300, .@instance;
-							instance_init(.@instance);
-							mes "[Wolfchev]";
-							mes "Alright! I have marked lan entering system code as";
-							mes "^0000ff"+ strcharinfo(PC_PARTY) +"^000000 party leader's name ^0000ff"+ strcharinfo(PC_NAME) +"^000000!!.";
-							next;
-							mes "[Wolfchev]";
-							mes "Now, your party is free to pass the entrance.";
-						} else {
+					if (.@instance >= 0) {
+						if (instance_attachmap("1@lhz", .@instance) == "") {
+							mes("[Wolfchev]");
+							mes("Hmm.. Lab entering system is a bit weird. Would wait for me to check the system?");
 							instance_destroy(.@instance);
+							close();
 						}
+						instance_set_timeout 14400, 300, .@instance;
+						instance_init(.@instance);
 					}
-					close;
+					mes("[Wolfchev]");
+					mes("Please hold on..");
+					next();
+					mes("Wolfchev starts to control certain gear.");
+					next();
+					progressbar("FF00FF", 2);
+					mes("[Wolfchev]");
+					mes("Alright! I have marked lan entering system code as");
+					mesf("^0000ff%s^000000 party leader's name ^0000ff%s^000000!!.", strcharinfo(PC_PARTY), strcharinfo(PC_NAME));
+					next();
+					mes("[Wolfchev]");
+					mes("Now, your party is free to pass the entrance.");
+					close();
 				} else {
 					mes "[Wolfchev]";
 					mes "You are not the ^0000ffLeader of the party^000000, are you? Please go get the leader.";
diff --git a/npc/re/instances/ghost_palace.txt b/npc/re/instances/ghost_palace.txt
index e4ca12f99..3e708dc57 100644
--- a/npc/re/instances/ghost_palace.txt
+++ b/npc/re/instances/ghost_palace.txt
@@ -91,27 +91,24 @@ dali02,44,129,5	script	Unpleasent Royal Guard	4_M_SAKRAYROYAL,{
 	.@instance = instance_create(_("Ghost Palace"), .@party_id);
 	.@p_name$ = getpartyname(.@party_id);
 	.@md_name$ = _("Ghost Palace");
-	if (.@instance < 0) {
-		mesf("Party Name: %s", .@p_name$);
-		mesf("Party Leader: %s", strcharinfo(PC_NAME));
-		mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
-		close();
-	}
-	if (instance_attachmap("1@spa", .@instance) != "") {
+	if (.@instance >= 0) {
+		if (instance_attachmap("1@spa", .@instance) == "") {
+			mesf("Party Name: %s", .@p_name$);
+			mesf("Party Leader: %s", strcharinfo(PC_NAME));
+			mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
+			instance_destroy(.@instance);
+			close();
+		}
 		instance_set_timeout(3600, 300, .@instance);
 		instance_init(.@instance);
 		if (!questprogress(1260))
 			setquest(1260);
-		mes("[Unpleasent Royal Guard]");
-		mes("Thank You..\r"
-			"I will open the secret passage to ^0000FFGhost Palace.^000000\r"
-			"Please be ready!");
-		close();
-	} else {
-		instance_destroy(.@instance);
-		mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
-		close();
 	}
+	mes("[Unpleasent Royal Guard]");
+	mes("Thank You..\r"
+		"I will open the secret passage to ^0000FFGhost Palace.^000000\r"
+		"Please be ready!");
+	close();
 }
 
 dali02,41,134,0	script	Interdimensional Device::gpportal	PORTAL,{
diff --git a/npc/re/instances/octopus_cave.txt b/npc/re/instances/octopus_cave.txt
index e4d8d4357..4c964072a 100644
--- a/npc/re/instances/octopus_cave.txt
+++ b/npc/re/instances/octopus_cave.txt
@@ -85,22 +85,19 @@ mal_dun01,151,235,5	script	Starfish	4_ASTER,{
 				erasequest(4197);
 			if (countitem(Octopus_Hunt_Stick)) {
 				.@instance = instance_create(.@md_name$, .@party_id);
-				if (.@instance < 0) {
-					mes("[Starfish]");
-					mesf("Party name is... %s.", getpartyname(.@party_id));
-					mesf("Party leader is... %s.", strcharinfo(PC_NAME));
-					mesf("^0000FF%s^000000, I cannot open now, hehe.", .@md_name$);
-					mes("Now is not the time, please wait.");
-					close();
+				if (.@instance >= 0) {
+					if (instance_attachmap("1@cash", .@instance) == "") {
+						mes("[Starfish]");
+						mesf("Party name is... %s.", getpartyname(.@party_id));
+						mesf("Party leader is... %s.", strcharinfo(PC_NAME));
+						mesf("^0000FF%s^000000, I cannot open now, hehe.", .@md_name$);
+						mes("Now is not the time, please wait.");
+						instance_destroy(.@instance);
+						close();
+					}
+					instance_set_timeout(3600, 300, .@instance);
+					instance_init(.@instance);
 				}
-				if (instance_attachmap("1@cash", .@instance) == "") {
-					mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
-					instance_destroy(.@instance);
-					close();
-				}
-				instance_set_timeout(3600, 300, .@instance);
-				instance_init(.@instance);
-
 				mes("[Starfish]");
 				mesf("I will open the gate for a while to ^0000FF%s^000000.", .@md_name$);
 				mes("Please catch that pervert octopus, and come back with it sticked to the pick, hehe.");
diff --git a/npc/re/instances/saras_memory.txt b/npc/re/instances/saras_memory.txt
index c9a47534b..9eac396aa 100644
--- a/npc/re/instances/saras_memory.txt
+++ b/npc/re/instances/saras_memory.txt
@@ -185,19 +185,17 @@ dali,138,118,0	script	Dimensional Device#dimen	PORTAL,{
 			if (getcharid(CHAR_ID_CHAR) != getpartyleader(.@party_id, 2))
 				end;
 			.@instance = instance_create(.@md_name$, .@party_id);
-			if (.@instance < 0) {
-				mesf("Party Name: %s", .@p_name$);
-				mesf("Party Leader: %s", strcharinfo(PC_NAME));
-				mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
-				close();
-			}
-			if (instance_attachmap("1@sara", .@instance) == "") {
-				mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
-				instance_destroy(.@instance);
-				close();
+			if (.@instance >= 0) {
+				if (instance_attachmap("1@sara", .@instance) == "") {
+					mesf("Party Name: %s", .@p_name$);
+					mesf("Party Leader: %s", strcharinfo(PC_NAME));
+					mesf("^0000FF%s^000000 - Reservation Failed!", .@md_name$);
+					instance_destroy(.@instance);
+					close();
+				}
+				instance_set_timeout(3600, 300, .@instance);
+				instance_init(.@instance);
 			}
-			instance_set_timeout(3600, 300, .@instance);
-			instance_init(.@instance);
 			mes("^FF0000The dimensional boots up cleanly. Use the device to enter the crack in space and time.^000000");
 			close();
 		case 2: