key kOwnerKey;
string sOwnerName;

default
{
    state_entry()
    {
        kOwnerKey = llGetOwner();   // La clé et le nom du
        sOwnerName = llKey2Name(kOwnerKey);  //propriétaire de l'objet
        llSetTimerEvent(30.0); //La vérification se fait toutes les 30 secondes. Voir timer()
        llRequestAgentData(kOwnerKey, DATA_ONLINE); //cette instruction demande des infos sur le
                //porteur de la clé et déclenche l'évènement dataserver (plus bas dans le script)
    }

    on_rez(integer iStartParam) //reset du script quand on pose l'objet
    {
        llResetScript();
    }
   
    timer()//évènement déclenché par llSetTimer(...)
    {
        llRequestAgentData(kOwnerKey, DATA_ONLINE); //cette instruction demande des infos sur le
                //porteur de la clé et déclenche l'évènement dataserver (plus bas dans le script)
    }
   
    dataserver(key kRequest, string sData) //analyse de la réponse
    {
        if (sData == "1")
        {
               
                llSetText(sOwnerName + " est en ligne", <0.0, 1.0, 0.0>, 1.0); //Changer à volonté
                                    //pour dire que vous êtes dans SL
        }
        else
        {
                llSetText(sOwnerName + " est hors ligne", <1.0, 0.0, 0.0>, 1.0); //Changer à volonté
                                    //pour dire que vous avez mieux à faire
        }
    }
}