1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
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;
}
|
