User:Void Singer/Programs - Revision history

Gwyneth Llewelyn: Replaced with ; fixed weird comments so that they are properly displayed with formatting inside the SL Wiki; cleaned up some odd lne alignments

2024-01-24T21:04:17Z

Replaced <source> with <syntaxhighlight>; fixed weird comments so that they are properly displayed with formatting inside the SL Wiki; cleaned up some odd lne alignments

Show changes

ObviousAltIsObvious Resident: tag to

2015-01-25T02:36:33Z

← Older revision		Revision as of 19:36, 24 January 2015
Line 15:		Line 15:

	=== Script ===		=== Script ===
	<~~lsl~~> ///( v7-D Enh. Color Picker v1.3 )///		<source lang="lsl2"> ///( v7-D Enh. Color Picker v1.3 )///

	/*//-- IMPORTANT NOTE		/*//-- IMPORTANT NOTE
Line 207:		Line 207:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]
	}}		}}
Line 222:		Line 222:

	=== Script (Fast Response Version) ===		=== Script (Fast Response Version) ===
	<~~lsl~~>///-- v7-D Enhanced Landmark Mapper v1.2f --///		<source lang="lsl2">///-- v7-D Enhanced Landmark Mapper v1.2f --///

	/*//-- Requirements:		/*//-- Requirements:
Line 330:		Line 330:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]

	=== Script (Small Code Version) ===		=== Script (Small Code Version) ===
	<~~lsl~~>///-- v7-D Enhanced Landmark Mapper v1.2s --///		<source lang="lsl2">///-- v7-D Enhanced Landmark Mapper v1.2s --///

	/*//-- Requirements:		/*//-- Requirements:
Line 410:		Line 410:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]
	}}		}}
Line 423:		Line 423:

	=== Script ===		=== Script ===
	<~~lsl~~>///( v7-D Advanced Avatar Greeter v1.4.2 Annotated )///		<source lang="lsl2">///( v7-D Advanced Avatar Greeter v1.4.2 Annotated )///

	/*//-- Notes:		/*//-- Notes:
Line 500:		Line 500:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]
	}}		}}

Void Singer: ~Advanced Visitor Greeter: correction

2012-02-16T13:31:43Z

~Advanced Visitor Greeter: correction

← Older revision		Revision as of 06:31, 16 February 2012
Line 468:		Line 468:
	gLstTms = vLstTmt + llDeleteSubList( gLstTms, vIdxLst, vIdxLst ); //--< Timeout Culling Section		gLstTms = vLstTmt + llDeleteSubList( gLstTms, vIdxLst, vIdxLst ); //--< Timeout Culling Section
	}else{ //-- New Av, greet and save		}else{ //-- New Av, greet and save
	llRegionSayTo( ~~llDetectedKey~~( ~~vIntSns~~), 0~~, (string)vLstChk~~, "Hello " + llDetectedName( vIntSns ) );		llRegionSayTo( (string)vLstChk, 0, "Hello " + llDetectedName( vIntSns ) );
	gLstAvs = llList2List( vLstChk + gLstAvs, 0, gIntMax );		gLstAvs = llList2List( vLstChk + gLstAvs, 0, gIntMax );
	gLstTms = llList2List( vLstTmt + gLstTms, 0, gIntMax ); //--< Timeout Culling Section		gLstTms = llList2List( vLstTmt + gLstTms, 0, gIntMax ); //--< Timeout Culling Section

Void Singer: ~Avatar Greeter

2011-10-10T12:15:24Z

~Avatar Greeter

Show changes

Void Singer: minor changes

2010-05-29T07:24:02Z

minor changes

Show changes

Void Singer: updated landmark2map

2010-03-26T17:33:37Z

updated landmark2map

Show changes

Void Singer: update

2010-03-19T09:06:48Z

update

Void Singer: New Program for Free

2009-06-25T15:45:58Z

New Program for Free

Show changes

Void Singer: New Freebies

2009-06-13T07:07:01Z

New Freebies

Show changes

Void Singer: new free to use script, yay

2009-05-16T07:32:12Z

new free to use script, yay

← Older revision		Revision as of 00:32, 16 May 2009
Line 5:		Line 5:

	<div id="box">		<div id="box">
	== Color ~~Selector~~ ==		== v7-D Adv Color Picker v1.2 ==
	<div style="padding: 0.5em">		<div style="padding: 0.5em">
	=== Features: ===		=== Features: ===

← Older revision		Revision as of 19:36, 24 January 2015
Line 15:		Line 15:

	=== Script ===		=== Script ===
	<~~lsl~~> ///( v7-D Enh. Color Picker v1.3 )///		<source lang="lsl2"> ///( v7-D Enh. Color Picker v1.3 )///

	/*//-- IMPORTANT NOTE		/*//-- IMPORTANT NOTE
Line 207:		Line 207:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]
	}}		}}
