summaryrefslogtreecommitdiff
path: root/npc/081-1/extra.txt
blob: c39d5a22a7c47985db0d6bba72d51cdeb106265a (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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
// TMW Script.
// Author:
//    Jesusalva
// Notes:
//    Christmas 2021 - Extra NPCs & Code Injection

081-1,82,68,0	script	Nut Cracker	NPC330,{
    @npcname$ = "Nut Cracker";
    Banker();
    close;

OnInit:
    .distance=5;
    end;
}

081-1,69,82,0	script	Ol' Reset	NPC329,{
    @npcname$ = "Ol' Reset";
    StatReset();
    close;

OnInit:
    .distance=5;
    end;
}

081-1,57,49,0	script	Soul Menhir#Aethyr	NPC346,{
    @map$ = "081-1";
    setarray @Xs, 54, 54, 54, 55, 55, 55, 56;
    setarray @Ys, 52, 53, 54, 52, 53, 54, 54;
    @x = 0;
    @y = 0;
    callfunc "SoulMenhir";
    @map$ = "";
    cleararray @Xs[0], 0, 7;
    cleararray @Ys[0], 0, 7;
    @x = 0;
    @y = 0;
    close;
OnInit:
    .distance=5;
    end;
}

081-1,60,91,0	script	TMW Evolved Guide	NPC356,{
    mesn;
    mes "\""+l("Hello, and welcome to The Mana World: Evolved.");
    mes l("This is the server which will eventually take over TMW Legacy.")+"\"";
    next;
    mesn;
    mesq l("A few things are different here, you can read [@@https://wiki.themanaworld.org/index.php/Legacy:TMW_Evolved|on the wiki@@] some of the major differences.");
    select
        l("Thanks."),
        l("Learn more");
    mes "";
    if (@menu == 1) { closeclientdialog; close; }
    mesn;
    mesq l("For starters, magic skills are on F5 tab and no longer can be cast from chat. Drag'n'Drop them to the shortcut bars to use. You can also level them up if you have the points.");
    next;
    mesn;
    mesq l("To use magic, first select the target, and use the skill to unleash the magical attack. The next attack will only come when you use the skill again; unfortunately, it is NOT automatic.");
    next;
    mesn;
    mesq l("If you have unspent status points, you can level them up to 100. Focus skills work sightly different than on TMW Legacy. YOU NEED TO REFOCUS them!");
    next;
    mesn;
    mesq l("Your weight limit is a bit larger, but if it reaches 90% you will no longer be able to attack, so be careful.");
    next;
    mesn;
    mesq l("When you die, you'll be taken to the Soul Menhir you touched last. There is a Soul Menhir nearby, I advise touching it as soon as possible.");
    next;
    mesn;
    mesq l("Experience acquired here will be carried over to TMW Legacy once the event ends, as well as the event rewards. You can exchange the %s with GM Santa, the GM Team will be publishing the rules in turning these in level ups or ultra rare hats shortly.", getitemlink(Carrot));
    next;
    mesn;
    mesq l("The \"#world\" chat tab is bridged to #themanaworld-dev on IRC and Discord, you can quickly get in touch with the whole community and report bugs using it.");
    next;
    mesn;
    mesq l("Also, you may wish to use \"@resync\" or \"@resyncall\" if the monsters appear to vanish. That's mostly all, thanks for playing The Mana World. Contact staff if you need further assistance!");
    close;

OnInit:
    .distance=5;
    .sex = G_FEMALE;
    end;
}

