User/Digit Ditko/experience transport script

Transport an avatar and use experience permissions

<source lang="lsl2">

// use a regoins coordinates here to transport avatar to another region. vector gRegion = ZERO_VECTOR;

// region specific location vector gPos = <128.0, 128.0, 100.0>;

// Avatar will face this direction vector gLookAt = <0.0, 0.0, 0.0>;

// ----------------------------------------------------------------------------- // Default state default {

   collision_start (integer inNumDetected)
   { 
       integer i;
       for (i = 0; i < inNumDetected; i++)
       {
           llRequestExperiencePermissions (llDetectedKey (i), "");
       }
   }
    
   experience_permissions (key inAvatar)
   {   
       if (gRegion == ZERO_VECTOR)
       {
           llTeleportAgent (inAvatar, "", gPos, gLookAt); 
       }   
       else
       {
           llTeleportAgentGlobalCoords (inAvatar, gRegion, gPos, gLookAt);
       }
   }
   
   
   on_rez (integer inParam)
   {
       llResetScript ();
   }
   
   
   changed (integer inMask)
   {   
       if (inMask & (CHANGED_INVENTORY | CHANGED_OWNER))
       {
           llResetScript ();
       }      
   }

}

</source>