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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
// TMW-2 Script
// Author:
// Jesusalva
// Description:
// Nicholas is Hurnscald's blakcsmith. He forges some stuff, and sell other stuff.
//
// PS.
// Iridium + Platyna Platinum
// Gold + Coal Gold
// Silver + Coal Silver
// Copper + Tin Bronze (9:1)
// Terranite + Coal Terranite
// Iron + Coal Iron
// Resitance and Weight increasing ores
// Lead → +++ res, ++++ wei
// Titanium → + res, + wei
// Originals: Setzer, Steel Shield, Chain Mail, Light Platemail, Warlord Plate, Warlord Boots
012-5,36,26,0 script Nicholas NPC_CHELIOS,{
goto L_Menu;
// blacksmith_create( BaseItem1, Amount, BaseItem2, Amount, PrizeItem, Price )
function blacksmith_create {
.@base1=getarg(0);
.@amon1=getarg(1);
.@base2=getarg(2);
.@amon2=getarg(3);
.@prize=getarg(4);
.@price=getarg(5);
mesn;
mesq l("Do you want to craft @@? For that I will need @@ @@, @@ @@ and @@ gp.",
getitemlink(.@prize), .@amon1, getitemlink(.@base1), .@amon2, getitemlink(.@base2), .@price);
select
l("Yes"),
l("No");
if (@menu == 2)
return;
if (countitem(.@base1) >= .@amon1 &&
countitem(.@base2) >= .@amon2 &&
Zeny >= .@price) {
inventoryplace .@prize, 1;
delitem .@base1, .@amon1;
delitem .@base2, .@amon2;
Zeny = Zeny - .@price;
getitem .@prize, 1;
mes "";
mesn;
mesq l("Many thanks! Come back soon.");
} else {
speech S_FIRST_BLANK_LINE,// | S_LAST_NEXT,
l("You don't have enough material, sorry.");
}
return;
}
L_Menu:
mesn;
mesq l("Hello there, I am @@, blacksmith of this fine city. What do you want to forge today?", .name$);
mes "";
select
l("I just want to trade."),
l("I want to forge Weapons!"),
l("Nothing, thanks!");
mes "";
switch (@menu) {
case 1:
openshop;
closedialog;
close;
break;
case 2:
goto L_Weapon;
}
close;
L_Weapon:
mesn;
mesq l("Very well! We have six class of items: Iron, Terranite, Bronze, Silver, Gold and Platinum.");
mesq l("Each of them require different items, I'll sort from weakest to strongest, so choose wisely.");
select
l("Nothing, sorry!"),
l("Bronze Gladius"),
l("Iron Bug Slayer"),
l("Iron Short Gladius");
switch (@menu) {
case 1:
goto L_Menu;
case 2:
blacksmith_create(CopperIngot, 18, TinIngot, 2, BronzeGladius, 5000);
break;
case 3:
blacksmith_create(IronIngot, 12, Coal, 8, BugSlayer, 10000);
break;
case 4:
blacksmith_create(IronIngot, 22, Coal, 18, ShortGladius, 15000);
break;
}
goto L_Weapon;
OnInit:
tradertype(NST_MARKET);
sellitem Dagger, 4000, 5;
sellitem SharpKnife, 2000, 10;
.sex = G_MALE;
.distance = 5;
end;
OnClock0009:
OnClock0603:
OnClock1207:
OnClock1801:
restoreshopitem Dagger, 4000, 5;
restoreshopitem SharpKnife, 2000, 10;
end;
}
|
