area
    outside // lay this area on the map anywhere you want it to change from night to day
        layer = 6    // set this layer above everything else so the overlay obscures everything
        var
            obj/weather/Weather // what type of weather the area is having



        proc
            daycycle()
                if(lit.1)
                    overlays -= 'black50.dmi'   // remove the 50% dither
                    overlays += 'black25.dmi'   // add a 25% dither for a fading effect
                    sleep(3) // pause a moment
                    overlays -= 'black25.dmi'   // remove the dither
                if(lit.0)
                    overlays += 'black25.dmi'   // add a 25% dither for a fading effect
                    sleep(3) // pause a moment
                    overlays -= 'black25.dmi'   // remove the dither
                    overlays += 'black50.dmi'   // add the 50% dither
            

/*
    If you prefer real darkness (luminosity = 0), replace the daycycle() proc
    with the one below. Using luminosity for outside darkness is better if
    you want to use other light sources like torches.

            daycycle()
                luminosity = 1 - luminosity  // toggle between 1 and 0
                spawn(20) daycycle()  // change the 20 to make longer days and nights
*/

            SetWeather(WeatherType)
                if(Weather) // see if this area already has a weather effect
                    if(istype(Weather,WeatherType)) return  // no need to reset it
                    overlays -= Weather // remove the weather display
                    del(Weather)    // destroy the weather object
                if(WeatherType) // if WeatherType is null, it just removes the old settings
                    Weather = new WeatherType() // make a new obj/weather of the right type
                    overlays += Weather // display it as an overlay for the area



    inside  // a sample area not affected by the daycycle or weather
        luminosity = 1



mob/verb
    change_area()
        var/turf/T = loc
        if(!T) return   // for some reason, the mob is not on a turf.

        if(istype(T.loc,/area/outside)) // if the turf is in an outside area
            T.loc.contents -= T // remove the turf from the outside area
                                // This does NOT move the turf, only changes
                                // the area it is associated with.

            var/area/inside/I
            for(I in world)     //find an inside area
                break
            if(!I) I = new()    // if there are no inside areas, create one

            I.contents += T     // add the turf location to the inside area
            usr << "This is an <b>inside</b> area now."

        else    // this turf isn't outside
            T.loc.contents -= T // remove the turf from it's current area

            var/area/outside/O
            for(O in world)     // look for an outside area
                break
            if(!O) O = new()    // if there are no outside areas, create one

            O.contents += T     // place the turf in the outside area
            usr << "This is an <b>outside</b> area now."

    rain()
        var/area/outside/O
        for(O in world)     // look for an outside area
            break
        if(!O) return   // if there are no outside areas, stop
        O.SetWeather(/obj/weather/rain)

    snow()
        var/area/outside/O
        for(O in world)     // look for an outside area
            break
        if(!O) return   // if there are no outside areas, stop
        O.SetWeather(/obj/weather/snow)

    clear_weather()
        var/area/outside/O
        for(O in world)     // look for an outside area
            break
        if(!O) return   // if there are no outside areas, stop
        O.SetWeather()

obj/weather
    layer = 7    // weather appears over the darkness because I think it looks better that way

    rain
        icon = 'rain.dmi'

    snow
        icon = 'snow.dmi'
        
world
    proc
        Repop_Incriment()
            sleep(3000)
            world << "<center><font color=white><font size=1>The sun sets, fields are now pitch black. It is now evening."
            lit = 0  // toggle lit between 1 and 0
            world.Repop()
            sleep(3000)
            world << "<center><font color=white><font size=1>The sun rises, fields are now light and active with life. It is now morning."
            lit = 1  // toggle lit between 1 and 0
            world.Repop()
            Repop_Incriment()
world
    New()
        ..()
        Repop_Incriment()

area
    var
        lit = 0