summaryrefslogtreecommitdiff
path: root/world/map/npc/017-1/flowerpentagram5.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/017-1/flowerpentagram5.txt')
-rw-r--r--world/map/npc/017-1/flowerpentagram5.txt140
1 files changed, 0 insertions, 140 deletions
diff --git a/world/map/npc/017-1/flowerpentagram5.txt b/world/map/npc/017-1/flowerpentagram5.txt
deleted file mode 100644
index f8947dbd..00000000
--- a/world/map/npc/017-1/flowerpentagram5.txt
+++ /dev/null
@@ -1,140 +0,0 @@
-// Author: Jenalya
-// $@Flower_Pentagram_Time saves the time when the last summoning happened
-
-017-1,176,59,0|script|#FlowerPentagram5|400
-{
- if (OrumQuest >= 31) goto L_PlacedFifthFlower;
-
- if (OrumQuest == 30) goto L_FifthFlower;
-
- message strcharinfo(0), "Something is odd about this place.";
- end;
-
-L_FifthFlower:
- mes "This has to be the spot for the last magical flower. When you place it, the pentagram will be completed.";
- menu
- "Place the flower.", L_PlaceTheFlower,
- "Leave.", L_Close;
-
-L_PlaceTheFlower:
- if (isin("017-1", 175, 58, 177, 60))
- goto L_Place;
-
- mes "This isn't working, you're too far away.";
- goto L_Close;
-
-L_Place:
- set @localMonsterCount,
- mobcount("013-1", "#FlowerPentagram5::OnSquirrelDeath") +
- mobcount("013-1", "#FlowerPentagram5::OnMushroomDeath") +
- mobcount("013-1", "#FlowerPentagram5::OnBlueparDeath") +
- mobcount("013-1", "#FlowerPentagram5::OnMoubooDeath") +
- mobcount("013-1", "#FlowerPentagram5::OnScorpionDeath") +
- mobcount("013-1", "#FlowerPentagram5::OnRScorpionDeath") +
- mobcount("013-1", "#FlowerPentagram5::OnAScorpionDeath") +
- mobcount("013-1", "#FlowerPentagram5::OnBScorpionDeath") +
- 8; // the mobcount function has an offset of -1, so we add 8 to have the actual amount of monsters
- if (@localMonsterCount > 4)
- goto L_MonstersAlive;
-
- mes "Nervous about what's going to happen, you take the last of the flowers and put it into its place.";
- next;
- mes "Tension builds up around you, much stronger than before. You can feel it compressing your head, and a liquid warmth spreads under your nose, leaving a metallic taste on your lips.";
- heal -5, 0;
- next;
- callfunc "FlowerPentagramCount";
- if (($@Flower_Pentagram_Time > gettimetick(2) - 3600) && ($@Flower_Pentagram_Mobcount > 15))
- goto L_TooEarly;
- set $@Flower_Pentagram_Time, gettimetick(2);
- if (countitem("RedSummonFlower") < 1)
- goto L_NoFlower;
- delitem "RedSummonFlower", 1;
-
- mes "The pressure builds to the point where you don't think you can endure it any longer; the fabric that binds your consciousness together seemingly unravels.";
- set OrumQuest, 31;
- close2;
- areamonster "017-1", 170, 55, 190, 75, "", 1105, 3, "#FlowerPentagram5::OnSquirrelDeath";
- areamonster "017-1", 170, 55, 190, 75, "", 1106, 2, "#FlowerPentagram5::OnMushroomDeath";
- areamonster "017-1", 170, 55, 190, 75, "", 1107, 3, "#FlowerPentagram5::OnBlueparDeath";
- areamonster "017-1", 170, 55, 190, 75, "", 1104, 2, "#FlowerPentagram5::OnMoubooDeath";
- areamonster "017-1", 170, 55, 190, 75, "", 1003, 3, "#FlowerPentagram5::OnScorpionDeath";
- areamonster "017-1", 170, 55, 190, 75, "", 1004, 2, "#FlowerPentagram5::OnRScorpionDeath";
- areamonster "017-1", 170, 55, 190, 75, "", 1057, 2, "#FlowerPentagram5::OnAScorpionDeath";
- areamonster "017-1", 170, 55, 190, 75, "", 1009, 2, "#FlowerPentagram5::OnBScorpionDeath";
- set @value, 15;
- callfunc "QuestSagathaAnnoy";
- set @value, 0;
- donpcevent "#FlowerPentagram::OnSummon";
- end;
-
-OnSquirrelDeath:
- set @mobID, 1105;
- callfunc "MobPoints";
- end;
-
-OnMushroomDeath:
- set @mobID, 1106;
- callfunc "MobPoints";
- end;
-
-OnBlueparDeath:
- set @mobID, 1107;
- callfunc "MobPoints";
- end;
-
-OnMoubooDeath:
- set @mobID, 1104;
- callfunc "MobPoints";
- end;
-
-OnScorpionDeath:
- set @mobID, 1003;
- callfunc "MobPoints";
- end;
-
-OnRScorpionDeath:
- set @mobID, 1004;
- callfunc "MobPoints";
- end;
-
-OnAScorpionDeath:
- set @mobID, 1057;
- callfunc "MobPoints";
- end;
-
-OnBScorpionDeath:
- set @mobID, 1009;
- callfunc "MobPoints";
- end;
-
-L_TooEarly:
- mes "Suddenly, everything calms down again and the tension vanishes. You find yourself confused about what's going on.";
- next;
- mes "You pick up the flower again.";
- next;
- mes "Looking at the place more closely, it seems another summoning has happened just before, leaving the pathway between this world and the astral plane drained and exhausted.";
- next;
- mes "You should wait a while until it recharges, or go and search for the creatures that were summoned.";
- goto L_Close;
-
-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 reach into your pocket, but you can't find the flower! You're so close to completing your task.";
- mes "How could you lose the last flower? If you can't get it back, you have to tell Orum.";
- goto L_Close;
-
-L_PlacedFifthFlower:
- mes "This is where you placed the last 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:
- set @localMonsterCount, 0;
- close;
-}