TimeAgo - Revision history

ObviousAltIsObvious Resident: tag to

2015-01-22T22:43:51Z

← Older revision		Revision as of 15:43, 22 January 2015
Line 8:		Line 8:
	See also: [[llGetUnixTime]]		See also: [[llGetUnixTime]]
	\|examples=		\|examples=
	<~~lsl~~>		<source lang="lsl2">
	//Created by Ugleh Ulrik		//Created by Ugleh Ulrik

Line 74:		Line 74:
	}		}
	}		}
	</~~lsl~~>		</source>
	\|helpers		\|helpers
	\|notes		\|notes

Kireji Haiku: damn typo

2012-09-30T19:23:03Z

damn typo

← Older revision		Revision as of 12:23, 30 September 2012
Line 7:		Line 7:
	\|func_footnote=		\|func_footnote=
	See also: [[llGetUnixTime]]		See also: [[llGetUnixTime]]
	\|examples=<lsl>//Created by Ugleh Ulrik		\|examples=
			<lsl>
			//Created by Ugleh Ulrik

	string TimeAgo(integer time)		string TimeAgo(integer time)
Line 15:		Line 17:
	integer timeDifference = now - time;		integer timeDifference = now - time;

	// small bug fix for when ~~diff~~ is 0		// small bug fix for when timeDifference is 0
	if (timeDifference == 0)		if (timeDifference == 0)
	return "just now";		return "just now";
