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
|
// TMW2 Script
// Author:
// Jesusalva
// Description:
// Sells and crafts jewels
//
// Notes:
// Gold Ore (dropped by bifs) → Pieces or Ingot, depends on what you want to forge
// Jeweler only works with Gold PIECES. The Ingots are for forges.
003-5,33,37,0 script Jeweler NPC_FEMALE,{
mesn;
mesq l("Hello!");
goto L_Menu;
L_Menu:
mes "";
mesn strcharinfo(0);
menu
l("I want to shop."), -,
l("I want to craft rings."), L_Craft,
//rif(countitem(GoldenRing) >= 1, l("I want to add gemstones to a ring.")), -,
l("Nothing, sorry."), L_Close;
openshop;
closedialog;
close;
L_Craft:
mes "";
mesn;
mesq l("Of course, you can trade a @@, with 200 GP, for a @@.", getitemlink(GoldPieces), getitemlink(GoldenRing));
next;
menu
rif(countitem(GoldPieces) >= 1 && Zeny >= 200, l("Yes, deal. Gimme the ring.")), -,
l("...I'll be back later."), L_Close;
inventoryplace GoldenRing, 1;
delitem GoldPieces, 2;
Zeny=Zeny-200;
getitem GoldenRing, 1;
getexp 100, 25;
mes "";
mesn;
mesq l("Here you go! Anything else?");
next;
goto L_Menu;
L_Close:
closedialog;
goodbye;
end;
OnInit:
.@npcId = getnpcid(0, .name$);
setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
setunitdata(.@npcId, UDT_HEADMIDDLE, VneckJumper);
setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers);
setunitdata(.@npcId, UDT_WEAPON, LousyMoccasins); // Boots
setunitdata(.@npcId, UDT_HAIRSTYLE, 3);
setunitdata(.@npcId, UDT_HAIRCOLOR, 8);
npcsit;
.sex = G_FEMALE;
.distance = 5;
tradertype(NST_ZENY);
sellitem WeddingRing, 5000;
end;
}
|