//Script Donated to The Wall Of Script by Alan Edison, Original creator       Unknown. Modified by Jason Keegan.

//This is a welcoming script, It will be triggered as it detects someone       walking on the prim which has this script in it.


string Welcome = "Welcome to my humble abode"; //This is the message the                                                      welcome mat will give when                                                  it detects someone on it.
                                                 

string Online = "Welcome mat Online."; //This is the message you will hear                                            when the script is reset to confirm                                         the script is active.
                                                 
                                                 

float gSleep = 3;// This is the time delay of the welcome mat, Giving time                       for the person that sets the welcome mat enough time                        to walk off.
                    
                    
                    
integer name = TRUE; //If you do not wish for the welcome mat to also add thename of the person that walked on it, Then change the TRUE to FALSE.                    
                    

default
{
    state_entry()
    {
        llSay(0, Online);
    }

    collision_start(integer total_number)
    {
        if (name == TRUE)
        {
            llWhisper(0, Welcome + " " + llDetectedName(0));
            llSleep(gSleep);
        }
        else
        {
            llWhisper(0, Welcome);
            llSleep(gSleep);
        }
    }
    on_rez(integer start_param)
    {
        llResetScript();
    }
}

//script to notify you when your land sells by Angel Fluffy
//It's very simple : it simply sends you an IM when your land is sold to someone else, then deletes itself. I've NOT tested it AT ALL, so I make no assurances AT ALL that it will work. It's intended to be more of an idea than anything else - if it works, consider that a bonus




integer ctime = 10;

default
{
    state_entry()
    {
        llSay(0, "Online. Will check every "+(string)ctime+" seconds. If land owner is NOT the same as object owner, will message object owner with location and 'your land sold' message, and self delete.");
        llSetTimerEvent((float)ctime);
    }

    timer() {
        if (llGetLandOwnerAt(llGetPos()) == llGetOwner())  {
            // object owner matches land owner
        } else {
            // object owner does NOT match land owner!
            llInstantMessage(llGetOwner(),"Your land at "+(string)llGetRegionName()+":"+(string)llGetPos()+" has been sold. The new buyer may be : "+llKey2Name(llGetLandOwnerAt(llGetPos()))+" (if this fails, a group now has it).");
            llDie();
        }
        
    }
}// END //

//Here's a handy little script I wrote up to exchange money with people who are either far away or offline. Since the only other way to pay someone is in person by the pie chart, this can come in very handy. Especially for payroll of employees, hence the name.

//The only catch is you need the persons key but this can be acquired several different ways; make them touch a scripted object and log it, use a sensor on them, use a sensor on their in world objects if they're offline, etc. I can post several scripts to get keys if people need.

//IM me in game if you'd like a copy of the script without having to cut and paste it.

// payroll.ll by Rathe Underthorn "00aa39a8-f6a4-45be-991e-b1e1fca8fe5b"
// say @pay   to pay a user on your payroll list.

float fVersion = 1.0;

list lsPeople =
[
// ADD PEOPLE HERE AS "NICKNAME", "KEY",

"Arthur", "62091005-826d-44cd-ab80-0a6b96915b44", // Arthur Money
"Carrera", "e6b0b6e9-0dee-4e6e-bfb9-c725d0db3f01", // Carrera LeFay
"Darwin", "3e722bd8-028c-713f-e4f7-2e9b680855c8", // Darwin Appleby
"Kaylis", "16f627e1-ab89-4b1f-827f-63bd7bd3a7b9", // Kaylis LeFay
"Rathe", "00aa39a8-f6a4-45be-991e-b1e1fca8fe5b", // Rathe Underthorn
"Si", "117274fd-3902-4a07-b411-09bdc79f0fad", // Si Money
"Yuki", "3e8a2608-661d-ca16-0492-9233c77d3d1c", // Yuki Sunshine

// DO NOT REMOVE THIS END ROW

"END", "END"
];

integer nPublicChannel = 0;
integer nPublicId = 0;
string szTarget = "";
integer nAmount = 0;
key kTarget = NULL_KEY;

init_listen()
{
llListenRemove(nPublicId);
nPublicId = llListen(nPublicChannel, "", NULL_KEY, "");
}

key target_to_key(string szTarget)
{
integer i;
integer nListSize = llGetListLength(lsPeople) - 2;

for (i = 0; i