SL for Nowt - Finding freebies and cheapies, and helping newbies in Second Life® since 2008

Place your cursor in the box, hit CTRL+A (CMD+A on a Mac) to select all text, then CTRL+C (CMD+C) to copy.

Pose HUD Script
Click to place your avatar in classic 'star jump' pose to help with adjusting prims. No need to rez a pose stand!
Tutorial can be found here.

vector GREEN = <0.0, 1.0, 0.0>;
vector RED   = <1.0, 0.0, 0.0>;

set_color(vector color)
{
    llSetPrimitiveParams([PRIM_COLOR, ALL_SIDES, color, 1.0]);
}

default
{
    state_entry()
    {
        llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION);
    }
    
    run_time_permissions(integer perms)
    {
        if(perms & PERMISSION_TRIGGER_ANIMATION)
        {
            state ready_off;
        }
    }
}

state ready_off
{
    state_entry()
    {
        llStopAnimation("turn_180");
        set_color(GREEN);
    }
    
    run_time_permissions(integer perms)
    {
        if(!(perms & PERMISSION_TRIGGER_ANIMATION))
        {
            state default;
        }
    }
    
    touch_start(integer num)
    {
        state ready_on;
    }
}

state ready_on
{
    state_entry()
    {
        llStartAnimation("turn_180");
        set_color(RED);
    }
    
    run_time_permissions(integer perms)
    {
        if(!(perms & PERMISSION_TRIGGER_ANIMATION))
        {
            state default;
        }
    }
    
    touch_start(integer num)
    {
        state ready_off;
    }
}

Scrubber Script
Will remove all lingering effects, such as bling particles, hovering text, texture animations etc, from modifiable prims.
Tutorial can be found here (old blog)

  default
  {
      state_entry()
      {
          llSetText("", <1,1,1>, 1.5);
          llSetTextureAnim(FALSE, ALL_SIDES,0,0,0.0, 1,0.3);
          llParticleSystem([]);
       }
  }

Pose Stand Script
Place into a prim and sit on the prim to put your avatar into a 'starjump' pose so you can edit prims that you're wearing more easily.
Tutorial can be found here (old blog)

//Note: this code was adapted from someone.

//

key mkLoungingAgentKey = NULL_KEY;

integer miPermissionsAcquired = FALSE;

default

{

state_entry()

{

//overriden sit target

//lower them a bit

vector vLoungeTarget = <0.00, 0.00, 1.00>;

rotation rX;

rotation rY;

rotation rZ;

rotation r;

//build rotations

//Note: this is broken out like this to simplify the

//        process of finding the correct sit angle.  I

//        use the following form until I have the rotation

//        that I want perfect, and then I simply

//        hardcode the perfected quaterion and remove

//        this mess.

//

rX = llAxisAngle2Rot( <1,0,0>, 0 * DEG_TO_RAD);         //cartwheel

rY = llAxisAngle2Rot( <0,1,0>, 0 * DEG_TO_RAD);       //sumersault

rZ = llAxisAngle2Rot( <0,0,1>, 0 * DEG_TO_RAD);       //turn in place

//combine rotations

r = rX * rY * rZ;

//override 'sit' on pie menu

llSetSitText( "Stand" );

//override default sit target and rotation on prim

llSitTarget( vLoungeTarget, r );

}

changed(integer change)

{

if (change & CHANGED_LINK)

{

key agent = llAvatarOnSitTarget();

if ( mkLoungingAgentKey == NULL_KEY && agent != NULL_KEY )

{

//changed user

//cache new user key and request their permissions

mkLoungingAgentKey = agent;

llRequestPermissions(mkLoungingAgentKey,PERMISSION_TRIGGER_ANIMATION);

}

else if ( mkLoungingAgentKey != NULL_KEY && agent == NULL_KEY)

{

//user is getting up

if ( miPermissionsAcquired )

{

//restore anims

llStopAnimation("turn_180");

}

//reset the script to release permissions

llResetScript();

}

}

}

run_time_permissions(integer parm)

{

if(parm == PERMISSION_TRIGGER_ANIMATION)

{

//set permission flag

miPermissionsAcquired = TRUE;

//cancel the sit anim

llStopAnimation("sit");

llStartAnimation("turn_180");

}

}

}

