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
|
// 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), l("Can you teach me a basic tier 2 magic skill?")), L_Tier2,
//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:
mes "";
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("I'll charge you the irrelevant amount of 100 GP. Come on, it's a pinch!");
select
rif(Zeny >= 100, l("Buy it")),
l("Don't buy it");
if (@menu == 1) {
Zeny=Zeny-100;
skill(AL_HEAL,1,0);
}
close;
L_Tier2:
mes "";
mesn;
mesq l("Yeah, of course. This one is rather useless and difficult to use, though.");
next;
mesn;
mesq l("It's called Mass Provoke. You'll basically try to convince monsters to attack you.");
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;
}
|