Free LSL scripts for Second Life

float   OPEN_ANGLE  = 90.0;  // degrees to swing; use -90.0 to open the other way
float   AUTO_CLOSE  = 10.0;  // seconds before it closes by itself; 0.0 = stay open
integer HINGE_SIDE  = 1;     // 1 = hinge on the +X edge, -1 = hinge on the -X edge
string  OPEN_SOUND  = "";    // optional: a sound name in the door's Contents, or a sound UUID
string  CLOSE_SOUND = "";
integer  gOpen = FALSE;
vector   gClosedPos;
rotation gClosedRot;
openDoor()

vector  SIT_POS        = <0.0, 0.0, 0.5>;  // metres from the centre of the object (never use <0,0,0>)
vector  SIT_ROT        = <0.0, 0.0, 0.0>;  // degrees, for example <0.0, 0.0, 90.0> to turn the avatar
string  SIT_TEXT       = "Sit";            // the word on the right-click menu
integer HIDE_WHEN_USED = FALSE;            // TRUE = the object turns invisible while someone sits (pose ball)
key gSitter = NULL_KEY;
string poseAnim()
{
    return llGetInventoryName(INVENTORY_ANIMATION, 0);
}

string  THANK_YOU      = "Thank you for the tip, %name%!";  // %name% becomes the tipper's name
integer PUBLIC_THANKS  = TRUE;     // TRUE = say thanks in local chat, FALSE = only the tipper sees it
integer DEFAULT_AMOUNT = 100;      // the amount in the Pay window's box
list    QUICK_AMOUNTS  = [50, 100, 250, 500];  // exactly four quick buttons, in L$
integer CLICK_TO_PAY   = TRUE;     // TRUE = a left click opens the Pay window
vector  TEXT_COLOR     = <1.0, 0.85, 0.3>;
integer gTotal = 0;
string  gLast = "";
string  gOwnerName = "";

integer GROUP_ONLY       = FALSE;
string  FOLDER_NAME      = "";    // "" = use the object's name
string  THANK_YOU        = "Enjoy your gift! It is in your inventory.";
string  NO_GROUP_TEXT    = "Sorry, this gift is for group members. Wear the group tag and touch me again.";
integer COOLDOWN_SECONDS = 60;    // the same avatar can take the gift again after this time
list gRecent = [];   // [avatar key, unix time, ...]
string folderName()
{
    if (FOLDER_NAME != "") return FOLDER_NAME;

list    TEXTURE_LIST  = [TEXTURE_PLYWOOD, TEXTURE_BLANK];  // replace with your own texture UUIDs in quotes
integer TEXTURE_FACE  = ALL_SIDES;  // ALL_SIDES, or one face number such as 0
integer WHOLE_LINKSET = FALSE;      // TRUE = change every prim of the linked object
integer OWNER_ONLY    = FALSE;      // TRUE = only the owner can change it
integer gIndex = 0;
showTexture()
{
    string tex = llList2String(TEXTURE_LIST, gIndex);
    if (WHOLE_LINKSET) llSetLinkTexture(LINK_SET, tex, TEXTURE_FACE);

string HOVER_TEXT  = "Welcome!\nTouch the sign for a free gift";
vector TEXT_COLOR  = <1.0, 1.0, 1.0>;  // red, green, blue from 0.0 to 1.0 (white here)
float  TEXT_ALPHA  = 1.0;              // 1.0 = solid, 0.5 = half see-through
default
{
    state_entry()
    {
        llSetText(HOVER_TEXT, TEXT_COLOR, TEXT_ALPHA);
    }

vector  SPIN_AXIS    = <0.0, 0.0, 1.0>;  // <0,0,1> = turn around the up axis like a turntable
float   SPIN_SPEED   = 0.5;              // radians per second; a negative number turns the other way
integer TOUCH_TOGGLE = TRUE;             // TRUE = touch to start and stop
integer gOn = TRUE;
spin(integer on)
{
    if (on) llTargetOmega(SPIN_AXIS, SPIN_SPEED, 1.0);
    else llTargetOmega(SPIN_AXIS, 0.0, 0.0);
    gOn = on;

vector  LIGHT_COLOR     = <1.0, 0.9, 0.7>;  // warm white
float   LIGHT_INTENSITY = 1.0;   // 0.0 to 1.0
float   LIGHT_RADIUS    = 10.0;  // metres, up to 20.0
float   LIGHT_FALLOFF   = 0.75;  // 0.0 to 2.0
float   GLOW_AMOUNT     = 0.1;   // 0.0 = no glow
integer USE_FULLBRIGHT  = TRUE;
integer LIGHT_FACE      = ALL_SIDES;  // the face that glows, or ALL_SIDES
integer START_ON        = FALSE;
integer gOn = FALSE;

string  SOUND_NAME   = "";    // "" = the first sound in Contents; or a sound name or UUID
float   SOUND_VOLUME = 0.6;   // 0.0 to 1.0; keep ambient sounds soft
integer START_ON     = TRUE;
integer OWNER_ONLY   = FALSE; // TRUE = only the owner can turn it on and off
integer gOn = FALSE;
string soundToPlay()
{
    if (SOUND_NAME != "") return SOUND_NAME;
    return llGetInventoryName(INVENTORY_SOUND, 0);

vector  COLOR_START      = <1.0, 0.9, 0.5>;   // gold
vector  COLOR_END        = <1.0, 0.6, 0.9>;   // pink
float   SIZE_START       = 0.10;  // metres
float   SIZE_END         = 0.04;
float   PARTICLE_LIFE    = 2.0;   // seconds each sparkle lives
float   BURST_RATE       = 0.1;   // seconds between bursts
integer BURST_COUNT      = 3;     // sparkles per burst
string  PARTICLE_TEXTURE = "";    // "" = the standard round particle; or a texture UUID
integer START_ON         = TRUE;

vector DESTINATION = <128.0, 128.0, 300.0>;  // region coordinates in THIS region
string SIT_TEXT    = "Teleport";
string HOVER_TEXT  = "Sit to teleport";
default
{
    state_entry()
    {
        llSitTarget(<0.0, 0.0, 0.1>, ZERO_ROTATION);
        llSetSitText(SIT_TEXT);

string  WELCOME_TEXT  = "Welcome, %name%! Have a look around and grab the free gift at the entrance.";
float   RANGE_METRES  = 20.0;  // how close a visitor must come (up to 96.0)
float   SCAN_SECONDS  = 10.0;  // how often to look for new visitors
integer MAX_REMEMBER  = 300;   // visitors remembered per day
list    gSeen = [];
integer gDay;
string fillName(string s, string name)
{
    integer i = llSubStringIndex(s, "%name%");