ecmascript:

function PosIn(Pos)
{
    var Delta= Pos.subtract(LastPos);
    LastPos= Pos;

    Delta= Delta.multiply(3);

    var Tmp= Delta.x;
    Delta.x= -Delta.y;
    Delta.y= Tmp;

    var DeltaOri= new SFRotation(Delta.normalize(), Delta.length());

    OriOt= OriOt.multiply(DeltaOri);
}

        

          
ecmascript:

function Stop()
{
    var Value= Damper.value_changed;

    Stopped= true;

    Damper.set_value= Value;
    Damper.set_destination=  Value;

}

function OriIn(O)
{
    if(!Stopped)
        OriOt= O;
}

function SensorIsActive(a)
{
    if(a)
        Stopped= false;
}

        

          
ecmascript:

function DampDiffuse_sThere(l)
{
    if(l)  
        DiffuseValue= 
        DiffuseDest=  cDiffuseCold;
}
function DampEmissive_sThere(l)
{
    if(l)
        EmissiveValue=
        EmissiveDest= cEmissiveCold;
}
function DampSpecular_sThere(l)
{
    if(l)
        SpecularValue=
        SpecularDest= cSpecularCold;
}
function touched()
{
    DiffuseValue= cDiffuseHot;
    EmissiveValue= cEmissiveHot;
    SpecularValue= SpecularHot;
}

        

      
ecmascript:

function set_OriA(Ori)   { OriA= Ori; }
function set_OriB(Ori)   { OriB= Ori; }
function set_OriC(Ori)   { OriC= Ori; }
function set_OriD(Ori)   { OriD= Ori; }
function set_OriE(Ori)   { OriE= Ori; }

function BtnA_touched()  { Stop_Continous= 0;   Ori_toSet= OriA; }
function BtnB_touched()  { Stop_Continous= 0;   Ori_toSet= OriB; }
function BtnC_touched()  { Stop_Continous= 0;   Ori_toSet= OriC; }
function BtnD_touched()  { Stop_Continous= 0;   Ori_toSet= OriD; }
function BtnE_touched()  { Stop_Continous= 0;   Ori_toSet= OriE; }

function BtnRandom_touched()
{
    var VecRand= new SFVec3f( Math.random() * 2 - 1
                            , Math.random() * 2 - 1
                            , Math.random() * 2 - 1
                            );

    RandomOri_selected= new SFRotation(VecRand.normalize(), VecRand.length() * Math.PI);

    Stop_Continous= 0;
    Ori_toSet= RandomOri_selected;
}

function set_OriContinous(ori)
{
    Ori_toSet= ori;
}