REM 
REM 
REM 
REM 
REM Move the "move creatures" block inside the flag values instead.
REM 
REM 

LEVEL_VERSION(1)
SET_GENERATE_SPEED(400)
START_MONEY(ALL_PLAYERS,100000)
MAX_CREATURES(ALL_PLAYERS,3)

MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HAND,1,1)

ALLY_PLAYERS(PLAYER0,PLAYER_GOOD,3)

CONCEAL_MAP_RECT(PLAYER0, 130, 106, 46, 110)

SET_TRAP_CONFIGURATION(POISON_GAS,Hidden,0)
SET_TRAP_CONFIGURATION(HAIL,Hidden,0)
SET_TRAP_CONFIGURATION(HAIL,TriggerType,2)
SET_TRAP_CONFIGURATION(LAVA,Hidden,0)

REM SET_OBJECT_CONFIGURATION(POTION_RED,Size_XY,128)
REM SET_OBJECT_CONFIGURATION(POTION_YELLOW,Size_XY,128)
REM SET_OBJECT_CONFIGURATION(POTION_GREEN,Size_XY,128)
REM SET_OBJECT_CONFIGURATION(POTION_PURPLE,Size_XY,128)
SET_OBJECT_CONFIGURATION(POTION_RED,Size_YZ,128)
SET_OBJECT_CONFIGURATION(POTION_YELLOW,Size_YZ,128)
SET_OBJECT_CONFIGURATION(POTION_GREEN,Size_YZ,128)
SET_OBJECT_CONFIGURATION(POTION_PURPLE,Size_YZ,128)

SET_OBJECT_CONFIGURATION(POTION_RED,MaximumSize,600)
SET_OBJECT_CONFIGURATION(POTION_YELLOW,MaximumSize,600)
SET_OBJECT_CONFIGURATION(POTION_GREEN,MaximumSize,600)
SET_OBJECT_CONFIGURATION(POTION_PURPLE,MaximumSize,600)

SET_CREATURE_CONFIGURATION(SKELETON,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(MONK,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(WIZARD,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(WITCH,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(SAMURAI,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(FAIRY,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(GIANT,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(THIEF,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(ARCHER,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(DWARFA,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(TUNNELLER,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(FLY,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(TROLL,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(ORC,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(SORCEROR,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(DEMONSPAWN,BaseSpeed,0)
SET_CREATURE_CONFIGURATION(BUG,BaseSpeed,0)
SET_CREATURE_INSTANCE(ARCHER,1,NULL,1)
SET_CREATURE_INSTANCE(WIZARD,2,NULL,1)

SET_BOX_TOOLTIP(0, "Bubble: A slow, unassuming bubble that packs an explosive punch.")
SET_BOX_TOOLTIP(1, "Rock Blast: A bouncing boulder that can deal a lot of damage.")
SET_BOX_TOOLTIP(2, "Embers: A burning flame that lingers and deals damage to anything that touches it.")
SET_BOX_TOOLTIP(3, "Lightning Ball: A sphere of shocking energy that homes in on your enemies.")

NEW_OBJECT_TYPE(BUBBLE_OBJ)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,Genre,DECORATION)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,AnimationID,BUBBLE)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,AnimationSpeed,64)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,MaximumSize,300)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,DestroyOnLava,1)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,DestroyOnLiquid,1)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,FallAcceleration,0)
SET_OBJECT_CONFIGURATION(BUBBLE_OBJ,Properties,12)

NEW_OBJECT_TYPE(ROCK_OBJ)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,Genre,DECORATION)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,AnimationID,921)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,AnimationSpeed,64)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,MaximumSize,300)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,DestroyOnLava,1)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,DestroyOnLiquid,1)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,FallAcceleration,0)
SET_OBJECT_CONFIGURATION(ROCK_OBJ,Properties,12)

NEW_OBJECT_TYPE(EMBER_OBJ)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,Genre,DECORATION)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,AnimationID,976)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,AnimationSpeed,64)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,MaximumSize,300)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,DestroyOnLava,1)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,DestroyOnLiquid,1)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,FallAcceleration,0)
SET_OBJECT_CONFIGURATION(EMBER_OBJ,Properties,12)

