User:Fred Gandt/Scripts/Continued 1 - Revision history

Fred Gandt: update enzeroizer

2017-03-28T18:23:22Z

update enzeroizer

← Older revision		Revision as of 11:23, 28 March 2017
Line 560:		Line 560:

	=== Enzeroizer (Rotation Fixer) ===		=== Enzeroizer (Rotation Fixer) ===
	Drop this into the root of your linked object ~~and it will self seed to all links in a set (object)~~. ~~After re-rezzing the object and setting the scripts running it~~ will set the rotations to whatever they were but with the smallest 3 decimal places made {{HoverText\|000\|ZERO}}.		Drop this into a single prim or the root of your linked object. It will set the rotations to whatever they were but with the smallest 3 decimal places made {{HoverText\|000\|ZERO}}.
	*E.g. <75.458392, 128,038754, 298.836580> will become <75.458000, 128,038000, 298.836000>.		*E.g. <75.458392, 128,038754, 298.836580> will become <75.458000, 128,038000, 298.836000>.
	This will make minor rotational drifts that occur due to one of our favorite bugs less of an issue.		This will make minor rotational drifts that occur due to one of our favorite bugs less of an issue.
	~~I have done light testing and think it's fine. Make a copy of your object before using this script just in case it goes wrong.~~
	~~I will post an updated version using [[llGetLinkPrimitiveParams]] & [[llSetLinkPrimitiveParamsFast]] at some time.~~

	<syntaxhighlight lang="lsl2">// V3 //		<syntaxhighlight lang="lsl2">// V4 //

	~~SelfSeed() // The function name.~~
	{
	~~string name = llGetScriptName(); // Store the name of this script to save calling for it over and over.~~
	~~integer links_in_set = llGetObjectPrimCount(llGetKey()); // Store how many links there are.~~
	~~integer count = 2; // Establish a counter that will start at the next link in the set.~~
	~~do // This is the point from which we loop if the while condition is met.~~
	~~llGiveInventory(llGetLinkKey(count), name); // Deliver a copy of this script to the link number "count".~~
	~~while((++count) <= links_in_set); // Increment "count" and check if it is still less than or equal to the number of links.~~
	~~} // If "count" is not more than the number of links loop back to "do".~~

	~~float Float~~(float f) ~~// The function name and the float data it carries.~~		string enzeroizer( float f ) {
	{		return llGetSubString( ( string )f, 0, -5 ) + ( string )llRound( ( float )llGetSubString( ( string )f, -4, -1 ) / 1000 ) + "000";
	return ((~~float~~)(~~llDeleteSubString~~(((string)f), -3, -1) + "000")); ~~// Typecast the delivered float to a string.~~
	~~// Chop the last 3 characters off the string and add 3 zeros.~~
	~~// Then typecast the result to a float and return it.~~
	}		}

	~~Enzeroize~~() ~~// The function name.~~		rotation enzeroized( rotation rot ) {
	{		vector euler = llRot2Euler( rot ) * RAD_TO_DEG;
	vector ~~rot~~ = (llRot2Euler(~~llGetLocalRot()~~)*RAD_TO_DEG); ~~// Store the local rotation of the prim as a vector.~~		return llEuler2Rot( ( vector )( "<" + llList2CSV( [ enzeroizer( euler.x ),
	~~// Below : Take each of the axes~~ (~~X, Y & Z~~) ~~and feed to the~~ "~~Float()~~" ~~function then convert the vector to a rotation and set it.~~		enzeroizer( euler.y ),
	~~llSetLocalRot~~(~~llEuler2Rot~~(~~<Float(rot~~.x), ~~Float~~(~~rot~~.y), ~~Float~~(~~rot~~.z)>*DEG_TO_RAD));		enzeroizer( euler.z ) ] ) + ">" ) * DEG_TO_RAD );
			}

			resetRotations( integer ln ) {
			llSetLinkPrimitiveParamsFast( ln, [ PRIM_ROT_LOCAL, enzeroized( llList2Rot( llGetLinkPrimitiveParams( ln, [ PRIM_ROT_LOCAL ] ), 0 ) ) ] );
	}		}

	default ~~// Create a state.~~		default {
	{		state_entry() {
	state_entry() ~~// On entering the state...~~		integer links = llGetObjectPrimCount( llGetKey() );
	{		if ( links == 1 ) {
	if(~~llGetLinkNumber~~() == 1) ~~// ...Check if we are the root of a LINK_SET.~~		resetRotations( 0 );
	{		} else {
	~~SelfSeed~~(); ~~// Call the "SelfSeed()" function.~~		while ( links ) {
	~~Enzeroize~~()~~; // Call the "Enzeroize()" function.~~		resetRotations( --links );
	~~// Below : Issue instructions in chat to the owner of the object.~~		}
	~~llOwnerSay~~(~~"\nTake me to your inventory and re~~-~~rez me." +~~
	~~"\nThen open an edit on me and goto your \"Tools\" menu." +~~
	~~"\nNear the bottom of the menu click \"Set Scripts Running In Selection\"." +~~
	~~"\nAll the scripts will self delete after Enzeroizing."~~);
	}		}
	~~else // If not in the root or if not in a LINK_SET...~~
	~~Enzeroize(); // ...Call the "Enzeroize()" function.~~
	~~llRemoveInventory(llGetScriptName()); // Whether in the root or not, this script removes itself from the prim.~~
	}		}
	}</syntaxhighlight>		}</syntaxhighlight>

