smooth bow

Hello, i have this tentacle script, but i like to make the movements more smoothly (not so nervous) Have changed the parameters, but without success. I like to have the movement like a bow.

Here is the script

default
{
    state_entry()
    {
        llSensorRepeat("",NULL_KEY,AGENT,10,PI,1.0);
    }

    sensor(integer num)
    {
        key target = llDetectedKey(0);
        vector mypos = llGetPos();
        vector targetpos = llDetectedPos(0);
        vector test = llVecNorm(targetpos-mypos);
        llSetPrimitiveParams([PRIM_FLEXIBLE, TRUE, 3,0.55,0.0,0.0,5.0,test]);
        //llOwnerSay("Test: " + (string)test);
        
    }
    no_sensor()
    {
       key target = llDetectedKey(0);
        vector mypos = llGetPos();
        vector targetpos = llDetectedPos(0);
        vector test = llVecNorm(targetpos-mypos);

 llSetPrimitiveParams([PRIM_FLEXIBLE, FALSE, 3,0.5,0.0,0.0,1.0,test]);
    }
    link_message(integer sn, integer num, string str, key id)
    {
        if(str == "OFF")
        {
            state off;
        }
    }
}

state off
{
      state_entry()
    {
        key target = llDetectedKey(0);
        vector mypos = llGetPos();
        vector targetpos = llDetectedPos(0);
        vector test = llVecNorm(targetpos-mypos);
           
        llSensorRemove();
        llSetPrimitiveParams([PRIM_FLEXIBLE, FALSE, 3,0.5,0.0,0.0,1.0,test]);
    }
    
    link_message(integer sn, integer num, string str, key id)
    {
        if(str == "ON")
        {
            state default;
        }   
    } 
}

Thanks in advance

You might want to add some drag to the flexi parameters, it's the 5th parameter in the list (2.0 in my example below) and is used to slow down the reactions of the flexi.

llSetPrimitiveParams([PRIM_FLEXIBLE, TRUE, 3,0.55,2.0,0.0,5.0,test]);

Thanks a lot, problem solved