LlOverMyLand/fr

Renvoie un integer booléen, TRUE si id est au dessus du terrain possédé par le propriétaire du script, FALSE sinon.

Sur les parcelles données à un groupe, l’objet contenant le script doit également avoir été donné au groupe (deed).)

//--// Message sur terrain privé //--//

//-- @@ = contient des optimisation de codes consultez la page suivante pour obtenir plus d’infos :
//-- http://wiki.secondlife.com/wiki/User_talk:Void_Singer#Coding_Practices_Part_2_.28optimizations.29

//-- list des personnes à ne pas rejeter, minuscule uniquement.
list vgLstIgnore = ["void singer"];

default
{
    state_entry()
    {
        llOwnerSay( "Je rejetterai toutes les personnes que je trouverais sur votre terrain ,"
                  + " à moins qu’elles ne soient sur votre liste des autorisés ou qu’elles ne soient un Linden." );
        llSensorRepeat( "", "", AGENT, 96, PI, 30 );
    }

    sensor( integer vIntFound )
    {
        integer vIntCounter = 0;
        do{
            string vStrName = llToLower( llDetectedName( vIntCounter ) );

            //-- si elles sont au dessus de votre terrain => contrôle
            if (llOverMyLand( llDetectedKey( vIntCounter ) ))
            {
                //-- Exception pour les gens autorisés
                if (!~llListFindList( vgLstIgnore, (list)vStrName )) //-- @@ x 2
                {
                    //-- pas de rejet pour les Lindens, ils pouraient être en train de faire un test
                    //-- notez l’espace, pour éviter les faux ! ;)
                    if (!~llSubStringIndex( vStrName, " linden" ))  //-- @@
                    {
                        //-- pester everyone else !!!
                        llInstantMessage( llDetectedKey( vIntCounter ),
                              "Vous êtes sur un terrain privé, s’il vous plait, quittez cette parcelle" );
                    }
                }
            }
        }while (++vIntCounter < vIntFound); //-- @@
    }
}