#textdomain wesnoth-dw

[scenario]
    name= _ "Revenge"
    map_data="{campaigns/Dead_Water/maps/Home_2.map}"

    id=12_Revenge
    next_scenario=13_Epilogue

    [story]
        [part]
            story= _ "The mission had been more difficult than Kai Krellis would have believed when he started. Finally though, the end was in sight. He had seen how priestesses could carve through masses of undead, and now he traveled with a whole contingent of them. Tyegëa was even more powerful, though as unpredictable as Cylanna had said."
        [/part]
        [part]
            story= _ "The tribe that had fled Jotha unable to fight returned as an army stiffened by veteran fighters and led by a warrior king. Though they were tired from their journey, weariness fell from them as they neared home. The mermen arrived during the night, and found the mouth of their bay guarded, so they headed south along the coast to some outlying villages to gather news of the invaders."
        [/part]

        [part]
            background=dead-water-map.png
            show_title=yes
            {OLD_BATTLE 746 673}
            {OLD_JOURNEY 729 657}
            {OLD_JOURNEY 734 635}
            {OLD_BATTLE 732 615}
            {OLD_JOURNEY 708 612}
            {OLD_JOURNEY 681 607}
            {OLD_JOURNEY 654 600}
            {OLD_JOURNEY 647 573}
            {OLD_JOURNEY 640 546}
            {OLD_BATTLE 650 522}
            {OLD_JOURNEY 637 497}
            {OLD_JOURNEY 628 473}
            {OLD_JOURNEY 610 454}
            {OLD_JOURNEY 589 437}
            {OLD_JOURNEY 576 412}
            {OLD_JOURNEY 575 388}
            {OLD_JOURNEY 552 381}
            {OLD_BATTLE 542 361}
            {OLD_JOURNEY 523 370}
            {OLD_JOURNEY 501 381}
            {OLD_JOURNEY 477 391}
            {OLD_BATTLE 455 401}
            {OLD_JOURNEY 434 414}
            {OLD_JOURNEY 414 428}
            {OLD_BATTLE 395 446}
            {OLD_JOURNEY 402 471}
            {OLD_JOURNEY 396 495}
            {OLD_JOURNEY 387 518}
            {OLD_JOURNEY 369 537}
            {OLD_JOURNEY 344 548}
            {OLD_JOURNEY 319 542}
            {OLD_JOURNEY 307 523}
            {OLD_REST 306 497}
            {OLD_JOURNEY 286 479}
            {OLD_JOURNEY 265 467}
            {OLD_JOURNEY 266 444}
            {OLD_JOURNEY 279 424}
            {OLD_JOURNEY 301 413}
            {OLD_JOURNEY 321 399}
            {OLD_JOURNEY 339 378}
            {OLD_JOURNEY 354 356}
            {OLD_JOURNEY 368 334}
            {OLD_JOURNEY 384 315}
            {OLD_JOURNEY 395 293}
            {OLD_JOURNEY 375 278}
            {OLD_JOURNEY 357 264}
            {OLD_BATTLE 355 242}
            {OLD_JOURNEY 346 222}
            {OLD_JOURNEY 357 203}
            {OLD_JOURNEY 374 191}
            {OLD_JOURNEY 386 175}
            {OLD_BATTLE 373 160}
            {OLD_JOURNEY 367 180}
            {OLD_JOURNEY 355 199}
            {OLD_JOURNEY 345 221}
            {OLD_JOURNEY 339 243}
            {OLD_JOURNEY 331 265}
            {OLD_JOURNEY 322 289}
            {OLD_JOURNEY 314 312}
            {OLD_JOURNEY 305 335}
            {OLD_JOURNEY 297 358}
            {OLD_JOURNEY 289 380}
            {OLD_JOURNEY 280 402}
            {OLD_JOURNEY 272 425}
            {OLD_JOURNEY 264 447}
            {OLD_JOURNEY 265 471}
            {OLD_JOURNEY 287 480}
            {OLD_REST 306 497}
            {NEW_JOURNEY 306 523}
            {NEW_JOURNEY 318 543}
            {NEW_JOURNEY 339 555}
            {NEW_JOURNEY 362 564}
            {NEW_JOURNEY 385 573}
            {NEW_JOURNEY 409 583}
            {NEW_JOURNEY 433 590}
            {NEW_JOURNEY 458 598}
            {NEW_JOURNEY 484 606}
            {NEW_JOURNEY 508 613}
            {NEW_JOURNEY 533 620}
            {NEW_JOURNEY 557 625}
            {NEW_JOURNEY 581 631}
            {NEW_JOURNEY 606 638}
            {NEW_JOURNEY 630 645}
            {NEW_JOURNEY 655 651}
            {NEW_JOURNEY 678 657}
            {NEW_JOURNEY 702 662}
            {NEW_JOURNEY 725 667}
            {NEW_BATTLE 746 673}
        [/part]
    [/story]

    {SECOND_WATCH}
    {DAWN}
    {MORNING}
    {AFTERNOON}
    {DUSK}
    {FIRST_WATCH}
    turns=-1

    [side]
        # wmllint: recognize Kai Krellis
        {SIDE_1}
        {GOLD4 300 300 300 300}  # I doubt this is enough to win, but there was a lot of gold on The Flaming Sword, so the player should have around 200 plus this (on normal).
    [/side]

    [side]
        side=2
        controller=ai
        user_team_name= _ "Mal-Ravanal’s Forces"
        team_name=bad guys
        color=teal
        type=Lich
        id=Mal-Kevek
        name= _ "Mal-Kevek"
        canrecruit=yes

        {FLAG_VARIANT undead}
        {GOLD4 420 520 640 760}
        {INCOME4 18 23 26 28}
    [/side]

    [side]
        side=3
        controller=ai
        user_team_name= _ "Mal-Ravanal’s Forces"
        team_name=bad guys
        color=orange
        type=Necromancer
        id=Mel Daveth
        name= _ "Mel Daveth"
        canrecruit=yes

        {FLAG_VARIANT undead}
        {GOLD4 320 420 520 620}
        {INCOME4 12 16 20 22}
        [unit]
            type=Draug
            x,y=15,4
            ai_special=guardian
            facing=nw
        [/unit]
        [unit]
            type=Revenant
            x,y=16,4
            ai_special=guardian
            facing=nw
        [/unit]
        [unit]
            type=Draug
            x,y=18,2
            ai_special=guardian
            facing=nw
        [/unit]
        [unit]
            type=Revenant
            x,y=19,3
            ai_special=guardian
            facing=nw
        [/unit]
    [/side]

    [side]
        side=4
        controller=ai
        user_team_name= _ "Mal-Ravanal’s Forces"
        team_name=bad guys
        color=white
        type=Death Knight
        id=Dead Knight
        canrecruit=yes

        {FLAG_VARIANT undead}
        {GOLD4 400 510 620 680}
        {INCOME4 18 23 26 28}
    [/side]

    [side]
        side=5
        controller=ai
        user_team_name= _ "Mal-Ravanal’s Forces"
        team_name=bad guys
        color=purple
        no_leader=yes
        {FLAG_VARIANT undead}

        [ai]
            village_value=0
        [/ai]
    [/side]
    # The following macros should not go into the turn 2 event,
    # because they contain prestart events.
    # I want more, not more powerful, units. Limit the level threes so
    # the leaders have to buy more level twos:
