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
|
017-1,95,42,0 script #FlowerPentagram1 NPC400,{
if (getq(MagicQuest_DarkMage) >= 31) goto L_PlacedFifthFlower;
if (getq(MagicQuest_DarkMage) > 17) goto L_PlacedFirstFlower;
if (getq(MagicQuest_DarkMage) == 17) goto L_FirstFlower;
message strcharinfo(0), "Something is odd about this place.";
end;
L_FirstFlower:
mes "This looks like the place Orum described.";
menu
"Place the flower.", L_Next,
"Leave.", L_close;
L_Next:
if (isin("017-1", 94, 41, 96, 43))
goto L_Place;
mes "You're too far away.";
goto L_close;
L_Place:
set @localMonsterCount,
mobcount("017-1", "#FlowerPentagram1::OnSquirrelDeath") +
mobcount("017-1", "#FlowerPentagram1::OnScorpionDeath");
if (@localMonsterCount > 2)
goto L_MonstersAlive;
if (countitem("OrangeSummonFlower") < 1)
goto L_NoFlower;
delitem "OrangeSummonFlower", 1;
mes "You carefully place the magic flower on the marked spot. You feel some tension in the air around you.";
setq(MagicQuest_DarkMage, 18);
close2;
areamonster "017-1", 91, 37, 101, 46, "", 1105, 2, "#FlowerPentagram1::OnSquirrelDeath";
areamonster "017-1", 91, 37, 101, 46, "", 1003, 3, "#FlowerPentagram1::OnScorpionDeath";
@value = 15;
callfunc "QuestSagathaAnnoy";
@value = 0;
end;
OnSquirrelDeath:
fix_mobkill(1105);
end;
OnScorpionDeath:
fix_mobkill(1003);
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 don't have the flower with you. Where did you put it?";
mes "If you can't find it, you should talk to Orum again.";
goto L_close;
L_PlacedFirstFlower:
mes "You placed the first of Orum's magical flowers on this spot.";
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 first 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;
}
|