NEW_OBJECT_TYPE(LIGHTNINGBALL_OBJ)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,Genre,DECORATION)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,AnimationID,916)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,AnimationSpeed,64)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,MaximumSize,300)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,DestroyOnLava,1)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,DestroyOnLiquid,1)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,FallAcceleration,0)
SET_OBJECT_CONFIGURATION(LIGHTNINGBALL_OBJ,Properties,12)

SET_BOX_TOOLTIP(4, "Hint Crate")
SET_BOX_TOOLTIP(5, "Hint Crate")
SET_BOX_TOOLTIP(6, "Hint Crate")
SET_BOX_TOOLTIP(7, "Hint Crate")

ADD_CREATURE_TO_LEVEL(PLAYER0,SKELETON,1,1,1,4000)
ADD_CREATURE_TO_LEVEL(PLAYER0,SKELETON,2,1,1,4000)
ADD_CREATURE_TO_LEVEL(PLAYER0,SKELETON,3,1,1,4000)
REVEAL_MAP_RECT(PLAYER0,130,166,27,3)

QUICK_OBJECTIVE(1,"Welcome Keeper. In this special realm the dark gods have presented you a challenge. You have three chances to answer five questions, and if you succeed, you will gain a permenant reward.",ALL_PLAYERS)

SET_TIMER(PLAYER0,TIMER0)
    
IF(PLAYER0,TIMER0 >= 200)
    SET_FLAG(PLAYER_GOOD,FLAG0,1)
ENDIF

REM Set random questions in each section
SET_FLAG(PLAYER_GOOD,FLAG1,DRAWFROM(5~8))
SET_FLAG(PLAYER_GOOD,FLAG2,DRAWFROM(1~4))
SET_FLAG(PLAYER_GOOD,FLAG3,3)
REM SET_FLAG(PLAYER_GOOD,FLAG3,DRAWFROM(1~4))
SET_FLAG(PLAYER_GOOD,FLAG4,DRAWFROM(1~3))
SET_FLAG(PLAYER_GOOD,FLAG5,DRAWFROM(1~2))

DISPLAY_VARIABLE(PLAYER0, SKELETON)

IF(PLAYER0,SKELETON == 0)
    HEART_LOST_QUICK_OBJECTIVE(2,"Disappointing. Perhaps you should brush up on your knowledge and try again.",ALL_PLAYERS)
    LOSE_GAME
ENDIF


IF(PLAYER3,FLAG0 == 1)
    NEXT_COMMAND_REUSABLE
    QUICK_INFORMATION(7,"Incorrect. Try again.")
    NEXT_COMMAND_REUSABLE
    SET_FLAG(PLAYER3,FLAG0,0)
ENDIF

IF(PLAYER3,FLAG1 == 1)
    NEXT_COMMAND_REUSABLE
    QUICK_OBJECTIVE(8,"Correct. On to the next question.")
    NEXT_COMMAND_REUSABLE
    SET_FLAG(PLAYER3,FLAG1,0)
ENDIF

REM ------------------------------------------------------
REM   ___  _   _ _____ ____ _____ ___ ___  _   _   _ 
REM  / _ \| | | | ____/ ___|_   _|_ _/ _ \| \ | | / |
REM | | | | | | |  _| \___ \ | |  | | | | |  \| | | |
REM | |_| | |_| | |___ ___) || |  | | |_| | |\  | | |
REM  \__\_\\___/|_____|____/ |_| |___\___/|_| \_| |_|
REM
REM ------------------------------------------------------

