User:Anylyn Hax - Revision history

Anylyn Hax: /* llSetPrimitiveParams() Example3 (updated since the function has changed) */

2012-02-27T00:12:54Z

llSetPrimitiveParams() Example3 (updated since the function has changed)

← Older revision		Revision as of 17:12, 26 February 2012
Line 723:		Line 723:
	string FI(integer n){if(!n){return "0";}else{return (string)n;}}		string FI(integer n){if(!n){return "0";}else{return (string)n;}}

			string FS(string s){if(s==""){return "\"\"";}else{return s;}}

	string FF(float n, integer p)		string FF(float n, integer p)
Line 876:		Line 877:
	o("llSetPrimitiveParams([");		o("llSetPrimitiveParams([");
	// 2		// 2
	L=gpp([PRIM_MATERIAL]);t(", PRIM_MATERIAL, "+l2s(materials ,l2i(L,0)));		L=gpp([PRIM_MATERIAL]);t(" PRIM_MATERIAL, "+l2s(materials ,l2i(L,0)));
	// 3		// 3
	L=gpp([PRIM_PHYSICS]);t(", PRIM_PHYSICS, "+l2s(booleans ,l2i(L ,0)));		L=gpp([PRIM_PHYSICS]);t(", PRIM_PHYSICS, "+l2s(booleans ,l2i(L ,0)));
Line 927:		Line 928:
	for(i=0;i<=ce_side;i++){L=gpp([PRIM_GLOW ,i]);if (L!=[] && L0!=L) {t(", PRIM_GLOW, "+FI(i)+K+FF(l2f(L,0),3) );}}		for(i=0;i<=ce_side;i++){L=gpp([PRIM_GLOW ,i]);if (L!=[] && L0!=L) {t(", PRIM_GLOW, "+FI(i)+K+FF(l2f(L,0),3) );}}
	// 26		// 26
	L=gpp([PRIM_TEXT]);t(", PRIM_TEXT, "+l2s(L,0)+K+FV(l2v(L,1),3)+K+FF(l2f(L,2),3));		L=gpp([PRIM_TEXT]);t(", PRIM_TEXT, "+FS(l2s(L,0))+K+FV(l2v(L,1),3)+K+FF(l2f(L,2),3));
	// 27		// 27
	L=gpp([PRIM_NAME]);		L=gpp([PRIM_NAME]);
	string prn=l2s(L,0);~~if(prn==""){prn="\"\"";}~~t(", PRIM_NAME, "+prn);prn="";		string prn=l2s(L,0);t(", PRIM_NAME, \""+prn+"\" ");prn="";
	// 28		// 28
	L=gpp([PRIM_DESC]);		L=gpp([PRIM_DESC]);
	string prd=l2s(L,0);~~if(prd==""){prd="\"\"";}~~t(", PRIM_DESC, "+prd);prd="";		string prd=l2s(L,0);t(", PRIM_DESC, \""+prd+"\" ");prd="";
	// 29		// 29
	L=gpp([PRIM_ROT_LOCAL]);t(", PRIM_ROT_LOCAL, "+FR(l2r(L,0),3) );		L=gpp([PRIM_ROT_LOCAL]);t(", PRIM_ROT_LOCAL, "+FR(l2r(L,0),3) );
