Bandit Quest and fixes to peter, mikhail

Bandit quest changes, fixes to peter and mikhail, 011-6 mobs

3 files changed, 110 insertions, 2 deletions

diff --git a/npc/009-2_Hurnscald/_import.txt b/npc/009-2_Hurnscald/_import.txt
index 25d4868d..1ee969c2 100644
--- a/npc/009-2_Hurnscald/_import.txt
+++ b/npc/009-2_Hurnscald/_import.txt
@@ -7,6 +7,7 @@ npc: npc/009-2_Hurnscald/doctor.txt
 npc: npc/009-2_Hurnscald/drunks.txt
 npc: npc/009-2_Hurnscald/inspector.txt
 npc: npc/009-2_Hurnscald/kfahr.txt
+npc: npc/009-2_Hurnscald/lena.txt
 npc: npc/009-2_Hurnscald/mapflags.txt
 npc: npc/009-2_Hurnscald/misc.txt
 npc: npc/009-2_Hurnscald/nicholas.txt
diff --git a/npc/009-2_Hurnscald/lena.txt b/npc/009-2_Hurnscald/lena.txt
new file mode 100644
index 00000000..a88da8da
--- /dev/null
+++ b/npc/009-2_Hurnscald/lena.txt
@@ -0,0 +1,105 @@
+// Quest for Fairy Hat and Forest Armor
+
+009-2.gat,146,43,0	script	Lena	182,{
+
+	if (TMW_Quest >= 46) goto L_Lena_Done;
+	if (TMW_Quest == 45) goto L_Lena_Success;
+	if (TMW_Quest == 44) goto L_Lena_Bandit_Leader_Fail;
+	if (TMW_Quest == 43) goto L_Lena_Bandit_Leader_Fail;
+	if (TMW_Quest == 42) goto L_Lena_Bandit_Leader;
+	if (TMW_Quest == 41) goto L_Lena_Fairy_Hat;
+	if (TMW_Quest == 40) && (baselevel >= 30) goto L_Lena_Start;
+
+	mes "[Lena]";
+	mes "\"I got ambushed by a group of bandits and one of them stabbed me pretty good.  Hopefully I heal up soon so I can fight this menace.\"";
+	close;
+
+L_Lena_Start:
+	mes "[Lena]";
+	mes "\"While wandering through the forest, I was ambushed by bandits.  Though I got them all, one of them stabbed me pretty good.  I'm still healing from that encounter.  I'm worried that the bandit threat may spread.\"";
+	menu
+		"Don't worry, I can take out some of these scumbags.", L_Lena_Approves,
+		"I think I left my courage in another pair of pants.  See you later!", L_Lena_No_Fan;
+	close;
+
+L_Lena_Approves:
+	set TMW_Quest, 41;
+	mes "[Lena]";
+	mes "\"You look like you can handle yourself in a fight.  If you can take on this scourge I'll reward you with a hat like mine.  In order to prove your mettle, bring me 10 [Bandit Hood]s so I know they've met their match.\"";
+	areamonster "008-1.gat",25,60,40,65,"Bandit",1063,3, "::";
+	areamonster "011-1.gat",35,40,65,60,"Bandit",1063,3, "::";
+	close;
+
+L_Lena_No_Fan:
+	mes "[Lena]";
+	mes "\"What will Hurnscald do if these bandits overrun the town?  I hope you reconsider.\"";
+	close;
+
+L_Lena_Fairy_Hat:
+	if (countitem("BanditHood") < 10) goto L_Lena_NotEnough;
+	getinventorylist;
+	if (@inventorylist_count - (countitem("BanditHood")== 10) > 99) goto L_TooMany;
+	set TMW_Quest, 42;
+	delitem "BanditHood", 10;
+	getitem "FairyHat", 1;
+	mes "[Lena]";
+	mes "\"Ah, you've brought me the [Bandit Hood]s.  As promised, here is a hat like mine.\"";
+	next;
+	mes "\"Unfortunately, I feel this bandit threat may of grown.  Perhaps they are being lead?  I noticed many of them seem to hang around a cave just west of Hurnscald.  If you could defeat their leader I know they will become less of a threat to Hurnscald.  I'll reward you with armor like mine if you do.  Sound like something you could do?\"";
+	menu
+		"Consider it done!", L_Lena_Bandit_Leader_Yes,
+		"Woah there, that sounds a bit harder than what I can suceed at.", L_Lena_NoWay;
+	close;
+
+L_Lena_NotEnough:
+	mes "[Lena]";
+	mes "\"You don't have enough [Bandit Hood]s to prove you are taking care of this threat.  Please come back with 10 [Bandit Hood]s to show you are taking care of these bandits.\"";
+	close;
+
+L_Lena_Bandit_Leader:
+	mes "[Lena]";
+	mes "\"I feel this bandit threat may of grown.  Perhaps they are being lead?  I noticed many of them seem to hang around a cave just west of Hurnscald.  If you could defeat their leader I know they will become less of a threat to Hurnscald.  I'll reward you with armor like mine if you do.  Sound like something you could do?\"";
+	menu
+		"Consider it done!", L_Lena_Bandit_Leader_Yes,
+		"Woah there, that sounds a bit harder than what I can succeed at.", L_Lena_NoWay;
+	close;
+
+L_Lena_Bandit_Leader_Yes:
+	set TMW_Quest, 43;
+	areamonster "008-1.gat",25,60,40,65,"Bandit",1063,3, "::";
+	areamonster "011-1.gat",35,40,65,60,"Bandit",1063,3, "::";
+	mes "[Lena]";
+	mes "\"You have a brave heart.  Though I know you can suceed on your own, I recommend finding others to help you defeat the bandit leader.  I believe he could pose a significant threat to solitary individuals seeking to challenge him.  Good luck!\"";
+	close;
+
+L_Lena_NoWay:
+	mes "[Lena]";
+	mes "\"That is too bad.  Feel free to return at any time.  This bandit threat needs to be pushed back.\"";
+	close;
+
+L_Lena_Bandit_Leader_Fail:
+	set TMW_Quest, 43;
+	mes "[Lena]";
+	mes "\"You haven't killed the bandit leader yet.  This is a big problem.  Please be careful.\"";
+	close;
+
+L_Lena_Success:
+	getinventorylist;
+	if (@inventorylist_count == 100) goto L_TooMany;
+	set TMW_Quest, 46;
+	getitem "ForestArmor", 1;
+	mes "[Lena]";
+	mes "\"Excellent!  You killed the bandit leader.  Here is the armor as I promised you.  Safe journeys!\"";
+	close;
+
+L_Lena_Done:
+	mes "[Lena]";
+	mes "\"Thank you for all your help.  With your efforts, we can only hope this scourge doesn't see a resurgence.\"";
+	close;
+
+L_TooMany:
+	mes "[Lena]";
+	mes "\"You have too many items in your inventory.  Please get rid of something so I can reward you.\"";
+	close;
+
+}
diff --git a/npc/009-2_Hurnscald/peter.txt b/npc/009-2_Hurnscald/peter.txt
index 85e31dc9..995bfc31 100644
--- a/npc/009-2_Hurnscald/peter.txt
+++ b/npc/009-2_Hurnscald/peter.txt
@@ -30,26 +30,28 @@ L_Peter_Chain_Mail:
 	close;
 
 L_Peter_Light_Plate:
-	if (zeny < 20000) goto L_Peter_NotEnough_Zeny;
+	if (zeny < 50000) goto L_Peter_NotEnough_Zeny;
 	if (countitem("IngotIron") < 10) goto L_Peter_NotEnough_Ingot;
 	if (countitem("Coal") < 20) goto L_Peter_NotEnough_Coal;
 	getinventorylist;
 	if (@inventorylist_count == 100) goto L_Peter_TooMany;
 	set zeny, zeny - 50000;
 	delitem "IngotIron", 10;
+	delitem "Coal", 20;
 	getitem "LightPlatemail", 1;
 	mes "[Peter]";
 	mes "\"Here you go!\"";
 	close;
 
 L_Peter_Warlord_Plate:
-	if (zeny < 20000) goto L_Peter_NotEnough_Zeny;
+	if (zeny < 100000) goto L_Peter_NotEnough_Zeny;
 	if (countitem("IngotIron") < 15) goto L_Peter_NotEnough_Ingot;
 	if (countitem("Coal") < 30) goto L_Peter_NotEnough_Coal;
 	getinventorylist;
 	if (@inventorylist_count == 100) goto L_Peter_TooMany;
 	set zeny, zeny - 100000;
 	delitem "IngotIron", 15;
+	delitem "Coal", 30;
 	getitem "WarlordPlate", 1;
 	mes "[Peter]";
 	mes "\"Here you go!\"";