IF(PLAYER_GOOD,FLAG0 == 1)
    REVEAL_MAP_RECT(PLAYER0,130,157,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,145,15,3)
    PLAY_MESSAGE(PLAYER0,SOUND,37)
    CREATE_EFFECT_AT_POS(48,130,172)
    IF(PLAYER_GOOD,FLAG1 == 5)
        QUICK_OBJECTIVE(3,"Question One. Which colour was the enemy Keeper in Lushmeadow-on-Down?",5)
        IF_ACTION_POINT(4,PLAYER0)
            REM PLAY_MESSAGE(PLAYER0,SOUND,160)
            CREATE_EFFECT(53,4)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,2)
            ENDIF
        ENDIF
        IF_ACTION_POINT(5,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,5)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[5],1)
            CHANGE_SLAB_TYPE(43,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(6,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,6)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[6],1)
            CHANGE_SLAB_TYPE(45,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG1 == 6)
        QUICK_OBJECTIVE(4,"Question One. Which colour was the enemy Keeper in Snuggledell?",5)
        IF_ACTION_POINT(4,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,4)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[4],1)
            CHANGE_SLAB_TYPE(41,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(5,PLAYER0)
            CREATE_EFFECT(53,5)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,2)
            ENDIF
        ENDIF
        IF_ACTION_POINT(6,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,6)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[6],1)
            CHANGE_SLAB_TYPE(45,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG1 == 7)
        QUICK_OBJECTIVE(5,"Question One. Which colour was the enemy Keeper in Wishvale?",5)
        IF_ACTION_POINT(4,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,4)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[4],1)
            CHANGE_SLAB_TYPE(41,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(5,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,5)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[5],1)
            CHANGE_SLAB_TYPE(43,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(6,PLAYER0)
            CREATE_EFFECT(53,6)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,2)
            ENDIF
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG1 == 8)
        QUICK_OBJECTIVE(6,"Question One. Which colour was the enemy Keeper in Tickle?",5)
        IF_ACTION_POINT(4,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,4)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[4],1)
            CHANGE_SLAB_TYPE(41,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(5,PLAYER0)
            CREATE_EFFECT(53,5)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,2)
            ENDIF
        ENDIF
        IF_ACTION_POINT(6,PLAYER0)
            REM Eruption effect, kill creature
            CREATE_EFFECT(43,6)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[6],1)
            CHANGE_SLAB_TYPE(45,52,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
ENDIF

REM ------------------------------------------------------
REM   ___  _   _ _____ ____ _____ ___ ___  _   _   ____   
REM  / _ \| | | | ____/ ___|_   _|_ _/ _ \| \ | | |___ \  
REM | | | | | | |  _| \___ \ | |  | | | | |  \| |   __) | 
REM | |_| | |_| | |___ ___) || |  | | |_| | |\  |  / __/  
REM  \__\_\\___/|_____|____/ |_| |___\___/|_| \_| |_____| 
REM                                                       
REM ------------------------------------------------------