Fred Gandt: added to notes - effectively new viewer functionality renders the grid status updater useless \o/

2017-03-21T20:01:35Z

added to notes - effectively new viewer functionality renders the grid status updater useless \o/

← Older revision		Revision as of 13:01, 21 March 2017
Line 353:		Line 353:

	=== Grid Status Updater ===		=== Grid Status Updater ===
			{{note\|Since [[Release_Notes/Second_Life_Release/5.0.4.324646\|LL Viewer v5.0.4.324646]] ''"you can now add a Grid Status button to your screen from the Toolbox (Me -> Toolbar)"'' which utilizes and connects you to [http://secondlife-status.statuspage.io/ secondlife-status.statuspage.io].
			* If the button is added:
			** The button will turn orange when a status update is added, alerting you to current and/or pending issues.
			** If clicked, your browser will open to show various details about the grid status in chronologically descending order (newest at the top).
			This built in viewer functionality is long overdue, welcome and far better for you and everyone around you than the use of this script.}}
			{{note\|The format of the source of the Grid Status has changed many times since the creation of this script, and there's therefore every reason to assume it may change again. Should this happen, the output of this script may be malformed. I endeavour to keep up to date with the changes, but should really rebuild this script to parse whatever is thrown at it; don't hold your breath!
			* However, due to the changes mentioned in the note above, this script may no longer be of any practical use (except example).}}
	Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.		Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.

	Drop this script onto any prim that is currently not expected to do something else (e.g. a wall or floor etc) and let it run. If it is in an attachment it will work fine but, only while you are logged in. The script will maintain the name of the prim (or object if in a root) but when sending an update will use a special name set by you. This is simply more aesthetically pleasing. Getting an update from "Ceiling Fan" can seem a little odd.		Drop this script onto any prim that is currently not expected to do something else (e.g. a wall or floor etc) and let it run. If it is in an attachment it will work fine but, only while you are logged in. The script will maintain the name of the prim (or object if in a root) but when sending an update will use a special name set by you. This is simply more aesthetically pleasing. Getting an update from "Ceiling Fan" can seem a little odd.

	{{note\|The format of the source of the Grid Status has changed many times since the creation of this script, and there's therefore every reason to assume it may change again. Should this happen, the output of this script may be malformed. I endeavour to keep up to date with the changes, but should really rebuild this script to parse whatever is thrown at it; don't hold your breath!}}
	~~{{note\|Also: Since [[Release_Notes/Second_Life_Release/5.0.4.324646\|LL Viewer v5.0.4.324646]] ''"you can now add a Grid Status button to your screen from the Toolbox (Me -> Toolbar)"''.~~
	* If added and clicked, your browser will open to show [http://secondlife-status.statuspage.io/ secondlife-status.statuspage.io]}}

	<syntaxhighlight lang="lsl2">// V25 //		<syntaxhighlight lang="lsl2">// V25 //

Fred Gandt: cleaning up headings

2017-03-21T12:06:21Z

cleaning up headings

← Older revision		Revision as of 05:06, 21 March 2017
Line 2:		Line 2:

	== Free Scripts ==		== Free Scripts ==
	=== ~~{{Anchor\|~~L$ Gift Giver~~}} L$ Gift Giver ( V2 )~~ ===		=== L$ Gift Giver ===
	'''TAKE CARE WITH THIS ONE. IT WILL DEDUCT L$ FROM YOUR ACCOUNT ONCE YOU GRANT PERMISSIONS.'''		'''TAKE CARE WITH THIS ONE. IT WILL DEDUCT L$ FROM YOUR ACCOUNT ONCE YOU GRANT PERMISSIONS.'''

Line 70:		Line 70:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== Linked Multi-Prim Drawers ~~(2 scripts) ( V4 )~~ ===		=== Linked Multi-Prim Drawers ===
	Could also be used for doors etc.		Could also be used for doors etc.

Line 203:		Line 203:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== Auto Set Group Joiner ~~( V2 )~~ ===		=== Auto Set Group Joiner ===
	<syntaxhighlight lang="lsl2">// V2 //		<syntaxhighlight lang="lsl2">// V2 //

Line 261:		Line 261:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== Percentage Paying (optional) Tip Jar ~~( V2 )~~ ===		=== Percentage Paying (optional) Tip Jar ===
	Pays the percentage (if chosen) to the founder of the group you set the object to.		Pays the percentage (if chosen) to the founder of the group you set the object to.

Line 352:		Line 352:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== ~~{{Anchor\|~~Grid Status Updater~~}} Grid Status Updater ( V25 )~~ ===		=== Grid Status Updater ===
	Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.		Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.

Line 475:		Line 475:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== ~~{{Anchor\|Simple Texturing Helpers}}~~ Simple Texturing Helpers ===		=== Simple Texturing Helpers ===
	==== ~~{{Anchor\|Touch Texture Getter}}~~ Touch Texture Getter ~~( V2 )~~ ====		==== Touch Texture Getter ====
	Put this script in the root prim of an object and touch whichever face of whichever prim you want the texture UUID of. It will be chatted to you. If you do not have permission to get the UUID you will not get it! A long held touch will delete the script.		Put this script in the root prim of an object and touch whichever face of whichever prim you want the texture UUID of. It will be chatted to you. If you do not have permission to get the UUID you will not get it! A long held touch will delete the script.

Line 515:		Line 515:
	}</syntaxhighlight>		}</syntaxhighlight>

	==== ~~{{Anchor\|~~Touch Texture Setter~~}} Touch Texture Setter ( V3 )~~ ====		==== Touch Texture Setter ====
	Fill out the UUID for the texture to set. Drop the script in the root prim of the object to texture. The texture then sets on each face touched. A long held touch will delete the script.		Fill out the UUID for the texture to set. Drop the script in the root prim of the object to texture. The texture then sets on each face touched. A long held touch will delete the script.

Line 556:		Line 556:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== Enzeroizer (Rotation Fixer~~) ( V3~~ ) ===		=== Enzeroizer (Rotation Fixer) ===
	Drop this into the root of your linked object and it will self seed to all links in a set (object). After re-rezzing the object and setting the scripts running it will set the rotations to whatever they were but with the smallest 3 decimal places made {{HoverText\|000\|ZERO}}.		Drop this into the root of your linked object and it will self seed to all links in a set (object). After re-rezzing the object and setting the scripts running it will set the rotations to whatever they were but with the smallest 3 decimal places made {{HoverText\|000\|ZERO}}.
	*E.g. <75.458392, 128,038754, 298.836580> will become <75.458000, 128,038000, 298.836000>.		*E.g. <75.458392, 128,038754, 298.836580> will become <75.458000, 128,038000, 298.836000>.
Line 609:		Line 609:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== Pose Stand ~~( V4 )~~ ===		=== Pose Stand ===
	Multi type, multi sex, multi story car park? Nope it just does poses.		Multi type, multi sex, multi story car park? Nope it just does poses.

Fred Gandt: added note about new grid status toolbar option with link to release notes and statuspage.io

2017-03-17T16:18:20Z

added note about new grid status toolbar option with link to release notes and statuspage.io

← Older revision		Revision as of 09:18, 17 March 2017
Line 358:		Line 358:

	{{note\|The format of the source of the Grid Status has changed many times since the creation of this script, and there's therefore every reason to assume it may change again. Should this happen, the output of this script may be malformed. I endeavour to keep up to date with the changes, but should really rebuild this script to parse whatever is thrown at it; don't hold your breath!}}		{{note\|The format of the source of the Grid Status has changed many times since the creation of this script, and there's therefore every reason to assume it may change again. Should this happen, the output of this script may be malformed. I endeavour to keep up to date with the changes, but should really rebuild this script to parse whatever is thrown at it; don't hold your breath!}}
			{{note\|Also: Since [[Release_Notes/Second_Life_Release/5.0.4.324646\|LL Viewer v5.0.4.324646]] ''"you can now add a Grid Status button to your screen from the Toolbox (Me -> Toolbar)"''.
			* If added and clicked, your browser will open to show [http://secondlife-status.statuspage.io/ secondlife-status.statuspage.io]}}

	<syntaxhighlight lang="lsl2">// V25 //		<syntaxhighlight lang="lsl2">// V25 //

Fred Gandt: update script

2017-03-17T05:38:04Z

update script

← Older revision		Revision as of 22:38, 16 March 2017
Line 352:		Line 352:
	}</syntaxhighlight>		}</syntaxhighlight>

	=== {{Anchor\|Grid Status Updater}} Grid Status Updater ( ~~V24~~ ) ===		=== {{Anchor\|Grid Status Updater}} Grid Status Updater ( V25 ) ===
	Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.		Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.

Line 359:		Line 359:
	{{note\|The format of the source of the Grid Status has changed many times since the creation of this script, and there's therefore every reason to assume it may change again. Should this happen, the output of this script may be malformed. I endeavour to keep up to date with the changes, but should really rebuild this script to parse whatever is thrown at it; don't hold your breath!}}		{{note\|The format of the source of the Grid Status has changed many times since the creation of this script, and there's therefore every reason to assume it may change again. Should this happen, the output of this script may be malformed. I endeavour to keep up to date with the changes, but should really rebuild this script to parse whatever is thrown at it; don't hold your breath!}}

	<syntaxhighlight lang="lsl2">// ~~V24~~ //		<syntaxhighlight lang="lsl2">// V25 //

	float update_rate = 300.0; // How many second between checking for updates.		float update_rate = 300.0; // How many second between checking for updates.
Line 371:		Line 371:
	key iq; // Used to verify the source of the HTTPRequest.		key iq; // Used to verify the source of the HTTPRequest.

	list lookup_months = [ "January",		list timezones = [ 7, "PDT", 8, "PST" ];
	"February",
	"March",		list lookup_months = [ "January ",
	"April",		"February ",
	"May",		"March ",
	"June",		"April ",
	"July",		"May ",
	"August",		"June ",
	"September",		"July ",
	"October",		"August ",
	"November",		"September ",
	"December" ];		"October ",
			"November ",
			"December " ];

	string prettyTimestamp( string ts ) {		string prettyTimestamp( string ts ) {
	list stamp_parts = llParseString2List( ts, [ "T" ], ~~[] );~~		list stamp_parts = llParseString2List( ts, [ "T", "-", ":" ], [] );
	~~list date_parts = llParseString2List( llList2String( stamp_parts, 0 ), [~~ "-~~" ], [] );~~		string date = llList2String( lookup_months, llList2Integer( stamp_parts, 1 ) - 1 ) + llList2String( stamp_parts, 2 ) + ", " + llList2String( stamp_parts, 0 );
	~~list time_parts = llParseString2List( llList2String( stamp_parts, 1 ), [ "+~~", "-" ], [] );		string time = llDumpList2String( llList2List( stamp_parts, 3, 4 ), ":" );
	~~date_parts~~ = ~~llListReplaceList( date_parts, [~~ llList2String( lookup_months, llList2Integer( ~~date_parts~~, 1 ) - 1 ) ~~], 1, 1 );~~		string tz = llList2String( timezones, llListFindList( timezones, [ llList2Integer( stamp_parts, 6 ) ] ) + 1 );
	~~ts = llDumpList2String~~( ~~llList2List( date_parts, 1~~, ~~-1 ), " "~~ ) + ", " + llList2String( ~~date_parts~~, 0 ) ~~+ " at "~~;		return date + " at " + time + " " + tz;
	~~ts +~~= llDumpList2String( llList2List( ~~llParseString2List( llList2String( time_parts~~, 0 ), [ ":" ], [] )~~, 0,~~ 1 ), ":" ) + " ~~PST~~";
	~~return ts~~;
	}		}

Fred Gandt: update script

2017-03-11T22:41:26Z

update script

Show changes

Fred Gandt: grid status updater update + minor tidying

2017-03-03T05:22:29Z

grid status updater update + minor tidying

Show changes

Fred Gandt: switch to templated layout

2017-02-26T21:30:16Z

switch to templated layout

@@ Line 1: / Line 1: @@
-{{LSL Header}}
+{{User:Fred Gandt/Template|content=
 == Free Scripts ==
@@ Line 1,001: / Line 951: @@
          TypeCast();
+     }
-}</syntaxhighlight>
+}</syntaxhighlight>}}