#ifdef EASY
    {LIMIT_RECRUITS 2 Necrophage 2}
    {LIMIT_RECRUITS 2 Spectre 3}
    {LIMIT_RECRUITS 4 Chocobone 2}
    {LIMIT_RECRUITS 4 Draug 1}
#endif
#ifdef NORMAL
    {LIMIT_RECRUITS 2 Necrophage 2}
    {LIMIT_RECRUITS 2 Spectre 3}
    {LIMIT_RECRUITS 2 Nightgaunt 2}
    {LIMIT_RECRUITS 4 Banebow 3}
    {LIMIT_RECRUITS 4 Draug 1}
#endif
#ifdef HARD
    {LIMIT_RECRUITS 2 Necrophage 2}
    {LIMIT_RECRUITS 2 Spectre 4}
    {LIMIT_RECRUITS 2 Nightgaunt 3}
    {LIMIT_RECRUITS 4 Banebow 4}
    {LIMIT_RECRUITS 4 Draug 1}
#endif
#ifdef NIGHTMARE
    {LIMIT_RECRUITS 2 Necrophage 3}
    {LIMIT_RECRUITS 2 Spectre 4}
    {LIMIT_RECRUITS 2 Nightgaunt 4}
    {LIMIT_RECRUITS 4 Banebow 5}
    {LIMIT_RECRUITS 4 Draug 1}