IF(PLAYER_GOOD,FLAG0 == 2)
    MOVE_CREATURE(PLAYER0,ANY_CREATURE,ANYWHERE,4,31)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,3,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,2,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,1,30)
    CONCEAL_MAP_RECT(PLAYER0,130,157,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,169,27,9)
    REVEAL_MAP_RECT(PLAYER0,130,136,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,124,15,3)
    PLAY_MESSAGE(PLAYER0,SOUND,37)
    CREATE_EFFECT_AT_POS(48,130,157)
    IF(PLAYER_GOOD,FLAG2 == 1)
        QUICK_OBJECTIVE(9,"Question Two. Which of these heroes was introduced in Tickle?",36)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,MONK,11,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,WIZARD,12,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,WITCH,13,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SAMURAI,14,1,1,4000)
        IF_ACTION_POINT(7,PLAYER0)
            CREATE_EFFECT(53,7)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,ANYWHERE,4)
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,3)
            ENDIF
        ENDIF
        IF_ACTION_POINT(8,PLAYER0)
            CREATE_EFFECT(43,8)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[8],1)
            CHANGE_SLAB_TYPE(42,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[12],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(9,PLAYER0)
            CREATE_EFFECT(43,9)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[9],1)
            CHANGE_SLAB_TYPE(44,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[13],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(10,PLAYER0)
            CREATE_EFFECT(43,10)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[10],1)
            CHANGE_SLAB_TYPE(46,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[14],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG2 == 2)
        QUICK_OBJECTIVE(10,"Question Two. Which of these heroes was introduced in Wishvale?",36)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FAIRY,11,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,MONK,12,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,WIZARD,13,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,GIANT,14,1,1,4000)
        IF_ACTION_POINT(7,PLAYER0)
            CREATE_EFFECT(43,7)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[7],1)
            CHANGE_SLAB_TYPE(40,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[11],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(8,PLAYER0)
            CREATE_EFFECT(43,8)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[8],1)
            CHANGE_SLAB_TYPE(42,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[12],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(9,PLAYER0)
            CREATE_EFFECT(53,9)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,ANYWHERE,4)
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,3)
            ENDIF
        ENDIF
        IF_ACTION_POINT(10,PLAYER0)
            CREATE_EFFECT(43,10)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[10],1)
            CHANGE_SLAB_TYPE(46,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[14],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG2 == 3)
        QUICK_OBJECTIVE(11,"Question Two. Converting which creature lets you create Arrow traps?",36)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,11,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,12,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DWARFA,13,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,14,1,1,4000)
        IF_ACTION_POINT(7,PLAYER0)
            CREATE_EFFECT(43,7)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[7],1)
            CHANGE_SLAB_TYPE(40,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[11],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(8,PLAYER0)
            CREATE_EFFECT(53,8)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,ANYWHERE,4)
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,3)
            ENDIF
        ENDIF
        IF_ACTION_POINT(9,PLAYER0)
            CREATE_EFFECT(43,9)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[9],1)
            CHANGE_SLAB_TYPE(44,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[13],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(10,PLAYER0)
            CREATE_EFFECT(43,10)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[10],1)
            CHANGE_SLAB_TYPE(46,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[14],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG2 == 4)
        QUICK_OBJECTIVE(12,"Question Two. Converting which creature lets you create Freeze traps?",36)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,11,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DWARFA,12,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,WITCH,13,1,1,4000)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,WIZARD,14,1,1,4000)
        IF_ACTION_POINT(7,PLAYER0)
            CREATE_EFFECT(43,7)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[7],1)
            CHANGE_SLAB_TYPE(40,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[11],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(8,PLAYER0)
            CREATE_EFFECT(43,8)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[8],1)
            CHANGE_SLAB_TYPE(42,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[12],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(9,PLAYER0)
            CREATE_EFFECT(43,9)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[9],1)
            CHANGE_SLAB_TYPE(44,46,LAVA)
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,AT_ACTION_POINT[13],1)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(10,PLAYER0)
            CREATE_EFFECT(53,10)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,ANYWHERE,4)
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,3)
            ENDIF
        ENDIF
    ENDIF
ENDIF

REM ------------------------------------------------------
REM   ___  _   _ _____ ____ _____ ___ ___  _   _   _____  
REM  / _ \| | | | ____/ ___|_   _|_ _/ _ \| \ | | |___ /  
REM | | | | | | |  _| \___ \ | |  | | | | |  \| |   |_ \  
REM | |_| | |_| | |___ ___) || |  | | |_| | |\  |  ___) | 
REM  \__\_\\___/|_____|____/ |_| |___\___/|_| \_| |____/  
REM                                                       
REM ------------------------------------------------------

