some changes in towel event npc: using gem powders for towel dying

adding generic answers as spellinvocations

1 files changed, 196 insertions, 38 deletions

diff --git a/npc/003-1_Beach/stranger.txt b/npc/003-1_Beach/stranger.txt
index abd1a2b7..1eb98d1f 100644
--- a/npc/003-1_Beach/stranger.txt
+++ b/npc/003-1_Beach/stranger.txt
@@ -2,8 +2,8 @@
 
 	set @month, 5;
 	set @start_day, 18;
-	set @end_day, 25;
-	set @end_day, 18;
+//TODO	set @end_day, 25;
+	set @end_day, 22;
 	set @IRONINGOT, 5;
 	set @PINKANTENNA, 21;
 	set @cost, 500;
@@ -196,13 +196,13 @@ L_Right_Answer_Hard:
 	mes "\"There you are! A towel is really the most important item for a hitchhiker to have.\"";
 	next;
 	mes "\"Please take this.\""; // no full inventory check, this is done before the game
-	getitem "WhiteWarpTowel", 1;
+	getitem "GreyWarpTowel", 1;
 	set FLAGS, FLAGS | FLAG_TOWEL_COMPLETED;
 	next;
 	mes "[Stranger]";
 	mes "\"This towel is even more useful than usual towels are. If you change its color, it uses a special techno-, ahm, let's say, it can help you to get to other places.\"";
 	next;
-	mes "\"Bring me some dye, and I can prepare it for you. But it won't work with every color. And it's a bit complicated to accomplish, so a payment of " + @cost + " GP is reasonable.\"";
+	mes "\"Bring me some powder made from gemstones and a bottle of water, and I can prepare it for you.\"";
 	close;
 
 L_No_Event:
@@ -233,70 +233,228 @@ L_Event_Done:
 L_Dye_Towel:
 	mes "[Stranger]";
 	mes "\"Alright, which color do you want?\"";
-// more colors should be added when more places are released
+// the other colors should be added when more places are released
 	menu
-		"Red", L_Red,
-		"Yellow", L_Yellow,
-		"Light Blue", L_Light_Blue,
+		"Red",L_Red,
+		"Yellow",L_Yellow,
+		"White",L_White,
+//		"Blue",L_Blue,
+//		"Green",L_Green,
+//		"Purple",L_Purple,
+//		"Orange",L_Orange,
+//		"Pink",L_Pink,
+//		"Lime",L_Lime,
+//		"Teal",L_Teal,
 		"I changed my mind.", L_Close;
 	close;
 
 L_Red:
-	if (countitem("WhiteWarpTowel") < 1) goto L_No_Towel;
+	mes "[Stranger]";
+	mes "\"Ok, I'll need two bags of Ruby Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
 	getinventorylist;