#endif

    {RECRUIT_UNIT_VARIATIONS 3 "Walking Corpse" none,swimmer,swimmer,swimmer}
    {RECRUIT_UNIT_VARIATIONS 3 "Soulless" none,swimmer,swimmer,swimmer}

    {RING_OF_STRENGTH_EVENTS}

    #The mermen have no villages left when they return (but a few are
    #still unclaimed):
    {STARTING_VILLAGES 2 15}
    {STARTING_VILLAGES_AREA 2 28 24 4}

    {STARTING_VILLAGES 3 7}
    {STARTING_VILLAGES_AREA 3 17 15 7}

    {STARTING_VILLAGES 4 12}
    {STARTING_VILLAGES_AREA 4 24 1 6}

    [event]
        name=turn 2

#ifdef EASY
        [set_recruit]
            side=2
            recruit="Ghost, Wraith, Spectre, Shadow, Ghoul, Necrophage"
        [/set_recruit]
        [set_recruit]
            side=3
            recruit="Walking Corpse, Soulless, Vampire Bat, Blood Bat"
        [/set_recruit]
        [set_recruit]
            side=4
            recruit="Vampire Bat, Chocobone, Skeleton, Deathblade, Draug, Skeleton Archer, Bone Shooter"
        [/set_recruit]
#endif
#ifdef NORMAL
        [set_recruit]
            side=2
            recruit="Ghost, Wraith, Spectre, Shadow, Nightgaunt, Necrophage"
        [/set_recruit]
        [set_recruit]
            side=3
            recruit="Walking Corpse, Soulless, Vampire Bat, Blood Bat"
        [/set_recruit]
        [set_recruit]
            side=4
            recruit="Vampire Bat, Chocobone, Skeleton, Deathblade, Draug, Skeleton Archer, Bone Shooter, Banebow"
        [/set_recruit]
#endif
#ifdef HARD
        [set_recruit]
            side=2
            recruit="Ghost, Wraith, Spectre, Shadow, Nightgaunt, Necrophage"
        [/set_recruit]
        [set_recruit]
            side=3
            recruit="Walking Corpse, Soulless, Vampire Bat, Blood Bat"
        [/set_recruit]
        [set_recruit]
            side=4
            recruit="Vampire Bat, Chocobone, Skeleton, Deathblade, Draug, Skeleton Archer, Bone Shooter, Banebow"
        [/set_recruit]
#endif
#ifdef NIGHTMARE
        [set_recruit]
            side=2
            recruit="Ghost, Wraith, Spectre, Shadow, Nightgaunt, Necrophage"
        [/set_recruit]
        [set_recruit]
            side=3
            recruit="Walking Corpse, Soulless, Vampire Bat, Blood Bat"
        [/set_recruit]
        [set_recruit]
            side=4
            recruit="Vampire Bat, Chocobone, Skeleton, Deathblade, Draug, Skeleton Archer, Bone Shooter, Banebow"
        [/set_recruit]
