//CalCredit.js
 // Calculate Credit Amount = Loan Amount
 function CalLoan(CalForm) {
    //   Formula A = 8000*R+10000*T+6000*n
    //   '--  R  = nPayN
    //   '--  A  = nLoanN
    //   '--  n  = nTermN
    //   '--  T  = nRateN
    var nPay=0 ;
    var nCalSq=0 ;
    var nCalAmt= 0 ;
    var nTerm=0 ;
    var nRate=0 ;
    var nLoan=0 ;
    var nRoom=0 ;
    var nBal=0 ;
    var nLiv=0 ;
    var nMbed=0 ;
    var nMtoiN=0 ;
    var nBbed=0 ;
    var nTtoi= 0 ;
    var nBbbed=0 ;
    var nTttoi= 0 ;
    var nMmaid=0 ;
    var nCcar=0 ;
    var mas1 = "กรุณาใส่พื้นที่ห้องรับแขกนั่งเล่นอย่างน้อย1ห้อง" ;
    var mas2 = "บ้านท่านไม่มีห้องครัวนะครับ" ;
    var mas3 = "บ้านท่านไม่ใส่ห้องน้ำนะครับ" ; 
  
    //--    
    nTerm = eval(CalForm.nTermN.value) ;
    nRate = eval(CalForm.nRateN.value) ;
    nPay  = eval(CalForm.nPayN.value) ;
    nRoom = eval(CalForm.nRoomN.value) ;
    nBal = eval(CalForm.nBalN.value) ;
    nLiv = eval(CalForm.nLivN.value) ;
    nMbed = eval(CalForm.nMbedN.value) ;
    nMtoi = eval(CalForm.nMtoiN.value) ;
    nBbed = eval(CalForm.nBbedN.value) ;
    nTtoi = eval(CalForm.nTtoiN.value) ;
    nBbbed = eval(CalForm.nBbbedN.value) ;
    nTttoi = eval(CalForm.nTttoiN.value) ;
    nMmaid= eval(CalForm.nMmaidN.value) ;
    nCcar = eval(CalForm.nCcarN.value) ;
    if (nPay == 0 ) { 
     nPay = 0;
     alert(mas1) }
     else {
    if (nTerm == 0 ) { 
     nTerm = 0;
     CalForm.nTermN.value = eval(nTerm);
     alert(mas2) ;
     }
    if (nRate == 0 ) { 
     nRate = 0;
     alert(mas3) ;
     CalForm.nRateN.value = eval(nRate);
     }     
        nLoan = 1.0*(8000*nPay+10000*nRate+6000*nTerm+5000*nRoom+7000*(nBal+nLiv)+(nMbed+nBbed+nBbbed+nTtoi+nTttoi)*8000+nMtoi*10000+nMmaid*5000+nCcar*50000) ;
    nLoan = Math.round(nLoan,2)        ;
    CalForm.nLoanN.value = eval(nLoan)  ;
    
     }
   }

 function CheckNum(CalForm,cStr) {
   var cAdj = ""    ;
   var nFlag= 0     ;
   for (var i=0 ; i< cStr.length; i++) {   
     var ch = cStr.substring(i,i+1) ;
     //-
     if (ch < "0" || ch > "9")  {
       nFlag = 1 ;
       if (cAdj != "" && ch==".") {  nFlag=0 ; }
       //-
       if (nFlag==1) {
         alert("กรุณาป้อนตัวเลขใหม่!")  ;
         if (cAdj == "" ) { cAdj="0" }
          CalForm.value= eval(cAdj) ;
          return false   ;
       }   
     }
     //- 
     cAdj = cAdj + ch ;  
     }
     return true ;
   }