-	if ((countitem("WhiteWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
-	if (zeny < 500) goto L_No_Money;
-	if (countitem("RedDye") < 1) goto L_No_Dye;
-	delitem "RedDye", 1;
-	delitem "WhiteWarpTowel", 1;
-	set zeny, zeny - 500;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderRed") < 2) goto L_No_Powder;
+	delitem "GemPowderRed", 2;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
 	getitem "RedWarpTowel", 1;
-	mes "He takes your white towel and the dye, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
 	next;
 	mes "[Stranger]";
 	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
 	close;
 
 L_Yellow:
-	if (countitem("WhiteWarpTowel") < 1) goto L_No_Towel;
+	mes "[Stranger]";
+	mes "\"Ok, I'll need two bags of Topaz Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
 	getinventorylist;
-	if ((countitem("WhiteWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
-	if (zeny < 500) goto L_No_Money;
-	if (countitem("YellowDye") < 1) goto L_No_Dye;
-	delitem "YellowDye", 1;
-	delitem "WhiteWarpTowel", 1;
-	set zeny, zeny - 500;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderYellow") < 2) goto L_No_Powder;
+	delitem "GemPowderYellow", 2;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
 	getitem "YellowWarpTowel", 1;
-	mes "He takes your white towel and the dye, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
 	next;
 	mes "[Stranger]";
 	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
 	close;
 
-L_Light_Blue:
-	if (countitem("WhiteWarpTowel") < 1) goto L_No_Towel;
+
+L_White:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need two bags of Diamond Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
+	getinventorylist;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderWhite") < 2) goto L_No_Powder;
+	delitem "GemPowderWhite", 2;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "WhiteWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	next;
+	mes "[Stranger]";
+	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
+	close;
+
+L_Blue:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need two bags of Sapphire Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
+	getinventorylist;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderBlue") < 2) goto L_No_Powder;
+	delitem "GemPowderBlue", 2;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "BlueWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	next;
+	mes "[Stranger]";
+	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
+	close;
+
+L_Green:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need two bags of Emerald Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
+	getinventorylist;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderGreen") < 2) goto L_No_Powder;
+	delitem "GemPowderGreen", 2;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "GreenWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	next;
+	mes "[Stranger]";
+	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
+	close;
+
+L_Purple:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need two bags of Amethyst Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
+	getinventorylist;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderPurple") < 2) goto L_No_Powder;
+	delitem "GemPowderPurple", 2;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "PurpleWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	next;
+	mes "[Stranger]";
+	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
+	close;
+
+L_Orange:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need one bag of Ruby Powder, one bag of Topaz Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
+	getinventorylist;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderRed") < 1) goto L_No_Powder;
+	if (countitem("GemPowderYellow") < 1) goto L_No_Powder;
+	delitem "GemPowderRed", 1;
+	delitem "GemPowderYellow", 1;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "OrangeWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	next;
+	mes "[Stranger]";
+	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
+	close;
+
+L_Pink:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need one bag of Ruby Powder, one bag of Diamond Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
+	getinventorylist;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderRed") < 1) goto L_No_Powder;
+	if (countitem("GemPowderWhite") < 1) goto L_No_Powder;
+	delitem "GemPowderRed", 1;
+	delitem "GemPowderWhite", 1;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "PinkWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	next;
+	mes "[Stranger]";
+	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
+	close;
+
+L_Lime:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need one bag of Emerald Powder, one bag of Topaz Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
+	getinventorylist;
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderGreen") < 1) goto L_No_Powder;
+	if (countitem("GemPowderYellow") < 1) goto L_No_Powder;
+	delitem "GemPowderGreen", 1;
+	delitem "GemPowderYellow", 1;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "LimeWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	next;
+	mes "[Stranger]";
+	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
+	close;
+
+L_Teal:
+	mes "[Stranger]";
+	mes "\"Ok, I'll need one bag of Emerald Powder, one bag of Sapphire Powder and a bottle of water for that.\"";
+	next;
+	if (countitem("GreyWarpTowel") < 1) goto L_No_Towel;
 	getinventorylist;
-	if ((countitem("WhiteWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
-	if (zeny < 500) goto L_No_Money;
-	if (countitem("LightBlueDye") < 1) goto L_No_Dye;
-	delitem "LightBlueDye", 1;
-	delitem "WhiteWarpTowel", 1;
-	set zeny, zeny - 500;
-	getitem "LightBlueWarpTowel", 1;
-	mes "He takes your white towel and the dye, then he turns away and does something you can't see. After some minutes, he turns to you again.";
+	if ((countitem("GreyWarpTowel") > 1) && (@inventorylist_count == 100)) goto L_Full_Inv;
+	if (countitem("BottleOfWater") < 1) goto L_No_Water;
+	if (countitem("GemPowderGreen") < 1) goto L_No_Powder;
+	if (countitem("GemPowderBlue") < 1) goto L_No_Powder;
+	delitem "GemPowderGreen", 1;
+	delitem "GemPowderBlue", 1;
+	delitem "GreyWarpTowel", 1;
+	delitem "BottleOfWater", 1;
+	getitem "TealWarpTowel", 1;
+	mes "He takes your enchanted towel, the water and the gem powder, then he turns away and does something you can't see. After some minutes, he turns to you again.";
 	next;
 	mes "[Stranger]";
 	mes "\"Done! It'll use its color after being used, but just come back, I can dye it again for you.\"";
 	close;
 
-L_No_Money:
+L_No_Water:
 	mes "[Stranger]";
-	mes "\"I'm sorry, preparing this towel for travelling is really complicated. I can't explain you the details, but I'll need " + @cost + " GP.\"";
+	mes "\"You don't have water.\"";
 	close;
 
-L_No_Dye:
+L_No_Powder:
 	mes "[Stranger]";
-	mes "\"You need to bring me dye in that color.\"";
+	mes "\"You need to bring me enough gem powder in that color. Maybe someone used to mining can help you with that.\"";
 	close;
 
 L_No_Towel: