018-1,83,29,0	script	#FlowerPentagram3	NPC400,{
    if (getq(MagicQuest_DarkMage) >= 31) goto L_PlacedFifthFlower;

    if (getq(MagicQuest_DarkMage) > 23) goto L_PlacedThirdFlower;
    if (getq(MagicQuest_DarkMage) == 23) goto L_ThirdFlower;

    message strcharinfo(0), "Something is odd about 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.", L_Next,
        "Leave.", L_close;

L_Next:
    if (isin("018-1", 82, 28, 84, 30))
        goto L_Place;

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

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

    if (countitem("WhiteSummonFlower") < 1)
        goto L_NoFlower;
    delitem "WhiteSummonFlower", 1;
    mes "Knowing what will happen, you prepare yourself for a fight. Then you go ahead with the ritual and place the magical flower.";
    mes "You feel the now familiar tension around you. Here they come.";
    setq(MagicQuest_DarkMage, 24);
    close2;
    areamonster "018-1", 73, 22, 89, 36, "", 1105, 1, "#FlowerPentagram3::OnSquirrelDeath";
    areamonster "018-1", 73, 22, 89, 36, "", 1106, 2, "#FlowerPentagram3::OnMushroomDeath";
    areamonster "018-1", 73, 22, 89, 36, "", 1107, 1, "#FlowerPentagram3::OnBlueparDeath";
    areamonster "018-1", 73, 22, 89, 36, "", 1003, 2, "#FlowerPentagram3::OnScorpionDeath";
    areamonster "018-1", 73, 22, 89, 36, "", 1004, 1, "#FlowerPentagram3::OnRScorpionDeath";
    areamonster "018-1", 73, 22, 89, 36, "", 1057, 2, "#FlowerPentagram3::OnAScorpionDeath";
    @value = 15;
    callfunc "QuestSagathaAnnoy";
    @value = 0;
    end;

OnSquirrelDeath:
    fix_mobkill(1105);
    end;

OnMushroomDeath:
    fix_mobkill(1106);
    end;

OnBlueparDeath:
    fix_mobkill(1107);
    end;

OnScorpionDeath:
    fix_mobkill(1003);
    end;

OnRScorpionDeath:
    fix_mobkill(1004);
    end;

OnAScorpionDeath:
    fix_mobkill(1057);
    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 reach into your inventory to take out the flower and place it, but you can't find it!";
    mes "Did you lose it somewhere along the way? If you can't find it, go talk to Orum again.";
    goto L_close;

L_PlacedThirdFlower:
    mes "You placed the third of Orum's magical flowers on this spot.";
    mes "You can feel the magical power around the place, waiting to be unleashed.";
    goto L_close;

L_PlacedFifthFlower:
    mes "You remember this place. You placed the third of Orum's magical flowers here.";
    mes "However, now that the summoning spell has been cast, everything is back to normal here.";
    goto L_close;

L_close:
    @localMonsterCount = 0;
    close;
}