User:Kerik Rau/n2k.AppSpot

2009-01-27T05:21:14Z

Kerik Rau:

User:Kerik Rau/XY2URL

2009-01-27T05:03:24Z

Kerik Rau: New page: <lsl> //Store the target coorinates in "X1 Y1 X2 Y2", creating a bounding box with a height and width list Coords = ["0.112 0.641 0.371 0.740"]; list URLs = ["http://wiki.secondlife.com/w...

<lsl>

//Store the target coorinates in "X1 Y1 X2 Y2", creating a bounding box with a height and width
list Coords = ["0.112 0.641 0.371 0.740"];
list URLs = ["http://wiki.secondlife.com/wiki/User:Kerik_Rau/n2k.AppSpot"];

string Message = "More information is available via this WebSite.";

default
{
touch_start(integer total_number)
{
if(llDetectedTouchFace(0) == 3)
{
integer i = 0;
integer NumCoords = llGetListLength(Coords);

for(i = 0; i < NumCoords; ++i)
{
list CoordList = llParseString2List(llList2String(Coords, i), [" "], []);

float X1 = (float) llList2String(CoordList, 0);
float Y1 = (float) llList2String(CoordList, 1);
float X2 = (float) llList2String(CoordList, 2);
float Y2 = (float) llList2String(CoordList, 3);

vector tPos = llDetectedTouchST(0);

if(tPos.x > X1 && tPos.x < X2 && tPos.y > Y1 && tPos.y < Y2)
{
llLoadURL(llDetectedKey(0), Message, llList2String(URLs, i));
return;
}
}

//Print out the coords if were the owner, so we can add them in
if(llDetectedKey(0) == llGetOwner())
llOwnerSay((string) llDetectedTouchST(0));
}
}
}
</lsl>

User:Kerik Rau

2009-01-27T05:01:04Z

Kerik Rau:

For all intentions this is a dumping ground of information that might be useful. All the information found here is free to use however you wish with no limitations.

{| width="90%" style="background: #B8E2FF; border: 1px solid #0090FF;"
|- align="center"
| width="150px" | Projects
| Description
|-
| [[ User:Kerik_Rau/Apoc | Apocalypse HUD ]]
| A modular tool designed to reduce code reproduction and provide the shortest path available for a given task. Thus it is fast and highly scalable by design.
|-
| [[ User:Kerik_Rau/n2k.AppSpot | n2k.AppSpot ]]
| A project aiming to make a name2key and key2name service via Google's App Engine that utilizes the Second Life Search rather than storing keys within a database.
|}

{| width="90%" style="background: #FFEC80; border: 1px solid #E3AD35;"
|- align="center"
| width="150px" | Scripts
| Description
|-
| [[ User:Kerik_Rau/Simple Slide Show | Simple Slide Show ]]
| Throw in the textures and it will automatically rotate through them.
|-
| [[ User:Kerik_Rau/MapTileURL | Map Tile URL ]]
| An LSL function that returns a string containing the current regions tile URL
|-
| [[ User:Kerik_Rau/XY2URL | XY to URL ]]
| A simple script that adds multiple links to a single prim
|}

2008-04-26T18:57:24Z

Kerik Rau:

=Code Snippets=
==Rotating 360 degrees NonPhys==
Awhile ago I stumbled upon [[Slerp]], and I wanted to make a way to generate a list of rotations for doing a complete rotation.

===First Trial===
(this is some of the UGLIEST code I have ever written, but it seems to work. Do not rely on it if you need precision.)
<lsl>
list GenerateRotationList(integer num)
{
list RotationList = [];
rotation a = ZERO_ROTATION;
rotation b = llEuler2Rot(<0,0,180> * DEG_TO_RAD );
float interval = 2 / (float) num;
float i = interval;
for(; i <= 1; i += interval)
RotationList += slerp(a,b,i);

if(num % 2)
i = 1 - i + interval;
else
i = interval;
b = llEuler2Rot(<0,0,180.001> * DEG_TO_RAD );
for(; i <= 1; i += interval)
RotationList += slerp(b,a,i);
return RotationList;
}
</lsl>

===Common Sense Prevails===
After a little debating it hit me that their is no point in calculating the individual positions if it starts with the same origin every time, doh. So now we have a function that is much cleaner and is a bit more understandable.

<lsl>
list GenerateRotationList(integer num)
{
list RotationList = [];
float increment = 360 / (float) num;
vector Rot = <0,0,0>;
while(~--num)
RotationList += llEuler2Rot( (Rot += <0,0,increment>) * DEG_TO_RAD );
return RotationList;
}
</lsl>

==SLURL Raster Image URL Generator==
I was rather interested in the raster images provided within SL and SLURL.com so I decided to figure out how to replicate it in such a way that it could be incorporated into tools and/or services outside the standard fair offered by Linden Labs. At some point I may rewrite it to use PHP or offer tips to incorporate it into something like the WMS provider in MapGuide.

===PseudoCode===

<pre>

//grab the region coordinates and store them
$RegionPos;

//1 Tile = 256m
$TilePos = $RegionPos/256.0;

//Fix the offset in the service
$TilePos.y = 1279.0 - $TilePos.y;

//genrate the URL, the 0 on the end may be a switch for gif/png, need to read up more on the SL map API
$mapURL = "http://secondlife.com/apps/mapapi/grid/map_image/" \
+ Floor($TilePos.x) + "-" + Floor($TilePos.y) + "-1-0"
</pre>

===LSL===
<lsl>
//SLURL Tile URL Generator - By Kerik Rau

