Join us in Outworldz at www.outworldz.com:9000 or follow us:

Search dozens of selected web sites for OpenSim and LSL script

New! Script Meta-Search will search thousands of scripts here and at other sites for LSL or Opensim scripts.
Loading

Want to add a script or a project? Upload it and a half million people will see it and your name here this year.

Home   Show All
Category: Contributor: Creator
Inventory Giver SeagelYadNiContentGiverOnTouch  

SeagelYadNiContentGiverOnTouch

SeagelYadNiContentGiverOnTouch.lsl

Category: Inventory Giver
By : Anonymous
Created: 2010-01-10 Edited: 2010-01-10
Worlds: Second Life

the Zip file

Download all files for SeagelYadNiContentGiverOnTouch
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. SeagelYadNiContentGiverOnTouch_1.lsl
1
2 default
3 {
4 on_rez(integer start_parm)
5 {
7 }
9 {
10 llOwnerSay( "Click me to get my Contents!");
11 string folderName = llGetObjectName();
12 llSetText(folderName,<0,1,0>,1.0);
13 }
14 touch_start(integer total_number)
15 {
16 list contents_list;
17 string contents_name;
19 string folderName = llGetObjectName();
20 integer i;
21 for (i = 0; i < contents_num; ++i)
22 {
23 contents_name = llGetInventoryName(INVENTORY_ALL, i);
24 contents_list += contents_name;
25 }
26 i = llListFindList(contents_list, [llGetScriptName()]); // Delete this script
27 contents_list = llDeleteSubList(contents_list, i, i);
28
29 if(llGetListLength(contents_list) < 1)
30 {
31 llWhisper(0, "Sorry, This box allows only owner to open it.");
32 }
33 else
34 {
35 llGiveInventoryList(llGetOwner(), folderName, contents_list);
36 llInstantMessage(llGetOwner(), "Look in your inventory for a folder called: "
37 + folderName + ". This folder contains your Stuff."); // Alert the user.
38 }
39 }
40 }// END //

Back to the Best Free Tools in Second Life and OpenSim.