IF // CHecks for custom Vampires
	OR(6)
        Race(Player1, Vampire)
        Race(Player2, Vampire)
        Race(Player3, Vampire)
        Race(Player4, Vampire)
        Race(Player5, Vampire)
        Race(Player6, Vampire)
        OR(8)
        Kit(Player1, GeVaKit)  // Shadow Lurker Vampire
        Kit(Player2, GeVaKit) 
        Kit(Player3, GeVaKit) 
        Kit(Player4, GeVaKit) 
        Kit(Player5, GeVaKit) 
        Kit(Player6, GeVaKit) 
        NumCreatureGT("GelVa20",0) // Turned Male Vampire
        NumCreatureGT("GelVa21",0) // Turned Female Vampire
        //!HasItem("GelVa06") // Vampire Wepon +5 given by Vampire Origin Shape. (must place this later)
	//!HasItemEquiped("GelVa02",LastSummonerOf(Myself))
THEN
    RESPONSE #100
        SetGlobal("Sunlight","GLOBAL",1)
END

IF // Checks for sunlight hours
    OR(2)
        TimeGT(DAWN_START)
        TimeLT(DAWN_END)
THEN
    RESPONSE #100
        SetGlobal("Sunlight","GLOBAL",2)
END

IF // Checks for sunlight blocking conditions and none weather areas.
       OR(6)
       !Global("WEATHER","LOCALS",3) // Rain
       !Global("WEATHER","LOCALS",4) // Snow
       !Global("WEATHER","LOCALS",5) // Fog
       !AreaType(DUNGEON)
       !AreaType(EXTENDEDNIGHT)
       //!AreaType(DREAMAREA) // Should be some commando for Area Flag
       AreaType(OUTDOOR)
       AreaType(CITY)

THEN
    RESPONSE #100
        SetGlobal("Sunlight","GLOBAL",3)
END

IF
        Global("Sunlight","GLOBAL",3)
	!HasItemEquiped("GelVa02",LastSummonerOf(Myself))
        //AreaType(NOREST)
THEN
    RESPONSE #100
        ReallyForceSpellRES("GelVa30",Player1) // SummonInvisible Creature 
        SetGlobal("Sunlight","GLOBAL",4)  // Will force Invisible creature to cast Dissintigrate on relevant targets.

END