#endif
    [/event]

    [event]
        name=prestart

        [hide_unit]
            x,y=16,24
        [/hide_unit]

        [item]
            x=15
            y=5
            image=scenery/village-human-burned2.png
        [/item]
        [item]
            x=15
            y=15
            image=scenery/village-human-burned1.png
        [/item]
        [item]
            x=30
            y=9
            image=scenery/trash.png
        [/item]
        [item]
            x=52
            y=19
            image=scenery/mine-abandoned.png
        [/item]
        [item]
            x=14
            y=11
            image=items/bones.png
        [/item]
        [item]
            x=51
            y=20
            image=items/coal.png
        [/item]

        [music]
            name=breaking_the_chains.ogg
        [/music]
        [music]
            name=vengeful.ogg
            append=yes
        [/music]

        [objectives]
            side=1
            [objective]
                description= _ "Defeat all enemy leaders"
                condition=win
            [/objective]
            [objective]
                description= _ "Death of Kai Krellis"
                condition=lose
            [/objective]
        [/objectives]

        # If one of the bad guys was killed in the second scenario,
        # show the user a different name. The internal description can
        # stay the same.
        [if]
            [variable]
                name=MK_dead
                equals=yes
            [/variable]

            [then]
                [store_unit]
                    [filter]
                        id=Mal-Kevek
                    [/filter]
                    variable=bad_guy_stored
                    kill=yes
                [/store_unit]
                [set_variable]
                    name=bad_guy_stored.name
                    value=Mal-Necross
                [/set_variable]
                [unstore_unit]
                    variable=bad_guy_stored
                [/unstore_unit]
            [/then]
        [/if]

        [if]
            [variable]
                name=MD_dead
                equals=yes
            [/variable]

            [then]
                [store_unit]
                    [filter]
                        id=Mel Daveth
                    [/filter]
                    variable=bad_guy_stored
                    kill=yes
                [/store_unit]
                [set_variable]
                    name=bad_guy_stored.name
                    value=Mal-Verloth
                [/set_variable]
                [unstore_unit]
                    variable=bad_guy_stored
                [/unstore_unit]
            [/then]
        [/if]

        [clear_variable]
            name=bad_guy_stored
        [/clear_variable]
    [/event]

    # This event shows KK on the edge of the map for a second, moves
    # him to a village, pauses, then moves him to the castle. At the
    # village some units are spawned with some dialog.
    [event]
        name=start

        # Store KK so we have the type for [move_unit_fake]:
        [store_unit]
            [filter]
                id=Kai Krellis
            [/filter]
            variable=KK_stored
        [/store_unit]

        # Show KK at the edge of the screen: (He actually starts in
        # the castle (hidden) to make this opening more
        # configurable. It just requires one extra teleport.)
        [teleport]
            [filter]
                id=Kai Krellis
            [/filter]
            x,y=1,14
        [/teleport]
        [scroll_to]
            x,y=1,14
        [/scroll_to]
        [unhide_unit][/unhide_unit]
        [redraw][/redraw]
        [delay]
            time=1000
        [/delay]
        [hide_unit]
            x,y=1,14
        [/hide_unit]

        # Show the move to the village:
        [move_unit_fake]
            x=2,5
            y=14,18
            type=$KK_stored.type
            side=1
        [/move_unit_fake]

        # Move KK to the village:
        [teleport]
            [filter]
                id=Kai Krellis
            [/filter]
            x,y=5,18
        [/teleport]
        [unhide_unit][/unhide_unit]
        # Capture the village KK did not stop in:
        [capture_village]
            side=1
            x,y=5,17
        [/capture_village]

        # Action at the village:
        [unit]
            side=1
            type=Merman Fighter
            x,y=5,18
            id=Nebthun
            name=Nebthun
            experience=6
            [modifications]
                {TRAIT_LOYAL}
                {TRAIT_RESILIENT}
            [/modifications]
            overlays=overlays/loyal-icon.png
        [/unit]
        [unit]
            side=1
            type=Merman Hunter
            x,y=5,18
            id=Jarla
            name=Jarla
            [modifications]
                {TRAIT_LOYAL}
                {TRAIT_INTELLIGENT}
            [/modifications]
            experience=10
            overlays=overlays/loyal-icon.png
        [/unit]
        [unit]
            side=1
            type=Merman Brawler
            x,y=5,18
            id=Tabomo
            name=Tabomo
            [modifications]
                {TRAIT_LOYAL}
                {TRAIT_STRONG}
            [/modifications]
            experience=32
            overlays=overlays/loyal-icon.png
        [/unit]
        [message]
            speaker=Nebthun
            message= _ "Kai Krellis! You live! We thought you and your people had all been killed when Jotha fell."
        [/message]
        [message]
            speaker=Kai Krellis
            message= _ "No, most of us escaped. I thought your settlements might be far enough away to escape harm, but you look as if you had seen battle."
        [/message]
        [message]
            speaker=Nebthun
            message= _ "Indeed, though we have not been hard pressed. The creatures have been busy fouling the waters and making the bay more to their liking. We worry that they will soon be back to finish with us, and I fear we will not survive."
        [/message]
        [message]
            speaker=Kai Krellis
            message= _ "We come prepared for battle, and have brought help. We will reclaim our home and make yours safe as well. Mal-Ravanal will pay this day."
        [/message]
        [message]
            speaker=Nebthun
            message= _ "Good. We will join you. You will be impressed with how quickly Tabomo here crushes skeletons. I think we should make the ruined castle on the mainland our base. The undead cut down many trees there to make bridges, and it is much easier to move through now."
        [/message]

        # Move KK to the keep:
        [hide_unit]
            x,y=5,18
        [/hide_unit]
        [teleport]
            [filter]
                id=Kai Krellis
            [/filter]
            x,y=16,24
        [/teleport]

        # Show the move to the keep:
        [move_unit_fake]
            x=5,16
            y=18,24
            type=$KK_stored.type
            side=1
        [/move_unit_fake]

        # ...and:
        [unhide_unit][/unhide_unit]
        {RECALL_LOYAL_UNITS}
        # wmllint: recognize Cylanna
        # wmllint: recognize Tyegea

        [clear_variable]
            name=KK_stored
        [/clear_variable]
    [/event]

    [event]
        name=turn 2
        [message]
            speaker=narrator
            message= _ "At dawn, the mermen got a good look at their opponents."
            image=wesnoth-icon.png
        [/message]

        [message]
            speaker=Tyegea
            message= _ "This doesn’t look too bad."
        [/message]

        [message]
            speaker=Kai Krellis
            message= _ "Maybe not yet, but just wait."
        [/message]

        [message]
            speaker=Mel Daveth
            message= _ "The mermen...they came back! Bring back the search parties! Call back the hordes!"
        [/message]

        [message]
            speaker=Mal-Kevek
            message= _ "Just make some more, you fool. There are plenty of corpses to go around."
        [/message]

        [message]
            speaker=Dead Knight
            message= _ "Uhhh."
        [/message]

        [unit]
            type=Blood Bat
            side=3
            animate=yes
            x,y=31,9
        [/unit]
        [kill]
            x,y=31,9
            animate=no
        [/kill]
        [move_unit_fake]
            type=Blood Bat
            x=31, 32
            y=9, 1
            side=3
        [/move_unit_fake]
    [/event]

    [event]
        name=turn 4
        [message]
            speaker=Tyegea
            message= _ "I suppose this <i>does</i> look a little overwhelming. I may enjoy it though. It can be satisfying to rain holy fire down on misbehaving spirits."
        [/message]

        [message]
            speaker=Gwabbo
            message= _ "Absolutely! Bring ’em on!"
        [/message]
    [/event]

    [event]
        name=turn 10
