Hat einer ein Script zum Löschen von Inhalten?

[Klarabella Karamell]

Ich bräucht mal son geniales Script, was auf einen Rutsch und rückstandsfrei in einem verlinkten Objekt alle Inhalte löscht...
Das würde meine "Viecherproduktion" ungemein beflügeln....
Belohnung: Ein Sculptie-Tier nach Wahl 8)

Code:

integer x;
string Grusi;
default
{
  
  
     touch_start(integer total_number)
    
    {
   for (x=0;x<llGetInventoryNumber(INVENTORY_ALL);x++)
        {
            Grusi=llGetInventoryName(INVENTORY_ALL,x);
            llRemoveInventory(Grusi);
        }
        
    }
}

ist mein dilletantischer Versuch, ist aber grottenlangsam und wirkt nur auf ein Prim....