integer y = 1;
float fTimer = 0.05;
integer iSTATUS_TYPING = FALSE;

changestatus(integer iStatus_Typing)
{
    if (iStatus_Typing)
    {
        integer i = 1;
        // Erste do while schleife
        do
        {
            y = y + 1;
            llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_ROT_LOCAL, llEuler2Rot(<90, y, 0> * DEG_TO_RAD)]);
        }
        while(iSTATUS_TYPING == TRUE);
        //zweite do while schleife
        do
        {
            y = 0;
            llSetLocalRot(llEuler2Rot(<90, 0, 0> * DEG_TO_RAD));
        }
        while(iSTATUS_TYPING == FALSE);
        //llTargetOmega(<0,1,0> * llGetLocalRot(),PI,1.0);
    }
    //if(iSTATUS_TYPING == TRUE
    //{
        //llTargetOmega( ZERO_VECTOR, 0, 0 );
        //llSleep(0.2);
        //llSetLocalRot(rot);
        //llSetLocalRot(llEuler2Rot(<90, 0, 0> * DEG_TO_RAD));
    //}
}

checkTypeStatus()
{
    integer buf = llGetAgentInfo(llGetOwner());
    if(buf & AGENT_TYPING && !iSTATUS_TYPING)
    {
        iSTATUS_TYPING = TRUE;
        changestatus(TRUE);
    }
    else if (!(buf & AGENT_TYPING) && iSTATUS_TYPING)
    {
        iSTATUS_TYPING = FALSE;
        changestatus(FALSE);
    }
}

default
{
    state_entry()
    {
        //rot = llGetLocalRot();
        llSetTimerEvent(fTimer);
    }

    timer()
    {
        checkTypeStatus();
    }
}