#ifdef EASY
        [set_variable]
            name=type_1
            value=Dark Adept
        [/set_variable]
        [set_variable]
            name=type_2
            value=Dark Adept
        [/set_variable]
        [set_variable]
            name=type_3
            value=Dark Sorcerer
        [/set_variable]
#endif
#ifdef NORMAL
        [set_variable]
            name=type_1
            value=Dark Adept
        [/set_variable]
        [set_variable]
            name=type_2
            value=Dark Sorcerer
        [/set_variable]
        [set_variable]
            name=type_3
            value=Dark Sorcerer
        [/set_variable]
#endif
#ifdef HARD
        [set_variable]
            name=type_1
            value=Dark Sorcerer
        [/set_variable]
        [set_variable]
            name=type_2
            value=Dark Sorcerer
        [/set_variable]
        [set_variable]
            name=type_3
            value=Dark Sorcerer
        [/set_variable]
#endif
#ifdef NIGHTMARE
        [set_variable]
            name=type_1
            value=Dark Sorcerer
        [/set_variable]
        [set_variable]
            name=type_2
            value=Dark Sorcerer
        [/set_variable]
        [set_variable]
            name=type_3
            value=Necromancer
        [/set_variable]
#endif
        [move_unit_fake]
            type=$type_3
            side=5
            x=23, 26
            y=1, 4
        [/move_unit_fake]
        [unit]
            side=5
            type=$type_3
            name=Carallcyn
            id=Carallcyn
            x,y=26, 4
        [/unit]
        [message]
            speaker=Carallcyn
            message= _ "We searched up the coast for miles, and here they are!"
        [/message]
        [unit]
            side=5
            type=$type_2
            generate_name=yes
            x,y=25,4
        [/unit]
        [unit]
            side=5
            type=$type_1
            generate_name=yes
            x,y=27,3
            gender=female
        [/unit]
        [unit]
            side=5
            type=$type_2
            generate_name=yes
            x,y=28,2
            gender=female
        [/unit]
        [unit]
            side=5
            type=$type_1
            generate_name=yes
            x,y=29,3
        [/unit]
        [unit]
            side=5
            type=$type_2
            generate_name=yes
            x,y=34,1
        [/unit]
#ifndef EASY
        [unit]
            side=5
            type=$type_3
            generate_name=yes
            x,y=32,2
            gender=female
        [/unit]
