LlResetLandBanList/fr - Revision history

Ales Beaumont: relecture et re-synchronisation

2009-05-29T13:50:59Z

relecture et re-synchronisation

← Older revision		Revision as of 06:50, 29 May 2009
Line 10:		Line 10:
	\|spec		\|spec
	\|caveats		\|caveats
	\|examples=<lsl>// ~~Script~~ de ~~shenanigan oh~~		\|examples=<lsl>
			// Ce script necessite le nom complet de l'avatar pour fonctionner
	// ~~C’est un script simple que j’utilisais lorsque je travaillais~~		// il est fourni comme exemple d'utilisation des fonctions de controle d'acces.
	// ~~sur un massacre pour une sim pvp, il était en effet beaucoup~~		//
	// ~~plus simple d’expulser quelqu'un de cette façon que de cliquer~~		// Les commandes de chat sont:
	// ~~sur lui en lui courant après.~~		// /5 ban:nom_complet
	// ~~Exemple~~: /~~1 eject shenan~~		// /5 tempban:nom_complet
			// /5 unban:nom_complet
	// ~~Attention, si vous tapez le nom d’une personne, faites bien attention~~		// /5 pass:nom_complet
	// ~~à ce que personne d’autres dans les environs n’ait le même nom !~~		// /5 unpass:nom_complet
	string ~~msg~~;		// /5 clearban
	~~string name;~~		// /5 clearpass

			string command;

	default		default
	{		{
	~~on_rez~~(~~integer n~~)		state_entry()
	{		{
	~~llResetScript~~();		llListen(5, "", llGetOwner(), "");
	}		}

	~~state_entry~~()		on_rez(integer param)
	{		{
	~~llListen~~(~~1, "", llGetOwner(), "");~~		llResetScript();
	~~llListen(0, "", llGetOwner(), ""~~);
	}		}

	listen(integer n, string m, key k, string ~~msg~~)		listen(integer chan, string name, key id, string message)
	{		{
	if (~~llGetSubString~~(~~msg~~, 0~~, 5~~) == "~~eject~~ ")		if (command != "")
			{
			llOwnerSay("Desole, le traitement de la commande precedente est encore en cours, retentez dans un moment.");
			}

			list args = llParseString2List(message,[":"],[]);
			command = llToLower(llList2String(args,0));

			if (command == "clearbans")
			{
			llResetLandBanList();
			}
			if (command == "clearpass")
			{
			llResetLandPassList();
			}
			else
	{		{
	~~name = llToLower(llStringTrim~~(~~llDeleteSubString~~(~~msg, 0, 5)~~, ~~STRING_TRIM)~~);		llSensor(llList2String(args,1),NULL_KEY,AGENT,96,PI);
	~~llSensor(""~~, "", AGENT, 96, PI);
	}		}
	}		}

	sensor(integer n)		no_sensor()
			{
			command = "";
			}

			sensor(integer num)
	{		{
	integer i ~~= 0~~;		integer i;
	for (;i<n;++i)		for (i=0; i< num; ++i)
	{		{
	if (~~llOverMyLand~~(llDetectedKey(i)))		if (command == "ban")
			{
			// Bannir indefiniment un avatar
			llAddToLandBanList(llDetectedKey(i),0.0);
			}
			if (command == "tempban")
			{
			// Bannir un avatar pour 1h
			llAddToLandBanList(llDetectedKey(i),1.0);
			}
			if (command == "unban")
			{
			// Supprimer le bannissement d'un avatar
			llRemoveFromLandBanList(llDetectedKey(i));
			}
			if (command == "pass")
			{
			// Ajouter un avatar a la liste d'acces
			llAddToLandPassList(llDetectedKey(i),1.0);
			}
			if (command == "unpass")
	{		{
	~~if (~llSubStringIndex(llToLower(llDetectedName(i)), name))~~		// Supprimer un avatar de la liste d'acces
	{		llRemoveFromLandPassList(llDetectedKey(i));
	~~llOwnerSay("Ejection de " + llDetectedName(i));~~
	~~llEjectFromLand~~(llDetectedKey(i));
	}
	}		}
	}		}
			command = "";
	}		}
	~~no_sensor()~~		}
	{		</lsl>
	~~llOwnerSay("Avatar non trouvé");~~
	}
	}</lsl>
	\|helpers		\|helpers
	\|also_header		\|also_header

Strife Onizuka at 16:55, 12 September 2008

2008-09-12T16:55:04Z

← Older revision		Revision as of 09:55, 12 September 2008
Line 10:		Line 10:
	\|spec		\|spec
	\|caveats		\|caveats
	\|examples=<lsl>		\|examples=<lsl>// Script de shenanigan oh

	// Script de shenanigan oh

	// C’est un script simple que j’utilisais lorsque je travaillais		// C’est un script simple que j’utilisais lorsque je travaillais
