list slides = [];

getSlides()
{
    integer ii;
    integer iiMax = llGetInventoryNumber(INVENTORY_MATERIAL);
    string name;

    for (ii = 0; ii < iiMax; ii++)
    {
        name = llGetInventoryName(INVENTORY_MATERIAL, ii);
        slides += [name];
    }
}

integer index;

newSlide()
{
    string material = llList2String(slides, index);
    llSetRenderMaterial(material, 1);
    index++;
    if (index >= llGetListLength(slides))
        index = 0;
}

default

{
    state_entry()
    {
        getSlides();
        llSetTimerEvent(15);
        index = 0;
        newSlide();
    }

    /*        touch_start(integer num)
        {
            index = 0;
            newSlide();
            llSay(0,"Starting slide show over");
        }*/

    timer()
    {
        newSlide();
    }
}