summaryrefslogtreecommitdiff
path: root/npc/commands/welcome.txt
blob: fef83cc6b044b40553da826081d89cfbf4d6e73b (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
// TMW2 Script
// Author:
//    Jesusalva
// Description:
//    Welcome to all new players on ML! :D

-	script	@welcome	32767,{
    end;

OnCall:
    CMD_toevent();
    end;

OnEffect:
    @toeventchk=0;
    removespecialeffect(FX_CIRCLE, SELF, getcharid(3));
    // Calculate
    if ($@WELCOME_TIMER < gettimetick(2)) {
        dispbottom l("There are no new players to welcome.");
        atcommand "@refresh";
        end;
    } else if (readparam(Sp) < @toeventval2) {
        dispbottom l("You must not be using mana to do this trip.");
        atcommand "@refresh";
        end;
    } else if (readparam(Hp) < @toeventval1) {
        dispbottom l("You cannot be fighting to do this trip.");
        atcommand "@refresh";
        end;
    } else if (compare(getmapname(), "001-") || (getmapinfo(MAPINFO_ZONE, getmap())) == "MMO") {
        dispbottom l("You currently could not use GM MAGIC to visit Candor.");
        atcommand "@refresh";
        end;
    } else if (getmapname() == "boss" || getmapname() == "sec_pri" || compare(getmapname(), "000-") || compare(getmapname(), "008-") || compare(getmapname(), "005-") || compare(getmapname(), "006-") || compare(getmapname(), "sore")) {
        dispbottom l("You currently could not use GM MAGIC to visit Candor.");
        atcommand "@refresh";
    } else {
        warp "005-1", 43, 99;
        message strcharinfo(0), l("You are now at Candor.");
    }
    end;

OnInit:
    bindatcmd "welcome", "@welcome::OnCall", 0, 99, 0;
}