summaryrefslogtreecommitdiff
path: root/npc/003-1/jakod.txt
blob: 4066dda04979a58a527f63093f10f6cf2cadb6f7 (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 script.
// Author:
//    Saulc
//    Jesusalva
// Description:
//    Jakod replaces Luca. As there are no focus skills, Jakod teaches player about
//    magic and is their tutor on the matters of the Mana Stone.

003-1,109,129,0	script	Jakod	NPC_PLAYER,{


    mesn;
    if (BaseLevel < 30) mesq l("Hello there. I am looking for strong people, but you are not strong enough.");
    if (BaseLevel < 30) close;

    mes l("\"Ah, hello there, @@. You've grown quite skilled lately.", strcharinfo(0));
    if (MAGIC_LVL) mes l("I also see you have a level @@ magic skill!\"", MAGIC_LVL);
    if (!MAGIC_LVL) mes l("But you lack magic! That's a pity.\"");

    menu
        rif(!MAGIC_LVL, l("How do I get magic?")), L_HowTo,
        rif(MAGIC_LVL >= 1 && !getskilllv(AL_HEAL), l("Can you teach me a basic tier 1 magic skill?")), L_Tier1,
        //rif(MAGIC_LVL >= 2 && !getskilllv(EVOL_MASS_PROVOKE),
        //rif(MAGIC_LVL >= 3 && !getskilllv(AL_TELEPORT),
        l("Good bye."), -;

    close;

L_HowTo:
    mes "";
    mesn;
    mesq l("Well, the first thing would be to get access to a Mana Stone. Halinarzo had the biggest mana stone mines, but it's now depleted.");
    next;
    mesn;
    mes l("\"That's the only hard part. Have at least level 40, do not neglect Intelligence nor Job level...");
    mes l("...And, if you're lucky, you can touch it and receive magic power.\"");
    next;
    mesn;
    mesq l("Having magic power is useless by itself, so you must visit the Magic Council and sign up in one of two classes.");
    next;
    mesn;
    mesq l("Your class selection is ##BPermanent##b and cannot be changed later. Do their tasks, and you'll be able to harness magic!");
    next;
    mesn;
    mesq l("The more levels and intelligence you have, more likely the Mana Stone will grant you more Magic Power. But that means nothing.");
    next;
    mesn;
    mesq l("Because in the end, you are in the hands of your class leader!"); // Rare: Some loner NPCs may grant you EXTRA skills beyond that.
    close;

L_Tier1:
    mesn;
    mesq l("Yeah, of course. I will teach you how to give first aid to people.");
    next;
    mesn;
    mesq l("It takes a lot of mana, and is not very powerful, but it is a must have for everyone.");
    next;
    mesn;
    mesq l("Ah... I am too lazy to ask for anything in exchange. Here. Take it. Free.");
    skill(AL_HEAL,1,0);
    close;

OnInit:
    .@npcId = getnpcid(0, .name$);
    setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
    setunitdata(.@npcId, UDT_HEADMIDDLE, ForestArmor);
    setunitdata(.@npcId, UDT_HEADBOTTOM, JeansShorts);
    setunitdata(.@npcId, UDT_WEAPON, DeepBlackBoots);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 14);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 13);
    //setunitdata(.@npcId, UDT_HAIRSTYLE, 24);
    //setunitdata(.@npcId, UDT_HAIRCOLOR, 2);

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