// recezione di coordinate per posizionamento oggetti slinkati
//vector message;

//inizializza la facciata di puntamento sul prim BASE
startup()
{
        llSetStatus(STATUS_ROTATE_Z,TRUE);
        llSensorRemove();
        llSensorRepeat("progetto SPOSTAMENTO OGGETTI SLINKATI","",ACTIVE | PASSIVE,200,2*PI,2);
         llListen(-476587, "", NULL_KEY, "" );
}
default
{
     state_entry()    
      {    
        startup();    
        
      }   
     on_rez(integer start_param)
    {
        startup();
    }       
       
    listen(integer channel, string name, key id, string message)  
    {   
//legge eventuali messaggi di spostamento dal prim BASE e posiziona loggetto slinkato nella nuova posizione       
     vector nuovaposizione = (vector)message;
       llSetRegionPos(nuovaposizione); 
      }
       
    sensor(integer total_number)
    {
//mantiene l'orientamento della facciata sul prim BASE se viene ruotato
         
        vector pos = llDetectedPos(0); 
        llLookAt(pos, .1 , 1);
    }
}