Changes to npc\instances\re\BakonawaLake.txt script to fit Hercules' Standards.

- Added mesf and sprintf commands where needed.
- Added _$() and _() macros where needed.
- Added curly brackets, paragraph breaks, parentheses and spaces to fit Hercules' Standards.
- Changed numeric arguments for constants.

Signed-off-by: Ragno <ragno@atlantis-ro.net>

1 files changed, 350 insertions, 302 deletions

diff --git a/npc/re/instances/BakonawaLake.txt b/npc/re/instances/BakonawaLake.txt
index 2868cc589..65622171b 100644
--- a/npc/re/instances/BakonawaLake.txt
+++ b/npc/re/instances/BakonawaLake.txt
@@ -34,223 +34,234 @@
 //=========================================================================
 
 ma_scene01,174,179,4	script	Taho	4_M_DEWZATIMAN,{
-	disable_items;
-	if (checkweight(Knife,1) == 0) {
-		mes "You are carrying too many items. Come back after taking off some of them.";
-		close;
+	disable_items();
+	if (checkweight(Knife, 1) == 0) {
+		mes("You are carrying too many items. Come back after taking off some of them.");
+		close();
 	}
 	if (MaxWeight - Weight < 10000) {
-		mes "You are carrying too much weight. Come back after reducing the weight.";
-		close;
+		mes("You are carrying too much weight. Come back after reducing the weight.");
+		close();
 	}
 	if (BaseLevel < 140) {
-		mes "[Taho]";
-		mes "Hey. This is too dangerous a place for you. You cannot keep yourself safe. Get out of here and go to the village right now!";
-		close;
+		mes("[Taho]");
+		mes("Hey. This is too dangerous a place for you. You cannot keep yourself safe. Get out of here and go to the village right now!");
+		close();
 	}
 	if (malaya_bakona1 < 7 && malaya_bakona2 < 15) {
-		mes "[Taho]";
-		mes "We are gonna be killed all by that Bakonawa. Ah, we must slay him but unfortunately we are not prepared.";
-		close;
+		mes("[Taho]");
+		mes("We are gonna be killed all by that Bakonawa. Ah, we must slay him but unfortunately we are not prepared.");
+		close();
 	}
 
 	.@party_id = getcharid(CHAR_ID_PARTY);
-	.@md_name$ = "Bakonawa Lake";
+	.@md_name$ = _("Bakonawa Lake");
 
-	.@baku_time = questprogress(12278,PLAYTIME);
+	.@baku_time = questprogress(12278, PLAYTIME);
 	if (!.@baku_time) {
-		if (!questprogress(12279)) setquest 12279;
+		if (!questprogress(12279))
+			setquest(12279);
 	}
 	if (!.@party_id) {
-		mes "[Taho]";
-		mes "Isn't there any company who can go with you? Or even if you wanna go alone, come after organizing a party.";
-		close;
+		mes("[Taho]");
+		mes("Isn't there any company who can go with you? Or even if you wanna go alone, come after organizing a party.");
+		close();
 	}
 	if (!.@baku_time) {
-		if (getcharid(CHAR_ID_CHAR) == getpartyleader(.@party_id,2)) {
-			mes "[Taho]";
-			mes "Are you the leader of the Bakonawa slayers? The road is not well so we have to go down the cliff with a rope, is that OK?";
-			next;
+		if (getcharid(CHAR_ID_CHAR) == getpartyleader(.@party_id, 2)) {
+			mes("[Taho]");
+			mes("Are you the leader of the Bakonawa slayers? The road is not well so we have to go down the cliff with a rope, is that OK?");
+			next();
 			.@i = select("Please weave a rope.", "Now I will go down.", "Cancel.");
 		} else {
-			mes "[Taho]";
-			mes "You came for slaying Bakonawa. The leader of your party has to help me weaving the rope for going down.";
-			next;
+			mes("[Taho]");
+			mes("You came for slaying Bakonawa. The leader of your party has to help me weaving the rope for going down.");
+			next();
 			.@i = select("", "Now I will go down.", "Cancel.");
 		}
-		switch(.@i) {
+		switch (.@i) {
 		case 1:
-			.@instance = instance_create(.@md_name$,.@party_id);
+			.@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;
+				mes("[Taho]");
+				mes("Oh, the rope got dropped. I have to make a new one.");
+				close();
 			}
-			if (instance_attachmap("1@ma_b",.@instance) == "") {
-				mes "^0000ff"+.@md_name$+"^000000 - Reservation Failed!";
+			if (instance_attachmap("1@ma_b", .@instance) == "") {
+				mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
 				instance_destroy(.@instance);
-				close;
+				close();
 			}
-			instance_set_timeout 7200,300,.@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;
+			mes("[Taho]");
+			mes("Now I'm weaving, so you can go down when I'm done.");
+			close();
 		case 2:
-			if( has_instance("1@ma_b") == "" ) {
-				mes "The memorial dungeon "+.@md_name$+" does not exist.";
-				mes "The party leader did not generate the dungeon yet.";
-				close;
+			if (has_instance("1@ma_b") == "") {
+				mesf("The memorial dungeon %s does not exist.", .@md_name$);
+				mes("The party leader did not generate the dungeon yet.");
+				close();
 			} else {
-				mapannounce "ma_scene01","A party member, "+strcharinfo(PC_NAME)+" of the party "+getpartyname(.@party_id)+" is entering the dungeon, "+.@md_name$+".",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
-				setquest 12278;
-				warp "1@ma_b",64,51;
+				mapannounce("ma_scene01", sprintf(_$("A party member, %s of the party %s is entering the dungeon, %s."), strcharinfo(PC_NAME), getpartyname(.@party_id), .@md_name$), bc_map, C_SPRINGGREEN); //FW_NORMAL 12 0 0
+				setquest(12278);
+				warp("1@ma_b", 64, 51);
 				end;
 			}
 		case 3:
-			close;
+			close();
 		}
 	} else if (.@baku_time == 1) {
-		mes "[Taho]";
-		mes "The rope used for getting to the Lake is already broken. We are now cleaning up the surroundings so come back after some time.";
-		close;
+		mes("[Taho]");
+		mes("The rope used for getting to the Lake is already broken. We are now cleaning up the surroundings so come back after some time.");
+		close();
 	} else if (.@baku_time == 2) {
-		mes "[Taho]";
-		mes "It's all cleaned up around here. Now you can go down again after getting a rope.";
-		erasequest 12278;
-		close;
+		mes("[Taho]");
+		mes("It's all cleaned up around here. Now you can go down again after getting a rope.");
+		erasequest(12278);
+		close();
 	}
 }
 
 sec_in02,26,26,4	script	Bakonawa's Rage	4_M_DEWZATIMAN,{
-	callfunc "F_GM_NPC";
-	mes "[Taho]";
-	mes "My name is Minky.";
-	if (callfunc("F_GM_NPC",1854,0) == 1) {
-		erasequest 12278;
-		erasequest 12279;
+	callfunc("F_GM_NPC");
+	mes("[Taho]");
+	mes("My name is Minky.");
+	if (callfunc("F_GM_NPC", 1854, 0) == 1) {
+		erasequest(12278);
+		erasequest(12279);
 		malaya_bakona1 = 7;
 		malaya_bakona2 = 15;
 	}
-	close;
+	close();
 }
 
 1@ma_b,62,52,4	script	Taho#nf	4_M_DEWZATIMAN,{
-	mes "[Taho]";
-	mes "Heehee, I could join the Bakonawa hunt, but I'd rather hide behind that rock and cheer you guys on.";
-	next;
-	mes "[Taho]";
-	mes "Bakonawa becomes invincible at some point. When that time comes, listen to my guides carefully. Just trust me and all will be good.";
-	next;
-	if (getcharid(CHAR_ID_CHAR) == getpartyleader(getcharid(CHAR_ID_PARTY),2)) {
-		mes "[Taho]";
-		mes "Now I will make Bakonawa spring out from the lake.";
-		next;
-		switch(select("Hold on! I'm not ready yet!", "Let's do it!")) {
+	mes("[Taho]");
+	mes("Heehee, I could join the Bakonawa hunt, but I'd rather hide behind that rock and cheer you guys on.");
+	next();
+	mes("[Taho]");
+	mes("Bakonawa becomes invincible at some point. When that time comes, listen to my guides carefully. Just trust me and all will be good.");
+	next();
+	if (getcharid(CHAR_ID_CHAR) == getpartyleader(getcharid(CHAR_ID_PARTY), 2)) {
+		mes("[Taho]");
+		mes("Now I will make Bakonawa spring out from the lake.");
+		next();
+		switch (select("Hold on! I'm not ready yet!", "Let's do it!")) {
 		case 1:
-			mes "[Taho]";
-			mes "Oh... alright... tell me when you are ready.";
-			close;
+			mes("[Taho]");
+			mes("Oh... alright... tell me when you are ready.");
+			close();
 		case 2:
-			mes "[Taho]";
-			mes "Then I will drop a drop of Albopal to this lake.";
-			next;
-			mes "[Taho]";
-			mes "Once Bakonawa tastes this, he will surface...";
-			donpcevent instance_npcname("#Bakonawan1")+"::OnStart";
-			disablenpc instance_npcname("Taho#nf");
-			close;
+			mes("[Taho]");
+			mes("Then I will drop a drop of Albopal to this lake.");
+			next();
+			mes("[Taho]");
+			mes("Once Bakonawa tastes this, he will surface...");
+			donpcevent(instance_npcname("#Bakonawan1")+"::OnStart");
+			disablenpc(instance_npcname("Taho#nf"));
+			close();
 		}
 	} else {
-		mes "[Taho]";
-		mes "I am dropping the Alpopal to make Bakonawa mad. Bakonawa can be a good source of protein once we get him.";
-		close;
+		mes("[Taho]");
+		mes("I am dropping the Alpopal to make Bakonawa mad. Bakonawa can be a good source of protein once we get him.");
+		close();
 	}
 }
 
 1@ma_b,36,111,4	script	#Bakonawan1	CLEAR_NPC,{
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("#Bakonawan1");
+	disablenpc(instance_npcname("#Bakonawan1"));
 	end;
 OnStart:
-	enablenpc instance_npcname("#Bakonawan1");
+	enablenpc(instance_npcname("#Bakonawan1"));
 	.@map$ = instance_mapname("1@ma_b");
-	mapannounce .@map$,"Taho: I can see him there on the surface! ATTACK!!!",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
-	monster .@map$,78,81,"Bakonawa",2320,1,instance_npcname("#Bakonawan1")+"::OnMyMobDead"; //original: (78,83)
-	initnpctimer;
+	mapannounce(.@map$, _("Taho: I can see him there on the surface! ATTACK!!!"), bc_map, C_AQUA); //FW_NORMAL 15 0 0
+	monster(.@map$, 78, 81, _("Bakonawa"), BAKONAWA_1, 1, instance_npcname("#Bakonawan1")+"::OnMyMobDead"); //original: (78, 83)
+	initnpctimer();
 	end;
 OnFail:
-	killmonster instance_mapname("1@ma_b"),instance_npcname("#Bakonawan1")+"::OnMyMobDead";
+	killmonster(instance_mapname("1@ma_b"), instance_npcname("#Bakonawan1")+"::OnMyMobDead");
 	end;
 OnMyMobDead:
 	.@map$ = instance_mapname("1@ma_b");
-	if (mobcount(.@map$,instance_npcname("#Bakonawan1")+"::OnMyMobDead") < 1) {
-		donpcevent instance_npcname("#BakonawaDeadn1")+"::OnStart";
-		killmonster .@map$,instance_npcname("#Bakonawan1")+"::OnMyMobDead";
-		stopnpctimer;
-		disablenpc instance_npcname("#Bakonawan1");
+	if (mobcount(.@map$, instance_npcname("#Bakonawan1")+"::OnMyMobDead") < 1) {
+		donpcevent(instance_npcname("#BakonawaDeadn1")+"::OnStart");
+		killmonster(.@map$, instance_npcname("#Bakonawan1")+"::OnMyMobDead");
+		stopnpctimer();
+		disablenpc(instance_npcname("#Bakonawan1"));
 	}
 	end;
-OnTimer1000:	callsub OnAnnounce,"10 minutes";
-OnTimer60000:	callsub OnAnnounce,"9 minutes";
-OnTimer120000:	callsub OnAnnounce,"8 minutes";
-OnTimer180000:	callsub OnAnnounce,"7 minutes";
-OnTimer240000:	callsub OnAnnounce,"6 minutes";
-OnTimer300000:	callsub OnAnnounce,"5 minutes";
-OnTimer360000:	callsub OnAnnounce,"4 minutes";
-OnTimer420000:	callsub OnAnnounce,"3 minutes";
-OnTimer480000:	callsub OnAnnounce,"2 minutes";
-OnTimer540000:	callsub OnAnnounce,"1 minute";
+OnTimer1000:
+	callsub(OnAnnounce, _("10 minutes"));
+OnTimer60000:
+	callsub(OnAnnounce, _("9 minutes"));
+OnTimer120000:
+	callsub(OnAnnounce, _("8 minutes"));
+OnTimer180000:
+	callsub(OnAnnounce, _("7 minutes"));
+OnTimer240000:
+	callsub(OnAnnounce, _("6 minutes"));
+OnTimer300000:
+	callsub(OnAnnounce, _("5 minutes"));
+OnTimer360000:
+	callsub(OnAnnounce, _("4 minutes"));
+OnTimer420000:
+	callsub(OnAnnounce, _("3 minutes"));
+OnTimer480000:
+	callsub(OnAnnounce, _("2 minutes"));
+OnTimer540000:
+	callsub(OnAnnounce, _("1 minute"));
 OnTimer570000:
-	mapannounce instance_mapname("1@ma_b"),"Time Limit: 30 seconds",bc_map,"0xff4400"; //FW_NORMAL 18 0 0
-	donpcevent instance_npcname("#SummonPuppetsn1")+"::OnStart";
+	mapannounce(instance_mapname("1@ma_b"), _("Time Limit: 30 seconds"), bc_map, "0xff4400"); //FW_NORMAL 18 0 0
+	donpcevent(instance_npcname("#SummonPuppetsn1")+"::OnStart");
 	end;
 OnTimer600000:
 	.@map$ = instance_mapname("1@ma_b");
-	mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0
-	donpcevent instance_npcname("Taho#Fail")+"::OnStart";
-	donpcevent instance_npcname("#Bakonawan1")+"::OnFail";
-	killmonster .@map$,instance_npcname("#Bakonawan1")+"::OnMyMobDead";
-	stopnpctimer;
-	disablenpc instance_npcname("#Bakonawan1");
+	mapannounce(.@map$, _("Bakonawa has escaped deep into the lake."), bc_map, C_YELLOW); //FW_NORMAL 20 0 0
+	donpcevent(instance_npcname("Taho#Fail")+"::OnStart");
+	donpcevent(instance_npcname("#Bakonawan1")+"::OnFail");
+	killmonster(.@map$, instance_npcname("#Bakonawan1")+"::OnMyMobDead");
+	stopnpctimer();
+	disablenpc(instance_npcname("#Bakonawan1"));
 	end;
 OnAnnounce:
-	mapannounce instance_mapname("1@ma_b"),"Time Limit: "+getarg(0),bc_map,"0xff4400"; //FW_NORMAL 15 0 0
-	donpcevent instance_npcname("#SummonPuppetsn1")+"::OnStart";
+	mapannounce(instance_mapname("1@ma_b"), sprintf(_$("Time Limit: %s"), getarg(0)), bc_map, "0xff4400"); //FW_NORMAL 15 0 0
+	donpcevent(instance_npcname("#SummonPuppetsn1")+"::OnStart");
 	end;
 }
 
 1@ma_b,78,81,0	script	#SummonPuppetsn1	HIDDEN_WARP_NPC,4,5,{
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("#SummonPuppetsn1");
+	disablenpc(instance_npcname("#SummonPuppetsn1"));
 	end;
 OnStart:
-	stopnpctimer;
-	enablenpc instance_npcname("#SummonPuppetsn1");
-	initnpctimer;
+	stopnpctimer();
+	enablenpc(instance_npcname("#SummonPuppetsn1"));
+	initnpctimer();
 	end;
 OnTouch:
-	stopnpctimer;
-	disablenpc instance_npcname("#SummonPuppetsn1");
+	stopnpctimer();
+	disablenpc(instance_npcname("#SummonPuppetsn1"));
 	end;
 OnTimer5000:
-	setarray .@x[0],79,71,60,61,57,89,95,96,99;
-	setarray .@y[0],71,72,80,90,99,73,82,90,99;
+	setarray(.@x[0], 79, 71, 60, 61, 57, 89, 95, 96, 99);
+	setarray(.@y[0], 71, 72, 80, 90, 99, 73, 82, 90, 99);
 	.@map$ = instance_mapname("1@ma_b");
-	for(.@i = 0; .@i<9; ++.@i) {
-		.@rand = rand(1,10);
+	for (.@i = 0; .@i < 9; ++.@i) {
+		.@rand = rand(1, 10);
 		if (.@rand > 7)
-			monster .@map$,.@x[.@i],.@y[.@i],"Bakonawa's Will",2337,1,instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead";
+			monster(.@map$, .@x[.@i], .@y[.@i], _("Bakonawa's Will"), HIDDEN_MOB, 1, instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead");
 		else if (.@rand < 4)
-			monster .@map$,.@x[.@i],.@y[.@i],"Bakonawa's Will",2343,1,instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead";
+			monster(.@map$, .@x[.@i], .@y[.@i], _("Bakonawa's Will"), HIDDEN_MOB_W, 1, instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead");
 	}
 	end;
 OnTimer50000:
-	killmonster instance_mapname("1@ma_b"),instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead";
-	stopnpctimer;
-	disablenpc instance_npcname("#SummonPuppetsn1");
+	killmonster(instance_mapname("1@ma_b"), instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead");
+	stopnpctimer();
+	disablenpc(instance_npcname("#SummonPuppetsn1"));
 	end;
 OnMyMobDead:
 	end;
@@ -259,111 +270,126 @@ OnMyMobDead:
 1@ma_b,1,5,4	script	#BakonawaDeadn1	CLEAR_NPC,{
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("#BakonawaDeadn1");
+	disablenpc(instance_npcname("#BakonawaDeadn1"));
 	end;
 OnStart:
-	enablenpc instance_npcname("#BakonawaDeadn1");
-	initnpctimer;
+	enablenpc(instance_npcname("#BakonawaDeadn1"));
+	initnpctimer();
 	end;
 OnTimer100:
-	mapannounce instance_mapname("1@ma_b"),"Taho: Good! Bakonawa is hidden under water. He will now try to swallow the moon.",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
+	mapannounce(instance_mapname("1@ma_b"), _("Taho: Good! Bakonawa is hidden under water. He will now try to swallow the moon."), bc_map, C_AQUA); //FW_NORMAL 15 0 0
 	end;
 OnTimer5000:
-	mapannounce instance_mapname("1@ma_b"),"Taho: We must make loud noises with caldron and gong so he can never concentrate on the moon!",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
+	mapannounce(instance_mapname("1@ma_b"), _("Taho: We must make loud noises with caldron and gong so he can never concentrate on the moon!"), bc_map, C_AQUA); //FW_NORMAL 15 0 0
 	end;
 OnTimer10000:
-	mapannounce instance_mapname("1@ma_b"),"Taho: Do not engage on him even if he come above the surface. Just make loud noises!",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
+	mapannounce(instance_mapname("1@ma_b"), _("Taho: Do not engage on him even if he come above the surface. Just make loud noises!"), bc_map, C_AQUA); //FW_NORMAL 15 0 0
 	end;
 OnTimer15000:
-	mapannounce instance_mapname("1@ma_b"),"Mission - Destroy 2 caldrons and 2 gongs on left and right sides of the lake.",bc_map,"0xff3300"; //FW_NORMAL 15 0 0
-	donpcevent instance_npcname("#Bakonawan2")+"::OnStart";
-	stopnpctimer;
-	disablenpc instance_npcname("#BakonawaDeadn1");
+	mapannounce(instance_mapname("1@ma_b"), _("Mission - Destroy 2 caldrons and 2 gongs on left and right sides of the lake."), bc_map, "0xff3300"); //FW_NORMAL 15 0 0
+	donpcevent(instance_npcname("#Bakonawan2")+"::OnStart");
+	stopnpctimer();
+	disablenpc(instance_npcname("#BakonawaDeadn1"));
 	end;
 }
 
 1@ma_b,36,111,4	script	#Bakonawan2	CLEAR_NPC,{
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("#Bakonawan2");
+	disablenpc(instance_npcname("#Bakonawan2"));
 	end;
 OnStart:
-	enablenpc instance_npcname("#Bakonawan2");
+	enablenpc(instance_npcname("#Bakonawan2"));
 	.@label$ = instance_npcname("#Bakonawan2")+"::OnMyMobDead";
 	.@map$ = instance_mapname("1@ma_b");
-	monster .@map$,95,98,"Caldron",2328,1,.@label$;
-	monster .@map$,60,98,"Caldron",2328,1,.@label$;
-	monster .@map$,97,104,"Gong",2328,1,.@label$;
-	monster .@map$,58,104,"Gong",2328,1,.@label$;
-	donpcevent instance_npcname("#Bakonawan2-1")+"::OnStart";
-	initnpctimer;
+	monster(.@map$, 95, 98, _("Caldron"), MA_DRUM, 1, .@label$);
+	monster(.@map$, 60, 98, _("Caldron"), MA_DRUM, 1, .@label$);
+	monster(.@map$, 97, 104, _("Gong"), MA_DRUM, 1, .@label$);
+	monster(.@map$, 58, 104, _("Gong"), MA_DRUM, 1, .@label$);
+	donpcevent(instance_npcname("#Bakonawan2-1")+"::OnStart");
+	initnpctimer();
 	end;
 OnMyMobDead:
 	.@map$ = instance_mapname("1@ma_b");
-	.@mob_dead_num = mobcount(.@map$,instance_npcname("#Bakonawan2")+"::OnMyMobDead");
+	.@mob_dead_num = mobcount(.@map$, instance_npcname("#Bakonawan2")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		donpcevent instance_npcname("#Bakonawan2-1")+"::OnEnd";
-		stopnpctimer;
-		disablenpc instance_npcname("#Bakonawan2");
-	} else
-		mapannounce .@map$,"Taho: Good! "+.@mob_dead_num+" left to go!",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
-	 end;
-OnTimer1000:	callsub OnAnnounce,"5 minutes",15,1;
-OnTimer60000:	callsub OnAnnounce,"4 minutes",15,1;
-OnTimer120000:	callsub OnAnnounce,"3 minutes",15,1;
-OnTimer180000:	callsub OnAnnounce,"2 minutes",15,1;
-OnTimer240000:	callsub OnAnnounce,"1 minute",15,1;
-OnTimer270000:	callsub OnAnnounce,"30 seconds",15,0;
-OnTimer280000:	callsub OnAnnounce,"20 seconds",15,0;
-OnTimer290000:	callsub OnAnnounce,"10 seconds",15,0;
-OnTimer295000:	callsub OnAnnounce,"5 seconds",16,0;
-OnTimer296000:	callsub OnAnnounce,"4 seconds",17,0;
-OnTimer297000:	callsub OnAnnounce,"3 seconds",18,0;
-OnTimer298000:	callsub OnAnnounce,"2 seconds",19,0;
-OnTimer299000:	callsub OnAnnounce,"1 second",20,0;
+		donpcevent(instance_npcname("#Bakonawan2-1")+"::OnEnd");
+		stopnpctimer();
+		disablenpc(instance_npcname("#Bakonawan2"));
+	} else {
+		mapannounce(.@map$, sprintf(_$("Taho: Good! %d left to go!"), .@mob_dead_num), bc_map, C_AQUA); //FW_NORMAL 15 0 0
+	}
+	end;
+OnTimer1000:
+	callsub(OnAnnounce, _("5 minutes"), 15, 1);
+OnTimer60000:
+	callsub(OnAnnounce, _("4 minutes"), 15, 1);
+OnTimer120000:
+	callsub(OnAnnounce, _("3 minutes"), 15, 1);
+OnTimer180000:
+	callsub(OnAnnounce, _("2 minutes"), 15, 1);
+OnTimer240000:
+	callsub(OnAnnounce, _("1 minute"), 15, 1);
+OnTimer270000:
+	callsub(OnAnnounce, _("30 seconds"), 15, 0);
+OnTimer280000:
+	callsub(OnAnnounce, _("20 seconds"), 15, 0);
+OnTimer290000:
+	callsub(OnAnnounce, _("10 seconds"), 15, 0);
+OnTimer295000:
+	callsub(OnAnnounce, _("5 seconds"), 16, 0);
+OnTimer296000:
+	callsub(OnAnnounce, _("4 seconds"), 17, 0);
+OnTimer297000:
+	callsub(OnAnnounce, _("3 seconds"), 18, 0);
+OnTimer298000:
+	callsub(OnAnnounce, _("2 seconds"), 19, 0);
+OnTimer299000:
+	callsub(OnAnnounce, _("1 second"), 20, 0);
 OnTimer300000:
 	.@map$ = instance_mapname("1@ma_b");
-	mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0
-	donpcevent instance_npcname("Taho#Fail")+"::OnStart";
-	donpcevent instance_npcname("#Bakonawan2-1")+"::OnFail";
-	killmonster .@map$,instance_npcname("#Bakonawan2")+"::OnMyMobDead";
-	stopnpctimer;
-	disablenpc instance_npcname("#Bakonawan2");
+	mapannounce(.@map$, _("Bakonawa has escaped deep into the lake."), bc_map, C_YELLOW); //FW_NORMAL 20 0 0
+	donpcevent(instance_npcname("Taho#Fail")+"::OnStart");
+	donpcevent(instance_npcname("#Bakonawan2-1")+"::OnFail");
+	killmonster(.@map$, instance_npcname("#Bakonawan2")+"::OnMyMobDead");
+	stopnpctimer();
+	disablenpc(instance_npcname("#Bakonawan2"));
 	end;
 OnAnnounce:
-	mapannounce instance_mapname("1@ma_b"),"Time Limit: "+getarg(0),bc_map,"0xff4400"; //FW_NORMAL getarg(1) 0 0
-	if (getarg(2)) donpcevent instance_npcname("#SummonPuppetsn1")+"::OnStart";
+	mapannounce(instance_mapname("1@ma_b"), sprintf(_$("Time Limit: %s"), getarg(0)), bc_map, "0xff4400"); //FW_NORMAL getarg(1) 0 0
+	if (getarg(2))
+		donpcevent(instance_npcname("#SummonPuppetsn1")+"::OnStart");
 	end;
 }
 
 1@ma_b,36,111,4	script	#Bakonawan2-1	CLEAR_NPC,{
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("#Bakonawan2-1");
+	disablenpc(instance_npcname("#Bakonawan2-1"));
 	end;
 OnStart:
-	enablenpc instance_npcname("#Bakonawan2-1");
-	monster instance_mapname("1@ma_b"),78,81,"Enraged Bakonawa",2321,1,instance_npcname("#Bakonawan2-1")+"::OnMyMobDead"; //original: (78,93)
+	enablenpc(instance_npcname("#Bakonawan2-1"));
+	monster(instance_mapname("1@ma_b"), 78, 81, _("Enraged Bakonawa"), BAKONAWA_2, 1, instance_npcname("#Bakonawan2-1")+"::OnMyMobDead"); //original: (78, 93)
 	end;
 OnFail:
-	killmonster instance_mapname("1@ma_b"),instance_npcname("#Bakonawan2-1")+"::OnMyMobDead";
+	killmonster(instance_mapname("1@ma_b"), instance_npcname("#Bakonawan2-1")+"::OnMyMobDead");
 	end;
 OnEnd:
-	enablenpc instance_npcname("#Bakonawan2-1");
-	killmonster instance_mapname("1@ma_b"),instance_npcname("#Bakonawan2-1")+"::OnMyMobDead";
-	initnpctimer;
+	enablenpc(instance_npcname("#Bakonawan2-1"));
+	killmonster(instance_mapname("1@ma_b"), instance_npcname("#Bakonawan2-1")+"::OnMyMobDead");
+	initnpctimer();
 	end;
 OnTimer1000:
-	mapannounce instance_mapname("1@ma_b"),"Taho: He is back into the lake again. Is it over?",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
+	mapannounce(instance_mapname("1@ma_b"), _("Taho: He is back into the lake again. Is it over?"), bc_map, C_AQUA); //FW_NORMAL 15 0 0
 	end;
 OnTimer5000:
-	mapannounce instance_mapname("1@ma_b"),"Taho: UHM! Something is moving up rapidly under the water! Ba... Bakonawa is coming!!",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
+	mapannounce(instance_mapname("1@ma_b"), _("Taho: UHM! Something is moving up rapidly under the water! Ba... Bakonawa is coming!!"), bc_map, C_AQUA); //FW_NORMAL 15 0 0
 	end;
 OnTimer10000:
-	mapannounce instance_mapname("1@ma_b"),"Mission - Eliminate Bakonawa who became more fierce.",bc_map,"0xff3300"; //FW_NORMAL 15 0 0
-	donpcevent instance_npcname("#Bakonawan3")+"::OnStart";
-	stopnpctimer;
-	disablenpc instance_npcname("#Bakonawan2-1");
+	mapannounce(instance_mapname("1@ma_b"), _("Mission - Eliminate Bakonawa who became more fierce."), bc_map, "0xff3300"); //FW_NORMAL 15 0 0
+	donpcevent(instance_npcname("#Bakonawan3")+"::OnStart");
+	stopnpctimer();
+	disablenpc(instance_npcname("#Bakonawan2-1"));
 	end;
 OnMyMobDead:
 	end;
@@ -372,190 +398,212 @@ OnMyMobDead:
 1@ma_b,36,111,4	script	#Bakonawan3	CLEAR_NPC,{
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("#Bakonawan3");
+	disablenpc(instance_npcname("#Bakonawan3"));
 	end;
 OnStart:
-	enablenpc instance_npcname("#Bakonawan3");
-	initnpctimer;
-	monster instance_mapname("1@ma_b"),78,81,"Enraged Bakonawa",2322,1,instance_npcname("#Bakonawan3")+"::OnMyMobDead"; //original: (78,83)
-	donpcevent instance_npcname("#Bakonawan3-1")+"::OnStart";
+	enablenpc(instance_npcname("#Bakonawan3"));
+	initnpctimer();
+	monster(instance_mapname("1@ma_b"), 78, 81, _("Enraged Bakonawa"), BAKONAWA_3, 1, instance_npcname("#Bakonawan3")+"::OnMyMobDead"); //original: (78, 83)
+	donpcevent(instance_npcname("#Bakonawan3-1")+"::OnStart");
 	end;
 OnMyMobDead:
 	.@map$ = instance_mapname("1@ma_b");
-	.@mob_dead_num = mobcount(.@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead");
+	.@mob_dead_num = mobcount(.@map$, instance_npcname("#Bakonawan3")+"::OnMyMobDead");
 	if (.@mob_dead_num < 1) {
-		mapannounce .@map$,"Taho: We got him! I can see he has threw up something that looks like a box.",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
-		donpcevent instance_npcname("Taho#Completed")+"::OnStart";
-		donpcevent instance_npcname("#Bakonawan3-1")+"::OnEnd";
-		killmonster .@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead";
-		stopnpctimer;
-		disablenpc instance_npcname("#Bakonawan3");
+		mapannounce(.@map$, _("Taho: We got him! I can see he has threw up something that looks like a box."), bc_map, C_AQUA); //FW_NORMAL 15 0 0
+		donpcevent(instance_npcname("Taho#Completed")+"::OnStart");
+		donpcevent(instance_npcname("#Bakonawan3-1")+"::OnEnd");
+		killmonster(.@map$, instance_npcname("#Bakonawan3")+"::OnMyMobDead");
+		stopnpctimer();
+		disablenpc(instance_npcname("#Bakonawan3"));
 	}
 	end;
 OnTimer1000:
-	callsub OnAnnounce,"10 minutes",15,1;
+	callsub(OnAnnounce, _("10 minutes"), 15, 1);
 	end;
 OnTimer60000:
 OnTimer120000:
 OnTimer180000:
 OnTimer240000:
-	donpcevent instance_npcname("#SummonPuppetsn1")+"::OnStart";
-	end;
-OnTimer300000:	callsub OnAnnounce,"5 minutes",15,1;
-OnTimer360000:	callsub OnAnnounce,"4 minutes",15,1;
-OnTimer420000:	callsub OnAnnounce,"3 minutes",15,1;
-OnTimer480000:	callsub OnAnnounce,"2 minutes",15,1;
-OnTimer540000:	callsub OnAnnounce,"1 minute",15,1;
-OnTimer570000:	callsub OnAnnounce,"30 seconds",15,0;
-OnTimer580000:	callsub OnAnnounce,"20 seconds",15,0;
-OnTimer590000:	callsub OnAnnounce,"10 seconds",15,0;
-OnTimer595000:	callsub OnAnnounce,"5 seconds",16,0;
-OnTimer596000:	callsub OnAnnounce,"4 seconds",17,0;
-OnTimer597000:	callsub OnAnnounce,"3 seconds",18,0;
-OnTimer598000:	callsub OnAnnounce,"2 seconds",19,0;
-OnTimer599000:	callsub OnAnnounce,"1 second",20,0;
+	donpcevent(instance_npcname("#SummonPuppetsn1")+"::OnStart");
+	end;
+OnTimer300000:
+	callsub(OnAnnounce, _("5 minutes"), 15, 1);
+OnTimer360000:
+	callsub(OnAnnounce, _("4 minutes"), 15, 1);
+OnTimer420000:
+	callsub(OnAnnounce, _("3 minutes"), 15, 1);
+OnTimer480000:
+	callsub(OnAnnounce, _("2 minutes"), 15, 1);
+OnTimer540000:
+	callsub(OnAnnounce, _("1 minute"), 15, 1);
+OnTimer570000:
+	callsub(OnAnnounce, _("30 seconds"), 15, 0);
+OnTimer580000:
+	callsub(OnAnnounce, _("20 seconds"), 15, 0);
+OnTimer590000:
+	callsub(OnAnnounce, _("10 seconds"), 15, 0);
+OnTimer595000:
+	callsub(OnAnnounce, _("5 seconds"), 16, 0);
+OnTimer596000:
+	callsub(OnAnnounce, _("4 seconds"), 17, 0);
+OnTimer597000:
+	callsub(OnAnnounce, _("3 seconds"), 18, 0);
+OnTimer598000:
+	callsub(OnAnnounce, _("2 seconds"), 19, 0);
+OnTimer599000:
+	callsub(OnAnnounce, _("1 second"), 20, 0);
 OnTimer600000:
 	.@map$ = instance_mapname("1@ma_b");
-	mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0
-	donpcevent instance_npcname("Taho#Fail")+"::OnStart";
-	killmonster .@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead";
-	stopnpctimer;
-	disablenpc instance_npcname("#Bakonawan3");
+	mapannounce(.@map$, _("Bakonawa has escaped deep into the lake."), bc_map, C_YELLOW); //FW_NORMAL 20 0 0
+	donpcevent(instance_npcname("Taho#Fail")+"::OnStart");
+	killmonster(.@map$, instance_npcname("#Bakonawan3")+"::OnMyMobDead");
+	stopnpctimer();
+	disablenpc(instance_npcname("#Bakonawan3"));
 	end;
 OnAnnounce:
-	mapannounce instance_mapname("1@ma_b"),"Time Limit: "+getarg(0),bc_map,"0xff4400"; //FW_NORMAL getarg(1) 0 0
-	if (getarg(2)) donpcevent instance_npcname("#SummonPuppetsn1")+"::OnStart";
+	mapannounce(instance_mapname("1@ma_b"), sprintf(_$("Time Limit: %s"), getarg(0)), bc_map, "0xff4400"); //FW_NORMAL getarg(1) 0 0
+	if (getarg(2))
+		donpcevent(instance_npcname("#SummonPuppetsn1")+"::OnStart");
 	end;
 }
 
 1@ma_b,36,111,4	script	#Bakonawan3-1	CLEAR_NPC,{
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("#Bakonawan3-1");
+	disablenpc(instance_npcname("#Bakonawan3-1"));
 	end;
 OnStart:
-	initnpctimer;
+	initnpctimer();
 	end;
 OnEnd:
-	killmonster instance_mapname("1@ma_b"),instance_npcname("#Bakonawan3-1")+"::OnMyMobDead";
-	//showdigit 0;
-	stopnpctimer;
+	killmonster(instance_mapname("1@ma_b"), instance_npcname("#Bakonawan3-1")+"::OnMyMobDead");
+	//showdigit(0);
+	stopnpctimer();
 	end;
 OnMyMobDead:
-	showdigit mobcount(instance_mapname("1@ma_b"),instance_npcname("#Bakonawan3-1")+"::OnMyMobDead");
-	end;
-OnTimer120000:	callsub OnMobSpawn,10;
-OnTimer180000:	callsub OnMobSpawn,15;
-OnTimer240000:	callsub OnMobSpawn,20;
-//OnTimer300000:	callsub OnMobSpawn,25;
-OnTimer300000:	callsub OnMobSpawn,30;
-OnTimer360000:	callsub OnMobSpawn,35;
-OnTimer420000:	callsub OnMobSpawn,40;
-OnTimer480000:	callsub OnMobSpawn,45;
-OnTimer540000:	callsub OnMobSpawn,50;
+	showdigit(mobcount(instance_mapname("1@ma_b"), instance_npcname("#Bakonawan3-1")+"::OnMyMobDead"));
+	end;
+OnTimer120000:
+	callsub(OnMobSpawn, 10);
+OnTimer180000:
+	callsub(OnMobSpawn, 15);
+OnTimer240000:
+	callsub(OnMobSpawn, 20);
+//OnTimer300000:
+//	callsub(OnMobSpawn, 25);
+OnTimer300000:
+	callsub(OnMobSpawn, 30);
+OnTimer360000:
+	callsub(OnMobSpawn, 35);
+OnTimer420000:
+	callsub(OnMobSpawn, 40);
+OnTimer480000:
+	callsub(OnMobSpawn, 45);
+OnTimer540000:
+	callsub(OnMobSpawn, 50);
 OnTimer600000:
-	killmonster instance_mapname("1@ma_b"),instance_npcname("#Bakonawan3-1")+"::OnMyMobDead";
-	stopnpctimer;
+	killmonster(instance_mapname("1@ma_b"), instance_npcname("#Bakonawan3-1")+"::OnMyMobDead");
+	stopnpctimer();
 	end;
 OnMobSpawn:
 	.@label$ = instance_npcname("#Bakonawan3-1")+"::OnMyMobDead";
 	.@map$ = instance_mapname("1@ma_b");
-	killmonster .@map$,.@label$;
-	.@mob_dead_num = mobcount(.@map$,.@label$);
+	killmonster(.@map$, .@label$);
+	.@mob_dead_num = mobcount(.@map$, .@label$);
 	if (.@mob_dead_num < 50) {
 		.@mob_rg = 50 - .@mob_dead_num;
 		if (.@mob_rg > getarg(0))
 			.@mob_rg = getarg(0);
-		while(1) {
-			areamonster .@map$,74,74,82,74,"Bakonawa's Puppet",2334,1,.@label$;
-			.@mob_dead_num = mobcount(.@map$,.@label$);
-			if (.@mob_dead_num >= .@mob_rg) {
+		while (true) {
+			areamonster(.@map$, 74, 74, 82, 74, _("Bakonawa's Puppet"), G_WAKWAK, 1, .@label$);
+			.@mob_dead_num = mobcount(.@map$, .@label$);
+			if (.@mob_dead_num >= .@mob_rg)
 				break;
-			}
 		}
 	}
 	end;
 }
 
 1@ma_b,62,52,4	script	Taho#Completed	4_M_DEWZATIMAN,{
-	disable_items;
-	if (checkweight(Knife,1) == 0) {
-		mes "It seems you are carrying too many different kinds of items. Please try again after reducing it.";
-		close;
+	disable_items();
+	if (checkweight(Knife, 1) == 0) {
+		mes("It seems you are carrying too many different kinds of items. Please try again after reducing it.");
+		close();
 	}
 	if (MaxWeight - Weight < 10000) {
-		mes "It seems you are already carrying items of too much weight. Please try again after reducing the weight.";
-		close;
-              }
-	if (questprogress(12279,HUNTING) == 2) {
-		erasequest 12279;
-		mes "[Taho]";
-		mes "This was found from Bakonawa's corpse. It would be better if you take this.";
+		mes("It seems you are already carrying items of too much weight. Please try again after reducing the weight.");
+		close();
+	}
+	if (questprogress(12279, HUNTING) == 2) {
+		erasequest(12279);
+		mes("[Taho]");
+		mes("This was found from Bakonawa's corpse. It would be better if you take this.");
 //		if (IsPremiumPcCafe == 10)
-			getitem Ancient_Grudge,7;
+			getitem(Ancient_Grudge, 7);
 //		else
-//			getitem Ancient_Grudge,5;
-		getexp 0,100000;
-		next;
+//			getitem(Ancient_Grudge, 5);
+		getexp(0, 100000);
+		next();
 	}
-	mes "[Taho]";
-	mes "We better hurry and get out of this place. This place is still dangerous even without Bakonawa...";
-	next;
-	mes "[Taho]";
-	mes "Then let's use to the rope to go up!";
-	close2;
-	warp "ma_scene01",175,176;
+	mes("[Taho]");
+	mes("We better hurry and get out of this place. This place is still dangerous even without Bakonawa...");
+	next();
+	mes("[Taho]");
+	mes("Then let's use to the rope to go up!");
+	close2();
+	warp("ma_scene01", 175, 176);
 	end;
 OnInstanceInit:
-	disablenpc instance_npcname("Taho#Completed");
+	disablenpc(instance_npcname("Taho#Completed"));
 	end;
 OnStart:
-	enablenpc instance_npcname("Taho#Completed");
-	initnpctimer;
+	enablenpc(instance_npcname("Taho#Completed"));
+	initnpctimer();
 	end;
 OnTimer1000:
-	monster instance_mapname("1@ma_b"),78,74,"Bakonawa Treasure Box",2335,1;
+	monster(instance_mapname("1@ma_b"), 78, 74, _("Bakonawa Treasure Box"), MA_TREASURE, 1);
 	end;
 OnTimer10000:
-	mapannounce instance_mapname("1@ma_b"),"Taho: After opening the treasure box, please visit me at the top of the hill. I've got something to give to you.",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
-	stopnpctimer;
+	mapannounce(instance_mapname("1@ma_b"), _("Taho: After opening the treasure box, please visit me at the top of the hill. I've got something to give to you."), bc_map, C_AQUA); //FW_NORMAL 15 0 0
+	stopnpctimer();
 	end;
 }
 
 1@ma_b,62,52,4	script	Taho#Fail	4_M_DEWZATIMAN,{
-	mes "[Taho]";
-	mes "HMM. We almost got him but he is one fast creature...";
-	next;
-	if (getcharid(CHAR_ID_CHAR) == getpartyleader(getcharid(CHAR_ID_PARTY),2)) {
-		mes "[Taho]";
-		mes "Are we going to try again?";
-		next;
-		switch(select("Hold on a sec!", "Of course! We cannot stand back now!")) {
+	mes("[Taho]");
+	mes("HMM. We almost got him but he is one fast creature...");
+	next();
+	if (getcharid(CHAR_ID_CHAR) == getpartyleader(getcharid(CHAR_ID_PARTY), 2)) {
+		mes("[Taho]");
+		mes("Are we going to try again?");
+		next();
+		switch (select("Hold on a sec!", "Of course! We cannot stand back now!")) {
 		case 1:
-			mes "[Taho]";
-			mes "AWW... I almost brought him out.";
-			close;
+			mes("[Taho]");
+			mes("AWW... I almost brought him out.");
+			close();
 		case 2:
-			mes "[Taho]";
-			mes "Then I will use Albopal once again to the lake.";
-			next;
-			mes "[Taho]";
-			mes "We are about to see Bakonawa with intenser anger...";
-			disablenpc instance_npcname("Taho#Fail");
-			donpcevent instance_npcname("#Bakonawan1")+"::OnStart";
-			close;
+			mes("[Taho]");
+			mes("Then I will use Albopal once again to the lake.");
+			next();
+			mes("[Taho]");
+			mes("We are about to see Bakonawa with intenser anger...");
+			disablenpc(instance_npcname("Taho#Fail"));
+			donpcevent(instance_npcname("#Bakonawan1")+"::OnStart");
+			close();
 		}
-		close;
+		close();
 	} else {
-		mes "[Taho]";
-		mes "I am dropping Albopal like I did a while ago. I hope it pisses him off...";
-		close;
+		mes("[Taho]");
+		mes("I am dropping Albopal like I did a while ago. I hope it pisses him off...");
+		close();
 	}
 
 OnInstanceInit:
-	disablenpc instance_npcname("Taho#Fail");
+	disablenpc(instance_npcname("Taho#Fail"));
 	end;
 OnStart:
-	enablenpc instance_npcname("Taho#Fail");
+	enablenpc(instance_npcname("Taho#Fail"));
 	end;
 }