#textdomain wesnoth-did
[scenario]
    id=Peaceful_Valley
    next_scenario=A_Haunting_in_Winter

    name=_ "Peaceful Valley"
    map_data="{campaigns/Descent_Into_Darkness/maps/Peaceful_valley.map}"
    victory_when_enemies_defeated=no
    {TURNS 29 26 23}
    {MORNING}
    {AFTERNOON}
    {DUSK}
    {FIRST_WATCH}
    {SECOND_WATCH}
    {DAWN}

    {INTRO_AND_SCENARIO_MUSIC wanderer.ogg elvish-theme.ogg}
    {EXTRA_SCENARIO_MUSIC knolls.ogg}
    {EXTRA_SCENARIO_MUSIC revelation.ogg}

    [story]
        [part]
            story=_ "Fighting tears and rage, Malin follows the back-trail of the orcish band. He curses the elder mages for sending him from the Isle of Alduin half-prepared, only to be thrust into conflict. He curses Drogan for lacking the courage to see what must be done. Most fiercely, he curses the orcs for ravaging his family and home through their ceaseless attacks."
            background=story/parthyn.jpg
            scale_background=no
        [/part]
        [part]
            story=_ "Three days' travel outside Parthyn, Malin meets Darken Volk, the same necromancer who had saved Parthyn and taught Malin to raise the dead not long ago. The necromancer takes pity on Malin in his friendless state, and asks Malin to travel with him. As the weeks pass, he teaches Malin more dark magic."
            background=story/travel.jpg
            scale_background=no
        [/part]
        [part]
            show_title=yes
            {TO_PEACEFUL_VALLEY}
        [/part]
    [/story]

    [side]
        side=1
        controller=human
        type=Apprentice Mage
        id=Malin Keshar
        name=_ "Malin Keshar"
        unrenamable=yes
        canrecruit=yes
        recruit=Walking Corpse,Vampire Bat
        {GOLD 120 100 80}
        fog=yes
        shroud=yes
        {FLAG_VARIANT undead}
    [/side]

    [side]
        side=2
        controller=ai
        type=Goblin Knight
        id="T'shar Lggi"
        name=_ "T'shar Lggi"
        canrecruit=yes
        recruit=Goblin Rouser,Goblin Impaler,Wolf Rider
        {GOLD 70 90 110}
        fog=yes
        shroud=no
        [ai]
            village_value=2
            caution=0.5
            recruitment_pattern=scout,fighter
        [/ai]
    [/side]

    {STARTING_VILLAGES_ALL 2}

    [event]
        name=prestart

        [objectives]
            side=1
            [objective]
                condition=win
                description=_ "Occupy all of the goblin villages"
            [/objective]
            [objective]
                condition=lose
                description=_ "Death of Malin Keshar"
            [/objective]
            [objective]
                condition=lose
                description=_ "Death of Darken Volk"
            [/objective]
            [objective]
                condition=lose
                description=_ "Time runs out"
            [/objective]

            note={EARLY_FINISH_BONUS_NOTE}+{NEW_GOLD_CARRYOVER_NOTE_40}
        [/objectives]
    [/event]

    [event]
        name=start
        # {SCATTER_IMAGE (terrain=Ss) 3 scenery/pine1.png}
        [unit]
            id=Darken Volk
            name=_ "Darken Volk"
            profile=portraits/darken_volk.png
            type=Dark Sorcerer DiD
            unrenamable=yes
            random_traits=no
            [modifications]
                # NOTE: if you change these, make sure you don't break the
                # removal of the loyal trait in 'Alone at Last'
                [trait]
                    id=loyal
                    name= _ "loyal"
                    description= _ "to himself"
                    [effect]
                        apply_to=loyal
                    [/effect]
                [/trait]
                {TRAIT_QUICK}
            [/modifications]
            side=1
            x=15
            y=16
            {IS_HERO}
        [/unit]

        [message]
            speaker=Darken Volk
            message=_ "In truth, I share your hatred for the orcs. The northlands have been my... home... for many years, and the orcs have been a growing infestation in them. They despoil the beauty of the land wherever they go. If you are interested, I would be happy to take you on as my apprentice so that you can... aid me in the fight against them."
        [/message]
        [message]
            speaker=Malin Keshar
            message=_ "Yes! I thirst for revenge on those creatures!"
        [/message]
        [message]
            speaker=Darken Volk
            message=_ "Who knows? Perhaps removing the threat of orc raids will persuade the people of Parthyn to... welcome you home."
        [/message]
        [message]
            speaker=Malin Keshar
            message=_ "Perhaps. Even Drogan would have to be thankful for a summer without orc raids."
        [/message]
        [message]
            speaker=Darken Volk
            message=_ "A goblin village lies in this valley, just ahead. They are a bastard race born of the orcs, and help them in their wars against humans and dwarves. These do not know of our coming. Subduing them will give us souls upon which to call in our fight against the orcs."
        [/message]
        [message]
            speaker=Darken Volk
            message=_ "It will be a worthwhile test of your new skills."
        [/message]
    [/event]

    # Generate a random number of guards between 0 and 2 around X,Y
