//<script>
function puhasta()
{
    for(i=1;i<57;i++)
    {
        document.getElementById("kast_"+i).value=""
    }
    document.getElementById('kast_57').value=""
    document.getElementById('kast_58').value=""
    document.getElementById('kast_59').value=""
}
//---------------------------------------------------------------------------------------
//-----------------------------------------------------------------------------------Body
//---------------------------------------------------------------------------------------
var SGM=new Array(54)
//-----------------------------------------------------------TAIMED
SGM[1]=3430.62       // NISU                                     120
SGM[2]=2530.63       // RUKKIS                                   122
SGM[3]=2846.64       // ODER                                     123
SGM[4]=2343.41       // KAER                                     124
SGM[5]=2343.41       // SUVISEGATERAVILI                         125
SGM[6]=2876.66       // Muu Teravili                             128
SGM[7]=2211.27       // Kaunviljad                               129
SGM[8]=15027.59      // Kartul                                   130
SGM[9]=0             // Suhkrupeet                               131
SGM[10]=3480.88      // Õlikultuurid                             132
SGM[11]=3480.88      // Muud Tehnilised kultuurid                135
SGM[12]=74689.94     // Avamaa Värske köögivili                  136
SGM[13]=74689.94     // Turuaianduse avamaa värske köögivili     137
SGM[14]=424520.44    // Katmikala värske köögivili               138
SGM[15]=21750.33     // Seened                                   139
SGM[16]=30958.22     // Avamaa lilled ja ilutaimed               140
SGM[17]=707096.88    // Katmikala lilled ja ilutaimed            141
SGM[18]=1440.84      // Rohuseeme                                142
SGM[19]=1440.84      // Muu seemnekasvatus                       143
SGM[20]=13789.09     // Söödajuurvili                            144 --
SGM[21]=1472.18      // Muud söödakultuurid                      145
SGM[22]=113.55       // Must kesa jm kõrvalejätmine              146
SGM[23]=1472.18      // Põldheinamaad                            147
SGM[24]=1808.88      // Muud põllu/heinamaa viljel.viisid        148
SGM[25]=1808.88      // Kolmandatele loovut.külvivalmis põllumaa 149
SGM[26]=1831.46      // Püsi heina ja karjamaad                  150
SGM[27]=313.55       // Hooldamata karjamaa                      151
SGM[28]=8523.15      // Puuvili, marjad, v.a.maasikad            152
SGM[29]=424520.44    // Katmikala püsikultuurid                  156
SGM[30]=37485.00     // Puukoolid                                157
//--------------------------------------------------------------LOOMAD
SGM[31]=4023.00    // 22 Hobused
SGM[32]=511.7      // 23 Nuumvasikad
SGM[33]=511.7      // 24 Noorveised kuni 1 aasta
SGM[34]=460.49     // 25 Pullmullikad 1-2 aastat
SGM[35]=879.96     // 26 Lehmmullikad 1-2 aastat
SGM[36]=254.63     // 27 Pullmullikad üle 2 aasta
SGM[37]=1225.68    // 28 Tõumullikad üle 2.a
SGM[38]=1225.68    // 29 Nuummullikad üle 2 aasta
SGM[39]=10232.62   // 30 Lüpsilehmad (piim)
SGM[40]=10232.62   // 31 Tapalehmad
SGM[41]=1218.11    // 32 Muud lehmad
SGM[42]=540        // 33 Mesilaspered
SGM[43]=555        // 34 Emasküülikud
SGM[44]=640.57     // 38 Emaskitsed
SGM[45]=640.57     // 39 Muud kitsed
SGM[46]=470.74     // 40 Uted
SGM[47]=470.74     // 41 Muud lambad
SGM[48]=62.19      // 43 Põrsad
SGM[49]=4357.97    // 44 Tõuemised
SGM[50]=340.51     // 45 Nuumsead
SGM[51]=340.51     // 46 Muud sead
SGM[52]=45         // 47 Broilerid
SGM[53]=90.09     // 48 Munakanad
SGM[54]=37.88      // 49 Muud linnud

