Difference between revisions of "Day of the Week"

From Second Life Wiki
Jump to navigation Jump to search
m (0 >> PUBLIC_CHANNEL)
(Add in a second method that uses Zeller's convergence)
Line 1: Line 1:
{{LSL Header|ml=*}}
{{LSL Header|ml=*}}
Method to get the day of the week from a unix timestamp - {{LSLG|llGetUnixTime}}. The timestamp returns the number of seconds elapsed beginning Thursday, January 1, 1970 UTC. This script first converts the seconds to hours, then adds the GMT offset (if desired), then converts the hours to days, and finally grabs the day of the week from a list.
This page shows two methods for getting the day of the week. The first shows how to get the day of the week from a Unix timestamp. The second shows how to get the day of the week from an arbitrary year, month, and day. The first method is faster for dates that fall into the Unix timestamp range (January 1, 1970 - January 19, 2038). The second method is a bit slower, but will work for any date in the Gregorian calendar (roughly, any date in the 17th Century and beyond).
 
===Day of Week from Unix timestamp===
 
The first method to get the day of the week is from a Unix timestamp - {{LSLG|llGetUnixTime}}. The timestamp returns the number of seconds elapsed beginning Thursday, January 1, 1970 UTC. This script first converts the seconds to hours, then adds the GMT offset (if desired), then converts the hours to days, and finally grabs the day of the week from a list.


<lsl>
<lsl>
Line 110: Line 114:
}
}
</lsl>
</lsl>
===Day of Week from Arbitrary Day, Month, and Year===
The second method to get the day of the week uses an arbitrary day, month and year.
This is based on the ''Zeller's congruence'' algorithm, specified in this Wikipedia page: [http://en.wikipedia.org/wiki/Zeller's_congruence Zeller's congruence].
The benefit of this approach is that it will compute a day of the week for dates outside of the 32-bit signed Unix timestamp range. If all you want is the day of week for today, the first method is simpler and faster.
Caveat: As noted at the top of this page, this only works for Gregorian dates. If you don't know what that means, it means pretty much any date from the 17th century forward.
<lsl>
list    DAYS_OF_WEEK = ["Sunday", "Monday", "Tuesday", "Wednesday",
                        "Thursday", "Friday", "Saturday"];
list    MONTHS = ["January", "February", "March", "April", "May", "June",
                  "July", "August", "September", "October", "November",
                  "December"];
// Uses "Zeller's congruence" to calculate day of week. Look it up in Wikipedia
//
// Month is 1 = January
//
// Returns 0 for Sunday, 6 for Saturday
//
// ONLY does Gregorian dates.
//
integer day_of_week (integer year, integer month, integer day) {
 
  // The calculations use the previous year for Jan/Feb, but want January and
  // February to be months 13 and 14.
  if (month <= 2) {
    --year;
    month += 12;
  }
 
  return
    ((((day + (((month + 1) * 26) / 10) + year +
        (year / 4) + (6 * (year / 100)) + (year / 400)) %
      7) + 6) % 7);
}
dow_test (integer year, integer month, integer day) {
  llSay(PUBLIC_CHANNEL, llList2String(MONTHS, month - 1) + " " +
        (string) day + ", " + (string) year + " falls on a " +
        llList2String(DAYS_OF_WEEK, day_of_week(year, month, day)));
}
default {
  state_entry () {
    dow_test(2014, 1, 26);
    dow_test(2014, 3, 31);
    dow_test(1960, 1, 1);
    dow_test(2099, 12, 25);
  }
}
</lsl>
{{LSLC|Library|Day of the Week}}{{LSLC|Examples|Day of the Week}}
{{LSLC|Library|Day of the Week}}{{LSLC|Examples|Day of the Week}}

Revision as of 08:55, 26 January 2014

This page shows two methods for getting the day of the week. The first shows how to get the day of the week from a Unix timestamp. The second shows how to get the day of the week from an arbitrary year, month, and day. The first method is faster for dates that fall into the Unix timestamp range (January 1, 1970 - January 19, 2038). The second method is a bit slower, but will work for any date in the Gregorian calendar (roughly, any date in the 17th Century and beyond).

Day of Week from Unix timestamp

The first method to get the day of the week is from a Unix timestamp - llGetUnixTime. The timestamp returns the number of seconds elapsed beginning Thursday, January 1, 1970 UTC. This script first converts the seconds to hours, then adds the GMT offset (if desired), then converts the hours to days, and finally grabs the day of the week from a list.

<lsl> // Give day of the week // DoteDote Edison

list weekdays = ["Thursday", "Friday", "Saturday", "Sunday", "Monday", "Tuesday", "Wednesday"]; integer offset = -4; // offset from UTC

default { 

   state_entry() {
       //
   }
   touch_start(integer total_number) {
       integer hours = llGetUnixTime()/3600;
       integer days = (hours + offset)/24;
       integer day_of_week = days%7;
       llSay(0, "Today is " + llList2String(weekdays, day_of_week));
   }

}</lsl> And a function version: <lsl> string getDay(integer offset) { 

   list weekdays = ["Thursday", "Friday", "Saturday", "Sunday", "Monday", "Tuesday", "Wednesday"];
   integer hours = llGetUnixTime()/3600;
   integer days = (hours + offset)/24;
   integer day_of_week = days%7;
   return llList2String(weekdays, day_of_week);

}