#define RANDOM_GUARDS TYPE NAME_STRING SIDE X Y
    {VARIABLE_OP number_of_guards random 0..2}

    {REPEAT $number_of_guards (
        [store_locations]
            [filter_adjacent_location]
                x,y={X},{Y}
            [/filter_adjacent_location]

            [not]
                [filter]
                [/filter]
            [/not]

            variable=possible_guard_locations
        [/store_locations]

        {IF_VAR possible_guard_locations.length greater_than 0 (
            [then]
                {VARIABLE_OP random_location_index random 0..$possible_guard_locations.length}

                [move_unit_fake]
                    side={SIDE}
                    type={TYPE}
                    x={X},$possible_guard_locations[$random_location_index].x
                    y={Y},$possible_guard_locations[$random_location_index].y
                [/move_unit_fake]

                [unit]
                    name={NAME_STRING}  # wmllint: ignore
                    type={TYPE}
                    side={SIDE}
                    x,y=$possible_guard_locations[$random_location_index].x,$possible_guard_locations[$random_location_index].y
                    random_traits=yes
                [/unit]
            [/then]
        )}
    )}

    {CLEAR_VARIABLE number_of_guards}
    {CLEAR_VARIABLE possible_guard_locations}
    {CLEAR_VARIABLE random_location_index}