081-1,47,74,0	script	Focus Master	NPC328,{
    while (true) {
        @pool = getskilllv(SKILL_POOL);
        @mallard = getskilllv(SKILL_MALLARDS_EYE);
        @brawling = getskilllv(SKILL_BRAWLING);
        @speed = getskilllv(SKILL_SPEED);
        @poison = getskilllv(SKILL_RESIST_POISON);
        @astralsoul = getskilllv(SKILL_ASTRAL_SOUL);
        @raging = getskilllv(SKILL_RAGING);

        mesn;
        mes "Your focusing skill level is " + @pool + ".";
        mes "Your mallard's eye skill level is " + @mallard + ".";
        mes "Your brawling skill level is " + @brawling + ".";
        mes "Your speed skill level is " + @speed + ".";
        mes "Your resist poison skill level is " + @poison + ".";
        mes "Your astral soul skill level is " + @astralsoul + ".";
        mes "Your raging skill level is " + @raging + ".";
        next;
        mes "";
        mes l("Focus list:");
        mesc l("%s : %s", l("Mallard's Eye"),
              (isfocused(SKILL_MALLARDS_EYE) ? l("Yes") : l("No")));
        mesc l("%s : %s", l("Brawling"),
              (isfocused(SKILL_BRAWLING) ? l("Yes") : l("No")));
        mesc l("%s : %s", l("Speed"),
              (isfocused(SKILL_SPEED) ? l("Yes") : l("No")));
        mesc l("%s : %s", l("Resist Ailment"),
              (isfocused(SKILL_RESIST_POISON) ? l("Yes") : l("No")));
        mesc l("%s : %s", l("Astral Soul"),
              (isfocused(SKILL_ASTRAL_SOUL) ? l("Yes") : l("No")));
        mesc l("%s : %s", l("Raging"),
              (isfocused(SKILL_RAGING) ? l("Yes") : l("No")));
        .@t=getactivatedpoolskilllist();
        menuint
            l("Back"), 0,
            ("Toggle Focus - Mallards Eye"), SKILL_MALLARDS_EYE,
            ("Toggle Focus - Brawling"), SKILL_BRAWLING,
            ("Toggle Focus - Speed"), SKILL_SPEED,
            ("Toggle Focus - Resist Ailment"), SKILL_RESIST_POISON,
            ("Toggle Focus - Astral Soul"), SKILL_ASTRAL_SOUL,
            ("Toggle Focus - Raging"), SKILL_RAGING;
        mes "";

        if (@menuret) {
            if (FOCUSING & getpoolskillFID(@menuret)) {
                unpoolskill(@menuret);
                mesc "Focus removed", 1;
            } else {
                .@s = poolskill(@menuret);
                if (.@s)
                    mesc "Focus added", 2;
                else
                    mesc sprintf("Impossible to focus. You can only focus %d skills at a time.", .@t), 1;
            }
        }
        else {
            break;
        }
    }
    mes "";
    mesn;
    mesq l("Come back again!");
    close;

OnInit:
    .distance=5;
    end;
}


081-2,90,288,0	script	#X21ADMIN	NPC_NO_SPRITE,{
    if (!is_admin()) end;
    if (instance_id() < 0) end;
    clear;
    do
    {
    mes "Dungeon config";
    mes "--------------------";
    mesf("Puzzle 01: %d", 'XMAS21CANDLE);
    mesf("Puzzle 02: %d", 'XMAS21TREE);
    mesf("Puzzle 03: %d", 'XMAS21AMBUSH);
    mes "";
    mesf("Boss Chamber Lock: %d", 'LOCKD);
    mes "";
    select
        "Close",
        "Toggle Candle",
        "Toggle Tree",
        "Toggle Ambush",
        "Unlock Boss Chamber",
        "Renew Instance";
    mes "";
    switch (@menu) {
    case 2: 'XMAS21CANDLE = !'XMAS21CANDLE; break;
    case 3: 'XMAS21TREE = !'XMAS21TREE; break;
    case 4: 'XMAS21AMBUSH = !'XMAS21AMBUSH; break;
    case 5: 'LOCKD = false; break;
    case 6: instance_set_timeout(1800, 1800); break;
    }
    } while (@menu != 1);
    closeclientdialog;
    close;
OnInit:
    .distance=1;
    end;
}