summaryrefslogtreecommitdiff
path: root/npc/013-1/flowerpentagram.txt
blob: 195ada0f4ae97f81f4b785ef084a854252160cf4 (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
013-1,1,1,0	script	#FlowerPentagram	NPC32767,{
end;

OnSummon:
    // This is just annoying
    //announce "Sagatha:* What kind of a foolish trick is this? Who dares to create such calamity in my forest?", 0;

    callsub S_CleanUp;
    // area closely to sagatha
    areamonster "013-1", 119, 21, 134, 36, "", 1105, 3, "#FlowerPentagram::OnSquirrelDeath";
    areamonster "013-1", 119, 21, 134, 36, "", 1106, 2, "#FlowerPentagram::OnMushroomDeath";
    areamonster "013-1", 119, 21, 134, 36, "", 1107, 3, "#FlowerPentagram::OnBlueparDeath";
    areamonster "013-1", 119, 21, 134, 36, "", 1104, 2, "#FlowerPentagram::OnMoubooDeath";
    areamonster "013-1", 119, 21, 134, 36, "", 1003, 10, "#FlowerPentagram::OnScorpionDeath";
    areamonster "013-1", 119, 21, 134, 36, "", 1004, 7, "#FlowerPentagram::OnRScorpionDeath";
    areamonster "013-1", 119, 21, 134, 36, "", 1057, 5, "#FlowerPentagram::OnAScorpionDeath";
    areamonster "013-1", 119, 21, 134, 36, "", 1009, 3, "#FlowerPentagram::OnBScorpionDeath";
    // wider area around sagatha
    areamonster "013-1", 68, 25, 133, 73, "", 1105, 3, "#FlowerPentagram::OnSquirrelDeath";
    areamonster "013-1", 68, 25, 133, 73, "", 1106, 3, "#FlowerPentagram::OnMushroomDeath";
    areamonster "013-1", 68, 25, 133, 73, "", 1107, 5, "#FlowerPentagram::OnBlueparDeath";
    areamonster "013-1", 68, 25, 133, 73, "", 1104, 2, "#FlowerPentagram::OnMoubooDeath";
    areamonster "013-1", 68, 25, 133, 73, "", 1003, 6, "#FlowerPentagram::OnScorpionDeath";
    areamonster "013-1", 68, 25, 133, 73, "", 1004, 5, "#FlowerPentagram::OnRScorpionDeath";
    areamonster "013-1", 68, 25, 133, 73, "", 1057, 4, "#FlowerPentagram::OnAScorpionDeath";
    areamonster "013-1", 68, 25, 133, 73, "", 1009, 2, "#FlowerPentagram::OnBScorpionDeath";
    // almost the entire map
    areamonster "013-1", 24, 22, 136, 100, "", 1105, 4, "#FlowerPentagram::OnSquirrelDeath";
    areamonster "013-1", 24, 22, 136, 100, "", 1106, 3, "#FlowerPentagram::OnMushroomDeath";
    areamonster "013-1", 24, 22, 136, 100, "", 1107, 5, "#FlowerPentagram::OnBlueparDeath";
    areamonster "013-1", 24, 22, 136, 100, "", 1104, 3, "#FlowerPentagram::OnMoubooDeath";
    areamonster "013-1", 24, 22, 136, 100, "", 1003, 5, "#FlowerPentagram::OnScorpionDeath";
    areamonster "013-1", 24, 22, 136, 100, "", 1004, 4, "#FlowerPentagram::OnRScorpionDeath";
    areamonster "013-1", 24, 22, 136, 100, "", 1057, 3, "#FlowerPentagram::OnAScorpionDeath";
    areamonster "013-1", 24, 22, 136, 100, "", 1009, 1, "#FlowerPentagram::OnBScorpionDeath";
    end;

OnSquirrelDeath:
    @mobId = 1105;
    callfunc "MobPoints";
    end;

OnMushroomDeath:
    @mobId = 1106;
    callfunc "MobPoints";
    end;

OnBlueparDeath:
    @mobId = 1107;
    callfunc "MobPoints";
    end;

OnMoubooDeath:
    @mobId = 1104;
    callfunc "MobPoints";
    end;

OnScorpionDeath:
    @mobId = 1003;
    callfunc "MobPoints";
    end;

OnRScorpionDeath:
    @mobId = 1004;
    callfunc "MobPoints";
    end;

OnAScorpionDeath:
    @mobId = 1057;
    callfunc "MobPoints";
    end;

OnBScorpionDeath:
    @mobId = 1009;
    callfunc "MobPoints";
    end;

S_CleanUp:
    killmonster "013-1", "#FlowerPentagram::OnSquirrelDeath";
    killmonster "013-1", "#FlowerPentagram::OnMushroomDeath";
    killmonster "013-1", "#FlowerPentagram::OnBlueparDeath";
    killmonster "013-1", "#FlowerPentagram::OnMoubooDeath";
    killmonster "013-1", "#FlowerPentagram::OnScorpionDeath";
    killmonster "013-1", "#FlowerPentagram::OnRScorpionDeath";
    killmonster "013-1", "#FlowerPentagram::OnAScorpionDeath";
    killmonster "013-1", "#FlowerPentagram::OnBScorpionDeath";
    return;
}

function	script	FlowerPentagramCount	{
    set $@Flower_Pentagram_Mobcount,
        mobcount("013-1", "#FlowerPentagram::OnSquirrelDeath") +
        mobcount("013-1", "#FlowerPentagram::OnMushroomDeath") +
        mobcount("013-1", "#FlowerPentagram::OnBlueparDeath") +
        mobcount("013-1", "#FlowerPentagram::OnMoubooDeath") +
        mobcount("013-1", "#FlowerPentagram::OnScorpionDeath") +
        mobcount("013-1", "#FlowerPentagram::OnRScorpionDeath") +
        mobcount("013-1", "#FlowerPentagram::OnAScorpionDeath") +
        mobcount("013-1", "#FlowerPentagram::OnBScorpionDeath") +
        8; // the mobcount function has an offset of -1, so we add 8 to have the actual amount of monsters
    return;
}