Landmark-Giver HUD Script
Place into a spherical prim and fill with landmarks (rename them with short names, eg: the name of the store).
Resize prim to approx 0.100 and attach to a HUD position.
When clicked, the HUD will give a menu. Click menu to open map view for that location.
Tutorial can be found here (old blog)

integer CHANNEL;

key touched;

list STUFF;

string TITLE = "";

key vgKeyOwner;

RebuildItemList()
{
    //STUFF = (STUFF=[]) + STUFF + [ "Radar" ];
    integer count = llGetInventoryNumber(INVENTORY_LANDMARK);
    integer i;

    for (i = 0; i < count; ++i) 
    {
        string name = llGetInventoryName(INVENTORY_LANDMARK, i);
        name = llGetSubString(name, 0, 23);
        STUFF = (STUFF=[]) + STUFF + [ name ];
    }
}

DisplayMenu(integer page)
{
    integer length = llGetListLength(STUFF);
    integer start = page * 9;
    integer end = start + 9;
    list menu = [];
    
    page += 1;
    
    if (start > 0)
    {
        menu = [ "Page " + (string)(page - 1) ];
    }
    
    else
    {
        menu = [ " " ];
    }

    menu = (menu=[]) + menu + llList2List(STUFF, start, start);

    if (end < length)
    {
        menu = (menu=[]) + menu + [ "Page " + (string) (page + 1) ];
    }
    
    else
    {
        menu = (menu=[]) + menu + [ " " ];
    }

    menu = (menu=[]) + menu + llList2List(STUFF, start + 1, end);

    llDialog(touched, "\nItem Menu: ", menu , CHANNEL);
}

default
{
    on_rez(integer start)
    {
        llResetScript();
    }
    
    state_entry()
    {
        llAllowInventoryDrop(TRUE);
        llSetText(TITLE, <1.0, 1.0, 1.0>, 1.0);
        RebuildItemList();
        CHANNEL = (integer)llFrand(2000000000.0);
        llListen(CHANNEL, "", NULL_KEY, "");
        vgKeyOwner = llGetOwner();
    }

    changed(integer change)
    {
        if (change == CHANGED_INVENTORY)
        {
            llOwnerSay("Rebuilding item list");
            RebuildItemList();
            llOwnerSay("Done.");
        }
    }

    dataserver( key vKeyNull, string vStrData )
  {
     //-- because we don't know who touched us in this event, this
     //-- only works for the owner when called from the dataserver
    llMapDestination( llGetRegionName(), (vector)vStrData, ZERO_VECTOR );
  }

    touch_start(integer total_number)
    {
        touched = llDetectedKey(0);
        if (touched)
        {
            DisplayMenu(0);
        }
    }

    listen(integer channel, string name, key id, string message)
    {
        if (llSubStringIndex(message, "Page ") != -1)
        {
            string page = llGetSubString(message, 5, -1);
            DisplayMenu(((integer) page) - 1);
        }else{
            integer item = llListFindList(STUFF, [ message ]);
            if (item != -1)
            {
            llRequestInventoryData( llGetInventoryName( INVENTORY_LANDMARK, item ) );
            }
        }
    }
}

Simple Hovering Text Script
Change YOUR TEXT HERE to whatever you want it to say.
Start new lines with a backslash and 'n' (\n) and change the text's colour by modifying the RGB (1.0,1.0,1.0) numbers in the carets.

default
{

    state_entry() {

        llSetText("YOUR TEXT HERE", <1.0,1.0,1.0>, 1.0);

    }

}

Simple Rotation Script
Place into any prim that you want to rotate.
To slow it down edit the final llTargetOmega number in carets from 1 to .25.
To change the direction of rotation, edit the same number to a minus (eg: 0,0,-.25).
To change the angle of rotation edit the first two llTargetOmega numbers in carets (but be warned: this can make your item hard to grab hold of!)

default
{
    state_entry()
    {
       llTargetOmega(<0,0,1>,PI,1.0);
    }

}

SL for Nowt is an entirely unofficial site, and is not endorsed by Linden Research, Inc. Second Life, SL, Linden Lab, LL, SLurl, Linden dollars, and L$ are trademarks or registered trademarks of Linden Research, Inc.
All rights reserved. No infringement is intended.