UnPackerAll

From Second Life Wiki
Revision as of 15:38, 30 March 2008 by Uzume Grigorovich (talk | contribs) (lsl code tagging)
Jump to navigation Jump to search
Will Unpack all items of a box

<lsl> // script created by SpiritWolf Chikuwa // // /!\ PUBLIC DOMAIN /!\ // You can Copy/Mod/Trans // Please, do not resell this script and give it full perm // Just please leave this header intact // // Minor changes: (insert your name here and delete this comment if you do any mod of this script, thank you) // // Script start here:

list gInventoryList;

list getInventoryList() {

   integer    i;
   integer    n = llGetInventoryNumber(INVENTORY_ALL);
   list          result = [];
   for( i = 0; i < n; i++ )
   {
       result += [ llGetInventoryName(INVENTORY_ALL, i) ];
   }
   return result;

}

default {

   state_entry()
   {
       gInventoryList = getInventoryList();
   }
   touch_start( integer n )
   {
       
       integer i;
       for( i = 0; i < n; i++ )
       {
           llGiveInventoryList(llDetectedKey(i), llGetObjectName(), gInventoryList );
       
       }
   }
   changed( integer change )
   {
      if ( change == CHANGED_INVENTORY )
          gInventoryList = getInventoryList();
   }

}

// llGetInventory number and name will scan all objects on the box. // llGiveInventory will give you the content. // See also llGetInventory and llGiveInventory on LSL Wiki for further informations. </lsl>