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
|
// TMW2 scripts.
// Author:
// Crazyfefe
// Note: script works, but one may argue it is not complete
003-8,28,30,0 script Jhedia NPC_ELVEN_FEMALE,{
.Item1 = IronOre; //7
.Item2 = Coal; //11
.GP = 8500;
.ItemCreate = IronIngot;
function quest_create {
speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
l("How many ingots do you want to make?");
input @amount;
if (countitem("Iron Ore") >= @amount * 7 && countitem("Coal") >= @amount * 11 && Zeny >= 8500 * @amount)
{
delitem .Item1, @amount * 7;
delitem .Item2, @amount * 11;
Zeny = Zeny - @amount * .GP;
getitem .ItemCreate, @amount;
close;
}
speech S_FIRST_BLANK_LINE,// | S_LAST_NEXT,
l("You don't have enough material.");
close;
}
speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
l("Hello! Do you want to craft @@? For that i will need 7 @@, 11 @@ and @@ gp.", getitemlink(.ItemCreate),getitemlink(.Item1),getitemlink(.Item2),.GP);
do
{
.@karim = getq(Karim_Quest);
select
l("Yes"),
menuaction(l("Quit"));
switch (@menu)
{
case 1:
quest_create;
break;
}
} while (@menu != 2);
closedialog;
goodbye;
close;
OnInit:
.sex = G_FEMALE;
.distance = 3;
end;
}
|