Line 222:		Line 222:

	=== Script (Fast Response Version) ===		=== Script (Fast Response Version) ===
	<~~lsl~~>///-- v7-D Enhanced Landmark Mapper v1.2f --///		<source lang="lsl2">///-- v7-D Enhanced Landmark Mapper v1.2f --///

	/*//-- Requirements:		/*//-- Requirements:
Line 330:		Line 330:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]

	=== Script (Small Code Version) ===		=== Script (Small Code Version) ===
	<~~lsl~~>///-- v7-D Enhanced Landmark Mapper v1.2s --///		<source lang="lsl2">///-- v7-D Enhanced Landmark Mapper v1.2s --///

	/*//-- Requirements:		/*//-- Requirements:
Line 410:		Line 410:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]
	}}		}}
Line 423:		Line 423:

	=== Script ===		=== Script ===
	<~~lsl~~>///( v7-D Advanced Avatar Greeter v1.4.2 Annotated )///		<source lang="lsl2">///( v7-D Advanced Avatar Greeter v1.4.2 Annotated )///

	/*//-- Notes:		/*//-- Notes:
Line 500:		Line 500:
	/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///		/// Void Singer [ https://wiki.secondlife.com/wiki/User:Void_Singer ] ///
	/// All usages must contain a plain text copy of the previous 2 lines. ///		/// All usages must contain a plain text copy of the previous 2 lines. ///
	///-- --///</~~lsl~~>		///-- --///</source>
	:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]		:[[User:Void_Singer/Programs#Return_to_Void_Singers_user_page\|Return to top]]
	}}		}}

← Older revision		Revision as of 02:06, 19 March 2010
Line 398:		Line 398:

	=== Script ===		=== Script ===
	<lsl>///( v7-D Advanced Avatar Greeter v1.4 )///		<lsl>///( v7-D Advanced Avatar Greeter v1.4.1 Annotated )///

	/*//-- NOTE:		/*//-- NOTE:
Line 406:		Line 406:

	list gLstAvs; ///-- List Of Avatars Keys Greeted --///		list gLstAvs; ///-- List Of Avatars Keys Greeted --///
	list vLstChk; ///-- List Of Av Key ~~Being~~ Checked During Sensor Processing --///		list vLstChk; ///-- List Of Single Av Key Checked During Sensor Processing --///
	integer vIdxLst; ///-- Index Of Checked Item In List (reused) --///		integer vIdxLst; ///-- Index Of Checked Item In List (reused) --///
	integer gIntMax = 500; ///-- Maximum Number of Names To Store --///		integer gIntMax = 500; ///-- Maximum Number of Names To Store --///
Line 412:		Line 412:

	///-- Next Code Line Belongs to Dynamic Memory Limitation Section --///		///-- Next Code Line Belongs to Dynamic Memory Limitation Section --///
	integer int_MEM = 1000; ///-- memory to preserve for safety--///		integer int_MEM = 1000; ///-- memory to preserve for safety (Needs to be > ~700)--///

	///-- Start Av Culling Section --///		///-- Start Av Culling Section --///