Line 943:		Line 944:
	L=gpp([PRIM_POS_LOCAL]);t(", PRIM_POS_LOCAL, "+FV(l2v(L,0),3) );		L=gpp([PRIM_POS_LOCAL]);t(", PRIM_POS_LOCAL, "+FV(l2v(L,0),3) );

	/* 34 BUGGY		/* 34 BUGGY, use only with Linksets
	L=gpp([PRIM_LINK_TARGET]);		L=gpp([PRIM_LINK_TARGET]);
	string plt=FI(0+l2i(L,0));		string plt=FI(0+l2i(L,0));
Line 957:		Line 958:
	o(" ]);");		o(" ]);");
	o(" //This Script used " + (string)(((4*16384) - llGetFreeMemory())/1024) + " kBytes");		o(" //This Script used " + (string)(((4*16384) - llGetFreeMemory())/1024) + " kBytes");
	llSetObjectName(ce_primname); // what you take you must give back		llSetObjectName(ce_primname); // what you take you must give back
	}		}
	}		}
	</lsl>		</lsl>


			llSetPrimitiveParams([
			PRIM_MATERIAL, PRIM_MATERIAL_WOOD
			, PRIM_PHYSICS, FALSE
			, PRIM_TEMP_ON_REZ, FALSE
			, PRIM_PHANTOM, FALSE
			, PRIM_POSITION, <106.967,232.168,70.913>
			, PRIM_SIZE, <0.50,0.50,0.50>
			, PRIM_ROTATION, ZERO_ROTATION
			, PRIM_TYPE, PRIM_TYPE_BOX, PRIM_HOLE_DEFAULT, <0.0,1.0,0.0>, 0.0, ZERO_VECTOR, <1.0,1.0,0.0>, ZERO_VECTOR
			, PRIM_TEXTURE, ALL_SIDES, "89556747-24cb-43ed-920b-47caed15465f", <1.0,1.0,0.0>, ZERO_VECTOR, 0.0
			, PRIM_COLOR, ALL_SIDES, <1.0,1.0,1.0>, 1.0
			, PRIM_BUMP_SHINY, ALL_SIDES, PRIM_SHINY_NONE, PRIM_BUMP_NONE
			, PRIM_FULLBRIGHT, ALL_SIDES, FALSE
			, PRIM_FLEXIBLE, FALSE, 0, 0.0, 0.0, 0.0, 0.0, ZERO_VECTOR
			, PRIM_TEXGEN, ALL_SIDES, PRIM_TEXGEN_DEFAULT
			, PRIM_POINT_LIGHT, FALSE, ZERO_VECTOR, 0.0, 0.0, 0.0
			, PRIM_GLOW, ALL_SIDES, 0.0
			, PRIM_TEXT, "", ZERO_VECTOR, 1.0
			, PRIM_NAME, ""
			, PRIM_DESC, ""
			, PRIM_ROT_LOCAL, ZERO_ROTATION
			, PRIM_PHYSICS_SHAPE_TYPE, PRIM_PHYSICS_SHAPE_PRIM
			, PRIM_OMEGA, ZERO_VECTOR, 0.0, 0.0
			, PRIM_POS_LOCAL, <106.967,232.168,70.913>
			]);
			//This Script used 53 kBytes

	== Spinning DanceBall with random colors ==		== Spinning DanceBall with random colors ==

Anylyn Hax: /* llSetPrimitiveParams() Example3 (updated since the function has changed) */

2012-02-26T23:40:13Z

llSetPrimitiveParams() Example3 (updated since the function has changed)

Show changes

Anylyn Hax at 22:34, 26 February 2012

2012-02-26T22:34:25Z

Show changes

Anylyn Hax at 17:57, 8 May 2011

2011-05-08T17:57:48Z

← Older revision		Revision as of 10:57, 8 May 2011
Line 6:		Line 6:


	== echo(), im(), imme() and debug() ==		== echo, im, imme and debug ==

	Sometimes when I am writing very long and complicated scripts I like to have debug output on the chat to follow the script if its running well.<BR>		Sometimes when I am writing very long and complicated scripts I like to have debug output on the chat to follow the script if its running well.<BR>

Anylyn Hax at 16:52, 8 May 2011

2011-05-08T16:52:30Z

