Rezzing all items in a box or folder

How do you quickly or (scriptly rez an instance of all the 50+ items in a box or folder?

use llRezObject inside a loop. The biggest problem would be positioning them nicely

default
{	
    touch_start(integer total_number)
    {
        vector pos = llGetPos();
        integer i;
        integer count = llGetInventoryNumber(INVENTORY_OBJECT);
        for(i = 0;i < count; ++i)
       {
             pos.z += (i * 0.5);
             string name = llGetInventoryName(INVENTORY_OBJECT, i);
             llRezObject(name, pos, ZERO_VECTOR, ZERO_ROTATION, i);
             llSleep(1);
       }
    }
}

BUT be aware of the grey goo fence.