Reading profiles using cast ray and mouse look

[Lucinda Bulloch]

Just put the script blow in an object, wear it then go into mouse look, put the cross hairs over the center of the AV and click the left mouse button and the AV's profile will be chatted in owner chat, it is fun to mess with.

 

integer firecontrols;
string av;
default
{
  state_entry()
   {
    llSetMemoryLimit(0x3800);
    firecontrols =CONTROL_LBUTTON|CONTROL_ML_LBUTTON;
   }  
 
   attach(key id)
    {
     if(id == llGetOwner())llRequestPermissions(id,PERMISSION_TAKE_CONTROLS|PERMISSION_TRACK_CAMERA);
     else llReleaseControls();   
    }   
   run_time_permissions(integer perm)
    {
     if(perm)llTakeControls(firecontrols, TRUE, FALSE);
    }
   http_response(key req,integer stat, list met, string body)
    {
     list dat = llParseStringKeepNulls(body,["meta name=\"description\" content=\""],[]); 
     llOwnerSay(llKey2Name(av)+" "+llGetSubString(llList2String(dat,1),0,llSubStringIndex(llList2String(dat,1),">")-1));
    }  
   control(key id, integer level, integer edge)
    {
     if(level&edge&firecontrols)
      {
       vector start =  llGetCameraPos();
       list results = llCastRay(start,start + <1000,0,0>*llGetCameraRot(),[
       RC_REJECT_TYPES,RC_REJECT_LAND | RC_REJECT_PHYSICAL | RC_REJECT_NONPHYSICAL,
       RC_DATA_FLAGS,RC_GET_ROOT_KEY,
       RC_MAX_HITS,1,
       RC_DETECT_PHANTOM,TRUE
       ]);
       av =llList2String(results,0); 
       if(llStringLength(av)>10)llHTTPRequest( "http://world.secondlife.com/resident/" + av,[HTTP_METHOD,"GET"],"");  
      }
   } 
   
}