Difference between revisions of "Days in Month"
Jump to navigation
Jump to search
(The code was so ugly and poorly organized it was just easier to rewrite from scratch.) |
|||
| Line 20: | Line 20: | ||
string date = llGetDate(); | string date = llGetDate(); | ||
list date_info = llParseString2List(date,["-"],[" "]); | list date_info = llParseString2List(date,["-"],[" "]); | ||
integer year = | integer year = llList2Integer(date_info,0); | ||
integer month = llList2Integer(date_info,1); | integer month = llList2Integer(date_info,1); | ||
integer day = llList2Integer(date_info,2); | integer day = llList2Integer(date_info,2); | ||
Revision as of 11:59, 20 October 2008
The following script is adaptable for use in any calender system, particularly pertaining to tier collection systems that need to do actual monthly billings, not just 28 day or 30 day billing cycles.
<lsl> integer GetDaysInMonth(integer month, integer year) {
if(month == 2)
return 28 + !(year % 4) - !(year % 100) + !(year % 400);
return 30 | (month & 1) ^ (month > 6);
}
default {
state_entry()
{
llSay(0, "Touch to confirm the number of days in the current month!");
}
touch_start(integer total_number)
{
string date = llGetDate();
list date_info = llParseString2List(date,["-"],[" "]);
integer year = llList2Integer(date_info,0);
integer month = llList2Integer(date_info,1);
integer day = llList2Integer(date_info,2);
integer days_in_month = GetDaysInMonth(month, year);
llSay(0, (string)days_in_month + " days in this month");
}
} </lsl>