Line 28:		Line 30:
	"decade"];		"decade"];

	//the number equivalent to ~~pds~~		//the number equivalent to periods
	list lenghts = [1,		list lenghts = [1,
	60,		60,
Line 46:		Line 48:
	string output = llList2String(periods, v);		string output = llList2String(periods, v);

	//this will get the correct time in ~~pds~~, then divide the ~~dif~~		//this will get the correct time in periods, then divide the timeDifference
	integer ntime = timeDifference / llList2Integer(lenghts, llListFindList(periods, [output]));		integer ntime = timeDifference / llList2Integer(lenghts, llListFindList(periods, [output]));

Kireji Haiku: some minor readability changes

2012-09-30T19:21:07Z

some minor readability changes

← Older revision		Revision as of 12:21, 30 September 2012
Line 7:		Line 7:
	\|func_footnote=		\|func_footnote=
	See also: [[llGetUnixTime]]		See also: [[llGetUnixTime]]
	\|~~spec~~=<lsl>		\|examples=<lsl>//Created by Ugleh Ulrik
	//Created by Ugleh Ulrik
	string TimeAgo(integer tm) {		string TimeAgo(integer time)
	integer ~~dif~~ = llGetUnixTime()-tm; //~~difference in seconds~~		{
	if (~~dif~~ == 0)~~//Small bug fix if dif is 0~~		// time difference in seconds
	return "~~0 seconds~~";		integer now = llGetUnixTime();
	list ~~pds~~ = ["second","minute","hour","day","week","month","year","decade"];		integer timeDifference = now - time;
	list ~~lngh~~ = [1,60,3600,86400,604800,2630880,31570560,315705600];~~//the number equivalent to pds~~
	integer v = llGetListLength(~~lngh~~)-1;		// small bug fix for when diff is 0
			if (timeDifference == 0)
			return "just now";

			list periods = ["second",
			"minute",
			"hour",
			"day",
			"week",
			"month",
			"year",
			"decade"];

			//the number equivalent to pds
			list lenghts = [1,
			60,
			3600,
			86400,
			604800,
			2630880,
			31570560,
			315705600];

			integer v = llGetListLength(lenghts) - 1;
	integer no;		integer no;
	while((v ~~>= 0~~)&&(no = ~~dif~~/llList2Integer(~~lngh~~,v)<=1))
			while((0 <= v) && (no = timeDifference/llList2Integer(lenghts, v) <= 1))
	--v;		--v;
	string dd = llList2String(~~pds~~,v);
	~~integer ntime = dif / llList2Integer(lngh,llListFindList(pds, [dd]));~~ //this will get the correct time in pds, then divide the dif		string output = llList2String(periods, v);
	if(~~no != 1~~)//if integer 'no' is not equal to 1 then it should have an s at the end
	dd +="s";		//this will get the correct time in pds, then divide the dif
	dd = (string)ntime + " "+ dd; ~~//This produces the finished output~~		integer ntime = timeDifference / llList2Integer(lenghts, llListFindList(periods, [output]));
	return dd;
	}		//if integer 'no' is not equal to 1 then it should have an s at the end
	~~</lsl>~~		if(no != 1)
	~~\|examples=<lsl>~~		output += "s";
	~~//Created by Ugleh Ulrik~~
			//This produces the finished output
			output = (string)ntime + " "+ output + " ago";
			return output;
			}

	default		default
	{		{

	touch_start(integer total_number)		touch_start(integer total_number)
	{		{
	integer ~~time~~ = llGetUnixTime() ~~- 180~~;		integer now = llGetUnixTime();
	~~llSay(0, TimeAgo(~~time~~) + " ago")~~;		integer time = now - 180;
	}
	}

			// integer time is the current unix time minus 180 seconds (3 minutes)
			// the outcome will be "3 minutes ago"

	~~//integer~~ time ~~is the current unix time minus 180 seconds (3 minutes~~)		llSay(PUBLIC_CHANNEL, TimeAgo(time));
	~~//The outcome will be "3 minutes ago"~~</lsl>		}
			}
			</lsl>
	\|helpers		\|helpers
	\|notes		\|notes

Strife Onizuka: for great justice (and a scone)

2010-05-26T07:36:16Z

for great justice (and a scone)

← Older revision		Revision as of 00:36, 26 May 2010
Line 12:		Line 12:
	integer dif = llGetUnixTime()-tm; //difference in seconds		integer dif = llGetUnixTime()-tm; //difference in seconds
	if (dif == 0)//Small bug fix if dif is 0		if (dif == 0)//Small bug fix if dif is 0
	return "0 seconds";		return "0 seconds";
	list pds = ["second","minute","hour","day","week","month","year","decade"];		list pds = ["second","minute","hour","day","week","month","year","decade"];
	list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];//the number equivalent to pds		list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];//the number equivalent to pds
	integer ~~v; integer no;~~		integer v = llGetListLength(lngh)-1;
	~~for(~~v = llGetListLength(lngh)-1; (v >= 0)&&(no = dif/llList2Integer(lngh,v)<=1)~~; v~~--);		integer no;
	string dd = llList2String(pds,v);		while((v >= 0)&&(no = dif/llList2Integer(lngh,v)<=1))
	integer ntime = dif / llList2Integer(lngh,llListFindList(pds, [dd])); //this will get the correct time in pds, then divide the dif		--v;
	if(no != 1)~~dd +="s";~~ //if integer no is not equal to 1 then it should have an s at the end		string dd = llList2String(pds,v);
	dd = (string)ntime + " "+ dd; //This produces the finished output		integer ntime = dif / llList2Integer(lngh,llListFindList(pds, [dd])); //this will get the correct time in pds, then divide the dif
			if(no != 1)//if integer 'no' is not equal to 1 then it should have an s at the end
			dd +="s";
			dd = (string)ntime + " "+ dd; //This produces the finished output
	return dd;		return dd;
	}		}

Ugleh Ulrik at 21:55, 25 May 2010

2010-05-25T21:55:22Z

← Older revision		Revision as of 14:55, 25 May 2010
Line 45:		Line 45:
	\|also_articles		\|also_articles
	\|cat1=Examples		\|cat1=Examples
	\|cat2=~~UD Functions~~		\|cat2=User-Defined_Functions
	\|cat3		\|cat3
	\|cat4		\|cat4
	}}		}}

Ugleh Ulrik at 23:50, 24 May 2010

2010-05-24T23:50:31Z

