summaryrefslogtreecommitdiff
path: root/npc/017-1/nowhere_man.txt
blob: be90dbe3fb52b8ab4398b969453c7cacd54cb7b8 (plain) (blame)
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
// TMW2/LoF scripts.
// Authors:
//    TMW-LoF Team
//    Jesusalva
// Description:
//    Leather gloves.
//    IMPORTANT @Saulc : DO NOT GIVE ANY EXPERIENCE ON THIS NPC.
//    This is sort of a bet, you know. “Go hunt Mountain Snakes”, or bet some precious
//    crafting material on this NPC. Two choices. The easy way is RISKY, not REWARDING.
//    The refund is the exact fair price, retrieved from database. The only "loss" here
//    is that you would rather do something else with Leather Patch but instead, you "sold" it.
//    If you sell items you don't get experience, so you shouldn't get any exp here either.

017-1,155,162,0	script	Nowhere Man	NPC_UKAR,{
    mesn;
    mesq l("Welcome! I come from nowhere, and I hunt Mountain Snakes. One of their rare drops are the @@!", getitemlink(LeatherGloves));
    next;
    mesn;
    mesq l("Of course, with 5 @@ and 3000 GP I could make one too, but I can fail.", getitemlink(LeatherPatch));
    next;
    mesn;
    mesq l("If I fail, I'll refund you in gold. Do you want me to try it?");
    next;
    if (askyesno() != ASK_YES) {
        mesn;
        mesq l("Well, that's a pity! I used to know the formula to make @@, but you know. Old age.", getitemlink(SulfurPowder));
        close;
    }
    if (countitem(LeatherPatch) < 5 || Zeny < 3000)
        goto L_Missing;
    inventoryplace LeatherGloves, 1;
    delitem LeatherPatch, 5;
    Zeny=Zeny-3000;
    if (rand(1,100) > 40)
        goto L_Success;
    else
        goto L_Failure;

L_Failure:
    mesn;
    mesq l("Aah, the old age. Sorry. I won't be able to make the gloves for you today. %%3");
    Zeny=Zeny+(getiteminfo(LeatherPatch, ITEMINFO_SELLPRICE)*5)+3000;
    next;
    mesn;
    mesq l("As promised, here is @@ GP, the fair price for your material, and refunds.", format_number((getiteminfo(LeatherPatch, ITEMINFO_SELLPRICE)*5)+3000));
    close;

L_Success:
    getitem LeatherGloves, 1;
    mesn;
    mesq l("Well, look at it: I did it!");
    next;
    mesn;
    mesq l("Please, enjoy your leather gloves.");
    close;

L_Missing:
    mesn;
    mesq l("That's not everything I asked for.");
    close;


OnInit:
    .@npcId = getnpcid(0, .name$);
    setunitdata(.@npcId, UDT_HEADTOP, IceGladius);
    setunitdata(.@npcId, UDT_HEADMIDDLE, CreasedShirt);
    setunitdata(.@npcId, UDT_HEADBOTTOM, NPCEyes);
    setunitdata(.@npcId, UDT_WEAPON, CreasedShorts);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 2);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 4);

    .sex=G_MALE;
    .distance=5;
    end;

}