1 files changed, 126 insertions, 0 deletions
diff --git a/npc/new_3-1-tulimshar/bleacher.txt b/npc/new_3-1-tulimshar/bleacher.txt
new file mode 100644
index 00000000..6a15e273
--- /dev/null
+++ b/npc/new_3-1-tulimshar/bleacher.txt
@@ -0,0 +1,126 @@
+//
+
+new_3-1.gat,27,53,0	script	Candide	156,{
+    mes "[Candide]";
+    mes "\"I've figured out how that volcanic ash bleaches cloth.";
+    mes "I could do it for you, but I'll need three piles of ash and 5,000 GP for supplies per item.\"";
+    next;
+    
+    if (countitem(701) < 3) goto L_no_ash;
+    
+    if (zeny < 5000) goto L_no_money;
+    
+    menu "I'd like to bleach something", -,
+         "No thanks", L_close;
+    
+L_bleach_menu:
+    mes "[Candide]";
+    mes "\"What would you like to bleach?\"";
+    next;
+    
+    menu "Cotton shirt", L_cottonshirt,
+         "V-Neck sweater", L_vneck,
+         "Turtleneck sweater", L_tneck,
+         "Cotton shorts", L_shorts,
+         "Cotton skirt", L_skirt,
+         "Tank top ", L_tanktop,
+         "Short tank top", L_tanktop_short,
+         "Silk robe", L_robe,
+         "Nevermind", -;
+    goto L_close;
+    
+L_cottonshirt:
+    set @normal, 1202;
+    set @dyeBase, 2050;
+    goto L_choose_color;
+    
+L_vneck:
+    set @normal, 624;
+    set @dyeBase, 2060;
+    goto L_choose_color;
+    
+L_tneck:
+    set @normal, 564;
+    set @dyeBase, 2070;
+    goto L_choose_color;
+    
+L_shorts:
+    set @normal, 586;
+    set @dyeBase, 2110;
+    goto L_choose_color;
+    
+L_skirt:
+    set @normal, 632;
+    set @dyeBase, 2100;
+    goto L_choose_color;
+    
+L_tanktop:
+    set @normal, 688;
+    set @dyeBase, 2090;
+    goto L_choose_color;
+    
+L_tanktop_short:
+    set @normal, 689;
+    set @dyeBase, 2120;
+    goto L_choose_color;
+    
+L_robe:    set @normal, 720;
+    set @dyeBase, 2080;
+    goto L_choose_color;
+    
+L_choose_color:
+    mes "[Candide]";
+    mes "\"And the color?\"";
+    next;
+    
+    menu "Red", -,
+         "Green", -,
+         "Dark Blue", -,
+         "Yellow", -,
+         "Light Blue", -,
+         "Pink", -,
+         "Black", -,
+         "Orange", -,
+         "Purple", -,
+         "Dark Green", -;
+     
+    set @del, @dyeBase + @menu - 1;
+    
+    if (countitem(@del) == 0) goto L_no_item;
+    
+    if (countitem(701) < 3) goto L_no_ash;
+    
+    if (zeny < 5000) goto L_no_money;
+    
+    delitem @del, 1;
+    getitem @normal, 1;
+    delitem 701, 3;
+    set zeny, zeny - 5000;
+    
+L_again:
+    mes "[Candide]";
+    mes "\"Would you like to bleach something else?\"";
+    next;
+    
+    menu "Yes", L_bleach_menu,
+         "No", L_close;
+    
+L_no_item:
+    mes "[Candide]";
+    mes "\"You don't have one of those.\"";
+    next;
+    
+    goto L_again;
+    
+L_no_ash:
+    mes "[Candide]";
+    mes "\"You don't have enough ash for me to bleach anything.";
+    mes "I need three piles.\"";
+    next;
+    
+    goto L_close;
+    
+L_no_money:
+    mes "[Candide]";
+    mes "\"You don't have enough gold for me to bleach anything.";
+    mes "I need 5,000 GP for supplies.\"";
+    next;
+    
+L_close:
+    mes "[Candide]";
+    mes "\"Come again.\"";
+    close;
+}