default
{
    state_entry()
    {
        llSetTimerEvent(3);
    }
    timer()
    {
        list params =[];
        integer i;
        vector color;
        for (i=1; i<llGetNumberOfSides(); ++i)
        {
            color =     <llFrand(1),llFrand(1),llFrand(1)>;
            params+= [PRIM_COLOR,i,color,1];
        }
        llSetLinkPrimitiveParamsFast(LINK_THIS,params + [PRIM_POINT_LIGHT,1,color,1.0, 10.0, 0.75]);
    }
}