summaryrefslogtreecommitdiff
path: root/npc/027-2/colin.txt
blob: 8ab524dbb9084327a789e4f7037ad712c8c9037a (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
// TMW2 script.
// Author:
//    Saulc
//    Jesusalva
// Description:
//    Colin, of Destructive Magic Class.

027-2,28,23,0	script	Colin	NPC_PLAYER,{
    if (!MAGIC_LVL) goto L_NoMagic;
    mes l(".:: Destructive Magic Class ::.");
    mesc l("Specialized in destructive, magical skills.");
    next;
    mesn;
    do {
    mesc l("You have @@ magic skill points available.", sk_points());
    next;
    mesc l("Fireball - Basic AoE (Area Of Effect) Skill");
    mesc l("Holy Light - Standard Holy Magical Attack");
    mesc l("Magic Strike - Standard Magical Attack");

    mesc l("Napalm Beat - Spammable AoE Skill");
    mesc l("Frost Diver - Attempt to freeze an enemy, dealing damage");
    mesc l("Fire Walk - Creates a trail of fire, harming any pursuer");

    mesc l("Frost Nova - Freeze everything in a range");
    mesc l("Note: You can exchange 1 @@ for 3 @@", getitemlink(GemPowder), getitemlink(Quill)), 1;
    menuint
        rif(countitem(GemPowder), l("Exchange Gempowder for Quill")), -1,
        l("Cancel"), 0;
    mes "";

    switch (@menuret) {
        case -1:
            inventoryplace Quill, 3;
            delitem GemPowder, 1;
            getitem Quill, 3;
            break;
        case 0:
            closeclientdialog;
            break;
        default:
            if (!learn_magic(@menuret))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
    }
    } while (@menuret);
    close;

L_NoMagic:
    next;
    mesn;
    mesq l("Your lack of magical power is critical. I dare say, you might never in your life get access to a Mana Stone.");
    next;
    mesn;
    mesq l("Besides the Magic Council, Andrei Sakar have his own Mana Stone, but I doubt he would train the likes of you, or share his Mana Stone.");
    next;
    mesn;
    mesq l("Perhaps, in the city, someone knows rumors about Mana Stones and can teach you. Other than that, you're on your own.");
    close;

OnInit:
    .@npcId = getnpcid(.name$);
    setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
    setunitdata(.@npcId, UDT_HEADMIDDLE, SorcererRobe);
    setunitdata(.@npcId, UDT_HEADBOTTOM, JeansShorts);
    setunitdata(.@npcId, UDT_WEAPON, DeepBlackBoots);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 21);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 20);

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