Fred Gandt: /* Grid Status Updater ( V22 ) */ updated script to fix + added note about constant need to update

2017-02-22T04:07:40Z

Grid Status Updater ( V22 ): updated script to fix + added note about constant need to update

← Older revision		Revision as of 21:07, 21 February 2017
Line 413:		Line 413:
	{{Anchor\|Grid Status Updater}}		{{Anchor\|Grid Status Updater}}

	=== Grid Status Updater ( ~~V21~~ ) ===		=== Grid Status Updater ( V22 ) ===

	Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.		Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.
Line 419:		Line 419:
	Drop this script onto any prim that is currently not expected to do something else (e.g. a wall or floor etc) and let it run. If it is in an attachment it will work fine but, only while you are logged in. The script will maintain the name of the prim (or object if in a root) but when sending an update will use a special name set by you. This is simply more aesthetically pleasing. Getting an update from "Ceiling Fan" can seem a little odd.		Drop this script onto any prim that is currently not expected to do something else (e.g. a wall or floor etc) and let it run. If it is in an attachment it will work fine but, only while you are logged in. The script will maintain the name of the prim (or object if in a root) but when sending an update will use a special name set by you. This is simply more aesthetically pleasing. Getting an update from "Ceiling Fan" can seem a little odd.

	<syntaxhighlight lang="lsl2">// ~~V21~~ //		{{note\|The format of source of the Grid Status has changed many times since the creation of this script, and there's therefore every reason to assume it may change again. Should this happen, the output of this script may be malformed. I endeavour to keep up to date with the changes, but should really rebuild this script to parse whatever is thrown at it; don't hold your breath!}}

			<syntaxhighlight lang="lsl2">// V22 //

	string feed_url = "http://status.secondlifegrid.net/~~feed/~~"; // From where we draw our updates.		string feed_url = "http://status.secondlifegrid.net/history.atom"; // From where we draw our updates.

	string alert_name = "Grid Status Update"; // What we call the object while it messages us.		string alert_name = "Grid Status Update"; // What we call the object while it messages us.
