summaryrefslogtreecommitdiff
path: root/npc/config/magic.txt
blob: ce712b5189a2d97701cb68742a108237bc9bcfaf (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
// TMW2 script
// Author: Jesusalva <admin@tmw2.org>
//
// Magic Script Core Functions
// 
// Used for our pseudo-magic.
// These are only helpers, you can add more restrictions and effects freely.
// Important Variables: MAGIC_EXP, LAST_SKILL

// SkillID, EXP Points
function	script	GetManaExp	{
    .@sk=getarg(0);
    .@pt=getarg(1);
    if (LAST_SKILL == .@sk)
        end;
    LAST_SKILL=.@sk;
    MAGIC_EXP=MAGIC_EXP+.@pt;
    end;
}

// SkillID, Mana{, MP per level}
function	script	MagicCheck	{
    // PRE EXECUTION
    // Load Variables
    .@sk=getarg(0);
    .@mp=getarg(1);
    .@amp=getarg(2,0);

    // Check Skill
    if (getskilllv(.@sk) < 1)
        return 0;

    // Load mana cost
    .@amp=getarg(3,0);
    .@mp=.@mp+getskilllv(.@sk)*.@amp-.@amp;

    // Check mana
    if (readparam(Sp) < .@mp) {
        dispbottom l("Insufficient mana: @@/@@.", readparam(Sp), .@mp);
        return 0;
    }
    return 1;
}

// SkillID, Mana, MobID{, MP per level, MobPerSkillLevel=2}
function	script	SummonMagic	{
    .@sk=getarg(0);
    .@mp=getarg(1);
    .@id=getarg(2);
    .@adj=getarg(4,2);

    if (.@adj < 1) {
        debugmes "\033[31mInvalid MobPerSkillLevel for SummonMagic (.@adj): "+.@adj+"\033[0m";
        dispbottom l("Invalid parameter specified, blame saulc.");
        end;
    }

    // PRE EXECUTION
    if (!MagicCheck(.@sk, .@mp, .@amp))
        end;


    // EXECUTION
    // Apply costs
    heal 0, 0-.@mp;

    // Cause effect
    // Summoned monsters live from 45 to 60 seconds, and each skill levels grants 10s extra life
    // The 35~50 is not a defect, remember skill starts at level 1...
    for (.@i = 0; .@i < (getskilllv(.@sk)+(.@adj-1))/.@adj; .@i++)
    	summon("Summoned Monster", .@id, rand(35,50)+getskilllv(.@sk)*10);
    dispbottom l("All monsters summoned!");

}