Line 422:		Line 422:

	default{		default{
	state_entry(){		state_entry(){
	///-- Next Code Line Belongs To Dynamic Memory Limitation Section --///		///-- Next Code Line Belongs To Dynamic Memory Limitation Section --///
	gIntMax = ~~1000~~; ///-- ~~Intial list~~ Max --///		gIntMax = int_MEM; ///-- Override Max if Dynamic Memory Limitation is in use --///
	llSensor( "", "", AGENT, 95.0, PI ); ///-- Pre-Fire Sensor For Immediate Results --///		llSensor( "", "", AGENT, 95.0, PI ); ///-- Pre-Fire Sensor For Immediate Results --///
	llSetTimerEvent( 30.0 ); ///-- Sensor Repeat Frequency --///		llSetTimerEvent( 30.0 ); ///-- Sensor Repeat Frequency --///
	}		}

	timer(){		timer(){
	llSensor( "", "", AGENT, 95.0, PI ); ///-- Look For Avatars --///		llSensor( "", "", AGENT, 95.0, PI ); ///-- Look For Avatars --///
	}		}

	sensor( integer vIntTtl ){		sensor( integer vIntTtl ){
	///-- Save Current Timer to Now, Then Add Period and Save To Timeout--///		///-- Save Current Timer to Now, Then Add Period and Save To Timeout--///
	vLstTmt = (list)(gIntPrd + (vIntNow = llGetUnixTime()));		vLstTmt = (list)(gIntPrd + (vIntNow = llGetUnixTime()));
	///-- Previous Code Line Belongs to Av Culling Section --///		///-- Previous Code Line Belongs to Av Culling Section --///
	@Building;{		@Building;{
	///-- Is This Av Already In Our List? --///		///-- Is This Av Already In Our List? --///
	if (~(vIdxLst = llListFindList( gLstAvs, (vLstChk = (list)llDetectedKey( --vIntTtl )) ))){		if (~(vIdxLst = llListFindList( gLstAvs, (vLstChk = (list)llDetectedKey( --vIntTtl )) ))){
	///-- Delete The Old Entries & Add New Entries to Preserve Order --///		///-- Delete The Old Entries & Add New Entries to Preserve Order --///
	gLstAvs = llDeleteSubList( (gLstAvs = []) + gLstAvs, vIdxLst, vIdxLst ) + vLstChk;		gLstAvs = llDeleteSubList( (gLstAvs = []) + gLstAvs, vIdxLst, vIdxLst ) + vLstChk;
	///-- Next Code Line Belongs to Av Culling Section --///		///-- Next Code Line Belongs to Av Culling Section --///
	gLstTms = llDeleteSubList( (gLstTms = []) + gLstTms, vIdxLst, vIdxLst ) + vLstTmt;		gLstTms = llDeleteSubList( (gLstTms = []) + gLstTms, vIdxLst, vIdxLst ) + vLstTmt;
	}		}
	else{		else{
	///-- Oo Goody, Hi New Av! Add Them To The Lists & Preserve Max List Size--///		///-- Oo Goody, Hi New Av! Add Them To The Lists & Preserve Max List Size--///
	llInstantMessage( (string)vLstChk, "Hello " + llDetectedName( vIntTtl ) );		llInstantMessage( (string)vLstChk, "Hello " + llDetectedName( vIntTtl ) );
	gLstAvs = llList2List( (gLstAvs = []) + vLstChk + gLstAvs, 0, gIntMax );		gLstAvs = llList2List( (gLstAvs = []) + vLstChk + gLstAvs, 0, gIntMax );
	///-- Next Code Line Belongs to Av Culling Section --///		///-- Next Code Line Belongs to Av Culling Section --///
	gLstTms = llList2List( (gLstTms = []) + vLstTmt + gLstTms, 0, gIntMax );		gLstTms = llList2List( (gLstTms = []) + vLstTmt + gLstTms, 0, gIntMax );
	}		}
	}if (vIntTtl) jump Building;		}if (vIntTtl) jump Building;

	///-- Start Dynamic Memory Limitation Section --///		///-- Start Dynamic Memory Limitation Section --///
	///-- Only lower Max List Size Once For Saftey --///		///-- Only lower Max List Size Once For Saftey --///
	if (int_MEM == gIntMax){		if (int_MEM == gIntMax){
	///-- do we have plenty of room in the script? --///		///-- do we have plenty of room in the script? --///
	if (int_MEM > llGetFreeMemory()){		if (int_MEM > llGetFreeMemory()){
	///-- running out of room, set the Max list size lower --///		///-- running out of room, set the Max list size lower --///
	gIntMax = ~([] != gLstAvs);		gIntMax = ~([] != gLstAvs);
	}		}
	}		}
	///-- End Dynamic Memory Limitation Section --///		///-- End Dynamic Memory Limitation Section --///

	///-- Start Av Culling Section --///		///-- Start Av Culling Section --///
	///-- do we have keys? --///		///-- do we have keys? --///
	if (vIdxLst = llGetListLength( gLstTms )){		if (vIdxLst = llGetListLength( gLstTms )){
	///-- Do Any Need Culled? --///		///-- Do Any Need Culled? --///
	if (vIntNow > llList2Integer( gLstTms, --vIdxLst )){		if (vIntNow > llList2Integer( gLstTms, --vIdxLst )){
	///-- Find The Last Index that hasn't hit timeout status --///		///-- Find The Last Index that hasn't hit timeout status --///
	@TheirBones; if (--vIdxLst) if (vIntNow > llList2Integer( gLstTms, vIdxLst )) jump TheirBones;		@TheirBones; if (--vIdxLst) if (vIntNow > llList2Integer( gLstTms, vIdxLst )) jump TheirBones;
	///-- Thin the herd --///		///-- Thin the herd --///
	gLstAvs = llList2List( (gLstAvs = []) + gLstAvs, 0, vIdxLst );		gLstAvs = llList2List( (gLstAvs = []) + gLstAvs, 0, vIdxLst );
	gLstTms = llList2List( (gLstTms = []) + gLstTms, 0, vIdxLst );		gLstTms = llList2List( (gLstTms = []) + gLstTms, 0, vIdxLst );
	}		}
	}		}
	///-- End Av Culling Section --///		///-- End Av Culling Section --///
	}		}
	}		}