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
127
128
129
130
|
009-2,33,94,0 script Nowhere Man NPC153,{
@ironprice = 1000;
@Sulphurprice = 1200;
@Yellowpowderprice = 6500;
mes "[Nowhere Man]";
mes "\"Welcome! I am a transmuter and I will Transmute some items into other items, but at a cost.\"";
goto L_Trademenu;
L_Trademenu:
menu
"Can you make Iron Powder?", L_Iron, // Non unique, TBR
"How about Sulphur Powder?", L_Sulphur, // Non unique, TBR
"I need Yellow Powder.", L_Healpots,
"Do you have gloves?", L_Gloves,
"I think I have everything I need, thanks.", L_close;
L_Iron:
mes "[Nowhere Man]";
mes "\"I do have a few of those. I will give you 4 Iron Powders for 1 Iron Ore and " + @ironprice + "gp.\"";
menu
"Sure.", L_Ipowder,
"What a ripoff! No way!", L_close;
L_Sulphur:
mes "[Nowhere Man]";
mes "\"I can trade you 5 Sulphur Powders for 1 Pile of Ash and " + @Sulphurprice + "gp.\"";
menu
"Here you go.", L_Spowder,
"Are you nuts?! Forget it!", L_close;
L_Healpots:
mes "[Nowhere Man]";
mes "\"Yellow powder can be used for spells, but isn't cheap to transmute. Are you sure? It'll cost you " + @Yellowpowderprice + "gp and 3 hard spikes for 1.\"";
menu
"Sure.", L_Pots,
"You're right, that's way too much.", L_close;
L_Ipowder:
if (countitem("IronOre") < 1) goto L_Missing;
if (Zeny < @ironprice) goto L_NotEnoughMoney;
getinventorylist;
if (@inventorylist_count == 100 && countitem("IronOre") > 1 && countitem("IronPowder") < 1) goto L_Full;
delitem "IronOre", 1;
Zeny = Zeny - @ironprice;
getitem "IronPowder", 4;
mes "[Nowhere Man]";
mes "\"There you go. Would you like to trade anything else?\"";
menu
"Yes.", L_Trademenu,
"No.", L_No;
goto L_close;
L_Spowder:
if (countitem("PileOfAsh") < 1) goto L_Missing;
if (Zeny < @Sulphurprice) goto L_NotEnoughMoney;
getinventorylist;
if (@inventorylist_count == 100 && countitem("PileOfAsh") > 1 && countitem("SulphurPowder") < 1) goto L_Full;
delitem "PileOfAsh", 1;
Zeny = Zeny - @Sulphurprice;
getitem "SulphurPowder", 5;
mes "[Nowhere Man]";
mes "\"There you go. Would you like to trade anything else?\"";
menu
"Yes.", L_Trademenu,
"No.", L_No;
goto L_close;
L_Pots:
if (countitem("HardSpike") < 3) goto L_Missing;
if (Zeny < @Yellowpowderprice) goto L_NotEnoughMoney;
getinventorylist;
if (@inventorylist_count == 100 && countitem("HardSpike") > 3 && countitem("YellowPowder") < 1) goto L_Full;
delitem "HardSpike", 3;
Zeny = Zeny - @Yellowpowderprice;
getitem "YellowPowder", 1;
mes "[Nowhere Man]";
mes "\"There you go. Would you like me to transmute anything else?\"";
menu
"Yes.", L_Trademenu,
"No.", L_No;
goto L_close;
L_Gloves:
if (Zeny < 3000)
goto L_close;
getinventorylist;
if (@inventorylist_count == 100 && countitem("LeatherGloves") == 0)
goto L_Full;
mes "[Nowhere Man]";
mes "\"Gloves? Sure, I sell fine leather gloves for only 3000 GP.\"";
menu
"Ok, that's a good deal", L_PurchaseGloves,
"No gloves, lets see what else you have", L_Trademenu,
"No thank you, maybe I will buy some later.", L_close;
L_PurchaseGloves:
Zeny = Zeny - 3000;
getitem "LeatherGloves", 1;
mes "[Nowhere Man]";
mes "Thank you. I am sure you will get use from them.";
close;
L_Full:
mes "[Nowhere Man]";
mes "\"You must have been making a lot of trades...your bag is completely full! Come back after you've made some room.\"";
goto L_close;
L_Missing:
mes "[Nowhere Man]";
mes "\"It looks like you're missing some items. Please come back when you have enough to trade.\"";
goto L_close;
L_NotEnoughMoney:
mes "[Nowhere Man]";
mes "\"You don't have enough money.\"";
goto L_close;
L_No:
mes "[Nowhere Man]";
mes "\"Have a great day!\"";
goto L_close;
L_close:
@ironprice = 0;
@Sulphurprice = 0;
@Potionprice = 0;
close;
}
|
