integer cylinder;
default
{
    state_entry()
    {
        integer i;
        while (i < llGetNumberOfPrims())
        {
            string name = llList2String(llGetLinkPrimitiveParams(i,[PRIM_NAME]),0);
            if (name == "cylinder"){cylinder = i; llOwnerSay("found cylinder " + (string)i);}
            i++;
        }
    }

    touch_start(integer total_number)
    {
        vector chamber = llRot2Euler(llList2Rot(llGetLinkPrimitiveParams(4,[PRIM_ROT_LOCAL]),0));
        chamber.y += (60 * DEG_TO_RAD);
        llOwnerSay((string)chamber);
        llSetLinkPrimitiveParams( cylinder, [PRIM_ROT_LOCAL, llEuler2Rot(chamber)]);
    }
}