User talk:Toady Nakamura - Revision history

Toady Nakamura: for class tomorrow i will clean up later

2020-12-02T07:27:40Z

for class tomorrow i will clean up later

← Older revision		Revision as of 00:27, 2 December 2020
Line 1:		Line 1:
	Leave me a message !!! [[User:Toady Nakamura\|Toady Nakamura]] 23:44, 5 July 2012 (PDT)		Leave me a message !!! [[User:Toady Nakamura\|Toady Nakamura]] 23:44, 5 July 2012 (PDT)\

			<source lang="lsl2">
			//Teleporters use the Changed Event


			// —— Global variables
			vector gDestination = <000,000,000>; // don’t change in class ! (see note one)

			integer gAccessMode = 1; // Change who can use the teleporter: 1 - public, 2 - owner, 3 - group.

			//—- all for hover text
			string gText = "Sit here for fun teleport"; // hover text
			vector gTextColor = < 0.42 , 1.0 , 0.42 > ; // color of hover text
			float gAlpha = 1.0; // transparency of hover text

			//====Script starts here with default ==========

			default
			{
			state_entry()
			{
			llSitTarget(<0.0, 0.0, 0.51>, ZERO_ROTATION);
			llSetSitText("Teleport");
			llSetTouchText("Teleport");
			llSetText(gText, gTextColor, 1.0);
			llSetClickAction(CLICK_ACTION_SIT);

			vector offset = llGetPos() + < 0, 0, 10 >;
			gDestination = gDestination + offset;
			}

			changed(integer change)
			{
			if (change & CHANGED_LINK)
			{
			key USER = llAvatarOnSitTarget();

			if (llGetAgentSize(USER) != ZERO_VECTOR) // it’s really an avatar!
			{
			// . . . . . . . . . . . . . . . . . . . . . . . . . . . .
			if (gDestination == <0.0,0.0,0.0>) // destination not set !!
			{
			llUnSit(USER); // unsit user
			llOwnerSay("WARNING ! Teleporter destination is set to 0,0,0. Aborting.");
			}
			integer access_granted = FALSE; // did not let this proceed

			// . . . . . . . . . . . . . . . . . . . . . . . . . . . .
			if (gAccessMode == 1) // 1 is public, anyone can use
			{ access_granted = TRUE;} // you are good to go!
			// . . . . . . . . . . . . . . . . . . . . . . . . . . . .
			else if (gAccessMode == 2) // 2 is owner, so owner only
			{
			if (USER == llGetOwner()) // if user is the same as owner
			{ access_granted = TRUE; } // you are good to go!
			else
			{
			llUnSit(USER);
			llSay(0,"Sorry, " + llKey2Name(USER) + "teleporter for owner use only.");
			}
			}
			// . . . . . . . . . . . . . . . . . . . . . . . . . . . .
			else if (gAccessMode == 3) // 3 is group, so only same group as rezzed
			{
			if (llSameGroup(USER)) // if user is in same group
			{ access_granted = TRUE; } // they are good to go!
			else
			{
			llUnSit(USER);
			llSay(0,"Sorry," + llKey2Name(USER) + " teleporter for group use only.");
			}
			}
			// . . . . . . . . . . . . . . . . . . . . . . . . . . . .
			if (access_granted) // Yippie, you have permission!
			{
			vector _InitPos = llGetPos(); // gets starting position
			llSetRegionPos(gDestination); // sends to destination
			llUnSit(USER); // unsit !
			llSetRegionPos(_InitPos); // go back to start pos
			}
			}
			}
			}
			}

			</source>


	<source lang="lsl2">		<source lang="lsl2">

Strife Onizuka: source tags

2016-03-08T03:46:40Z

source tags

← Older revision		Revision as of 20:46, 7 March 2016
Line 1:		Line 1:
	Leave me a message !!! [[User:Toady Nakamura\|Toady Nakamura]] 23:44, 5 July 2012 (PDT)		Leave me a message !!! [[User:Toady Nakamura\|Toady Nakamura]] 23:44, 5 July 2012 (PDT)

	<~~lsl~~>		<source lang="lsl2">
	//Counts down from 5 to 1, then can do something else		//Counts down from 5 to 1, then can do something else
	default		default