IF(PLAYER_GOOD,FLAG0 == 3)
    MOVE_CREATURE(PLAYER0,ANY_CREATURE,ANYWHERE,4,31)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,3,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,2,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,1,30)
    CONCEAL_MAP_RECT(PLAYER0,130,136,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,115,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,103,15,3)
    PLAY_MESSAGE(PLAYER0,SOUND,37)
    CREATE_EFFECT_AT_POS(48,130,136)
    IF(PLAYER_GOOD,FLAG3 == 1)
        QUICK_OBJECTIVE(13,"Question Three. In Moonbrush Wood, what colour was the Storm Wizard?",37)
        ADD_OBJECT_TO_LEVEL(POTION_RED, 32,5)
        ADD_OBJECT_TO_LEVEL(POTION_YELLOW, 33,5)
        ADD_OBJECT_TO_LEVEL(POTION_GREEN, 34,5)
        ADD_OBJECT_TO_LEVEL(POTION_PURPLE, 35,5)
        IF_ACTION_POINT(15,PLAYER0)
            CREATE_EFFECT(43,15)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[15],1)
            CHANGE_SLAB_TYPE(40,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(16,PLAYER0)
            CREATE_EFFECT(53,16)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,4)
            ENDIF
        ENDIF
        IF_ACTION_POINT(17,PLAYER0)
            CREATE_EFFECT(43,17)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[17],1)
            CHANGE_SLAB_TYPE(44,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(18,PLAYER0)
            CREATE_EFFECT(43,18)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[18],1)
            CHANGE_SLAB_TYPE(46,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG3 == 2)
        QUICK_OBJECTIVE(14,"Question Three. Which of these is not a new creature spell?",37)
        ADD_OBJECT_TO_LEVEL(BUBBLE_OBJ, 32,1)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 32, 0)
        ADD_OBJECT_TO_LEVEL(ROCK_OBJ, 33,1)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 33, 1)
        ADD_OBJECT_TO_LEVEL(EMBER_OBJ, 34,1)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 34, 2)
        ADD_OBJECT_TO_LEVEL(LIGHTNINGBALL_OBJ, 35,1)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 35, 3)
        IF(PLAYER0,BOX0_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(15,"Bubble: A slow, unassuming bubble that packs an explosive punch.",ALL_PLAYERS)
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 32, 0)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX0_ACTIVATED,0)
        ENDIF
        IF(PLAYER0,BOX1_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(16,"Rock Blast: A bouncing boulder that can deal a lot of damage.",ALL_PLAYERS)
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 33, 1)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX1_ACTIVATED,0)
        ENDIF
        IF(PLAYER0,BOX2_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(17,"Embers: A burning flame that lingers and deals damage to anything that touches it.",ALL_PLAYERS)
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 34, 2)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX2_ACTIVATED,0)
        ENDIF
        IF(PLAYER0,BOX3_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(18,"Lightning Ball: A sphere of shocking energy that homes in on your enemies.",ALL_PLAYERS)
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 35, 3)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX3_ACTIVATED,0)
        ENDIF
        IF_ACTION_POINT(15,PLAYER0)
            CREATE_EFFECT(43,15)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[15],1)
            CHANGE_SLAB_TYPE(40,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(16,PLAYER0)
            CREATE_EFFECT(43,16)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[16],1)
            CHANGE_SLAB_TYPE(42,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(17,PLAYER0)
            CREATE_EFFECT(43,17)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[17],1)
            CHANGE_SLAB_TYPE(44,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(18,PLAYER0)
            CREATE_EFFECT(53,18)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,4)
            ENDIF
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG3 == 3)
        QUICK_OBJECTIVE(19,"Question Three. Which of these was not a hint crate in a previous level?",37)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 32, 4)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 33, 5)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 34, 6)
        ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 35, 7)
        IF(PLAYER0,BOX4_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(20,"Look to the distance where you wouldn't look before. Can you hear it?",ALL_PLAYERS) REM Level 1
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 32, 4)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX4_ACTIVATED,0)
        ENDIF
        IF(PLAYER0,BOX5_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(21,"Show you are strong enough already.",ALL_PLAYERS) REM Level 3
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 33, 5)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX5_ACTIVATED,0)
        ENDIF
        IF(PLAYER0,BOX6_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(22,"Find and acquire the Grand Library. It will tell you where to go next.",ALL_PLAYERS) REM FAKE
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 34, 6)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX6_ACTIVATED,0)
        ENDIF
        IF(PLAYER0,BOX7_ACTIVATED > 0)
            NEXT_COMMAND_REUSABLE
            QUICK_INFORMATION(23,"Find the cavern that the ladies speak of...",ALL_PLAYERS) REM Level 6
            NEXT_COMMAND_REUSABLE
            ADD_OBJECT_TO_LEVEL(SPECBOX_CUSTOM, 35, 7)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0,BOX7_ACTIVATED,0)
        ENDIF
        IF_ACTION_POINT(15,PLAYER0)
            CREATE_EFFECT(43,15)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[15],1)
            CHANGE_SLAB_TYPE(40,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(16,PLAYER0)
            CREATE_EFFECT(43,16)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[16],1)
            CHANGE_SLAB_TYPE(42,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(17,PLAYER0)
            CREATE_EFFECT(53,17)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,4)
            ENDIF
        ENDIF
        IF_ACTION_POINT(18,PLAYER0)
            CREATE_EFFECT(43,18)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[18],1)
            CHANGE_SLAB_TYPE(46,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
    IF(PLAYER_GOOD,FLAG3 == 4)
        QUICK_OBJECTIVE(24,"Question Three. Which of these was not a tileset in Moonbrush Wood?",37)
        CHANGE_SLAB_TYPE(40,37,TWINS_WALL)
        CHANGE_SLAB_OWNER(40,37,PLAYER1)
        SET_TEXTURE(PLAYER1,11) REM Swamp Serpent
        CHANGE_SLAB_TYPE(42,37,TWINS_WALL)
        CHANGE_SLAB_OWNER(42,37,PLAYER2)
        SET_TEXTURE(PLAYER2,8) REM Desert Tomb
        CHANGE_SLAB_TYPE(44,37,TWINS_WALL)
        CHANGE_SLAB_OWNER(44,37,PLAYER3)
        SET_TEXTURE(PLAYER3,9) REM Gypsum
        CHANGE_SLAB_TYPE(46,37,TWINS_WALL)
        CHANGE_SLAB_OWNER(46,37,PLAYER_GOOD)
        SET_TEXTURE(PLAYER_GOOD,4) REM Stone Face
        IF_ACTION_POINT(15,PLAYER0)
            CREATE_EFFECT(43,15)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[15],1)
            CHANGE_SLAB_TYPE(40,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(16,PLAYER0)
            CREATE_EFFECT(43,16)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[16],1)
            CHANGE_SLAB_TYPE(42,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
        IF_ACTION_POINT(17,PLAYER0)
            CREATE_EFFECT(53,17)
            SET_FLAG(PLAYER3,FLAG1,1) REM "Correct. On to the next question.""
            SET_TIMER(PLAYER0,TIMER1)
            IF(PLAYER0,TIMER1 >= 100)
                SET_FLAG(PLAYER_GOOD,FLAG0,4)
            ENDIF
        ENDIF
        IF_ACTION_POINT(18,PLAYER0)
            CREATE_EFFECT(43,18)
            KILL_CREATURE(PLAYER0,ANY_CREATURE,AT_ACTION_POINT[18],1)
            CHANGE_SLAB_TYPE(46,38,LAVA)
            SET_FLAG(PLAYER3,FLAG0,1) REM "Incorrect. Try again."
        ENDIF
    ENDIF
ENDIF

REM ------------------------------------------------------
REM   ___  _   _ _____ ____ _____ ___ ___  _   _   _  _   
REM  / _ \| | | | ____/ ___|_   _|_ _/ _ \| \ | | | || |  
REM | | | | | | |  _| \___ \ | |  | | | | |  \| | | || |_ 
REM | |_| | |_| | |___ ___) || |  | | |_| | |\  | |__   _|
REM  \__\_\\___/|_____|____/ |_| |___\___/|_| \_|    |_|  
REM                                                       
REM ------------------------------------------------------

