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
|
// Author: Jenalya
012-1.gat,143,70,0|script|#FlowerPentagram2|400,{
if (OrumQuest >= 31) goto L_PlacedFifthFlower;
if (OrumQuest > 20) goto L_PlacedSecondFlower;
if (OrumQuest == 20) goto L_SecondFlower;
message strcharinfo(0), "Something is odd with this place.";
end;
L_SecondFlower:
mes "Orum described this place. Here you have to place the second magical flower.";
menu
"Place the flower.", -,
"Leave.", L_Close;
if (isin("012-1.gat", 142, 69, 144, 71))
goto L_Place;
mes "This doesn't work, you're too far away.";
goto L_Close;
L_Place:
set @localMonsterCount,
mobcount("012-1.gat", "#FlowerPentagram2::OnSquirrelDeath") +
mobcount("012-1.gat", "#FlowerPentagram2::OnMushroomDeath") +
mobcount("012-1.gat", "#FlowerPentagram2::OnScorpionDeath") +
mobcount("012-1.gat", "#FlowerPentagram2::OnRScorpionDeath") +
4; // the mobcount function has an offset of -1, so we add 4 to have the actual amount of monsters
if (@localMonsterCount > 2)
goto L_MonstersAlive;
if (countitem("PurpleSummonFlower") < 1)
goto L_NoFlower;
delitem "PurpleSummonFlower", 1;
mes "Remembering what happened last time, you take a careful look around. Everything's calm. You proceed and place the second flower.";
mes "Tension builds up around you. You're alarmed.";
set OrumQuest, 21;
close2;
areamonster "012-1.gat", 140, 64, 146, 73, "", 1105, 2, "#FlowerPentagram2::OnSquirrelDeath";
areamonster "012-1.gat", 140, 64, 146, 73, "", 1106, 2, "#FlowerPentagram2::OnMushroomDeath";
areamonster "012-1.gat", 140, 64, 146, 73, "", 1003, 2, "#FlowerPentagram2::OnScorpionDeath";
areamonster "012-1.gat", 140, 64, 146, 73, "", 1004, 2, "#FlowerPentagram2::OnRScorpionDeath";
set @value, 15;
callfunc "QuestSagathaAnnoy";
set @value, 0;
end;
OnSquirrelDeath:
set @mobID, 1105;
callfunc "MobPoints";
end;
OnMushroomDeath:
set @mobID, 1106;
callfunc "MobPoints";
end;
OnScorpionDeath:
set @mobID, 1003;
callfunc "MobPoints";
end;
OnRScorpionDeath:
set @mobID, 1004;
callfunc "MobPoints";
end;
L_MonstersAlive:
mes "As you get closer to the place, you feel an unnerving presence.";
mes "The place has recently been used to summon something! And the beings are still near!";
next;
mes "You should get rid of them before attempting the summoning yourself.";
goto L_Close;
L_NoFlower:
mes "You look into your pocket, but the flower isn't there. Where did you put it?";
mes "If you can't find it again, better talk to Orum.";
goto L_Close;
L_PlacedSecondFlower:
mes "On this spot you placed the second of Orum's magical flowers.";
mes "There's a slight glowing of magic power around the place, waiting to be unleashed.";
goto L_Close;
L_PlacedFifthFlower:
mes "This is the place where you put the second of Orum's magical flowers.";
mes "But after the pentagram was finished and the summoning happened, everything is back to normal with this spot.";
goto L_Close;
L_Close:
set @localMonsterCount, 0;
close;
}
|