Line 65:		Line 63:
	llOwnerSay("Avatar non trouvé");		llOwnerSay("Avatar non trouvé");
	}		}
	}		}</lsl>

	</lsl>
	\|helpers		\|helpers
	\|also_header		\|also_header

Zai Lynch:

->

2008-09-12T06:26:47Z

← Older revision		Revision as of 23:26, 11 September 2008
Line 10:		Line 10:
	\|spec		\|spec
	\|caveats		\|caveats
	\|examples=<~~pre~~>		\|examples=<lsl>

	// Script de shenanigan oh		// Script de shenanigan oh
Line 67:		Line 67:
	}		}

	</~~pre~~>		</lsl>
	\|helpers		\|helpers
	\|also_header		\|also_header

Gally Young: fixe

2008-03-21T19:51:27Z

fixe

← Older revision		Revision as of 12:51, 21 March 2008
Line 74:		Line 74:
	{{LSL DefineRow\|\|[[llAddToLandPassList/fr\|llAddToLandPassList]]\|Ajoute un avatar à la liste des droits de passage}}		{{LSL DefineRow\|\|[[llAddToLandPassList/fr\|llAddToLandPassList]]\|Ajoute un avatar à la liste des droits de passage}}
	{{LSL DefineRow\|\|[[llRemoveFromLandPassList/fr\|llRemoveFromLandPassList]]\|Supprime un avatar de la liste des droits de passage}}		{{LSL DefineRow\|\|[[llRemoveFromLandPassList/fr\|llRemoveFromLandPassList]]\|Supprime un avatar de la liste des droits de passage}}
	{{LSL DefineRow\|\|[[~~llRemoveFromBanList~~/fr\|~~llRemoveFromBanList~~]]\|Supprime un avatar de la liste des bannis}}		{{LSL DefineRow\|\|[[llRemoveFromLandBanList/fr\|llRemoveFromLandBanList]]\|Supprime un avatar de la liste des bannis}}
	{{LSL DefineRow\|\|[[llResetLandPassList/fr\|llResetLandPassList]]\|Réinitialise la liste des droits de passage}}		{{LSL DefineRow\|\|[[llResetLandPassList/fr\|llResetLandPassList]]\|Réinitialise la liste des droits de passage}}
	\|also_tests		\|also_tests

Gally Young: Localized to french

2008-03-21T19:50:06Z

Localized to french

New page

{{LSL_Function/fr
|func=llResetLandBanList
|func_id=321|func_sleep=0.1|func_energy=10.0
|sort=ResetLandBanList
|func_desc=Vide la liste des bannis
|func_footnote
|return_type
|return_text
|constants
|spec
|caveats
|examples=<pre>

// Script de shenanigan oh

// C’est un script simple que j’utilisais lorsque je travaillais
// sur un massacre pour une sim pvp, il était en effet beaucoup
// plus simple d’expulser quelqu'un de cette façon que de cliquer
// sur lui en lui courant après.
// Exemple: /1 eject shenan

// Attention, si vous tapez le nom d’une personne, faites bien attention
// à ce que personne d’autres dans les environs n’ait le même nom !
string msg;
string name;
default
{
on_rez(integer n)
{
llResetScript();
}

state_entry()
{
llListen(1, "", llGetOwner(), "");
llListen(0, "", llGetOwner(), "");
}

listen(integer n, string m, key k, string msg)
{
if (llGetSubString(msg, 0, 5) == "eject ")
{
name = llToLower(llStringTrim(llDeleteSubString(msg, 0, 5), STRING_TRIM));
llSensor("", "", AGENT, 96, PI);
}
}

sensor(integer n)
{
integer i = 0;
for (;i<n;++i)
{
if (llOverMyLand(llDetectedKey(i)))
{
if (~llSubStringIndex(llToLower(llDetectedName(i)), name))
{
llOwnerSay("Ejection de " + llDetectedName(i));
llEjectFromLand(llDetectedKey(i));
}
}
}
}
no_sensor()
{
llOwnerSay("Avatar non trouvé");
}
}

</pre>
|helpers
|also_header
|also_functions=
{{LSL DefineRow||[[llAddToLandBanList/fr|llAddToLandBanList]]|Ajoute un avatar à la liste des bannis}}
{{LSL DefineRow||[[llAddToLandPassList/fr|llAddToLandPassList]]|Ajoute un avatar à la liste des droits de passage}}
{{LSL DefineRow||[[llRemoveFromLandPassList/fr|llRemoveFromLandPassList]]|Supprime un avatar de la liste des droits de passage}}
{{LSL DefineRow||[[llRemoveFromBanList/fr|llRemoveFromBanList]]|Supprime un avatar de la liste des bannis}}
{{LSL DefineRow||[[llResetLandPassList/fr|llResetLandPassList]]|Réinitialise la liste des droits de passage}}
|also_tests
|also_events
|also_articles
|also_footer
|notes
|mode
|location
|cat1=Security/fr
|cat2=Parcel/fr
|cat3
|cat4
|cat5
|cat6
}}