IF(PLAYER_GOOD,FLAG0 == 4)
    MOVE_CREATURE(PLAYER0,ANY_CREATURE,ANYWHERE,4,31)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,3,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,2,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,1,30)
    CONCEAL_MAP_RECT(PLAYER0,130,115,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,94,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,82,15,3)
    PLAY_MESSAGE(PLAYER0,SOUND,37)
    CREATE_EFFECT_AT_POS(48,130,115)
    IF(PLAYER_GOOD,FLAG4 == 1)
    QUICK_OBJECTIVE(25,"Question Four. ",38)
    ENDIF
    IF(PLAYER_GOOD,FLAG4 == 2)
    QUICK_OBJECTIVE(26,"Question Four. ",38)
    ENDIF
    IF(PLAYER_GOOD,FLAG4 == 3)
    QUICK_OBJECTIVE(27,"Question Four. ",38)
    ENDIF
ENDIF

REM ------------------------------------------------------
REM   ___  _   _ _____ ____ _____ ___ ___  _   _   ____   
REM  / _ \| | | | ____/ ___|_   _|_ _/ _ \| \ | | | ___|  
REM | | | | | | |  _| \___ \ | |  | | | | |  \| | |___ \  
REM | |_| | |_| | |___ ___) || |  | | |_| | |\  |  ___) | 
REM  \__\_\\___/|_____|____/ |_| |___\___/|_| \_| |____/  
REM                                                       
REM ------------------------------------------------------


