REM Basic parameters

    LEVEL_VERSION(1)
    SET_GENERATE_SPEED(400)
    
    RUN_AFTER_VICTORY(1)

    START_MONEY(PLAYER0,12500)
    START_MONEY(PLAYER1,10000000)

    REM Player 0 gets less since there's a lot of neutrals
    MAX_CREATURES(PLAYER0, 20)
    REM Blue gets a few less creatures to start with but gets boosted lated dependant on timer3
    MAX_CREATURES(PLAYER1,12)

    COMPUTER_PLAYER(PLAYER1, 9)

    REM The heart room guards
    COMPUTER_PLAYER(PLAYER2, ROAMING)
    ALLY_PLAYERS(PLAYER1,PLAYER2,3)
    SET_PLAYER_COLOR(PLAYER2, BLUE)

REM Initial music
    
    SET_MUSIC("ec_headquarters.mp3")

REM Initial darkness level

    REM Change the ambient light
    SET_GAME_RULE(GlobalAmbientLight,8)

REM Creature Pool

    ADD_CREATURE_TO_POOL(FLY,20)
    ADD_CREATURE_TO_POOL(TROLL,20)
    ADD_CREATURE_TO_POOL(SPIDER,20)
    ADD_CREATURE_TO_POOL(TENTACLE,20)
    ADD_CREATURE_TO_POOL(SORCEROR,20)
    ADD_CREATURE_TO_POOL(ORC,20)
    ADD_CREATURE_TO_POOL(BILE_DEMON,20)
    ADD_CREATURE_TO_POOL(MAIDEN,20)

    CREATURE_AVAILABLE(ALL_PLAYERS,FLY,1,0)
    CREATURE_AVAILABLE(ALL_PLAYERS,TROLL,1,0)
    CREATURE_AVAILABLE(ALL_PLAYERS,SPIDER,1,0)
    CREATURE_AVAILABLE(ALL_PLAYERS,TENTACLE,1,0)
    CREATURE_AVAILABLE(ALL_PLAYERS,SORCEROR,1,0)
    CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,0)

    REM Only for red
    CREATURE_AVAILABLE(PLAYER0,MAIDEN,1,0)
    REM Blue has 3 neutral bile demons in his base, but can't get any more than those 3
    CREATURE_AVAILABLE(PLAYER0,BILE_DEMON,1,0)

    REM These are only for blue so he has some threats on lava - force 2 of each
    ADD_CREATURE_TO_POOL(DRAGON,4)
    ADD_CREATURE_TO_POOL(DEMONSPAWN,4)

    CREATURE_AVAILABLE(PLAYER1,DRAGON,1,2)
    CREATURE_AVAILABLE(PLAYER1,DEMONSPAWN,1,2)

REM Rooms

    ROOM_AVAILABLE(ALL_PLAYERS,TREASURE,1,1)
    ROOM_AVAILABLE(ALL_PLAYERS,LAIR,1,1)
    ROOM_AVAILABLE(ALL_PLAYERS,GARDEN,1,1)
    ROOM_AVAILABLE(ALL_PLAYERS,TRAINING,1,1)
    ROOM_AVAILABLE(ALL_PLAYERS,RESEARCH,1,1)
    ROOM_AVAILABLE(ALL_PLAYERS,GUARD_POST,1,0)
    ROOM_AVAILABLE(ALL_PLAYERS,WORKSHOP,2,0)
    ROOM_AVAILABLE(ALL_PLAYERS,BARRACKS,1,0)
    ROOM_AVAILABLE(ALL_PLAYERS,TEMPLE,1,0)
    ROOM_AVAILABLE(ALL_PLAYERS,GRAVEYARD,1,0)

    REM Available for the player when claimed from blue
    ROOM_AVAILABLE(PLAYER0,PRISON,3,0)
    ROOM_AVAILABLE(PLAYER0,TORTURE,3,0)

    REM Only for blue
    ROOM_AVAILABLE(PLAYER1,PRISON,1,0)
    ROOM_AVAILABLE(PLAYER1,TORTURE,1,0)