Line 21:		Line 21:
	}		}
	}		}
	</~~lsl~~>		</source>

	== Debug error ==		== Debug error ==
Line 53:		Line 53:
	Try this instead?		Try this instead?

	<~~lsl~~>		<source lang="lsl2">
	vector floattext_color = < 1.0, 1.0, 1.0>;		vector floattext_color = < 1.0, 1.0, 1.0>;
	string floattext_text = "Put your floating message here.";		string floattext_text = "Put your floating message here.";
Line 105:		Line 105:
	}		}
	}		}
	</~~lsl~~>		</source>

	Cheers! '''[[User:Kireji_Haiku\|Kireji Haiku]]''' <sup><small>([[User talk:Kireji_Haiku\|talk]]\|[[Special:Contributions/Kireji_Haiku\|contribs]])</small></sup> 01:02, 2 September 2014 (PDT)		Cheers! '''[[User:Kireji_Haiku\|Kireji Haiku]]''' <sup><small>([[User talk:Kireji_Haiku\|talk]]\|[[Special:Contributions/Kireji_Haiku\|contribs]])</small></sup> 01:02, 2 September 2014 (PDT)

	==next up==		==next up==
	default {		<source lang="lsl2">
	~~state_entry()~~		default
	{		{
	integer p;		state_entry()
	for (p = 2; p <= llGetNumberOfPrims(); p++)		{
	llSetLinkPrimitiveParamsFast(p, [PRIM_NAME, llGetObjectName(), PRIM_DESC, llGetObjectDesc()]);		integer p;
	} }		for (p = 2; p <= llGetNumberOfPrims(); p++)
			llSetLinkPrimitiveParamsFast(p, [PRIM_NAME, llGetObjectName(), PRIM_DESC, llGetObjectDesc()]);
			}
			}
			</source>

	that way I don't frogget to do it.		that way I don't frogget to do it.

Toady Nakamura: new snippit

2016-03-03T23:10:17Z

new snippit

← Older revision		Revision as of 16:10, 3 March 2016
Line 108:		Line 108:

	Cheers! '''[[User:Kireji_Haiku\|Kireji Haiku]]''' <sup><small>([[User talk:Kireji_Haiku\|talk]]\|[[Special:Contributions/Kireji_Haiku\|contribs]])</small></sup> 01:02, 2 September 2014 (PDT)		Cheers! '''[[User:Kireji_Haiku\|Kireji Haiku]]''' <sup><small>([[User talk:Kireji_Haiku\|talk]]\|[[Special:Contributions/Kireji_Haiku\|contribs]])</small></sup> 01:02, 2 September 2014 (PDT)

			==next up==
			default {
			state_entry()
			{
			integer p;
			for (p = 2; p <= llGetNumberOfPrims(); p++)
			llSetLinkPrimitiveParamsFast(p, [PRIM_NAME, llGetObjectName(), PRIM_DESC, llGetObjectDesc()]);
			} }

			that way I don't frogget to do it.

Kireji Haiku at 08:02, 2 September 2014

2014-09-02T08:02:26Z