//Based on the javascript from SLURL.com, merely an adaptation in LSL
//It should only take a minute or 2 to export this into PHP or other languages

//SLURL uses WMS, I still want to look at incorporating it into something like Mapguide
//I will need to look at the implementation to see if this would be easy or a pain

vector genTileVec(vector RegPos)
{
//tiles are in a grid based on the regions, so 256m = 1 tile
RegPos /= 256.0;

//offset provided in the javascript, really 1278 + 1 (probably 0 -> 1 index difference?)
RegPos.y = 1279.0 - RegPos.y;

return RegPos;
}

string genMapURL()
{
vector TilePos = genTileVec(llGetRegionCorner());

//should look like http://secondlife.com/apps/mapapi/grid/map_image/x-y-zoom-0
string mapURL = "http://secondlife.com/apps/mapapi/grid/map_image/";
mapURL += (string) llFloor(TilePos.x);
mapURL += "-";
mapURL += (string) llFloor(TilePos.y);

//the 3rd value is something to do with zoom, but only 1 seems to work with this
//the 4th value is undefined, omitting it works but I leave it in to match SLURL
mapURL += "-1-0";
return mapURL;
}

default
{
state_entry()
{
llSetText("SLURL Raster Image URL Generator\nOpens the image of the current sim\n(in a browser)", <1,1,1>, 1);
}

touch_start(integer numdet)
{
integer i;
for(i = 0; i < numdet; ++i)
llLoadURL(llDetectedKey(i), "load this page to see the sim image", genMapURL());

}
}

</lsl>

=Running SL Cahce in Linux RamDisk=

==General Idea==
Fedora generates 16, 16MB ramdisks upon bootup that are not in use. Basically my idea is to use Linux's LVM to initialize and span these drives together automatically and mount it to the location of SLs rather ugly cache to improve speed.

==Issues==
* Parted doesn't recognize the ramdisks (/dev/ram0 -> /dev/ram15) as a drive and refuses to open it.
* cfdisk doesn't seem to be useful outside of the interactive shell
* fdisk requires a user to manually do the job, yuk
* sfdisk seems to be solution but it is rather ugly
* Using LVM to span the drives may have performance implications
* The data in the partition will be lost every time the machine shuts down

==Workflow==
* Format each drive to type 8e (Linux LVM)
* Add the drives into a spanning group
* Format the LVM group with an EXT2 partition (with "-m 0" so no space is reserved for root)
* mount the partition to the ~/.secondlife/cache directory

==TODO==
* Get around to working with sfdisk and finish writing the INIT script

2007-08-08T01:42:59Z

Kerik Rau:

{{LSL_Function
|func_id=181|func_sleep=0.0|func_energy=10.0
|func=llSubStringIndex
|return_type=integer|p1_type=string|p1_name=source|p2_type=string|p2_name=pattern
|func_footnote=If '''pattern''' is not found in '''source''', {{HoverText|-1|negative one, 0x{{LSL_Hex/Write|-1}}}} is returned.<br/>
The index of the first character in the string is {{HoverText|0|zero}}
|func_desc
|return_text=that is the index of '''pattern''' in '''source'''.
|spec
|caveats=*Performs a literal match (case sensitive).
**Wildcards and RegEx are not supported.
|constants
|examples=Matching against last names:
<pre>
default
{
state_entry()
{
llSensorRepeat("", NULL_KEY, AGENT, PI, 96.0, 20);
}

sensor(integer NumDet)
{
integer i;

//Loop through all the sensor data and match against " Linden",
//this causes it to match with any last name of Linden (since there can't be spaces before the firstname)
//Alternatively you could match a firstname with "FirstName "
for(i = 0; i < NumDet; ++i)
if(~llSubStringIndex(llDetectedName(i), " Linden"))
llInstantMessage(llDetectedKey(i), "Hello, I see you!");
}
}
</pre>
|helpers=
An easy way to see if a string exists in another string...
<pre>
if(~llSubStringIndex(myString, str))
{//it exists
//This works because ~(-1) == 0 and any non-zero integer is considered true.
//It saves bytecode and is faster then doing != -1
//(It's also significantly less readable (unless you include the comments)
// and most developers I know will advice against these kind of practices. -OddesE Oh)
}
</pre>
|also_functions=
{{LSL DefineRow||[[llListFindList]]|Find a list in another list}}
|also_tests
|also_events
|also_articles
|notes
|cat1=String
|cat2
|cat3
|cat4
}}

LlDetectedOwner

2007-06-16T00:39:25Z

Kerik Rau:

{{LSL_Function/negative_index|false|number}}{{LSL_Function
|func_id=33|func_sleep=0.0|func_energy=10.0
|sort=DetectedOwner
|func=llDetectedOwner|return_type=key|p1_type=integer|p1_name=number
|func_footnote=Returns an {{HoverText|empty key|""}} if '''number''' is not valid sensed object
|func_desc
|return_text=that is the UUID of the owner of the object.
|spec
|caveats
|constants
|examples=
<pre>
list MAIN_MENU = ["1", "2"];

default
{
state_entry()
{
llDialog(llDetectedOwner(0), "configure switch", MAIN_MENU, 42);
}
}
</pre>
|helpers
|also_functions=
{{LSL DefineRow||[[llGetOwnerKey]]|llGetOwnerKey() is the same as llDetectedOwner(0)}}
{{LSL DefineRow||[[llGetOwner]]|}}
|also_events
|also_articles={{LSL DefineRow||{{LSLGC|Detected}}|}}
|notes
|cat1=Owner
|cat2
|cat3
|cat4
}}
{{LSLC|Detected|owner}}