REM Magic

    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HAND,1,1)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SLAP,1,1)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_POSSESS,1,1)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_IMP,1,1)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SIGHT,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SPEED,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_OBEY,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CALL_TO_ARMS,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CONCEAL,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HOLD_AUDIENCE,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CAVE_IN,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HEAL_CREATURE,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_PROTECT,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_DISEASE,1,0)
    MAGIC_AVAILABLE(ALL_PLAYERS,POWER_DESTROY_WALLS,1,0)

    REM Player gets freeze instead of chicken
    MAGIC_AVAILABLE(PLAYER0,POWER_FREEZE,1,0)
    REM SET_POWER_CONFIGURATION(POWER_FREEZE,Cost,0,9)
    SET_POWER_CONFIGURATION(POWER_FREEZE,PanelTabIndex,13,0)

REM Workshop

    TRAP_AVAILABLE(ALL_PLAYERS,POISON_GAS,1,0)
    TRAP_AVAILABLE(ALL_PLAYERS,LIGHTNING,1,0)
    TRAP_AVAILABLE(ALL_PLAYERS,BOULDER,1,0)
    TRAP_AVAILABLE(ALL_PLAYERS,WORD_OF_POWER,1,0)

    DOOR_AVAILABLE(ALL_PLAYERS,WOOD,1,0)
    DOOR_AVAILABLE(ALL_PLAYERS,STEEL,1,0)
    DOOR_AVAILABLE(ALL_PLAYERS,MAGIC,1,0)

REM Flags

    REM Flag1 is whether the ground is turning into lava or path next
    REM Flag 0 makes lava
    REM Flag 1 makes ground
    SET_FLAG(PLAYER0, FLAG1, 1)

    REM Flag2 determines if currently the environment is changing
    SET_FLAG(PLAYER0, FLAG2, 0)

    REM FLag3 handles cleanup when editing mode is over
    SET_FLAG(PLAYER0, FLAG3, 0)

    REM Flag4 is the amount of steps of lava change
    SET_FLAG(PLAYER0, FLAG4, 3)

    REM Timer that starts the lava back and forth, with initial settings
    SET_TIMER(PLAYER0, TIMER0)
    DISPLAY_COUNTDOWN(PLAYER0, TIMER0, 3600, 1)

    REM TIMER1 is responsible for changing the tiles over a few seconds. Doesn't start at map start.

    REM Timer2 creates the land bridge for the entrance

    REM Timer3 that globally tracks when parties spawn, when the enemy attacks, etc
    SET_TIMER(PLAYER0, TIMER3)

    REM Flag7 and timer7 track the heroes spawning top right

REM Special boxes

    SET_BOX_TOOLTIP(1, "Lava-Immune Maidens")

    IF (PLAYER0, BOX1_ACTIVATED > 0)
        REM Your creatures have been blessed with experience
        PLAY_MESSAGE(PLAYER0,SPEECH,83)

        QUICK_MESSAGE(8, "Your Maidens have also gained a level.", MAIDEN)
        QUICK_MESSAGE(7, "Maidens can now walk on lava!", MAIDEN)
        LEVEL_UP_PLAYERS_CREATURES(PLAYER0, MAIDEN, 1)
        SET_CREATURE_CONFIGURATION(MAIDEN, HurtByLava, 0)
    ENDIF