← Older revision		Revision as of 01:02, 2 September 2014
Line 48:		Line 48:
	[[User:Omei Qunhua\|Omei Qunhua]] 01:38, 29 January 2014 (PST)		[[User:Omei Qunhua\|Omei Qunhua]] 01:38, 29 January 2014 (PST)
	:Thank you for your comments, you corrected a script I expect my students to correct in class so I have removed your corrections here so they don't cheat and just use yours. [[User:Toady Nakamura\|Toady Nakamura]] 14:16, 11 March 2014 (PDT)		:Thank you for your comments, you corrected a script I expect my students to correct in class so I have removed your corrections here so they don't cheat and just use yours. [[User:Toady Nakamura\|Toady Nakamura]] 14:16, 11 March 2014 (PDT)

			== [[User:Toady_Nakamura/Give_Anything]]: ==

			Try this instead?

			<lsl>
			vector floattext_color = < 1.0, 1.0, 1.0>;
			string floattext_text = "Put your floating message here.";
			string foldername = "Put the name of the folder they will get here.";

			list contents;

			default
			{
			changed(integer change)
			{
			if (change & (CHANGED_OWNER \| CHANGED_INVENTORY))
			llResetScript();
			}

			state_entry()
			{
			llSetText(floattext_text, floattext_color, 1.0);

			integer c = llGetInventoryNumber(INVENTORY_ALL);
			integer i = 0;

			// for-loops below have the same effect in this particular example

			// for (; i < c; i += 1) ...;
			// for (; i < c; i++) ...;
			// for (; i < c; ++i) ...;

			for (i = 0; i < c; i = i + 1)
			{
			string n = llGetInventoryName(INVENTORY_ALL, i);
			integer t = llGetInventoryType(n);

			// if you include INVENTORY_SCRIPT below, you need to
			// check against if (n != llGetScriptName()) as well to not give away this script

			if (t & (INVENTORY_LANDMARK \| INVENTORY_NOTECARD \| INVENTORY_OBJECT))
			contents += n;
			}
			}

			touch_start(integer num_detected)
			{
			key avatarKey = llDetectedKey(0);
			string avatarName = llDetectedName(0);

			if (llGetListLength(contents))
			llGiveInventoryList(avatarKey, foldername, contents);

			llOwnerSay(avatarName + " got supplies.");
			}
			}
			</lsl>

			Cheers! '''[[User:Kireji_Haiku\|Kireji Haiku]]''' <sup><small>([[User talk:Kireji_Haiku\|talk]]\|[[Special:Contributions/Kireji_Haiku\|contribs]])</small></sup> 01:02, 2 September 2014 (PDT)

Toady Nakamura at 21:16, 11 March 2014

2014-03-11T21:16:15Z

@@ Line 45: / Line 45: @@
 I couldn't resist commenting on your recently posted script. Easiest is if I post the script here with my comments inserted (enclosed within **   **)
-<lsl>
+(content omitted)
 [[User:Omei Qunhua|Omei Qunhua]] 01:38, 29 January 2014 (PST)

Omei Qunhua: Commenting on listen script

2014-01-29T09:38:28Z

Commenting on listen script

