Scientific investigation in Second Life and Open Sim: MR

MR = "Magic Ring"
You can see the code of the MR in the bottom of this page

When the avatar wears the object, we collect the following information every five seconds :

* Name
* coordinates (x, y, z)
* region (name of the island)
* hour
* date
* gRadius (how many people are around you)

We also receive data about the state of the avatar: busy, away, standing, sitting, walking, fkying, etc...
We can also know if the object has been modified (color, size, etc.)

Interviews

Following this study, a series of interviews will be conducted with avatars who participated at this experiment. We collect the name of the avatar in our database with the simple aim of contacting you for this step.

Méthode

Lorsque l'avatar porte l'objet, nous récupérons, toutes les cinq secondes, les informations suivantes :

* nom (Le traitement des données sera fait de façon anonyme)
* coordonnées (x, y, z)
* région (nom de l'île)
* heure
* date
* gRadius (nombre de personnes autour de vous)

Interviews

A la suite de cette étude, une série d'entretiens sera réalisée avec des avatars ayant participé à cette expérience. Nous récupérons le nom de l'avatar dans notre BDD dans le simple but de pouvoir vous contacter pour cette étape.

Code

Script of the Magic Ring

// Magic Ring 
// Version 2 
// By Gehan Kamachi
// www.gehan-kamachi.net

key http_request_id;
string virtualworld = "secondlife";

// # of seconds between data collection snapshots
float gap = 5.0;

// # of meters to look for nearby avatars
float range = 20.00; // meters

// Set to true for debugging printouts in SL
string verbose = "true";
float counter = 0.0;
integer gradius = 0;

string color = "0";
string shape = "0";
string scale = "0";
string texture = "0";
string ch_owner = "0";

default
{      
    state_entry()
    {
        // Activate the timer listener
        llSetTimerEvent(gap);

        // Set up callback event
        llListen(0, "", llGetOwner(), "");

        // Set up sensor
        llSensorRepeat("", "", AGENT, range, TWO_PI, gap);
    }
    
// Fonction changed - Object data
 changed (integer change)
    {
       if (change & CHANGED_COLOR)
          {color = "1";}
       if (change & CHANGED_SHAPE) 
          {shape="1";}
       if (change & CHANGED_SCALE) 
          {scale="1";}
       if (change & CHANGED_TEXTURE) 
          {texture="1";}
       if (change & CHANGED_OWNER) 
          {ch_owner="1";}
}

// Fonction sensor
     sensor (integer numberDetected)
    {
        gradius = numberDetected;

        string msg = "Detected "+(string) numberDetected+" avatar(s): ";
        integer i;
        msg += llDetectedName(0);
        for (i = 1; i < numberDetected; i++)
        {
            msg += ", ";
            msg += llDetectedName(i);
        }
    }

    no_sensor()
    {
        gradius = 0;
    }

// Fonction Timer
    timer()
    {
        key owner = llGetOwner();
        string name = llKey2Name(owner);  
        string region = llGetRegionName();

//position
    vector pos = llGetPos();
    string x = (string)llRound(pos.x);
    string y = (string)llRound(pos.y);
    string z = (string)llRound(pos.z);
    
//vitesse
   vector vel = llGetVel();
   string velx = (string)llRound(vel.x);
   string vely = (string)llRound(vel.y);
   string velz = (string)llRound(vel.z);

integer agent = llGetAgentInfo(owner);
 // Fonction llGetAgentInfo
        string flying = "0";
        string runmode = "0";
        string isaway = "0";
        string isbusy = "0";
        string crouching = "0";
        string mouselook = "0";
        string onobject = "0";
        string sitting = "0";
        string walking = "0"; 
        
        if (agent & AGENT_FLYING)
            flying = "1";
        if (agent & AGENT_ALWAYS_RUN)
            runmode = "1";
        if (agent & AGENT_AWAY)
            isaway = "1";
        if (agent & AGENT_BUSY)
            isbusy = "1";
        if (agent & AGENT_CROUCHING)
            crouching = "1";
        if (agent & AGENT_MOUSELOOK)
            mouselook = "1";
        if (agent & AGENT_ON_OBJECT)
            onobject = "1";
        if (agent & AGENT_SITTING)
            sitting = "1";
        if (agent & AGENT_WALKING)
            walking = "1";
 
// Send data
http_request_id = llHTTPRequest("url-server/files.php?name="+llEscapeURL(name)+"&x="+x+"&y="+y+"&z="+z+"&velx="+velx+"&vely="+vely+"&velz="+velz+"&color="+color+"&shape="+shape+"&scale="+scale+"&texture="+texture+"&ch_owner="+ch_owner+"&flying="+flying+"&runmode="+runmode+"&isaway="+isaway+"&isbusy="+isbusy+"&crouching="+crouching+"&mouselook="+mouselook+"&onobject="+onobject+"&sitting="+sitting+"&walking="+walking+"&virtualworld="+virtualworld+"®ion="+llEscapeURL(region)+"&gradius="+(string)gradius, [],"");
    }
}

Code to insert data in a databse

// Magic Ring 
// Version 2 
// By Gehan Kamachi
// www.gehan-kamachi.net
<?php
// Connection
$host = "host";
$user = "user";
$db = "db";
$password = "password";
$table = "table";
$vals_ok = false;
$date = date("Y-m-d");
$time = date("H:i:s");
$gradius = 0;
$datetime = date("Y-m-d H:i:s");

$datetimeobj = new DateTime($datetime);
$unixtime = date_format($datetimeobj, 'U');

//Open the connection
$connexion = mysql_connect($host,$user,$password) or die("error connexion!");
mysql_select_db($db, $connexion) or die(mysql_error());

//Get Datas
if (($_GET['name'] != "") && isset($_GET["name"]) && isset($_GET["region"]))
 {
	$name = addslashes(htmlentities($_GET["name"]));
	$region = addslashes(htmlentities($_GET["region"]));
	$virtualworld = addslashes(htmlentities($_GET["virtualworld"]));
	$x = addslashes(htmlentities($_GET["x"]));
	$y = addslashes(htmlentities($_GET["y"]));
	$z = addslashes(htmlentities($_GET["z"]));
	$velx = addslashes(htmlentities($_GET["velx"]));
	$vely = addslashes(htmlentities($_GET["vely"]));
	$velz = addslashes(htmlentities($_GET["velz"]));
	$color = addslashes(htmlentities($_GET["color"]));
	$shape = addslashes(htmlentities($_GET["shape"]));
	$scale = addslashes(htmlentities($_GET["scale"]));
	$texture = addslashes(htmlentities($_GET["texture"]));
	$ch_owner = addslashes(htmlentities($_GET["ch_owner"]));
	$flying = addslashes(htmlentities($_GET["flying"]));
	$runmode = addslashes(htmlentities($_GET["runmode"]));
	$isaway = addslashes(htmlentities($_GET["isaway"]));
	$isbusy = addslashes(htmlentities($_GET["isbusy"]));
	$crouching = addslashes(htmlentities($_GET["crouching"]));
	$mouselook = addslashes(htmlentities($_GET["mouselook"]));
	$onobject = addslashes(htmlentities($_GET["onobject"]));
	$sitting = addslashes(htmlentities($_GET["sitting"]));
	$walking = addslashes(htmlentities($_GET["walking"]));
	if(isset($_GET["gradius"]))
	$gradius = addslashes(htmlentities($_GET["gradius"]));
	$vals_ok = true;
}

// Insert if ok
if ($vals_ok == true) {
$sql = 'INSERT INTO '.$table.' (
date,
time,
datetime,
unixtime,
virtualworld,
name, 
region, 
x,
y, 
z, 
velx,
vely, 
velz, 
color, 
shape, 
scale, 
texture, 
ch_owner, 
flying, 
runmode, 
isaway, 
isbusy, 
crouching, 
mouselook, 
onobject, 
sitting, 
walking,
gradius) 

VALUES (
 "'.$date.'",
 "'.$time.'",
 "'.$datetime.'",
 "'.$unixtime.'",
 "'.$virtualworld.'",
 "'.$name.'",
 "'.$region.'",
 "'.$x.'",
 "'.$y.'",
 "'.$z.'",
 "'.$velx.'",
 "'.$vely.'",
 "'.$velz.'",
 "'.$color.'",
 "'.$shape.'",
 "'.$scale.'",
 "'.$texture.'",
 "'.$ch_owner.'",
 "'.$flying.'",
 "'.$runmode.'",
 "'.$isaway.'",
 "'.$isbusy.'",
 "'.$crouching.'",
 "'.$mouselook.'",
 "'.$onobject.'",
 "'.$sitting.'",
 "'.$walking.'",
 "'.$gradius.'")';
$do = mysql_query($sql);
echo $sql." insertion ok";
}
else {
	echo 'Nothing to insert, wrong variables';
}

mysql_close();// Deconnexion de MySQL
?>

Scientific investigation in Second Life and Open Sim

Pages

MR - Method

Méthode

Code