REM Countdown handling

    REM When the timer hits 3600, start editing mode
    IF (PLAYER0, TIMER0 >= 3600)
        IF (PLAYER0, FLAG2 == 0)
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG2, 1)
        ENDIF
    ENDIF

    REM The level is changing
    IF (PLAYER0, FLAG2 == 1)

        REM The level is turning into dirt mode
        IF (PLAYER0, FLAG1 == 0)

            NEXT_COMMAND_REUSABLE
            SET_MUSIC("ec_headquarters.mp3")

            REM This timer value needs to match the other ones - represents the global timer
            IF (PLAYER0, TIMER0 >= 3600)
                NEXT_COMMAND_REUSABLE
                SET_TIMER(PLAYER0, TIMER1)

                NEXT_COMMAND_REUSABLE
                DISPLAY_COUNTDOWN(PLAYER0, TIMER0, 3600, 1)

                NEXT_COMMAND_REUSABLE
                SET_TIMER(PLAYER0, TIMER0)
            ENDIF

            REM ------------------------------------------------------------
            REM First step of turning lava into dirt
            REM ------------------------------------------------------------

            IF (PLAYER0, TIMER1 >= 5)
                IF (PLAYER0, FLAG4 == 3)

                    REM Change inner area -  A dummy check, this is always true to make this collapsible
                    IF (PLAYER0, TIMER3 > 0)

                        REM This is to make sure this doesn't all happen at once and lag the game
                        IF (PLAYER0, TIMER1 >= 6)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,37,PATH,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 7)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,40,PATH,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 8)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,45,PATH,NONE)
                        ENDIF

                        REM This contains the flags etc
                        IF (PLAYER0, TIMER1 >= 10)
                            REM Sound
                            NEXT_COMMAND_REUSABLE
                            PLAY_MESSAGE(PLAYER0, SOUND, 147)

                            REM The gems - inner step
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,57, PATH, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,58, PATH, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,58, PATH, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,59, PATH, NONE)
                            
                            REM Change the ambient light
                            NEXT_COMMAND_REUSABLE
                            SET_GAME_RULE(GlobalAmbientLight,9)

                            REM Set the step counter
                            NEXT_COMMAND_REUSABLE
                            SET_FLAG(PLAYER0, FLAG4, 2)
                        ENDIF

                    ENDIF

                ENDIF
            ENDIF

            REM ------------------------------------------------------------
            REM Second step of turning lava into dirt
            REM ------------------------------------------------------------

            IF (PLAYER0, TIMER1 >= 25)
                IF (PLAYER0, FLAG4 == 2)

                    REM Change middle area -  A dummy check, this is always true to make this collapsible
                    IF(PLAYER0,TIMER3>0)

                        IF (PLAYER0, TIMER1 >= 26)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,40,PATH,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 27)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,47,PATH,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 28)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,50,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,49,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,30,PATH,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 29)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,45,PATH,NONE)

                        ENDIF

                        REM This contains the flags etc
                        IF (PLAYER0, TIMER1 >= 31)
                            REM Sound
                            NEXT_COMMAND_REUSABLE
                            PLAY_MESSAGE(PLAYER0, SOUND, 148)

                            REM The gems - outer step
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,56, PATH, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,57, PATH, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,57, PATH, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(68,58, PATH, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,58, PATH, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,59, PATH, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,59, PATH, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,60, PATH, NONE)

                            REM Change the ambient light
                            NEXT_COMMAND_REUSABLE
                            SET_GAME_RULE(GlobalAmbientLight,8)

                            NEXT_COMMAND_REUSABLE
                            SET_FLAG(PLAYER0, FLAG4, 1)
                        ENDIF

                    ENDIF

                ENDIF
            ENDIF

            REM ------------------------------------------------------------
            REM Third step of turning lava into dirt
            REM ------------------------------------------------------------

            IF (PLAYER0, TIMER1 >= 45)
                IF (PLAYER0, FLAG4 == 1)

                    REM Change outer area -  A dummy check, this is always true to make this collapsible
                    IF(PLAYER0,TIMER3>0)

                        IF (PLAYER0, TIMER1 >= 45)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,19,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,20,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,21,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,21,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,21,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,22,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,22,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,22,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,22,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,23,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,23,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,23,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,23,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,23,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,24,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,24,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,24,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,24,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,25,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,25,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,26,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,26,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,27,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,28,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,26,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,26,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,27,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,27,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,27,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,28,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,28,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(8,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,39,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,40,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,41,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,42,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(8,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,44,PATH,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 46)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,20,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,21,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,22,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,22,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,23,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,24,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,25,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,26,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,27,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,28,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,28,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,28,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,29,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,30,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,31,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,32,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,33,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,34,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,35,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,36,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,37,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,38,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,43,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(66,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(67,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(74,44,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(66,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(67,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(73,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(74,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(75,45,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(66,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(67,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(73,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(74,46,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,47,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,48,PATH,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,47,PATH,NONE)
                        ENDIF
                        
                        REM This contains the flags etc
                        IF (PLAYER0, TIMER1 >= 49)
                            ADD_EFFECT_GENERATOR_TO_LEVEL(EFFECTGENERATOR_ENTRANCE_ICE, 13, 8)
                            ADD_EFFECT_GENERATOR_TO_LEVEL(EFFECTGENERATOR_ENTRANCE_ICE, 14, 8)
                            ADD_EFFECT_GENERATOR_TO_LEVEL(EFFECTGENERATOR_ENTRANCE_ICE, 15, 8)

                            REM Sound
                            NEXT_COMMAND_REUSABLE
                            PLAY_MESSAGE(PLAYER0, SOUND, 147)

                            REM Change the ambient light
                            NEXT_COMMAND_REUSABLE
                            SET_GAME_RULE(GlobalAmbientLight,8)

                            NEXT_COMMAND_REUSABLE
                            SET_FLAG(PLAYER0, FLAG4, 0)
                        ENDIF

                    ENDIF

                ENDIF
            ENDIF

            IF (PLAYER0, TIMER1 >= 50)
                REM After changing to dirt is done -> set the next rotation to lava mode
                NEXT_COMMAND_REUSABLE
                SET_FLAG(PLAYER0, FLAG3, 1)
            ENDIF
        ENDIF


        REM The level is turning into lava mode
        IF (PLAYER0, FLAG1 == 1)

            NEXT_COMMAND_REUSABLE
            SET_MUSIC("ec_bryyo.mp3")

            IF (PLAYER0, TIMER0 >= 3600)
                NEXT_COMMAND_REUSABLE
                SET_TIMER(PLAYER0, TIMER1)

                NEXT_COMMAND_REUSABLE
                DISPLAY_COUNTDOWN(PLAYER0, TIMER0, 3600, 1)

                NEXT_COMMAND_REUSABLE
                SET_TIMER(PLAYER0, TIMER0)
            ENDIF

            REM ------------------------------------------------------------
            REM First step of turning dirt into lava
            REM ------------------------------------------------------------

            IF (PLAYER0, TIMER1 >= 5)
                IF (PLAYER0, FLAG4 == 3)

                    REM Change inner area -  A dummy check, this is always true to make this collapsible
                    IF(PLAYER0,TIMER3>0)

                        IF (PLAYER0, TIMER1 >= 5)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,39,LAVA,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 6)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,45,LAVA,NONE)
                        ENDIF

                        REM Flags and stuff
                        IF (PLAYER0, TIMER1 >= 8)
                            REM A one-time message when this happens the first time
                            QUICK_INFORMATION(9, "In regular intervals, the lava hardens and becomes solid ground. But be wary, Keeper. After the same amount of time, it will become lava again!", 12)
                            USE_POWER_AT_LOCATION(PLAYER0, 12, POWER_SIGHT, 9, 1)

                            REM Sound
                            NEXT_COMMAND_REUSABLE
                            PLAY_MESSAGE(PLAYER0, SOUND, 148)

                            REM The middle lake

                            REM The gems - inner step
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,57, LAVA, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,58, LAVA, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,58, LAVA, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,59, LAVA, NONE)

                            REM Change the ambient light
                            NEXT_COMMAND_REUSABLE
                            SET_GAME_RULE(GlobalAmbientLight,8)

                            NEXT_COMMAND_REUSABLE
                            SET_FLAG(PLAYER0, FLAG4, 2)
                        ENDIF

                    ENDIF

                ENDIF
            ENDIF

            REM ------------------------------------------------------------
            REM Second step of turning dirt into lava
            REM ------------------------------------------------------------

            IF (PLAYER0, TIMER1 >= 25)
                IF (PLAYER0, FLAG4 == 2)
                    
                    REM Change middle area -  A dummy check, this is always true to make this collapsible
                    IF(PLAYER0,TIMER3>0)

                        IF (PLAYER0, TIMER1 >= 25)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(19,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(20,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,45,LAVA,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 26)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(21,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(22,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(23,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(24,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(28,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(29,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(25,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(26,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(27,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,45,LAVA,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 27)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,50,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,49,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(30,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(31,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(32,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(33,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(34,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(35,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,32,LAVA,NONE)
                        ENDIF

                        IF (PLAYER0, TIMER1 >= 28)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,45,LAVA,NONE)
                        ENDIF

                        REM Flags
                        IF (PLAYER0, TIMER1 >= 30)
                            REM Sound
                            NEXT_COMMAND_REUSABLE
                            PLAY_MESSAGE(PLAYER0, SOUND, 147)

                            REM The middle lake

                            REM The gems - outer step
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,56, LAVA, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,57, LAVA, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,57, LAVA, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(68,58, LAVA, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,58, LAVA, NONE)

                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,59, LAVA, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,59, LAVA, NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,60, LAVA, NONE)

                            REM Change the ambient light
                            NEXT_COMMAND_REUSABLE
                            SET_GAME_RULE(GlobalAmbientLight,9)

                            NEXT_COMMAND_REUSABLE
                            SET_FLAG(PLAYER0, FLAG4, 1)
                        ENDIF

                    ENDIF

                ENDIF
            ENDIF

            REM ------------------------------------------------------------
            REM Third step of turning dirt into lava
            REM ------------------------------------------------------------

            IF (PLAYER0, TIMER1 >= 45)
                IF (PLAYER0, FLAG4 == 1)

                    REM Change outer area -  A dummy check, this is always true to make this collapsible
                    IF(PLAYER0,TIMER3>0)

                        IF (PLAYER0, TIMER1 >= 45)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,19,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,20,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,21,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,21,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,21,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(40,22,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(41,22,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(42,22,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,22,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(43,23,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(44,23,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,23,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,23,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(49,23,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,24,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,24,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,24,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,24,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,25,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,25,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(45,26,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,26,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,27,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,28,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(46,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(47,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(48,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,26,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,26,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,27,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,27,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,27,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,28,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,28,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(38,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(39,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(36,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(37,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(8,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,39,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,40,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,41,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,42,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(8,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(9,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(10,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(11,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(12,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(18,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(14,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(15,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(16,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(17,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,20,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,21,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,22,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,22,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,23,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,24,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,25,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,26,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,27,LAVA,NONE)
                        ENDIF
                        
                        IF (PLAYER0, TIMER1 >= 46)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,28,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,28,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,28,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,29,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,30,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(50,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,31,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(51,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(52,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(53,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(54,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(55,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(56,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,32,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(57,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(58,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(59,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,33,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,34,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,35,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,36,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,37,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,38,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,43,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(66,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(67,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(74,44,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(66,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(67,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(73,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(74,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(75,45,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(63,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(64,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(65,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(66,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(67,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(69,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(70,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(71,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(73,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(74,46,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(62,47,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(60,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(61,48,LAVA,NONE)
                            NEXT_COMMAND_REUSABLE
                            CHANGE_SLAB_TYPE(72,47,LAVA,NONE)
                        ENDIF

                        REM Flags
                        IF (PLAYER0, TIMER1 >= 48)
                            REM Sound
                            NEXT_COMMAND_REUSABLE
                            PLAY_MESSAGE(PLAYER0, SOUND, 148)

                            REM Change the ambient light
                            NEXT_COMMAND_REUSABLE
                            SET_GAME_RULE(GlobalAmbientLight,10)

                            NEXT_COMMAND_REUSABLE
                            SET_FLAG(PLAYER0, FLAG4, 0)
                        ENDIF                        

                    ENDIF

                ENDIF
            ENDIF

            IF (PLAYER0, TIMER1 >= 50)
                REM Sets the next rotation to dirt mode
                NEXT_COMMAND_REUSABLE
                SET_FLAG(PLAYER0, FLAG3, 2)
            ENDIF
        ENDIF
    ENDIF

REM Reset a lot of flags

    IF (PLAYER0, TIMER1 >= 55)

        IF (PLAYER0, FLAG3 == 1)
            REM Replenish the flag that counts the amount of steps done -> this should not be possible to call anymore after this set is done
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG4, 3)
            REM Flip the mode to the other
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG1, 1)
            REM Turn off editing mode
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG2, 0)
            REM Change this flag so this code stops being called
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG3, 0)
        ENDIF

        IF (PLAYER0, FLAG3 == 2)
            REM Replenish the flag that counts the amount of steps done -> this should not be possible to call anymore after this set is done
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG4, 3)
            REM Flip the mode to the other
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG1, 0)
            REM Turn off editing mode
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG2, 0)
            REM Change this flag so this code stops being called
            NEXT_COMMAND_REUSABLE
            SET_FLAG(PLAYER0, FLAG3, 0)
        ENDIF

    ENDIF

REM Logic for the entrance

    IF_ACTION_POINT(1, PLAYER0)
        ZOOM_TO_LOCATION(PLAYER0, 1)

        QUICK_MESSAGE(3, "But the tides of lava may reveal new paths...", SPELL_FLIGHT)
        QUICK_MESSAGE(2, "In this realm, you can't build bridges.", SPELL_FLIGHT)

        SET_TIMER(PLAYER0, TIMER2)

        REM Step 1, 2, 3 one after the other
        REM Make flame visual / cracking rocks
        REM Make flame sound effect

        IF (PLAYER0, TIMER2 >= 30)
            PLAY_MESSAGE(PLAYER0, SOUND, 147)
            CREATE_EFFECT_AT_POS(EFFECT_SPANGLE_RED, 127, 226)
            CHANGE_SLAB_TYPE(42,75,PATH, NONE)
        ENDIF

        IF (PLAYER0, TIMER2 >= 60)
            PLAY_MESSAGE(PLAYER0, SOUND, 147)
            CREATE_EFFECT_AT_POS(EFFECT_SPANGLE_RED, 127, 229)
            CHANGE_SLAB_TYPE(42,76,PATH, NONE)
        ENDIF

        IF (PLAYER0, TIMER2 >= 90)
            PLAY_MESSAGE(PLAYER0, SOUND, 147)
            CREATE_EFFECT_AT_POS(EFFECT_SPANGLE_RED, 127, 232)
            CHANGE_SLAB_TYPE(42,77,PATH, NONE)
        ENDIF

    ENDIF

REM Basic stuff - objective and early parties

    QUICK_OBJECTIVE(1, "This blazing hell of a land is engulfed in a fiery battle. Local heroes are trying to keep both you and a rival keeper in check. Make this land yours by defeating your rival here, but beware the lava tide swallowing the landscape. The timer shows you, when the lava tide changes.")

    CREATE_PARTY(dwarves1)
        ADD_TO_PARTY(dwarves1, DEMONSPAWN, 2, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(dwarves1, DEMONSPAWN, 2, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(dwarves1, DEMONSPAWN, 1, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(dwarves1, DEMONSPAWN, 1, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(dwarves2)
        ADD_TO_PARTY(dwarves2, BARBARIAN, 3, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(dwarves2, BARBARIAN, 3, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(dwarves2, BARBARIAN, 3, 100, ATTACK_DUNGEON_HEART, 0)

    IF (PLAYER0, TIMER3 >= 6000)
        ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD, dwarves1, -3, DUNGEON_HEART, 0, 1, 0)
    ENDIF

    IF (PLAYER0, TIMER3 >= 12000)
        ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD, dwarves2, -3, DUNGEON_HEART, 0, 1, 0)
    ENDIF

REM Wincon

    IF (PLAYER1, DUNGEON_DESTROYED == 1)
        WIN_GAME
        QUICK_OBJECTIVE(4, "A fiery display of your skills to dispose of competitors, Keeper. This scorching realm is yours.")
    ENDIF

REM Add some enemies that stick around near the barracks

    CREATE_PARTY(barracks_guard)
        ADD_TO_PARTY(barracks_guard, ARCHER, 4, 200, DEFEND_ROOMS, 0)
        ADD_TO_PARTY(barracks_guard, BARBARIAN, 4, 200, DEFEND_ROOMS, 0)
        ADD_TO_PARTY(barracks_guard, THIEF, 4, 200, DEFEND_ROOMS, 0)

    ADD_PARTY_TO_LEVEL(PLAYER_GOOD, barracks_guard, 3, 1)

REM Enemies that defend the treasury

    CREATE_PARTY(treasury_guard)
        ADD_TO_PARTY(treasury_guard, THIEF, 4, 200, DEFEND_ROOMS, 0)
        ADD_TO_PARTY(treasury_guard, THIEF, 4, 200, DEFEND_ROOMS, 0)
        ADD_TO_PARTY(treasury_guard, THIEF, 4, 200, DEFEND_ROOMS, 0)
        ADD_TO_PARTY(treasury_guard, WIZARD, 5, 200, DEFEND_ROOMS, 0)

    ADD_PARTY_TO_LEVEL(PLAYER_GOOD, treasury_guard, 4, 1)

REM Enemies that protect the passage on the left

    CREATE_PARTY(left_side_guard)
        ADD_TO_PARTY(left_side_guard, WIZARD, 8, 200, DEFEND_LOCATION, 0)
        ADD_TO_PARTY(left_side_guard, DRAGON, 8, 200, DEFEND_LOCATION, 0)

    IF_ACTION_POINT(10, PLAYER0)
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD, left_side_guard, -5, 1)
        HIDE_HERO_GATE(5,1)
        CREATE_EFFECT(EFFECT_SPANGLE_WHITE,-5)
    ENDIF

REM Enemies that defend the left gems

    CREATE_PARTY(gem_guard)
        ADD_TO_PARTY(gem_guard, DRAGON, 6, 200, DEFEND_LOCATION, 0)
        ADD_TO_PARTY(gem_guard, DEMONSPAWN, 5, 200, DEFEND_LOCATION, 0)
        ADD_TO_PARTY(gem_guard, DEMONSPAWN, 5, 200, DEFEND_LOCATION, 0)
        ADD_TO_PARTY(gem_guard, DEMONSPAWN, 5, 200, DEFEND_LOCATION, 0)
        ADD_TO_PARTY(gem_guard, DEMONSPAWN, 5, 200, DEFEND_LOCATION, 0)

    ADD_PARTY_TO_LEVEL(PLAYER_GOOD, gem_guard, 5, 1)

REM Enemies that guard the right gems

    CREATE_PARTY(gem_ambush)
        ADD_TO_PARTY(gem_ambush, THIEF, 7, 250, STEAL_GOLD, 0)
        ADD_TO_PARTY(gem_ambush, THIEF, 5, 250, STEAL_GOLD, 0)
        ADD_TO_PARTY(gem_ambush, THIEF, 5, 250, STEAL_GOLD, 0)
        ADD_TO_PARTY(gem_ambush, THIEF, 5, 250, STEAL_GOLD, 0)
        ADD_TO_PARTY(gem_ambush, THIEF, 5, 250, STEAL_GOLD, 0)

    IF_ACTION_POINT(2, PLAYER0)
        QUICK_MESSAGE(6, "we'll just need to steal the gold back!", THIEF)
        QUICK_MESSAGE(5, "If this Keeper wants to steal our gems,", THIEF)
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD, gem_ambush, -3, 1)
    ENDIF

    REM When both of these things have happened, remove the hero gate
    IF (PLAYER0, TIMER3 >= 12000)
        IF_ACTION_POINT(2, PLAYER0)
            HIDE_HERO_GATE(3, 1)
            CREATE_EFFECT(EFFECT_SPANGLE_WHITE, -3)
        ENDIF
    ENDIF

REM Enemies that defend the right path to blue

    CREATE_PARTY(guard_blue_passage)
        ADD_TO_PARTY(guard_blue_passage, WIZARD, 8, 250, ATTACK_ENEMIES, 0)
        ADD_TO_PARTY(guard_blue_passage, DEMONSPAWN, 7, 250, ATTACK_ENEMIES, 0)
        ADD_TO_PARTY(guard_blue_passage, DEMONSPAWN, 7, 250, ATTACK_ENEMIES, 0)
        ADD_TO_PARTY(guard_blue_passage, DEMONSPAWN, 7, 250, ATTACK_ENEMIES, 0)

    REM Set flag if the player gets close to the room
    IF_ACTION_POINT(11, PLAYER0)
        SET_FLAG(PLAYER0, FLAG7, 1)
        SET_TIMER(PLAYER0, TIMER7)
    ENDIF

    REM If the player claims the tile, stop spawning
    IF_SLAB_OWNER(67,8, PLAYER0)
        IF (PLAYER0, FLAG7 == 1)
            HIDE_HERO_GATE(4,1)
            CREATE_EFFECT(EFFECT_SPANGLE_WHITE, -4)
            SET_FLAG(PLAYER0, FLAG7, 0)
        ENDIF
    ENDIF

    IF (PLAYER0, FLAG7 == 1)
        IF (PLAYER0, TIMER7 > 100)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, guard_blue_passage, -4, 1)
        ENDIF

        IF (PLAYER0, TIMER7 > 3000)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, guard_blue_passage, -4, 1)
        ENDIF

        IF (PLAYER0, TIMER7 > 6000)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, guard_blue_passage, -4, 1)
        ENDIF

        IF (PLAYER0, TIMER7 > 9000)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, guard_blue_passage, -4, 1)

            REM This is the last way anyway so hide the portal
            CREATE_EFFECT(EFFECT_SPANGLE_WHITE, -4)
            SET_FLAG(PLAYER0, FLAG7, 0)
        ENDIF
    ENDIF

REM Logic for the enemy keeper

    IF (PLAYER0, TIMER3 >= 50000)
        COMPUTER_DIG_TO_LOCATION(PLAYER1, 6, 7)
    ENDIF

    IF (PLAYER0, TIMER3 >= 52000)
        COMPUTER_DIG_TO_LOCATION(PLAYER1, 8, 9)
    ENDIF

REM Parties that spawn from the lava lake

    REM Portals can be removed by claiming the tile they're on

    IF_SLAB_TYPE(33,26,PRETTY_PATH)
        HIDE_HERO_GATE(1,1)
        CREATE_EFFECT(EFFECT_SPANGLE_WHITE, -1)
    ENDIF

    IF_SLAB_OWNER(70,24,PLAYER0)
        HIDE_HERO_GATE(2,1)
        CREATE_EFFECT(EFFECT_SPANGLE_WHITE, -2)
    ENDIF

REM These should only be spawned before the enemy keeper breaks through and opens his dungeon!

    CREATE_PARTY(left_lava_1)
        ADD_TO_PARTY(left_lava_1, WIZARD, 3, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_1, BARBARIAN, 3, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_1, ARCHER, 3, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(left_lava_2)
        ADD_TO_PARTY(left_lava_2, WIZARD, 6, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_2, BARBARIAN, 4, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_2, BARBARIAN, 4, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_2, BARBARIAN, 4, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(left_lava_3)
        ADD_TO_PARTY(left_lava_3, ARCHER, 7, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_3, ARCHER, 7, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_3, ARCHER, 7, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_3, ARCHER, 7, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_3, ARCHER, 7, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(left_lava_4)
        ADD_TO_PARTY(left_lava_4, ARCHER, 8, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_4, WIZARD, 8, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(left_lava_4, BARBARIAN, 9, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(right_lava_1)
        ADD_TO_PARTY(right_lava_1, FAIRY, 3, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_1, HELL_HOUND, 3, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_1, DRAGON, 3, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_1, DEMONSPAWN, 3, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(right_lava_2)
        ADD_TO_PARTY(right_lava_2, HELL_HOUND, 5, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_2, HELL_HOUND, 5, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_2, HELL_HOUND, 5, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_2, DEMONSPAWN, 6, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_2, DEMONSPAWN, 6, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_2, DEMONSPAWN, 6, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(right_lava_3)
        ADD_TO_PARTY(right_lava_3, FAIRY, 6, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_3, FAIRY, 6, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_3, FAIRY, 6, 100, ATTACK_DUNGEON_HEART, 0)

    CREATE_PARTY(right_lava_4)
        ADD_TO_PARTY(right_lava_4, FAIRY, 8, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_4, HELL_HOUND, 8, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_4, DRAGON, 8, 100, ATTACK_DUNGEON_HEART, 0)
        ADD_TO_PARTY(right_lava_4, DEMONSPAWN, 9, 100, ATTACK_DUNGEON_HEART, 0)

    REM Parties for the left portal -> enemies walking on dirt come from here, so long as tile is dirt path

    IF_SLAB_TYPE(33,26,PATH)

        IF (PLAYER0, TIMER3 >= 14400)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, left_lava_1, -1, 1)
        ENDIF

        IF (PLAYER0, TIMER3 >= 28800)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, left_lava_2, -1, 1)
        ENDIF

        IF (PLAYER0, TIMER3 >= 36000)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, left_lava_3, -1, 1)
        ENDIF

        IF (PLAYER0, TIMER3 >= 43200)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, left_lava_4, -1, 1)
        ENDIF

    ENDIF

    REM Parties for the right portal -> enemies going over lava come from here

    IF_SLAB_OWNER(70,24,PLAYER_GOOD)

        IF (PLAYER0, TIMER3 >= 18000)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, right_lava_1, -2, 1)
        ENDIF

        IF (PLAYER0, TIMER3 >= 25200)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, right_lava_2, -2, 1)
        ENDIF

        IF (PLAYER0, TIMER3 >= 32400)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, right_lava_3, -2, 1)
        ENDIF

        IF (PLAYER0, TIMER3 >= 46800)
            ADD_PARTY_TO_LEVEL(PLAYER_GOOD, right_lava_4, -2, 1)
        ENDIF

    ENDIF

REM At a certain point, give blue more creatures

    IF (PLAYER0, TIMER3 >= 13000)
        REM The real max for blue
        MAX_CREATURES(PLAYER1,25)
    ENDIF
