var{lava_time=0.09;} //time modifier. 0.5 = 30 seconds.
proc //defines that a procedure/function will be amde
{
    generateLava(center, radius) //the procedure with args "center" and "radius"
    {
        if(!center||!radius){return;} //if the center and/or radius is not defined, it wont run.
        .=list(); //lets create a list to store the tiles in the radius
        for(var/turf/floor/a in oview(center,radius)) //collects the information within the radius blocks of center
        {
            .+=locate(a.x,a.y,a.z); //stores that location to the list
        }
        do //now lets execute this
        {
            sleep(lava_time*9); //have a delay - waits lava_time minutes
            var/newLocation=pick(.); //lets pick a random location from the list
            new/turf/lava(newLocation);
            for(var/mob/M in newLocation)
            if(M.client)
            M.death()
             //lets create the lava tile and put it at the new location
            . -= newLocation; //removes the location from the list so it can't be reused.
        }
        while(length(.)); //as long as the list has stuff stored in it, the above functions would run.
    }
}

turf
{
    floor; //turf/floor
    {
        icon='floor.dmi'; //sets the icon for /turf/floor
    }
    lava; //turf/lava
    {
        icon='lava.dmi'; //sets the icon for /turf/lava
    }
}




turf/lava
    icon='turfs.dmi'
    icon_state="lava"
    name = "Lava"
mob/player/proc/death()

        world << 'WilhelmScream.ogg'
        usr.icon_state="death"
        world <<"[usr] has died."
        usr.icon_state="ghost"
        usr.loc=locate(7,15,1)
        alert("You can now spectate the remaining living players.")

proc
{
    checkReboot()
    {
        var/all_dead=1;
        for(var/mob/P in world)
        {
            if(!P.spectating){all_dead=0;break;}
        }
        if(all_dead)
        {
            //what happens if everybody is dead.
            world<<"Everybody has died, rebooting game.";
            world.Reboot();
            //although you can do all this without a reboot but whatever you prefer I guess.
        }
    }
}


proc
{
    lavaDeath(mob/player)
    {
        if(!player){return;}
        if(player.spectating){return;}
        world << 'WilhelmScream.ogg';
        player.icon_state="death";
        world <<"[player] has died.";
        player.icon_state="ghost";
        player.loc=locate(7,15,1);
        player.spectating=1;
        checkReboot();
        alert(player,"You can now spectate the remaining living players.");


    }
}

var/game_started=0
world/New()
{
    ..();
    spawn()
    {
        do
        {
            sleep(10);
        }
        while(players<8&&!game_started);
    }
    if(game_started){return;}
    world<<"Starting the game in 30 seconds!";
    spawn(300) //number / 10 = seconds.
    {
        if(game_started){return;}
        world<<"Beginning game!";
        generateLava(center, radius);
    }
}

mob
{
    host
    {
        verb
        {
            Start_Game()
            {
                if(game_started){return;}
                game_started=1
                world<<"Game starting in 5 seconds!";
                spawn(50){world<<"Game Started!";generateLava(center, radius);}
            }
        }
    }
}

client
{
    New()
    {
        ..();
        if(address==world.address||!address)
        {
            src.mob.verbs+=new/mob/host/verb/Start_Game;
        }
    }
}