Line 434:		Line 436:

	list exchange = [		list exchange = [
	"&nbsp;", " ",		"&", "&",
	"</~~SPAN~~></P>", "",		" ", " ",
	"<P><~~SPAN~~>", ""		"<p><small>", "",
			"</small><br><strong>", ": ",
			"</strong>", "",
			"<br />", "",
			"</p>", ""
	]; // Various strings we find in the HTTP response that we may wish to bulk exchange.		]; // Various strings we find in the HTTP response that we may wish to bulk exchange.

Line 470:		Line 476:
	if ( q == iq ) {		if ( q == iq ) {
	if ( status == 200 ) {		if ( status == 200 ) {
	body = MultiStringReplace( llGetSubString( body, ( llSubStringIndex( body, "<~~item~~>" ) + 6 ), -1 ) );		body = MultiStringReplace( llGetSubString( body, ( llSubStringIndex( body, "<entry>" ) + 6 ), -1 ) );
	string latest = llGetSubString( body, ( llSubStringIndex( body, "<~~description~~>" ) + 13 ),		string latest = llGetSubString( body, ( llSubStringIndex( body, "<content type=\"html\">" ) + 21 ),
	( llSubStringIndex( body, "</~~description~~>" ) - 1 ) );		( llSubStringIndex( body, "</content>" ) - 1 ) );
	if ( latest != last ) {		if ( latest != last ) {
	last = latest;		last = latest;
Line 478:		Line 484:
	llInstantMessage( owner, "ISSUE --> " + llGetSubString( body, ( llSubStringIndex( body, "<title>" ) + 7 ),		llInstantMessage( owner, "ISSUE --> " + llGetSubString( body, ( llSubStringIndex( body, "<title>" ) + 7 ),
	( llSubStringIndex( body, "</title>" ) - 1 ) ) +		( llSubStringIndex( body, "</title>" ) - 1 ) ) +
	"\n\nTIME --> " + llGetSubString( body, ( llSubStringIndex( body, "<~~pubDate~~>" ) + 9 ),		"\n\nTIME --> " + llGetSubString( body, ( llSubStringIndex( body, "<published>" ) + 11 ),
	( llSubStringIndex( body, "</~~pubDate~~>" ) - 1 ) ) +		( llSubStringIndex( body, "</published>" ) - 1 ) ) +
	"\n\nLATEST --> " + latest +		"\n\nLATEST --> " + latest +
	"\n\nLINK --> " + llGetSubString( body, ( llSubStringIndex( body, "~~<link>~~" ) + 6 ),		"\n\nLINK --> " + llGetSubString( body, ( llSubStringIndex( body, "href=\"" ) + 6 ),
	( llSubStringIndex( body, "</~~link~~>" ) - 1 ) ) );		( llSubStringIndex( body, "\"/>" ) - 1 ) ) );
	llSetObjectName( my_proper_name );		llSetObjectName( my_proper_name );
	}		}

Fred Gandt: /* Grid Status Updater ( V20 ) / update to / Grid Status Updater ( V21 ) */

2016-08-02T08:18:00Z

Grid Status Updater ( V20 ): update to Grid Status Updater ( V21 )

← Older revision		Revision as of 01:18, 2 August 2016
Line 413:		Line 413:
	{{Anchor\|Grid Status Updater}}		{{Anchor\|Grid Status Updater}}

	=== Grid Status Updater ( ~~V20~~ ) ===		=== Grid Status Updater ( V21 ) ===

	Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.		Checks the Second Life Grid Status every five minutes to see if there are any new issues. If there are it will IM you.
Line 419:		Line 419:
	Drop this script onto any prim that is currently not expected to do something else (e.g. a wall or floor etc) and let it run. If it is in an attachment it will work fine but, only while you are logged in. The script will maintain the name of the prim (or object if in a root) but when sending an update will use a special name set by you. This is simply more aesthetically pleasing. Getting an update from "Ceiling Fan" can seem a little odd.		Drop this script onto any prim that is currently not expected to do something else (e.g. a wall or floor etc) and let it run. If it is in an attachment it will work fine but, only while you are logged in. The script will maintain the name of the prim (or object if in a root) but when sending an update will use a special name set by you. This is simply more aesthetically pleasing. Getting an update from "Ceiling Fan" can seem a little odd.

	<syntaxhighlight lang="lsl2">// ~~V20~~ //		<syntaxhighlight lang="lsl2">// V21 //

	string feed_url = "http://status.secondlifegrid.net/feed/"; // From where we draw our updates.		string feed_url = "http://status.secondlifegrid.net/feed/"; // From where we draw our updates.
Line 433:		Line 433:
	key iq; // Used to verify the source of the HTTPRequest.		key iq; // Used to verify the source of the HTTPRequest.

	list exchange = [~~" [...]","...",~~		list exchange = [
	"&~~#8221~~;","\"",		"&nbsp;", " ",
	"&~~#8220~~;~~","\"",~~		"</SPAN></P>", "",
	"&~~#8217~~;~~","'",~~		"<P><SPAN>", ""
	"&~~#062~~;",">",		]; // Various strings we find in the HTTP response that we may wish to bulk exchange.
	"&~~#038~~;~~","~~&",
	"&~~#62~~;~~",">",~~
	"&~~#38~~;","&"];

	string MultiStringReplace(string src~~, list thisnthats~~)		string MultiStringReplace( string src ) {
	{
	integer index = 0;		integer index = 0;
	integer lc = 0;		integer lc = 0;
	integer ll = llGetListLength(~~thisnthats~~);		integer ll = llGetListLength( exchange );
	string this;		string this;
	do		do {
	{		this = llList2String( exchange, lc );
	this = llList2String(~~thisnthats~~, lc);
	++lc;		++lc;
	while((index = llSubStringIndex(src, this)) != -1)		while ( ( index = llSubStringIndex( src, this ) ) != -1 ) {
	src = llInsertString(llDeleteSubString(src, index, (index + (llStringLength(this) - 1))), index, llList2String(~~thisnthats~~, lc));		src = llInsertString( llDeleteSubString( src, index, ( index + ( llStringLength( this ) - 1 ) ) ), index, llList2String( exchange, lc ) );
	}		}
	while((++lc) < ll);		} while ( ( ++lc ) < ll );
	return src;		return src;
	}		}

	default		default {
	{		on_rez( integer param ) {
	on_rez(integer param)
	{
	llResetScript();		llResetScript();
	}		}
	state_entry()		state_entry() {
	{
	my_proper_name = llGetObjectName();		my_proper_name = llGetObjectName();
	owner = llGetOwner();		owner = llGetOwner();
	llSetTimerEvent(300.0);		llSetTimerEvent( 300.0 );
	iq = llHTTPRequest(feed_url, [], "");		iq = llHTTPRequest( feed_url, [], "" );
	}		}
	timer()		timer() {
	{		iq = llHTTPRequest( feed_url, [], "" );
	iq = llHTTPRequest(feed_url, [], "");
	}		}
	http_response(key q, integer status, list meta, string body)		http_response( key q, integer status, list meta, string body ) {
	{		if ( q == iq ) {
	if(q == iq)		if ( status == 200 ) {
	{		body = MultiStringReplace( llGetSubString( body, ( llSubStringIndex( body, "<item>" ) + 6 ), -1 ) );
	if(status == 200)		string latest = llGetSubString( body, ( llSubStringIndex( body, "<description>" ) + 13 ),
	{		( llSubStringIndex( body, "</description>" ) - 1 ) );
	body = llGetSubString(body, (llSubStringIndex(body, "<item>") + 6), -1);		if ( latest != last ) {
	string latest = ~~llStringTrim(~~llGetSubString(body, (llSubStringIndex(body, "<description>~~<![CDATA[~~") + 22),
	(llSubStringIndex(body, "~~]]>~~</description>") - 1)~~), STRING_TRIM~~);
	if(latest != last)
	{
	last = latest;		last = latest;
	~~string dnt = llGetSubString(body, (llSubStringIndex(body, "<pubDate>") + 9), (llSubStringIndex(body, "</pubDate>") - 10));~~		llSetObjectName( alert_name );
	llSetObjectName(alert_name);		llInstantMessage( owner, "ISSUE --> " + llGetSubString( body, ( llSubStringIndex( body, "<title>" ) + 7 ),
	llInstantMessage(owner, "~~/me \n\nISSUE~~ --> " + ~~MultiStringReplace(~~llGetSubString(body, (llSubStringIndex(body, "<title>") + 7),		( llSubStringIndex( body, "</title>" ) - 1 ) ) +
	(llSubStringIndex(body, "</title>") - 1)~~), exchange~~) +		"\n\nTIME --> " + llGetSubString( body, ( llSubStringIndex( body, "<pubDate>" ) + 9 ),
	"\n\nTIME --> " + llGetSubString(~~dnt~~, -5, -1) + ", ~~" +~~ (~~llGetSubString~~(~~dnt, 0~~, -~~7) + " (UTC~~)") +		( llSubStringIndex( body, "</pubDate>" ) - 1 ) ) +
	"\n\nLATEST --> " + ~~MultiStringReplace(~~latest~~, exchange)~~ +		"\n\nLATEST --> " + latest +
	"\n\~~nVISIT~~ --> " + llGetSubString(~~feed_url~~, 0, -6));		"\n\nLINK --> " + llGetSubString( body, ( llSubStringIndex( body, "<link>" ) + 6 ),
	llSetObjectName(my_proper_name);		( llSubStringIndex( body, "</link>" ) - 1 ) ) );
			llSetObjectName( my_proper_name );
	}		}
	}		} else {
	else		llSleep( 30.0 );
	{		iq = llHTTPRequest( feed_url, [], "" );
	llSleep(30.0);
	iq = llHTTPRequest(feed_url, [], "");
	}		}
	}		}
Line 508:		Line 494:

	{{Anchor\|Simple Texturing Helpers}}		{{Anchor\|Simple Texturing Helpers}}

	=== Simple Texturing Helpers ===		=== Simple Texturing Helpers ===

User:Fred Gandt/Scripts/Continued 1 - Revision history

Fred Gandt: update enzeroizer

Fred Gandt: added to notes - effectively new viewer functionality renders the grid status updater useless \o/

Fred Gandt: cleaning up headings

Fred Gandt: added note about new grid status toolbar option with link to release notes and statuspage.io

Fred Gandt: update script

Fred Gandt: update script

Fred Gandt: grid status updater update + minor tidying

Fred Gandt: switch to templated layout

Fred Gandt: /* Grid Status Updater ( V22 ) */ updated script to fix + added note about constant need to update

Fred Gandt: /* Grid Status Updater ( V20 ) */ update to /* Grid Status Updater ( V21 ) */

Fred Gandt: /* Grid Status Updater ( V20 ) / update to / Grid Status Updater ( V21 ) */