/*
var tekst=new Array(
"120 Nisu",
"122 Rukkis",
"123 Oder",
"124 kaer",
"125 Suvisegateravili",
"128 Muu Teravili",
"129 Kaunviljad",
"130 Kartul",
"131 Suhkrupeet",
"132 Õlikultuurid",
"135 Muud Tehnilised kultuurid",
"136 Avamaa Värske köögivili",
"137 Turuaianduse avamaa värske köögivili",
"138 Katmikala värske köögivili",
"139 Seened",
"140 Avamaa lilled ja ilutaimed",
"141 Katmikala lilled ja ilutaimed",
"142 Rohuseeme",
"143 Muu seemnekasvatus",
"144 Söödajuurvili",
"145 Muud söödakultuurid",
"146 Must kesa jm kõrvalejätmine",
"147 Põldheinamaad",
"148 Muud põllu/heinamaa viljel.viisid",
"149 Kolmandatele loovut.külvivalmis põllumaa",
"150 Püsi heina ja karjamaad",
"151 Hooldamata karjamaa",
"152 Puuvili, marjad, v.a.maasikad",
"156 Katmikala püsikultuurid",
"157 Puukoolid",
"22 Hobused",
"23 Nuumvasikad",
"24 Noorveised kuni 1 aasta",
"25 Pullmullikad 1-2 aastat",
"26 Lehmmullikad 1-2 aastat",
"27 Pullmullikad üle 2 aasta",
"28 Tõumullikad üle 2.a",
"29 Nuummullikad üle 2 aasta",
"30 Lüpsilehmad (piim)",
"31 Tapalehmad",
"32 Muud lehmad",
"33 Mesilaspered",
"34 Emasküülikud",
"38 Emaskitsed",
"39 Muud kitsed",
"40 Uted",
"41 Muud lambad",
"43 Põrsad",
"44 Tõuemised",
"45 Nuumsead",
"46 Muud sead",
"47 Broilerid",
"48 Munakanad",
"49 Muud linnud"
);*/

//-------------------------------------------------------------Var
var R=0
var Rs=0.1
var Rd=20
var loomSGM2=0      //karjatavate loomade SGM2 kokku
var kultuurSGM2=0   //sööda kultuuride SGM2 kokku

var liik=0;            //-mis klassist on ettevõte
var suurus=0              //----majanduslik suurus
var SGM2=new Array(54) //-korrutatud standard kattetuluga
var SGM2kokku=0;   //--kokku kõik
var P1;var P2;var P3;var P4;var P5;var P11
var P41;var P42;var P51;var P52;var P111;var P121;var P12
//--------------------------------------------------------------
//----------------------------------------------------------------------------------------
//-------------------------------------------------------------------------------NUPU VAJUTUS
//----------------------------------------------------------------------------------------

