LlGetDate

De DigiWiki.

// Birthday surprise
default
{
    state_entry()
    {   
        llSetTimerEvent(0.1);
    }
 
    timer()
    {
        if(llGetDate() == "2009-02-15")
            llSetText("HAPPY BIRTHDAY!", <0,1,0>, 1.0);
        else
            llSetText("A surprise is coming...", <0,1,0>, 1.0);
 
        llSetTimerEvent(3600.0);  // check every hour. 
    }
}

// Function to calculate the numeric day of year
integer dayOfYear(integer year, integer month, integer day)
{
    return day + (month - 1) * 30 + (((month > 8) + month) / 2)
        - ((1 + (((!(year % 4)) ^ (!(year % 100)) ^ (!(year % 400))) | (year <= 1582))) && (month > 2));
}
 
default
{
    touch_end(integer count)
    {
        list dateComponents = llParseString2List(llGetDate(), ["-"], []);
        integer year  = (integer) llList2String(dateComponents, 0);
        integer month = (integer) llList2String(dateComponents, 1);
        integer day   = (integer) llList2String(dateComponents, 2);
        llSay(0, "The current day of the year is " + (string) dayOfYear(year, month, day));
    }
}

// Function to calculate whether a current year is a leap year
 
integer is_leap_year( integer year ) 
{     
    if( year % 4 )         return FALSE;   // Not a leap year under any circumstances     
    if( year <= 1582 )     return TRUE;    // In the Julian calender before 24 February 1582, every fourth year was a leap year
    if( !( year % 400 ))   return TRUE;    // A leap century is a leap year if divisible by 400 
    if( !( year % 100 ))   return FALSE;   // Any other century is not a leap year  
    return TRUE;                           // It is divisible by 4 and not a century and not Julian, therefore it is a leap year
}