summaryrefslogtreecommitdiff
path: root/world
diff options
context:
space:
mode:
authorJessica Tölke <jtoelke@mail.upb.de>2013-05-02 09:45:15 +0200
committerJessica Tölke <jtoelke@mail.upb.de>2013-05-27 19:33:44 +0200
commit8026a250ed89de5298a42422126f33e0a5d9373f (patch)
treed6848af45d851ca3084d5790f47a47ae3db63943 /world
parent80074793f51cc8038f7ea14dbd9432a9923bd3fa (diff)
downloadserverdata-8026a250ed89de5298a42422126f33e0a5d9373f.tar.gz
serverdata-8026a250ed89de5298a42422126f33e0a5d9373f.tar.bz2
serverdata-8026a250ed89de5298a42422126f33e0a5d9373f.tar.xz
serverdata-8026a250ed89de5298a42422126f33e0a5d9373f.zip
Add flowerpentagram npcs to do the summoning.
Diffstat (limited to 'world')
-rw-r--r--world/map/npc/012-1/_import.txt1
-rw-r--r--world/map/npc/012-1/flowerpentagram2.txt79
-rw-r--r--world/map/npc/013-1/_import.txt1
-rw-r--r--world/map/npc/013-1/flowerpentagram.txt103
-rw-r--r--world/map/npc/017-1/_import.txt1
-rw-r--r--world/map/npc/017-1/flowerpentagram1.txt66
-rw-r--r--world/map/npc/018-1/_import.txt1
-rw-r--r--world/map/npc/018-1/flowerpentagram3.txt91
-rw-r--r--world/map/npc/055-1/_import.txt1
-rw-r--r--world/map/npc/055-1/flowerpentagram4.txt103
-rw-r--r--world/map/npc/056-1/_import.txt1
-rw-r--r--world/map/npc/056-1/flowerpentagram5.txt119
12 files changed, 567 insertions, 0 deletions
diff --git a/world/map/npc/012-1/_import.txt b/world/map/npc/012-1/_import.txt
index 095de153..0829616e 100644
--- a/world/map/npc/012-1/_import.txt
+++ b/world/map/npc/012-1/_import.txt
@@ -4,5 +4,6 @@ map: 012-1.gat
npc: npc/012-1/_mobs.txt
npc: npc/012-1/_warps.txt
npc: npc/012-1/amrak.txt
+npc: npc/012-1/flowerpentagram2.txt
npc: npc/012-1/injured-mouboo.txt
npc: npc/012-1/shops.txt
diff --git a/world/map/npc/012-1/flowerpentagram2.txt b/world/map/npc/012-1/flowerpentagram2.txt
new file mode 100644
index 00000000..21910356
--- /dev/null
+++ b/world/map/npc/012-1/flowerpentagram2.txt
@@ -0,0 +1,79 @@
+// 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:
+// if ((countitem("TODO:name") < 1))
+// goto L_NoFlower;
+// delitem "TODO:name", 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_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:
+ close;
+}
diff --git a/world/map/npc/013-1/_import.txt b/world/map/npc/013-1/_import.txt
index 167433a3..2c096edd 100644
--- a/world/map/npc/013-1/_import.txt
+++ b/world/map/npc/013-1/_import.txt
@@ -3,4 +3,5 @@
map: 013-1.gat
npc: npc/013-1/_mobs.txt
npc: npc/013-1/_warps.txt
+npc: npc/013-1/flowerpentagram.txt
npc: npc/013-1/sagatha.txt
diff --git a/world/map/npc/013-1/flowerpentagram.txt b/world/map/npc/013-1/flowerpentagram.txt
new file mode 100644
index 00000000..01d51233
--- /dev/null
+++ b/world/map/npc/013-1/flowerpentagram.txt
@@ -0,0 +1,103 @@
+013-1.gat,1,1,0|script|#FlowerPentagram|127,{
+end;
+
+OnSummon:
+ announce "Sagatha: What fool trick is this? Who dares to toy around with the forest like this?", 0;
+
+ callsub S_CleanUp;
+ // TODO: balance amounts
+ // area closely to sagatha
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1105, 3, "#FlowerPentagram::OnSquirrelDeath";
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1106, 2, "#FlowerPentagram::OnMushroomDeath";
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1107, 3, "#FlowerPentagram::OnBlueparDeath";
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1104, 2, "#FlowerPentagram::OnMoubooDeath";
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1003, 10, "#FlowerPentagram::OnScorpionDeath";
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1004, 7, "#FlowerPentagram::OnRScorpionDeath";
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1057, 5, "#FlowerPentagram::OnAScorpionDeath";
+ areamonster "013-1.gat", 119, 21, 134, 36, "", 1009, 3, "#FlowerPentagram::OnBScorpionDeath";
+ // wider area around sagatha
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1105, 3, "#FlowerPentagram::OnSquirrelDeath";
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1106, 3, "#FlowerPentagram::OnMushroomDeath";
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1107, 5, "#FlowerPentagram::OnBlueparDeath";
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1104, 2, "#FlowerPentagram::OnMoubooDeath";
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1003, 6, "#FlowerPentagram::OnScorpionDeath";
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1004, 5, "#FlowerPentagram::OnRScorpionDeath";
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1057, 4, "#FlowerPentagram::OnAScorpionDeath";
+ areamonster "013-1.gat", 68, 25, 133, 73, "", 1009, 2, "#FlowerPentagram::OnBScorpionDeath";
+ // almost the entire map
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1105, 4, "#FlowerPentagram::OnSquirrelDeath";
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1106, 3, "#FlowerPentagram::OnMushroomDeath";
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1107, 5, "#FlowerPentagram::OnBlueparDeath";
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1104, 3, "#FlowerPentagram::OnMoubooDeath";
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1003, 5, "#FlowerPentagram::OnScorpionDeath";
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1004, 4, "#FlowerPentagram::OnRScorpionDeath";
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1057, 3, "#FlowerPentagram::OnAScorpionDeath";
+ areamonster "013-1.gat", 24, 22, 136, 100, "", 1009, 1, "#FlowerPentagram::OnBScorpionDeath";
+ 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;
+
+S_CleanUp:
+ killmonster "013-1.gat", "#FlowerPentagram::OnSquirrelDeath";
+ killmonster "013-1.gat", "#FlowerPentagram::OnMushroomDeath";
+ killmonster "013-1.gat", "#FlowerPentagram::OnBlueparDeath";
+ killmonster "013-1.gat", "#FlowerPentagram::OnMoubooDeath";
+ killmonster "013-1.gat", "#FlowerPentagram::OnScorpionDeath";
+ killmonster "013-1.gat", "#FlowerPentagram::OnRScorpionDeath";
+ killmonster "013-1.gat", "#FlowerPentagram::OnAScorpionDeath";
+ killmonster "013-1.gat", "#FlowerPentagram::OnBScorpionDeath";
+ return;
+}
+
+function|script|FlowerPentagramCount|{
+ set $@Flower_Pentagram_Mobcount,
+ mobcount("013-1.gat", "#FlowerPentagram::OnSquirrelDeath") +
+ mobcount("013-1.gat", "#FlowerPentagram::OnMushroomDeath") +
+ mobcount("013-1.gat", "#FlowerPentagram::OnBlueparDeath") +
+ mobcount("013-1.gat", "#FlowerPentagram::OnMoubooDeath") +
+ mobcount("013-1.gat", "#FlowerPentagram::OnScorpionDeath") +
+ mobcount("013-1.gat", "#FlowerPentagram::OnRScorpionDeath") +
+ mobcount("013-1.gat", "#FlowerPentagram::OnAScorpionDeath") +
+ mobcount("013-1.gat", "#FlowerPentagram::OnBScorpionDeath") +
+ 8; // the mobcount function has an offset of -1, so we add 8 to have the actual amount of monsters
+ announce "$@Flower_Pentagram_Mobcount: " + $@Flower_Pentagram_Mobcount, 0; // TODO: remove debug announce
+ return;
+}
diff --git a/world/map/npc/017-1/_import.txt b/world/map/npc/017-1/_import.txt
index 29858887..9ab66da3 100644
--- a/world/map/npc/017-1/_import.txt
+++ b/world/map/npc/017-1/_import.txt
@@ -3,3 +3,4 @@
map: 017-1.gat
npc: npc/017-1/_mobs.txt
npc: npc/017-1/_warps.txt
+npc: npc/017-1/flowerpentagram1.txt
diff --git a/world/map/npc/017-1/flowerpentagram1.txt b/world/map/npc/017-1/flowerpentagram1.txt
new file mode 100644
index 00000000..38f51d0b
--- /dev/null
+++ b/world/map/npc/017-1/flowerpentagram1.txt
@@ -0,0 +1,66 @@
+// Author: Jenalya
+
+017-1.gat,95,42,0|script|#FlowerPentagram1|400,{
+
+ if (OrumQuest >= 31) goto L_PlacedFifthFlower;
+
+ if (OrumQuest > 17) goto L_PlacedFirstFlower;
+ if (OrumQuest == 17) goto L_FirstFlower;
+
+ message strcharinfo(0), "Something is odd with this place.";
+ end;
+
+L_FirstFlower:
+ mes "This looks like the place Orum described.";
+ menu
+ "Place the flower.", -,
+ "Leave.", L_Close;
+
+ if (isin("017-1.gat", 94, 41, 96, 43))
+ goto L_Place;
+
+ mes "You're too far away.";
+ goto L_Close;
+
+L_Place:
+// if (countitem("TODO:name") < 1)
+// goto L_NoFlower;
+// delitem "TODO:name", 1;
+ mes "You carefully place the magic flower on the marked spot. You feel some tension in the air around you.";
+ set OrumQuest, 18;
+ close2;
+ areamonster "017-1.gat", 91, 37, 101, 46, "", 1105, 2, "#FlowerPentagram1::OnSquirrelDeath";
+ areamonster "017-1.gat", 91, 37, 101, 46, "", 1003, 3, "#FlowerPentagram1::OnScorpionDeath";
+ set @value, 15;
+ callfunc "QuestSagathaAnnoy";
+ set @value, 0;
+ end;
+
+OnSquirrelDeath:
+ set @mobID, 1105;
+ callfunc "MobPoints";
+ end;
+
+OnScorpionDeath:
+ set @mobID, 1003;
+ callfunc "MobPoints";
+ end;
+
+L_NoFlower:
+ mes "You don't have the flower with you. Where did you put it?";
+ mes "If you can't find it again, you'll have to tell Orum.";
+ goto L_Close;
+
+L_PlacedFirstFlower:
+ mes "This is the place where you put the first of Orum's magical flowers.";
+ mes "You still feel 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 first 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:
+ close;
+}
diff --git a/world/map/npc/018-1/_import.txt b/world/map/npc/018-1/_import.txt
index 21971544..0089f9c3 100644
--- a/world/map/npc/018-1/_import.txt
+++ b/world/map/npc/018-1/_import.txt
@@ -3,6 +3,7 @@
map: 018-1.gat
npc: npc/018-1/_mobs.txt
npc: npc/018-1/_warps.txt
+npc: npc/018-1/flowerpentagram3.txt
npc: npc/018-1/mike.txt
npc: npc/018-1/miners.txt
npc: npc/018-1/sword.txt
diff --git a/world/map/npc/018-1/flowerpentagram3.txt b/world/map/npc/018-1/flowerpentagram3.txt
new file mode 100644
index 00000000..e80a6317
--- /dev/null
+++ b/world/map/npc/018-1/flowerpentagram3.txt
@@ -0,0 +1,91 @@
+// Author: Jenalya
+
+018-1.gat,83,29,0|script|#FlowerPentagram3|400,{
+
+ if (OrumQuest >= 31) goto L_PlacedFifthFlower;
+
+ if (OrumQuest > 23) goto L_PlacedThirdFlower;
+ if (OrumQuest == 23) goto L_ThirdFlower;
+
+ message strcharinfo(0), "Something is odd with this place.";
+ end;
+
+L_ThirdFlower:
+ mes "You recognize this place as the spot where Orum wants you to place the third of his magical flowers.";
+ menu
+ "Place the flower.", -,
+ "Leave.", L_Close;
+
+ if (isin("018-1.gat", 82, 28, 84, 30))
+ goto L_Place;
+
+ mes "This doesn't work, you're too far away.";
+ goto L_Close;
+
+L_Place:
+// if ((countitem("TODO:name") < 1))
+// goto L_NoFlower;
+// delitem "TODO:name", 1;
+ mes "Knowing what will happen, you prepare yourself for a fight. Then you go ahead and place the magical flower.";
+ mes "You feel the familiar tension around you. Here they come.";
+ set OrumQuest, 24;
+ close2;
+ areamonster "018-1.gat", 73, 22, 89, 36, "", 1105, 1, "#FlowerPentagram3::OnSquirrelDeath";
+ areamonster "018-1.gat", 73, 22, 89, 36, "", 1106, 2, "#FlowerPentagram3::OnMushroomDeath";
+ areamonster "018-1.gat", 73, 22, 89, 36, "", 1107, 1, "#FlowerPentagram3::OnBlueparDeath";
+ areamonster "018-1.gat", 73, 22, 89, 36, "", 1003, 2, "#FlowerPentagram3::OnScorpionDeath";
+ areamonster "018-1.gat", 73, 22, 89, 36, "", 1004, 1, "#FlowerPentagram3::OnRScorpionDeath";
+ areamonster "018-1.gat", 73, 22, 89, 36, "", 1057, 2, "#FlowerPentagram3::OnAScorpionDeath";
+ set @value, 15;
+ callfunc "QuestSagathaAnnoy";
+ set @value, 0;
+ end;
+
+OnSquirrelDeath:
+ set @mobID, 1105;
+ callfunc "MobPoints";
+ end;
+
+OnMushroomDeath:
+ set @mobID, 1106;
+ callfunc "MobPoints";
+ end;
+
+OnBlueparDeath:
+ set @mobID, 1107;
+ callfunc "MobPoints";
+ end;
+
+OnScorpionDeath:
+ set @mobID, 1003;
+ callfunc "MobPoints";
+ end;
+
+OnRScorpionDeath:
+ set @mobID, 1004;
+ callfunc "MobPoints";
+ end;
+
+OnAScorpionDeath:
+ set @mobID, 1057;
+ callfunc "MobPoints";
+ end;
+
+L_NoFlower:
+ mes "You reach into your inventory to take out the flower and place it. But you can't find it!";
+ mes "Did you loose it somewhere along the way? If you can't find it again, go talk to Orum.";
+ goto L_Close;
+
+L_PlacedThirdFlower:
+ mes "You see the place where you put the third of Orum's magical flowers.";
+ mes "You can feel the magic power around the place, waiting to be unleashed.";
+ goto L_Close;
+
+L_PlacedFifthFlower:
+ mes "You remember this place. Here you put the third 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:
+ close;
+}
diff --git a/world/map/npc/055-1/_import.txt b/world/map/npc/055-1/_import.txt
index 383525f5..4169b0eb 100644
--- a/world/map/npc/055-1/_import.txt
+++ b/world/map/npc/055-1/_import.txt
@@ -3,4 +3,5 @@
map: 055-1.gat
npc: npc/055-1/_mobs.txt
npc: npc/055-1/_warps.txt
+npc: npc/055-1/flowerpentagram4.txt
npc: npc/055-1/pumpkins.txt
diff --git a/world/map/npc/055-1/flowerpentagram4.txt b/world/map/npc/055-1/flowerpentagram4.txt
new file mode 100644
index 00000000..6af2fa6a
--- /dev/null
+++ b/world/map/npc/055-1/flowerpentagram4.txt
@@ -0,0 +1,103 @@
+// Author: Jenalya
+
+055-1.gat,141,89,0|script|#FlowerPentagram4|400,{
+
+ if (OrumQuest >= 31) goto L_PlacedFifthFlower;
+
+ if (OrumQuest > 27) goto L_PlacedFourthFlower;
+ if (OrumQuest == 27) goto L_FourthFlower;
+
+ message strcharinfo(0), "Something is odd with this place.";
+ end;
+
+L_FourthFlower:
+ mes "This is the spot to place the fourth of Orum's magical flowers.";
+ menu
+ "Place the flower.", -,
+ "Leave.", L_Close;
+
+ if (isin("055-1.gat", 140, 88, 142, 90))
+ goto L_Place;
+
+ mes "This doesn't work, you're too far away.";
+ goto L_Close;
+
+L_Place:
+// if ((countitem("TODO:name") < 1))
+// goto L_NoFlower;
+// delitem "TODO:name", 1;
+ mes "Worried about what will leak 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.";
+ set OrumQuest, 28;
+ close2;
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1105, 1, "#FlowerPentagram4::OnSquirrelDeath";
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1106, 1, "#FlowerPentagram4::OnMushroomDeath";
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1107, 2, "#FlowerPentagram4::OnBlueparDeath";
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1104, 2, "#FlowerPentagram4::OnMoubooDeath";
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1003, 2, "#FlowerPentagram4::OnScorpionDeath";
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1004, 2, "#FlowerPentagram4::OnRScorpionDeath";
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1057, 2, "#FlowerPentagram4::OnAScorpionDeath";
+ areamonster "055-1.gat", 133, 87, 144, 99, "", 1009, 1, "#FlowerPentagram4::OnBScorpionDeath";
+ set @value, 15;
+ callfunc "QuestSagathaAnnoy";
+ set @value, 0;
+ 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_NoFlower:
+ mes "You search your belongings for the magical flower. Where is it?";
+ mes "If you lost it, you should talk to Orum.";
+ goto L_Close;
+
+L_PlacedFourthFlower:
+ mes "Here you put the fourth of Orum's magical flowers.";
+ mes "There's a slight glowing of magic power around the place, waiting to be unleashed when you put the last one into place.";
+ goto L_Close;
+
+L_PlacedFifthFlower:
+ mes "This is the place where you put the fourth 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:
+ close;
+}
diff --git a/world/map/npc/056-1/_import.txt b/world/map/npc/056-1/_import.txt
index 8266df52..810fdb01 100644
--- a/world/map/npc/056-1/_import.txt
+++ b/world/map/npc/056-1/_import.txt
@@ -3,3 +3,4 @@
map: 056-1.gat
npc: npc/056-1/_mobs.txt
npc: npc/056-1/_warps.txt
+npc: npc/056-1/flowerpentagram5.txt
diff --git a/world/map/npc/056-1/flowerpentagram5.txt b/world/map/npc/056-1/flowerpentagram5.txt
new file mode 100644
index 00000000..31786166
--- /dev/null
+++ b/world/map/npc/056-1/flowerpentagram5.txt
@@ -0,0 +1,119 @@
+// Author: Jenalya
+// $@Flower_Pentagram_Time saves the time when the last summoning happened
+// TODO: think whether the 5 spawns of the endpoints also need a moblimit protection
+
+056-1.gat,62,31,0|script|#FlowerPentagram5|400,{
+goto L_Place;
+ if (OrumQuest >= 31) goto L_PlacedFifthFlower;
+
+ if (OrumQuest == 30) goto L_FifthFlower;
+
+ message strcharinfo(0), "Something is odd with this place.";
+ end;
+
+L_FifthFlower:
+ mes "This have to be the place for the last magical flower. When you place it, the pentagram will be completed.";
+ menu
+ "Place the flower.", -,
+ "Leave.", L_Close;
+
+ if (isin("056-1.gat", 61, 30, 63, 32))
+ goto L_Place;
+
+ mes "This doesn't work, you're too far away.";
+ goto L_Close;
+
+L_Place:
+ mes "Nervous of what's going to happen, you take the last of the flowers and put it into place.";
+ next;
+ mes "Tension builds up around you, much stronger than all the times before. It pressures your head, your nose starts bleeding.";
+ heal -5, 0;
+ next;
+ callfunc "FlowerPentagramCount";
+ if (($@Flower_Pentagram_Time > gettimetick(2) - 3600) && ($@Flower_Pentagram_Mobcount > 5)) // TODO: balance treshold
+ goto L_TooEarly;
+ set $@Flower_Pentagram_Time, gettimetick(2);
+// if ((countitem("TODO:name") < 1))
+// goto L_NoFlower;
+// delitem "TODO:name", 1;
+
+ mes "The moment you think you can't endure it anymore, the webbing of the world seems to tear apart.";
+ set OrumQuest, 31;
+ close2;
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 1105, 3, "#FlowerPentagram5::OnSquirrelDeath";
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 1106, 2, "#FlowerPentagram5::OnMushroomDeath";
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 1107, 3, "#FlowerPentagram5::OnBlueparDeath";
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 1104, 2, "#FlowerPentagram5::OnMoubooDeath";
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 1003, 3, "#FlowerPentagram5::OnScorpionDeath";
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 1004, 2, "#FlowerPentagram5::OnRScorpionDeath";
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 1057, 2, "#FlowerPentagram5::OnAScorpionDeath";
+ areamonster "056-1.gat", 56, 26, 80, 46, "", 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 "Then everything calms down again and then tension vanishes. You're unsure 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 path between this world and the astral plane drained and exhausted.";
+ next;
+ mes "You should wait a while until it recovers, or go and search the creatures that got summoned.";
+ goto L_Close;
+
+L_NoFlower:
+ mes "You reach into your pocket, but you can't find the flower! You're so close to completing you task.";
+ mes "How could you loose the last flower? If you can't get it back, you have to tell Orum.";
+ goto L_Close;
+
+L_PlacedFifthFlower:
+ mes "This is the place where you put the last one 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:
+ close;
+}