diff options
Diffstat (limited to 'world/map/npc/021-1/hetchel.txt')
-rw-r--r-- | world/map/npc/021-1/hetchel.txt | 109 |
1 files changed, 109 insertions, 0 deletions
diff --git a/world/map/npc/021-1/hetchel.txt b/world/map/npc/021-1/hetchel.txt new file mode 100644 index 00000000..9ccc8e9f --- /dev/null +++ b/world/map/npc/021-1/hetchel.txt @@ -0,0 +1,109 @@ +// Hetchel the Silk Weaver +// Hetchel is referred to by Lora Tay. +// She weaves and sells standard double elbow square silk sheets. +// She could also sell, dyed sheets, Silk robes from Lora Tay. +// (6000 with cocoons, 40000 (?) with no cocoons). +// +// Hetchel's workshop is actually under repair, Shé'll be back in 021-2 when workers have finished their job. +// +// @SHEET_COCOONS_NR : Number of cocoons required per sheet. +// Might ne calculated from @ROBE_COCOONS_NR/@ROBE_SHEETS_NR +// Actually: 150∕6 = 25 +// @SHEET_ZENY : Money to pay per sheet: A sixth of 10000-2*500-6000 + +021-1.gat,120,39,0|script|Hetchel|376,{ + set @SHEET_COCOONS_NR, 25; + set @SHEET_ZENY, 500; + mes "[Hetchel the weaver]"; + mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; + next; + +L_main_menu: + menu + "Sorry to bother, I'm new to this country, just visting.", L_end, + "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", -; +// "Do you have any silk robe I could buy?", L_robe, +// "Goodbye.", L_end; + next; + mes "[Hetchel the Weaver]"; + mes "\"Sure but you need to provide raw materials."; + mes "I'll need " + @SHEET_COCOONS_NR +" silk cocoons per sheet, "; + mes "and also " + @SHEET_ZENY +" GP per sheet for my work.\""; + next; + if (countitem("SilkCocoon") == 0) + goto L_sheet_no_cocoon; + +L_sheet_menu: + menu + "I have what you asked for.", -, + "Sorry I didn't pay attention enough, what do you need?", L_how_many_cocoons, + "Oops! Sorry, I'll come back soon with them.", L_end; + next; + +L_sheet: + if (countitem("SilkCocoon") < @SHEET_COCOONS_NR) + goto L_sheet_missing_cocoons; + if (Zeny < @SHEET_ZENY) + goto L_sheet_missing_Zeny; + getinventorylist; + if (@inventorylist_count == 100 && countitem("SilkCocoon") > @SHEET_COCOONS_NR) + goto L_TooMany; + set Zeny, Zeny - @SHEET_ZENY; + delitem "SilkCocoon", @SHEET_COCOONS_NR; + getitem "Silksheet", 1; + mes "[Hetchel the Weaver]"; + mes "\"Thank you, I hope the sheets will fit your needs.\""; + emotion EMOTE_HAPPY; + goto L_end; + +L_sheet_missing_cocoons: + mes "[Hetchel the Weaver]"; + mes "\"I'm sorry, but I need " + @SHEET_COCOONS_NR + ", not " + countitem("SilkCocoon") + "."; + goto L_end; + +L_sheet_missing_Zeny: + mes "[Hetchel the Weaver]"; + mes "\"No, no no. The way this works is that you give me the GP first and I give you the sheets afterwards."; + mes "You're " + (@SHEET_ZENY - Zeny) + " GP short, so come back when you can afford the sheet!\""; + goto L_end; + +L_how_many_cocoons: + mes "[Hetchel the Weaver]"; + mes "\"I need an average of " + @SHEET_COCOONS_NR + " cocoons per sheet"; + mes "and also " + @SHEET_ZENY + " GP per sheet for my work.\""; + next; + goto L_sheet_menu; + +L_sheet_no_cocoon: + mes "[Hetchel the Weaver]"; + mes "\"You don't have any cocoon? I'm sorry I can't do anything for you.\""; + menu + "I'll seek for them.", L_end, + "Where can I get cocoons?", -; + next; + mes "[Hetchel the Weaver]"; + mes "\"Silk cocoons come from Silkworms. Silkworms live in the woodland area around Hurnscald."; + mes "Silkworms like especially woods and dark areas. You can go there by ferry.\""; + goto L_end; + +//L_robe: +// mes "[Hetchel the Weaver]"; +// mes "\"I am not a seamstress but I have a few silk robes from Lora Tay left."; +// mes "It is not your size as Lora made them for me, but Tondar was kind enough"; +// mes "to cast a spell on it, so that it will fit to you as soon as you wear it."; +// mes "However his prices are not that low.\""; +// next; +// +//L_robe_menu: +// goto L_main_menu; + +L_TooMany: + mes "[Hetchel the Weaver]"; + mes "\"Your bag hasn't room enough. Store some things and come back.\""; + +L_end: + set @SHEET_COCOONS_NR, 0; + set @SHEET_ZENY, 0; + close; +} + |