← Older revision		Revision as of 16:50, 24 May 2010
Line 45:		Line 45:
	\|also_articles		\|also_articles
	\|cat1=Examples		\|cat1=Examples
	\|cat2		\|cat2=UD Functions
	\|cat3		\|cat3
	\|cat4		\|cat4
	}}		}}

Ugleh Ulrik at 05:16, 24 May 2010

2010-05-24T05:16:48Z

← Older revision		Revision as of 22:16, 23 May 2010
Line 15:		Line 15:
	list pds = ["second","minute","hour","day","week","month","year","decade"];		list pds = ["second","minute","hour","day","week","month","year","decade"];
	list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];//the number equivalent to pds		list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];//the number equivalent to pds
	integer v;integer no;		integer v; integer no;
	for(v = llGetListLength(lngh)-1; (v >= 0)&&(no = dif/llList2Integer(lngh,v)<=1); v--);		for(v = llGetListLength(lngh)-1; (v >= 0)&&(no = dif/llList2Integer(lngh,v)<=1); v--);
	string dd = llList2String(pds,v);		string dd = llList2String(pds,v);

Ugleh Ulrik at 03:57, 24 May 2010

2010-05-24T03:57:28Z

← Older revision		Revision as of 20:57, 23 May 2010
Line 11:		Line 11:
	string TimeAgo(integer tm) {		string TimeAgo(integer tm) {
	integer dif = llGetUnixTime()-tm; //difference in seconds		integer dif = llGetUnixTime()-tm; //difference in seconds
			if (dif == 0)//Small bug fix if dif is 0
			return "0 seconds";
	list pds = ["second","minute","hour","day","week","month","year","decade"];		list pds = ["second","minute","hour","day","week","month","year","decade"];
	list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];//the number equivalent to pds		list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];//the number equivalent to pds

Ugleh Ulrik at 03:46, 24 May 2010

2010-05-24T03:46:08Z

← Older revision		Revision as of 20:46, 23 May 2010
Line 10:		Line 10:
	//Created by Ugleh Ulrik		//Created by Ugleh Ulrik
	string TimeAgo(integer tm) {		string TimeAgo(integer tm) {
	integer dif = llGetUnixTime()-tm;		integer dif = llGetUnixTime()-tm; //difference in seconds
	list pds = ["second","minute","hour","day","week","month","year","decade"];		list pds = ["second","minute","hour","day","week","month","year","decade"];
	list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];		list lngh = [1,60,3600,86400,604800,2630880,31570560,315705600];//the number equivalent to pds
	integer v;integer no;		integer v;integer no;
	for(v = llGetListLength(lngh)-1; (v >= 0)&&(no = dif/llList2Integer(lngh,v)<=1); v--);		for(v = llGetListLength(lngh)-1; (v >= 0)&&(no = dif/llList2Integer(lngh,v)<=1); v--);
	string dd = llList2String(pds,v);		string dd = llList2String(pds,v);
	integer ntime = dif / llList2Integer(lngh,llListFindList(pds, [dd]));		integer ntime = dif / llList2Integer(lngh,llListFindList(pds, [dd])); //this will get the correct time in pds, then divide the dif
	if(no != 1)dd +="s";		if(no != 1)dd +="s"; //if integer no is not equal to 1 then it should have an s at the end
	dd = (string)ntime + " "+ dd;		dd = (string)ntime + " "+ dd; //This produces the finished output
	return dd;		return dd;
	}		}

Ugleh Ulrik at 03:30, 24 May 2010

2010-05-24T03:30:50Z

← Older revision		Revision as of 20:30, 23 May 2010
Line 8:		Line 8:
	See also: [[llGetUnixTime]]		See also: [[llGetUnixTime]]
	\|spec=<lsl>		\|spec=<lsl>
			//Created by Ugleh Ulrik
	string TimeAgo(integer tm) {		string TimeAgo(integer tm) {
	integer dif = llGetUnixTime()-tm;		integer dif = llGetUnixTime()-tm;
Line 22:		Line 23:
	</lsl>		</lsl>
	\|examples=<lsl>		\|examples=<lsl>
			//Created by Ugleh Ulrik
	default		default
	{		{