summaryrefslogtreecommitdiff
path: root/npc/055-1/flowerpentagram4.txt
blob: 5b41e8893cc4b4523349ad3d1e62b003bd270495 (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
055-1,141,89,0	script	#FlowerPentagram4	NPC400,{
    if (getq(MagicQuest_DarkMage) >= 31) goto L_PlacedFifthFlower;

    if (getq(MagicQuest_DarkMage) > 26) goto L_PlacedFourthFlower;
    if (getq(MagicQuest_DarkMage) == 26) goto L_FourthFlower;

    message strcharinfo(0), "Something is odd about this place.";
    end;

L_FourthFlower:
    mes "This is the spot where you have to place the fourth of Orum's magical flowers.";
    menu
        "Place the flower.", L_PlaceTheFlower,
        "Leave.", L_close;

L_PlaceTheFlower:
    if (isin("055-1", 140, 88, 142, 90))
        goto L_Place;

    mes "This isn't working, you're too far away.";
    goto L_close;

L_Place:
    set @localMonsterCount,
        mobcount("055-1", "#FlowerPentagram4::OnSquirrelDeath") +
        mobcount("055-1", "#FlowerPentagram4::OnMushroomDeath") +
        mobcount("055-1", "#FlowerPentagram4::OnBlueparDeath") +
        mobcount("055-1", "#FlowerPentagram4::OnMoubooDeath") +
        mobcount("055-1", "#FlowerPentagram4::OnScorpionDeath") +
        mobcount("055-1", "#FlowerPentagram4::OnRScorpionDeath") +
        mobcount("055-1", "#FlowerPentagram4::OnAScorpionDeath") +
        mobcount("055-1", "#FlowerPentagram4::OnBScorpionDeath");
    if (@localMonsterCount > 4)
        goto L_MonstersAlive;

    if (countitem("YellowSummonFlower") < 1)
        goto L_NoFlower;
    delitem "YellowSummonFlower", 1;
    mes "Worried about what will shift from the astral plane this time, you prepare yourself and put the flower in place.";
    mes "As expected, you feel the magical tension building up. They're coming.";
    setq(MagicQuest_DarkMage, 27);
    close2;
    areamonster "055-1", 133, 87, 144, 99, "", 1105, 1, "#FlowerPentagram4::OnSquirrelDeath";
    areamonster "055-1", 133, 87, 144, 99, "", 1106, 1, "#FlowerPentagram4::OnMushroomDeath";
    areamonster "055-1", 133, 87, 144, 99, "", 1107, 2, "#FlowerPentagram4::OnBlueparDeath";
    areamonster "055-1", 133, 87, 144, 99, "", 1104, 2, "#FlowerPentagram4::OnMoubooDeath";
    areamonster "055-1", 133, 87, 144, 99, "", 1003, 2, "#FlowerPentagram4::OnScorpionDeath";
    areamonster "055-1", 133, 87, 144, 99, "", 1004, 2, "#FlowerPentagram4::OnRScorpionDeath";
    areamonster "055-1", 133, 87, 144, 99, "", 1057, 2, "#FlowerPentagram4::OnAScorpionDeath";
    areamonster "055-1", 133, 87, 144, 99, "", 1009, 1, "#FlowerPentagram4::OnBScorpionDeath";
    @value = 15;
    callfunc "QuestSagathaAnnoy";
    @value = 0;
    end;

OnSquirrelDeath:
    fix_mobkill(1105);
    end;

OnMushroomDeath:
    fix_mobkill(1106);
    end;

OnBlueparDeath:
    fix_mobkill(1107);
    end;

OnMoubooDeath:
    fix_mobkill(1104);
    end;

OnScorpionDeath:
    fix_mobkill(1003);
    end;

OnRScorpionDeath:
    fix_mobkill(1004);
    end;

OnAScorpionDeath:
    fix_mobkill(1057);
    end;

OnBScorpionDeath:
    fix_mobkill(1009);
    end;

L_MonstersAlive:
    mes "As you get closer to the place, you feel an unnerving presence.";
    mes "This place has recently been used to summon something! And the beings are still nearby!";
    next;
    mes "You should get rid of them before attempting the summoning yourself.";
    goto L_close;

L_NoFlower:
    mes "You search your belongings for the magical flower. Where is it?";
    mes "If you lost it, you should talk to Orum again.";
    goto L_close;

L_PlacedFourthFlower:
    mes "You placed the fourth of Orum's magical flowers here.";
    mes "You can still feel the magical power shimmering around this place, waiting to be unleashed.";
    goto L_close;

L_PlacedFifthFlower:
    mes "This is where you placed the fourth of Orum's magical flowers.";
    mes "However, now that the summoning spell has been cast, everything is back to normal here.";
    goto L_close;

L_close:
    @localMonsterCount = 0;
    close;
}