#enddef

    # In-scenario events
    [event]
        name=capture
        first_time_only=yes
        [filter]
            side=1
        [/filter]

        [message]
            speaker=Darken Volk
            message=_ "Beware the goblin guards in the villages."
        [/message]
    [/event]

    [event]
        name=capture
        first_time_only=no
        [filter]
            side=1
        [/filter]

        {IF_VAR village_$x1|_$y1|_cleared not_equals yes (
            [then]
                {RANDOM_GUARDS (Goblin Spearman) (_ "Villager") 2 $x1 $y1}

                {VARIABLE village_$x1|_$y1|_cleared yes}
            [/then]

            [else]
                [allow_undo][/allow_undo]
            [/else]
        )}
    [/event]

    [event]
        name=moveto
        [filter]
            side=1
            x,y=15,11
        [/filter]

        [message]
            speaker=Darken Volk
            message=_ "Ahhh... I did not realize there was a swamp near this village. Malin, I believe it would be beneficial for your training if you and I were to investigate the swamp."
        [/message]

        [allow_undo][/allow_undo]
    [/event]

    [event]
        name=moveto
        [filter]
            [not]
                [not]
                    id=Darken Volk
                [/not]
                [not]
                    id=Malin Keshar
                [/not]
            [/not]
            x=14-15,16-20,19-20
            y=9-10,6-10,11
        [/filter]

        [message]
            speaker=Darken Volk
            message=_ "Rise, rise from the realms of death and decay!"
        [/message]

        [scroll_to]
            x,y=17,8
        [/scroll_to]
        {GENERIC_UNIT 1 Ghoul 19 7}
        [+unit]
            facing=sw
        [/unit]
        {GENERIC_UNIT 1 Ghoul 17 9}
        [+unit]
            facing=sw
        [/unit]
        {GENERIC_UNIT 1 Ghoul 17 8}
        [+unit]
            facing=sw
        [/unit]

        [message]
            speaker=Malin Keshar
            message=_ "What are those things?"
        [/message]
        [message]
            speaker=Darken Volk
            message=_ "They are ghouls. Once, they were... evil men... murderers and outlaws. Through magic they have been transformed so their outsides match the spirits within. Those that outlive their masters gravitate towards the swamps and bogs, drawn by the natural decay there."
        [/message]
        [message]
            speaker=Malin Keshar
            message=_ "It seems cruel to turn men into such a hideous form."
        [/message]
        [message]
            speaker=Darken Volk
            message=_ "In their present form they can best serve the greater good. Even now they will aid you in defeating this goblin rabble. Besides, as I said, these were men of great evil. No punishment is too great for their kind."
        [/message]
        [message]
            speaker=Malin Keshar
            message=_ "I suppose so..."
        [/message]
    [/event]

    [event]
        name=moveto
        [filter]
            type=Walking Corpse
            x,y=4,1
        [/filter]
        {NAMED_LOYAL_UNIT 2 (Goblin Spearman) 3 2 Shaun (_ "Shaun")}
        {NAMED_LOYAL_UNIT 2 (Goblin Spearman) 5 2 Ed (_ "Ed")}
        {SPEAK Ed (_ "Any zombies out there?")}
        {SPEAK Shaun (_ "Don't say that!")}
        {SPEAK Ed (_ "What?")}
        {SPEAK Shaun (_ "That!")}
        {SPEAK Ed (_ "What?")}
        {SPEAK Shaun (_ "The 'zed' word. Don't say it!")}
        {SPEAK Ed (_ "Why not?")}
        {SPEAK Shaun (_ "Because it's ridiculous!")}
        {SPEAK Ed (_ "Well... are there any?")}
        {SPEAK Shaun (_ "I don't see any. Maybe it's not as bad as all that.")}
        {SPEAK Shaun (_ "Oh, no, wait, there they are.")}
    [/event]

    # Defeat Conditions
    {MALIN_DEATH}
    {VOLK_DEATH}
    {TIME_OUT_LOSE}

    # Victory Condition

    [event]
        name=capture
        first_time_only=no
        [filter]
            side=1
        [/filter]
        #   {VARIABLE_OP villages_owned add 1}
        #when capturing a village we check if we own all villages of the map
        [if]
            [have_location]
                terrain=*^V*

                [not]
                    owner_side=1
                [/not]
            [/have_location]

            [else]
                [message]
                    speaker=Malin Keshar
                    message=_ "Sacking goblin villages is all well and good, but walking corpses and bats won't stand up to full orcish warriors."
                [/message]
                [message]
                    speaker=Darken Volk
                    message=_ "Your training is just beginning, Malin. With the souls from these goblins now available for our use, you will see your forces grow quickly."
                [/message]
                [message]
                    speaker=Malin Keshar
                    message=_ "Excellent. I'm eager to move on to the real foes."
                [/message]

                [endlevel]
                    result=victory
                    bonus=yes
                    {NEW_GOLD_CARRYOVER 40}
                [/endlevel]
            [/else]
        [/if]
    [/event]

    [event]
        name=victory

        [store_villages]
            variable=villages
        [/store_villages]

        {FOREACH villages i}
            {VARIABLE_OP village_var format "village_$villages[$i].x|_$villages[$i].y|_cleared"}

            {CLEAR_VARIABLE $village_var}
        {NEXT i}

        {CLEAR_VARIABLE villages}
        {CLEAR_VARIABLE village_var}
    [/event]
[/scenario]