IF(PLAYER_GOOD,FLAG0 == 5)
    MOVE_CREATURE(PLAYER0,ANY_CREATURE,ANYWHERE,4,31)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,3,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,2,30)
    MOVE_CREATURE(PLAYER0,SKELETON,AT_ACTION_POINT[31],1,1,30)
    CONCEAL_MAP_RECT(PLAYER0,130,94,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,73,39,21)
    REVEAL_MAP_RECT(PLAYER0,130,61,15,3)
    PLAY_MESSAGE(PLAYER0,SOUND,37)
    CREATE_EFFECT_AT_POS(48,130,94)
    IF(PLAYER_GOOD,FLAG5 == 1)
    QUICK_OBJECTIVE(28,"Question Five. ",39)
    ENDIF
    IF(PLAYER_GOOD,FLAG5 == 2)
    QUICK_OBJECTIVE(29,"Question Five. ",39)
    ENDIF
ENDIF

REM ------------------------------------------------------------------
REM  _____ ___ _   _    _    _        ____ _   _  ___ ___ ____ _____ 
REM |  ___|_ _| \ | |  / \  | |      / ___| | | |/ _ |_ _/ ___| ____|
REM | |_   | ||  \| | / _ \ | |     | |   | |_| | | | | | |   |  _|  
REM |  _|  | || |\  |/ ___ \| |___  | |___|  _  | |_| | | |___| |___ 
REM |_|   |___|_| \_/_/   \_|_____|  \____|_| |_|\___|___\____|_____|
REM                                                                  
REM ------------------------------------------------------------------

IF(PLAYER_GOOD,FLAG0 == 6)
    CONCEAL_MAP_RECT(PLAYER0,130,73,37,19)
    REVEAL_MAP_RECT(PLAYER0,130,55,45,15)
    REVEAL_MAP_RECT(PLAYER0,130,46,15,3)
    PLAY_MESSAGE(PLAYER0,SOUND,37)
    CREATE_EFFECT_AT_POS(48,130,94)
ENDIF


