Menu Piano Inclinato

float fZ=23;

float fY; float fZMax;

key kAVI;

float fSIZE;


setangle(float alfa)
{
    float f_rad=alfa*DEG_TO_RAD;

    rotation r_rot=llEuler2Rot(<f_rad,0,0>);
    vector v_myscale=llGetScale();
    vector v_mypos=llGetPos();

    float f_l=v_myscale.y;
    llSay(0,"Lunghezza percorso "+(string)(f_l/2));
    float f_h=(llSin(f_rad) * (f_l / 2.0));

    fY=(llCos(f_rad) * (f_l / 2.0));

    float f_new=fZ+ f_h; fZMax=  2*f_h + 1;
    vector v_pos=<v_mypos.x,v_mypos.y,f_new>;
    llSetLinkPrimitiveParamsFast(1,[ PRIM_ROTATION, r_rot, PRIM_POSITION, v_pos ]);


}


default
{
    state_entry()
    {
        llSay(0,"Reset Script");
    }

    touch_start(integer count)
    {
        kAVI=llDetectedKey(0);
        state ask_angle;
    }


}
state ask_angle
{
    state_entry()
    {
        llListen(100,"",kAVI,"");
        llDialog(kAVI,"Angolo del piano inclinato",[ "0","1","2","5","10","15","20","25","30" ],100);
    }
    listen(integer channel,string name,key id,string str)
    {
        setangle((float)str);
        state ask_dimensioni;
    }
       touch_start(integer count)
    {
        llResetScript();
    }
}
state ask_dimensioni
{
    state_entry()
    {
        llListen(100,"",kAVI,"");
        llDialog(kAVI,"Dimensioni palla",[ "0.2","0.3", "0.5", "1", "1.5", "2" ],100);
    }
    listen(integer channel,string name,key id,string str)
    {
        fSIZE=(float)str;
        state rezzapalla;
    }
    touch_start(integer count)
    {
        llResetScript();
    }
}
state rezzapalla
{
    state_entry()
    {

        vector v=llGetPos()+<0,0,2>;
                llSay(0," rezzing at delta "+(string)fY);
        llRezAtRoot("Palla",v,ZERO_VECTOR,ZERO_ROTATION,100);
    }
    object_rez(key id)
    {
        llSay(100,"size "+(string)fSIZE);
        llResetScript();
    }
     touch_start(integer count)
    {
        llResetScript();
    }
}