#endif

        [clear_variable]
            name=type_1
        [/clear_variable]
        [clear_variable]
            name=type_2
        [/clear_variable]
        [clear_variable]
            name=type_3
        [/clear_variable]
    [/event]

    [event]
        name=last breath
        [filter]
            id=Tyegea
        [/filter]
        [message]
            speaker=Tyegea
            message= _ "I was wrong. You are no grandson of <i>mine</i>!"
        [/message]
    [/event]

    [event]
        name=last breath
        [filter]
            id=Kai Krellis
        [/filter]
        [message]
            speaker=Kai Krellis
            message= _ "I have failed my people."
        [/message]
    [/event]

    [event]
        name=last breath
        [filter]
            id=Mal-Kevek
        [/filter]
        [message]
            speaker=Mal-Kevek
            message= _ "This is impossible!"
        [/message]
    [/event]

    [event]
        name=last breath
        [filter]
            id=Dead Knight
        [/filter]
        [message]
            # wmllint: local spelling gruh
            speaker=Dead Knight
            message= _ "Gruh!"
        [/message]
    [/event]

    [event]
        name=last breath
        [filter]
            id=Mel Daveth
        [/filter]
        [message]
            # wmllint: local spelling Rava uhh
            speaker=Mel Daveth
            message= _ "Save me Lord Rava...uhh!"
        [/message]
    [/event]

    [event]
        name=die
        [filter]
            id=Mel Daveth
        [/filter]

        {RING_OF_STRENGTH_APPEARS}
    [/event]

    [event]
        name=enemies defeated
        [message]
            speaker=Kai Krellis
            message= _ "We have retaken our home!"
        [/message]
    [/event]

    [event]
        name=die
        [filter]
            id=Cylanna
        [/filter]
        [message]
            speaker=Kai Krellis
            message= _ "Cylanna! I will miss you."
        [/message]
    [/event]

    [event]
        name=die
        [filter]
            id=Tyegea
        [/filter]
        [message]
            speaker=Cylanna
            message= _ "Tyegëa! No!"
        [/message]
    [/event]

    [event]
        name=die
        [filter]
            id=Kai Krellis
        [/filter]
        [endlevel]
            result=defeat
        [/endlevel]
    [/event]

    # The first_time_only moveto event causes a necklace *image* to
    # show up on the hex, and causes the necklace to be explained. The
    # moved unit gets the option to take it.
    #
    # If the unit takes it, a necklace *object* is put on the hex, and
    # the unit gets it because he is standing there already.
    #
    # If the unit does not take it, another moveto event is
    # added. This one is *not* first_time_only. It does pretty much
    # the same thing, but with shorter messages.
    #
    # If the unit does not take the necklace, an [allow_undo] is added
    # to the event.
    [event]
        name=moveto
        first_time_only=yes

        [filter]
            x=14
            y=11
            side=1
        [/filter]

        [message]
            speaker=$unit.id
            message= _ "This man was wearing a necklace with a pendant on it. I’m sure the shape means something."
        [/message]

        {PLACE_IMAGE items/ankh-necklace.png 14 11}

        [message]
            speaker=Tyegea
            message= _ "It does indeed. It is an ankh, and that pendant will strengthen your life force."
        [/message]

        [message]
            speaker=narrator
            message= _ "The ankh necklace provides 70% resistance to <i>arcane</i> damage."
            image=wesnoth-icon.png
        [/message]

        [message]
            speaker=$unit.id
            [option]
                message= _ "That sounds great! I’ll take it."
                [command]
                    [set_variable]
                        name=get_necklace
                        value=yes
                    [/set_variable]
                [/command]
            [/option]
            [option]
                message= _ "It doesn’t seem to have helped its previous owner. I don’t want it."
            [/option]
        [/message]

        [if]
            [variable]
                name=get_necklace
                equals=yes
            [/variable]
            [then]
                {ANKH_NECKLACE 14 11 necklace1}
                [set_variable]
                    name=get_necklace
                    value=done
                [/set_variable]
            [/then]
            [else]
                [allow_undo][/allow_undo]
                [event]
                    name=moveto
                    first_time_only=no

                    [filter]
                        x=14
                        y=11
                        side=1
                    [/filter]

                    [if]
                        [variable]
                            name=get_necklace
                            not_equals=done
                        [/variable]
                        [then]
                            [message]
                                speaker=$unit.id
                                [option]
                                    message= _ "I would like my life force protected."
                                    [command]
                                        [set_variable]
                                            name=get_necklace
                                            value=yes
                                        [/set_variable]
                                    [/command]
                                [/option]
                                [option]
                                    message= _ "My life force feels fine as it is."
                                [/option]
                            [/message]
                        [/then]
                    [/if]

                    [if]
                        [variable]
                            name=get_necklace
                            equals=yes
                        [/variable]
                        [then]
                            {ANKH_NECKLACE 14 11 necklace1}
                            [set_variable]
                                name=get_necklace
                                value=done
                            [/set_variable]
                        [/then]
                        [else]
                            [allow_undo][/allow_undo]
                        [/else]
                    [/if]
                [/event]
            [/else]
        [/if]
    [/event]
[/scenario]