← Older revision		Revision as of 09:52, 8 May 2011
Line 16:		Line 16:
	key me="aed6887f-7f1d-485c-9906-515355b5c49a"; // Put your key here.		key me="aed6887f-7f1d-485c-9906-515355b5c49a"; // Put your key here.
	integer DEBUG=TRUE; // Change this to FALSE for production		integer DEBUG=TRUE; // Change this to FALSE for production
	integer STEP=0;		integer STEP=0;
	init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}		init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE; }return; }
	echo(string ECHO){string ON=llGetObjectName();llSetObjectName("");llOwnerSay("/me "+ECHO);llSetObjectName(ON);return;}		echo(string ECHO){string ON=llGetObjectName(); llSetObjectName(""); llOwnerSay("/me "+ECHO); llSetObjectName(ON); return; }
	im(key KEY,string ECHO){string ON=llGetObjectName();llSetObjectName("#");llInstantMessage(KEY,"/me "+ECHO);llSetObjectName(ON);return;}		im(key KEY,string ECHO){string ON=llGetObjectName(); llSetObjectName("#"); llInstantMessage(KEY,"/me "+ECHO); llSetObjectName(ON); return; }
	imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO);return;}		imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO); return; }
	debug(string ECHO){init();string ON=llGetObjectName();if(DEBUG){echo("[DEBUG ["+ON+"["+llGetScriptName()+"]] STEP "+(string)(STEP++)+"] "+ECHO);}return;}		debug(string ECHO){init(); string ON=llGetObjectName(); if(DEBUG){echo("[DEBUG ["+ON+"["+llGetScriptName()+"]] STEP "+(string)(STEP++)+"] "+ECHO); }return; }
	debugim(string ECHO){init();if(DEBUG){imme("[DEBUG STEP "+(string)(STEP++)+"] "+ECHO);}return;}		debugim(string ECHO){init(); if(DEBUG){imme("[DEBUG STEP "+(string)(STEP++)+"] "+ECHO); }return; }
	/*		/*

Anylyn Hax at 16:49, 8 May 2011

2011-05-08T16:49:37Z

← Older revision		Revision as of 09:49, 8 May 2011
Line 18:		Line 18:
	integer STEP=0;		integer STEP=0;
	init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}		init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}
	echo(string ECHO){string ON=llGetObjectName(); llSetObjectName(""); llOwnerSay(ECHO); llSetObjectName(ON); return;}		echo(string ECHO){string ON=llGetObjectName();llSetObjectName("");llOwnerSay("/me "+ECHO);llSetObjectName(ON);return;}
	im(key KEY,string ECHO){string ON=llGetObjectName(); llSetObjectName(""); llInstantMessage(KEY,ECHO); llSetObjectName(ON); return;}		im(key KEY,string ECHO){string ON=llGetObjectName();llSetObjectName("#");llInstantMessage(KEY,"/me "+ECHO);llSetObjectName(ON);return;}
	imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO); return;}		imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO);return;}
	debug(string ECHO){init();if(DEBUG){imme("[DEBUG STEP "+(string)(STEP++)+"] "+ECHO);}return;}		debug(string ECHO){init();string ON=llGetObjectName();if(DEBUG){echo("[DEBUG ["+ON+"["+llGetScriptName()+"]] STEP "+(string)(STEP++)+"] "+ECHO);}return;}
			debugim(string ECHO){init();if(DEBUG){imme("[DEBUG STEP "+(string)(STEP++)+"] "+ECHO);}return;}
	/*		/*

Anylyn Hax at 16:07, 8 May 2011

2011-05-08T16:07:49Z

← Older revision		Revision as of 09:07, 8 May 2011
Line 18:		Line 18:
	integer STEP=0;		integer STEP=0;
	init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}		init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}
	~~string ObjectName(){return llGetObjectName();}~~		echo(string ECHO){string ON=llGetObjectName(); llSetObjectName(""); llOwnerSay(ECHO); llSetObjectName(ON); return;}
	echo(string ECHO){string ON=~~ObjectName~~(); llSetObjectName(""); llOwnerSay(ECHO); llSetObjectName(ON); return;}		im(key KEY,string ECHO){string ON=llGetObjectName(); llSetObjectName(""); llInstantMessage(KEY,ECHO); llSetObjectName(ON); return;}
	im(key KEY,string ECHO){string ON=~~ObjectName~~();llSetObjectName("");llInstantMessage(KEY,ECHO);llSetObjectName(ON);return;}		imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO); return;}
	imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO);return;}
	debug(string ECHO){init();if(DEBUG){imme("[DEBUG STEP "+(string)(STEP++)+"] "+ECHO);}return;}		debug(string ECHO){init();if(DEBUG){imme("[DEBUG STEP "+(string)(STEP++)+"] "+ECHO);}return;}
	/*		/*

Anylyn Hax at 16:04, 8 May 2011

2011-05-08T16:04:44Z

← Older revision		Revision as of 09:04, 8 May 2011
Line 19:		Line 19:
	init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}		init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}
	string ObjectName(){return llGetObjectName();}		string ObjectName(){return llGetObjectName();}
	echo(string ECHO){string ON=ObjectName();llSetObjectName("");llOwnerSay(ECHO);llSetObjectName(ON);return;}		echo(string ECHO){string ON=ObjectName(); llSetObjectName(""); llOwnerSay(ECHO); llSetObjectName(ON); return;}
	im(key KEY,string ECHO){string ON=ObjectName();llSetObjectName("");llInstantMessage(KEY,ECHO);llSetObjectName(ON);return;}		im(key KEY,string ECHO){string ON=ObjectName();llSetObjectName("");llInstantMessage(KEY,ECHO);llSetObjectName(ON);return;}
	imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO);return;}		imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO);return;}

Anylyn Hax at 16:02, 8 May 2011

2011-05-08T16:02:49Z

← Older revision		Revision as of 09:02, 8 May 2011
Line 15:		Line 15:
	<lsl>		<lsl>
	key me="aed6887f-7f1d-485c-9906-515355b5c49a"; // Put your key here.		key me="aed6887f-7f1d-485c-9906-515355b5c49a"; // Put your key here.
	~~if(llGetInventoryCreator(llGetScriptName())==me){~~integer DEBUG=TRUE; // Change this to FALSE for production		integer DEBUG=TRUE; // Change this to FALSE for production
	~~}else~~{integer DEBUG=FALSE;}~~integer d=0~~;		integer STEP=0;
			init(){if(llGetInventoryCreator(llGetScriptName())!=me){integer DEBUG=FALSE;}return;}
	string ObjectName(){return llGetObjectName();}		string ObjectName(){return llGetObjectName();}
	echo(string ECHO){string ON=ObjectName();llSetObjectName("");llOwnerSay(ECHO);llSetObjectName(ON);return;}		echo(string ECHO){string ON=ObjectName();llSetObjectName("");llOwnerSay(ECHO);llSetObjectName(ON);return;}
	im(key KEY,string ECHO){string ON=ObjectName();llSetObjectName("");llInstantMessage(KEY,ECHO);llSetObjectName(ON);return;}		im(key KEY,string ECHO){string ON=ObjectName();llSetObjectName("");llInstantMessage(KEY,ECHO);llSetObjectName(ON);return;}
	imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO);return;}		imme(string ECHO){im(llGetInventoryCreator(llGetScriptName()),ECHO);return;}
	debug(string ECHO){if(DEBUG){imme("[DEBUG STEP "+(string)(d++)+"] "+ECHO);}return;}		debug(string ECHO){init();if(DEBUG){imme("[DEBUG STEP "+(string)(STEP++)+"] "+ECHO);}return;}
			/*

			your functions here

			*/

	default		default
	{		{

Anylyn Hax at 15:51, 8 May 2011

2011-05-08T15:51:17Z

← Older revision		Revision as of 08:51, 8 May 2011
Line 9:		Line 9:

	Sometimes when I am writing very long and complicated scripts I like to have debug output on the chat to follow the script if its running well.<BR>		Sometimes when I am writing very long and complicated scripts I like to have debug output on the chat to follow the script if its running well.<BR>
	~~for~~ this I usually use one or more variables called DEBUG. In this way there is no risk to forget some debug output in the code when I deliver the scripts to the customer.<BR>		For this I usually use one or more variables called DEBUG. In this way there is no risk to forget some debug output in the code when I deliver the scripts to the customer.<BR>
	The function echo is theoretically useless, but it keeps me from making some typos like llownerSay or llOwnersay or llownersay etc.<BR>		The function echo is theoretically useless, but it keeps me from making some typos like llownerSay or llOwnersay or llownersay etc.<BR>
	The functions im and imme are very similar to each other just that imme ims me.		The functions im and imme are very similar to each other just that imme ims me.