function vajuta(e,id)
{
    var characterCode;
    if(e && e.which)
    {
        e = e
        characterCode = e.which
    }
    else
    {
        e = event
        characterCode = e.keyCode
    }
    //---------------------------------vajutab kasti
  if(characterCode == 13)
    {
       // id=id*1
        if(id=='kast_54')
        {
            document.getElementById('kast_1').focus();
        }
        else if(id=='kast_30')
        {
            document.getElementById('kast_55').focus();
        }
        else if(id=='kast_55')
        {
            document.getElementById('kast_31').focus();
        }
        else
        {

            var num
            num=parseInt(id.substring(5,id.length));
            num=num+1;
            document.getElementById('kast_'+num).focus();
        }
    }
    //---------------------------------koma saemel punkt
    if(characterCode == 110)
    {
        x=document.getElementById(id)
        out = ",";
        add = ".";
        temp = "" + x.value;
        while (temp.indexOf(out)>-1)
        {
            pos= temp.indexOf(out);
            temp = "" + (temp.substring(0, pos) + add +
            temp.substring((pos + out.length), temp.length));
        }
        x.value=temp
    }
}
//----------------------------------------------------------------------------------------
//-------------------------------------------------------------------------------MAIN
//----------------------------------------------------------------------------------------
var KOKKU=0
function arvuta(id)
{
    //----------------------------------------------koma eemaldamine
   x=document.getElementById(id)
    out = ",";
    add = ".";
    temp = "" + x.value;
    while (temp.indexOf(out)>-1)
    {
        pos= temp.indexOf(out);
        temp = "" + (temp.substring(0, pos) + add +
        temp.substring((pos + out.length), temp.length));
    }
    x.value=temp
    //---arvutab maapinna kokku----------------
    for(i=1;i<31;i=i+1)
    {
        x=document.getElementById('kast_'+i)
        KOKKU=KOKKU+x.value*1;
    }
    x=document.getElementById('kast_55')
    KOKKU=KOKKU+x.value*1;
    //---------------------------ümardamine
    KOKKU=KOKKU*100
    KOKKU=Math.round(KOKKU)
    KOKKU=KOKKU/100
    //-----------------------------------
    x=document.getElementById('kast_56');
    x.value=KOKKU
    KOKKU=0
    liik=0
    //-----------------------------------------keel
    //x=document.getElementById(0);
    //if(x.value=="Delete all"){
    //keel=1 //--inglise
    //}else
    //{
    //keel=2 //--eesti
    //}
    //-----------------------------------------tegevused
    tegevus1()
    tegevus2()
    tegevus3()
    //---------x=document.getElementById(58);x.value=liik//------------kontroll
}
//----------------------------------------------------------------------------------------
//-------------------------------------------------------------------------------Tegevus 1
//----------------------------------------------------------------------------------------
function tegevus1()
{
   //-------SGM2 väärtuse saamine
   for(i=1;i<55;i=i+1)
    {
        x=document.getElementById('kast_'+i)
        SGM2[i]=SGM[i]*(x.value*1)
    }
    //-------------------------------imelik põrsaste arvutus
   x=document.getElementById('kast_49')
    if(x.value!=0)SGM2[48]=0
    //------------------------------------------------------PARANDUS
    //-------karjatatavad loomad
    loomSGM2=0
    for(i=31;i<48;i=i+1)
    {
        if(i==42)continue;
        if(i==43)continue;
        loomSGM2=loomSGM2+SGM2[i];
    }
   kultuurSGM2=0
    kultuurSGM2=SGM2[20]+SGM2[23]+SGM2[21]+SGM2[26]+SGM2[27]
    R=loomSGM2/kultuurSGM2
    //-----------------------Tasakaal
    //----------puudijääk
    if(R>Rd)
    {
        for(i=31;i<48;i=i+1)
        {
            if(i==42)continue;
            if(i==43)continue;
            x=document.getElementById('kast_'+i)
            pead=x.value*1
            //a=SGM2[46]
            //SGM2[46]=a*(Rd/R)+(pead*0,8*SGM[46])*(1-Rd/R)
            //(Rd/R)+(pead*0,8*koef)*(1-Rd/R)
            a=Rd/R
            b=pead*0.8*SGM[i]
            c=1-Rd/R
            SGM2[i]=SGM2[i]*a+b*c
        }
        SGM2[20]=0
        SGM2[23]=0
        SGM2[21]=0
        SGM2[26]=0
        SGM2[27]=0
    }
    //-----------tasakaal
    if(R>Rs && R<Rd || R==Rs || R==Rd)
    {
        SGM2[20]=0
        SGM2[23]=0
        SGM2[21]=0
        SGM2[26]=0
        SGM2[27]=0
    }
    //-----------ülejääk
    if(R<Rs)
    {
        SGM2[20]=SGM2[20]*(1-R/Rs)
        SGM2[23]=SGM2[23]*(1-R/Rs)
        SGM2[21]=SGM2[21]*(1-R/Rs)
        SGM2[26]=SGM2[26]*(1-R/Rs)
        SGM2[27]=SGM2[27]*(1-R/Rs)
    }
    //-------kokku SGM2
    SGM2kokku=0
    for(i=1;i<55;i=i+1)
    {
        SGM2kokku=SGM2kokku+(SGM2[i]*1)
    }
    //-------Suurus
    suurus=SGM2kokku/15.647/1200
    //------------------------------------------ümardamine
    suurus=suurus*100
    suurus=Math.round(suurus)
    suurus=suurus/100
    //-----------------------------------------------------ESU
   document.getElementById('kast_59').value=suurus
    //----x=document.getElementById(59);x.value=suurus
    suurus=suurus*1
    if(suurus<2)
    {
        document.getElementById('kast_59').style.color="#FF0A00"
    }
    else
    {
        document.getElementById('kast_59').style.color="#000000"
    }
    //----------------------------------------------------------
    if(suurus<2){document.getElementById('kast_58').value="<2";}
    else if(suurus<4){document.getElementById('kast_58').value="2-<4"}
    else if(suurus<6){document.getElementById('kast_58').value="4-<6"}
    else if(suurus<8){document.getElementById('kast_58').value="6-<8"}
    else if(suurus<12){document.getElementById('kast_58').value="8-<12"}
    else if(suurus<16){document.getElementById('kast_58').value="12-<16"}
    else if(suurus<40){document.getElementById('kast_58').value="16-<40"}
    else if(suurus<100){document.getElementById('kast_58').value="40-<100"}
    else if(suurus<250){document.getElementById('kast_58').value="100-<250"}
    else{document.getElementById('kast_58').value="250-..."}
}//function tegevus1()
//----------------------------------------------------------------------------------------
//-------------------------------------------------------------------------------Tegevus 2
//----------------------------------------------------------------------------------------
function tegevus2()
{
    P1=SGM2[1]+SGM2[2]+SGM2[3]+(SGM2[4]+SGM2[5])+SGM2[6]+SGM2[7]+SGM2[8]+SGM2[9]+SGM2[20]+SGM2[12]+(SGM2[21]+SGM2[23])+(SGM2[18]+SGM2[19])+(SGM2[24]+SGM2[25])+SGM2[22]+SGM2[10]+SGM2[11]
    P2=SGM2[13]+SGM2[14]+SGM2[16]+SGM2[17]+SGM2[15];
    P3=SGM2[28]+SGM2[30]+SGM2[29];
    P4=SGM2[26]+SGM2[27]+SGM2[31]+(SGM2[33]+SGM2[32])+SGM2[34]+SGM2[35]+SGM2[36]+(SGM2[37]+SGM2[38])+(SGM2[39]+SGM2[40])+SGM2[41]+(SGM2[46]+SGM2[47])+(SGM2[44]+SGM2[45]);
    P5=SGM2[48]+SGM2[49]+(SGM2[50]+SGM2[51])+SGM2[52]+SGM2[53]+SGM2[54]+SGM2[43];
    P11=SGM2[1]+SGM2[2]+SGM2[3]+(SGM2[4]+SGM2[5])+SGM2[6];
    P41=(SGM2[32]+SGM2[33])+SGM2[35]+(SGM2[37]+SGM2[38])+(SGM2[39]+SGM2[40]);
    P42=(SGM2[32]+SGM2[33])+SGM2[34]+SGM2[35]+SGM2[36]+(SGM2[37]+SGM2[38])+(SGM2[39]+SGM2[40])+SGM2[41];
    P51=SGM2[48]+SGM2[49]+(SGM2[50]+SGM2[51]);                //---kontrollimata
    P52=SGM2[52]+SGM2[53]+SGM2[54];                           //---kontrollimata
    P111=SGM2[1]+SGM2[2]+SGM2[3]+(SGM2[4]+SGM2[5])+SGM2[6];   //---kontrollimata
    P121=SGM2[8]+SGM2[20];                                    //---kontrollimata
    P12=SGM2[10];                                             //---kontrollimata
}
//----------------------------------------------------------------------------------------
//-------------------------------------------------------------------------------Tegevus 3
//----------------------------------------------------------------------------------------
function tegevus3()
{
    K=SGM2kokku*0.66666  //--2/3
    k3=SGM2kokku/3  //--1/3

    if(P1>K)//-----------------CLASS 1 (13,14)//--------------------1
    {
        document.getElementById('kast_57').value="Taimekasvatus"
        liik=1
    }
    else if(P2>K) //----------CLASS 2 (20)//------------------------2
    {
        document.getElementById('kast_57').value="Aiandus"
        liik=2
    }
    else if(P3>K)//-----------CLASS 3(31, 32 , 33, 34)//------------3
    {
        document.getElementById('kast_57').value="Püsikultuurid"
        liik=3
    }
    else if(P4>K)//---------------CLASS 4 (41, 42,43,44)//----------4
    {
        x=SGM2[39]+SGM2[40];
        k2=SGM2kokku/10
        kp=P41*0.66666
        if(P41>K && x>kp)
        {
            document.getElementById('kast_57').value="Piimatootmine"  //---41
            liik=41
        }
        else if(P42>K && x<k2 || x==k2)
        {
            document.getElementById('kast_57').value="Loomakasvatus"  //---42
            liik=42
        }
        else if(P42>K && x>k2 )
        {
            document.getElementById('kast_57').value="Loomakasvatus"  //---43
            liik=43
        }
        else if(P4>K && P42<K || P42==K)
        {
            document.getElementById('kast_57').value="Loomakasvatus"  //---44
            liik=44
        }
    }
    else if(P5>K)//----------------------------CLASS 5//---------------5
    {
        document.getElementById('kast_57').value="Sea- ja linnukasvatus"
        liik=5
    }
    else if(P1>k3 && P1<=K && P4<=k3 && P5<=k3 || P2>k3 && P2<=K && P4<=k3 && P5<=k3 || P3>k3 && P3<=K && P4<=k3 && P5<=k3)//-----CLASS 6--------------6    //---------KONTROLLIDA VAJA
    {
        document.getElementById('kast_57').value="Taimekasvatus"
        liik=6
    }
    else if(k3<P4 && P4<=K && P1<=k3 && P2<=k3 && P3<=k3 || k3<P5 && P5<=K && P1<=k3 && P2<=k3 && P3<=k3)//----------------------------CLASS 7--------7 //---------KONTROLLIDA VAJA
    {
        document.getElementById('kast_57').value="Segatootmine"
        liik=7
    }
    else if(liik==0)//-------------------------CLASS 8------------------------------8
    {
        document.getElementById('kast_57').value="Segatootmine"
    }
    else//----------------------------NO
    {
        document.getElementById('kast_57').value="Tüübitu"
    }
    //-----------------------------tühjuse kontroll
    y=0
    for(i=1;i<55;i=i+1)
    {
        x=document.getElementById('kast_'+i);
        x=x.value*1
        if(x!=""){y=1}
    }
    if(y==0)
    {
        document.getElementById('kast_57').value="Tüübitu"
        document.getElementById('kast_58').value="0"
        document.getElementById('kast_59').value="0"
    }
    //----------------------------------------------plats puhtaks
    for(i=1;i<56;i=i+1)
    {
        x=document.getElementById('kast_'+i)
        if(x.value==0){x.value=""}
    }
}//function tegevus3()
///----------------------------------------------------------------------------------
window.onload = Resize;
window.onresize = Resize;
function Resize()
{
  var myWidth = 0, myHeight = 0;
  if( typeof( window.innerWidth ) == 'number' ) {
    //Non-IE
    myWidth = window.innerWidth;
    myHeight = window.innerHeight;
  } else if( document.documentElement && ( document.documentElement.clientWidth || document.documentElement.clientHeight ) ) {
    //IE 6+ in 'standards compliant mode'
    myWidth = document.documentElement.clientWidth;
    myHeight = document.documentElement.clientHeight;
  } else if( document.body && ( document.body.clientWidth || document.body.clientHeight ) ) {
    //IE 4 compatible
    myWidth = document.body.clientWidth;
    myHeight = document.body.clientHeight;
  }
     document.getElementById('body_div').style.height=(myHeight-170)+'px';
}
//----------------------------------------------------------------------------------------
//-------------------------------------------------------------------------------TableMaker
//----------------------------------------------------------------------------------------
/*function TableMaker()
{
 //-STYLE="width:523px;position:inherit;"
   // document.write("<form name='form1'><table><tr>");
    for(i=1;i<31;i=i+1)
    {
        document.getElementById('data_div').innerHTML+="<div style='width:199;height:20px;float:left'>"+tekst[i]+"</div>";
        document.getElementById('data_div').innerHTML+="<div style='width:64;height:20px;><input type='text' class='vorm' id='"+i+"' size='7' onKeyUp='vajuta(event,id)' onchange='arvuta(id)'/></div>";
    }
    for(i=31;i<55;i=i+1)
    {
        document.getElementById('data2_div').innerHTML+="<div style='width:199;height:20px;float:left'>"+tekst[i]+"</div>";
        document.getElementById('data2_div').innerHTML+="<div style='width:65;height:20px'><input type='text' class='vorm' id='"+i+"' size='7' onKeyUp='vajuta(event,id)' onchange='arvuta(id)'/></div>";
    }
    document.getElementById('data_div').innerHTML+="<input class='vorm' type='text' id='55' size='7'  /> ";
    document.getElementById('data_div').innerHTML+="<input class='vorm' type='text' id='56' size='7'  /> ";

    //document.write("</tr></table></form>");
}*/