default { 

   touch_start(integer total_number) {
       integer offset = -4; // offset from UTC
       llSay(0, "Today is " + getDay(offset) + ".");
   }

} </lsl> A simpler and more efficient version of the above function: <lsl> // contributed by wrGodLikeBeing string timestamp2weekday( integer ts ){ 

   return llList2String( ["Thursday","Friday","Saturday","Sunday","Monday","Tuesday","Wednesday"],(ts/86400)%7 );

} </lsl>

The following code compensates for daylight savings time that changes the offset between -7 and -8 hours throughout the year. Touching the object will yield a message indicating the weekday name for Pacific time, UTC offset of the Pacific Timezone (SL Time), and if daylight savings time is in effect in the pacific time zone.

<lsl> // Dedric Mauriac

float minuteSpan = 60; // 60 seconds float hourSpan = 3600; // 60 seconds * 60 minutes float daySpan = 86400; // 60 seconds * 60 minutes * 24 hours

float ptOffset() { 

   // get the time for each timezone
   float gmt = llGetGMTclock();
   float pt = llGetWallclock();
   
   // adjust since GMT date may be tomorrow
   if(pt > gmt) gmt += daySpan;
   
   // find the difference in seconds between the two timezones
   return pt - gmt;

} integer isDaylightSavings() { 

   // UTC-8 pacific standard time (PST: november - march)
   // UTC-7 pacific daylight time (PDT: march - november)
   
   return ptOffset() == -7 * hourSpan;

} string getWeekday() { 

   // find the number of seconds since Jan 1, 1970 12:00 PST
   float seconds = llGetUnixTime() + ptOffset();
   
   // find the number of days since Jan 1, 1970 (PST)
   integer days = llFloor(seconds / daySpan);
   
   // All weekday names in order (Jan 1, 1970 starts on a Thursday)
   list weekdays = ["Thursday", "Friday", "Saturday", "Sunday", "Monday", "Tuesday", "Wednesday"];
   
   // find the weekday
   integer weekday = days % 7;
   return llList2String(weekdays, weekday);

} sayTheWeekday() { 

   llSay(PUBLIC_CHANNEL, "Today is " + getWeekday() + ".");
   llSay(PUBLIC_CHANNEL, "Offset is " + (string)(ptOffset() / hourSpan) + " hours.");

   if(isDaylightSavings())
       llSay(PUBLIC_CHANNEL, "It is currently daylight savings time.");
   else
       llSay(PUBLIC_CHANNEL, "It is currently standard time.");

} default { 

   state_entry()
   {
       sayTheWeekday();
   }
   touch_start(integer num_detected)
   {
       sayTheWeekday();
   }

} </lsl>

Day of Week from Arbitrary Day, Month, and Year

The second method to get the day of the week uses an arbitrary day, month and year.

This is based on the Zeller's congruence algorithm, specified in this Wikipedia page: Zeller's congruence.

The benefit of this approach is that it will compute a day of the week for dates outside of the 32-bit signed Unix timestamp range. If all you want is the day of week for today, the first method is simpler and faster.

Caveat: As noted at the top of this page, this only works for Gregorian dates. If you don't know what that means, it means pretty much any date from the 17th century forward.

<lsl> list DAYS_OF_WEEK = ["Sunday", "Monday", "Tuesday", "Wednesday", 

                       "Thursday", "Friday", "Saturday"];

list MONTHS = ["January", "February", "March", "April", "May", "June", 

                 "July", "August", "September", "October", "November",
                 "December"];

// Uses "Zeller's congruence" to calculate day of week. Look it up in Wikipedia // // Month is 1 = January // // Returns 0 for Sunday, 6 for Saturday // // ONLY does Gregorian dates. // integer day_of_week (integer year, integer month, integer day) { 

 // The calculations use the previous year for Jan/Feb, but want January and
 // February to be months 13 and 14.
 if (month <= 2) {
   --year;
   month += 12;
 }
 
 return
   ((((day + (((month + 1) * 26) / 10) + year +
       (year / 4) + (6 * (year / 100)) + (year / 400)) %
      7) + 6) % 7);

}

dow_test (integer year, integer month, integer day) { 

 llSay(PUBLIC_CHANNEL, llList2String(MONTHS, month - 1) + " " +
       (string) day + ", " + (string) year + " falls on a " +
       llList2String(DAYS_OF_WEEK, day_of_week(year, month, day)));

}

default { 

 state_entry () {

   dow_test(2014, 1, 26);
   dow_test(2014, 3, 31);
   dow_test(1960, 1, 1);
   dow_test(2099, 12, 25);
 }

} </lsl>

Retrieved from "https://wiki.secondlife.com/w/index.php?title=Day_of_the_Week&oldid=1187263"