← Older revision		Revision as of 02:38, 29 January 2014
Line 38:		Line 38:

	Please read [[User:Kireji_Haiku/How_to_deal_with_lists_in_LSL\|this intro of how to iterate over a list in LSL]]. Hope it helps, kind regards. -- [[User:Kireji Haiku\|Kireji Haiku]] 12:40, 5 November 2012 (PST)		Please read [[User:Kireji_Haiku/How_to_deal_with_lists_in_LSL\|this intro of how to iterate over a list in LSL]]. Hope it helps, kind regards. -- [[User:Kireji Haiku\|Kireji Haiku]] 12:40, 5 November 2012 (PST)

			== Your simple listen script ==

			You do say at the top of your talk page "Leave me a message !!!" ... so I am :)

			I couldn't resist commenting on your recently posted script. Easiest is if I post the script here with my comments inserted (enclosed within )

			<lsl>
			// Toady's simple listen script. Comments added by Omei Qunhua

			integer CHN = 33; // zero channel is public chat - use a different one

			// This is not a correct description of 'listener'. The variable holds the current listen handle, it's not an on/off switch
			integer listener; // records if the listener is on or off (1 or 0)
			key owner; // holds the owner's key ID
			default
			{
			state_entry()
			{
			// It is impossible for any listener to be active at the start of a 'state_entry' event
			// Because either the script is running for the first time (hence no listeners have been set up)
			// or a change of state occurred (which clears all listeners)
			// So llListenRemove() is pointless here
			llListenRemove(listener); // clear any old listeners

			owner = llGetOwner(); // find out who owns prim

			listener = llListen(CHN,"",owner,""); // open a listener for just the owner
			}

			listen(integer channel, string name, key id, string msg) // you changed 'message' to 'msg' ... but your following code refers to 'message'
			{
			// 'p' is a very unhelpful variable name here!
			// Why not called it lc_msg or LowerCaseMsg etc.
			string p = llToLower(message); // convert the message heard to lower case

			// I've seen this kind of statement in scripts before { if(owner==llGetOwnerKey(id)) } and can never see the purpose
			// What is it testing? "Is the key of the owner of the speaker equal to the owner of the object?"
			// What on earth is the 'owner of the speaker' when we're talking about an avatar, in this case the owner ??
			// Much simpler is if (id == owner) or if (id == llGetOwner() )
			// BUT - in your case, your listener is already filtered to ONLY listen to the owner, so this test is pointless and can be removed
			if(owner==llGetOwnerKey(id))
			{
			// personally I would try to avoid coding llSetColor() multiple times
			// By using a local variable called, say, color, set your colour vectors into it, and call llSetColor() once at the end
			// This would save quite a bit of bytecode space, as function calls are expensive on space
			if (p == "red") // if what is heard is "red"
			{
			llSetColor(<1,0,0>, ALL_SIDES); // turn the prim red on all sides
			}
			else if (p == "green")
			{
			llSetColor(<0,1,0>, ALL_SIDES);
			}
			else if (p == "blue")
			{
			llSetColor(<0,0,1>, ALL_SIDES);
			}
			else // if the message is none of the above ...
			{
			llSetColor(<1,1,1>, 0); // just the top of the box will turn white

			// It would be less confusing to say the original message, not your lower-case version
			llOwnerSay(p); // and it will tell you the message in open chat
			}

			// your script is missing a closing curly brace } here

			// As your new llListen here has exactly the same parameters as the existing listener, the SAME listen handle will be returned
			// So there is no need or point in releasing the listener
			// And indeed there is no need to open a new listener
			// This in turn all means that in this script, there is no point in ever saving the listen handle

			llListenRemove(listener); // close that session
			listener = llListen(CHN,"",owner,""); // open a new one
			}

			on_rez(integer start_param)
			{
			llResetScript();
			}
			}
			</lsl>

			[[User:Omei Qunhua\|Omei Qunhua]] 01:38, 29 January 2014 (PST)

Kireji Haiku: replaced with a link

2012-11-05T21:20:57Z

replaced with a link

Show changes

Kireji Haiku: reply with a lengthy explanation of how to deal with lists in LSL

2012-11-05T20:40:36Z

reply with a lengthy explanation of how to deal with lists in LSL

Show changes

Toady Nakamura: /* Variable names */

2012-11-04T18:07:31Z

Variable names

← Older revision		Revision as of 11:07, 4 November 2012
Line 33:		Line 33:
	== Variable names ==		== Variable names ==
	Greetings, I rewrote your example script on [[User:Toady_Nakamura/Simple_Recording_Tipjar]]. For sake of readability, please use variable names that actually mean something amd not i, m, n and what not. Your doing yourself a favor by doing so! -- [[User:Kireji Haiku\|Kireji Haiku]] 11:18, 19 October 2012 (PDT)		Greetings, I rewrote your example script on [[User:Toady_Nakamura/Simple_Recording_Tipjar]]. For sake of readability, please use variable names that actually mean something amd not i, m, n and what not. Your doing yourself a favor by doing so! -- [[User:Kireji Haiku\|Kireji Haiku]] 11:18, 19 October 2012 (PDT)
			:I replied on your talk page, as is customary. You did not reply and you wiped out my reply to you. [[User:Toady Nakamura\|Toady Nakamura]] 10:07, 4 November 2012 (PST)

Toady Nakamura: restored my sample script to how I had it... on user talk pages it usually isn't a good idea to edit other people's entries!

2012-10-30T19:03:03Z

restored my sample script to how I had it... on user talk pages it usually isn't a good idea to edit other people's entries!

← Older revision		Revision as of 12:03, 30 October 2012
Line 10:		Line 10:
	do		do
	{		{
	~~// PUBLIC_CHANNEL has the integer value 0~~
	llSay(~~PUBLIC_CHANNEL~~, (string)count);		llSay(0, (string)count);

	// wait a sec		// wait a sec
Line 18:		Line 18:
	while (--index);		while (--index);

	llWhisper(~~PUBLIC_CHANNEL~~, "I am done counting now.");		llWhisper(0, "I am done counting now.");
	}		}
	}		}