एमवीपी, 1500 रूबल के लिए लैंडिंग और विज्ञापन

var ss          = SpreadsheetApp.getActiveSpreadsheet(); //  
var sheet       = ss.getSheetByName("");         //   ""
var instruments = sheet.getRange("E4:F").getValues();    //          $
var operations  = sheet.getRange("A4:C").getValues();    // C      $   

  
  ////////////    
  //    
  var dohNaProc = 0;
  //  
  var allDohod = 0;
  
  //   
  insts.forEach(function (inst,i){
    
    //    
    var summs = [];
    //     
    var dates = [];
    //    $
    var dohod = inst[1]; 
    
    //   
    ops.forEach(function(op,n){
      //     
      if(inst[0] == op[0]){ 
        //    
        summs.push(-1*op[2]);
        //  
        dates.push(op[1]);
        //  
        dohod -= op[2];
      }
      
    })    
    
    //  ,    
    summs.push(inst[1])
    //     0 ( ),    ,    
    //    - ,     
    dates.push( (inst[1] == 0) ? dates[dates.length-1] : new Date() )
    
    
    //        1   
    const dohodProc = (XIRR(summs,dates)*100).toFixed(1)
    
    //     
    dohNaProc += (dohodProc != 0) ? dohod/dohodProc : 0
    //   
    allDohod  += dohod
    
    //        2   
    dohod = dohod.toFixed(2)

    Logger.log(dohNaProc+" "+allDohod)
    //   
    var strN = 4+i
    //      %
    var func = '=ROUND((((SUMIFS(C$'+strN+':C;A$'+strN+':A;E'+strN+';C$'+strN+':C;"<0")*(-1)+F'+strN+')/SUMIFS(C$'+strN+':C;A$'+strN+':A;E'+strN+';C$'+strN+':C;">0"))-1)*100;1)';
   
    //   
    sheet.getRange("G"+strN+":I"+strN).setValues([ 
      [dohodProc.replace(".",","), dohod.replace(".",","),func]
    ]);

  })// end foreach insts
  

  //   
  const allDohodProc = (allDohod/dohNaProc).toFixed(1)
  //  
  sheet.getRange("G3").setValues([[". . "+allDohodProc+" % / "]]);

function XIRR(values, dates, guess) {
  // Credits: algorithm inspired by Apache OpenOffice
  
  // Calculates the resulting amount
  var irrResult = function(values, dates, rate) {
    var r = rate + 1;
    var result = values[0];
    for (var i = 1; i < values.length; i++) {
      // result += values[i] / Math.pow(r, moment(dates[i]).diff(moment(dates[0]), 'days') / 365);
      result += values[i] / Math.pow(r, daysLag(dates[i],dates[0]) / 365);
    }
    return result;
  }

  // Calculates the first derivation
  var irrResultDeriv = function(values, dates, rate) {
    var r = rate + 1;
    var result = 0;
    for (var i = 1; i < values.length; i++) {
      // var frac = moment(dates[i]).diff(moment(dates[0]), 'days') / 365;
      var frac = daysLag(dates[i], dates[0]) / 365;
      result -= frac * values[i] / Math.pow(r, frac + 1);
    }
    return result;
  }

  // Check that values contains at least one positive value and one negative value
  var positive = false;
  var negative = false;
  for (var i = 0; i < values.length; i++) {
    if (values[i] > 0) positive = true;
    if (values[i] < 0) negative = true;
  }
  
  // Return error if values does not contain at least one positive value and one negative value
  if (!positive || !negative) return '#NUM!';

  // Initialize guess and resultRate
  var guess = (typeof guess === 'undefined') ? 0.1 : guess;
  var resultRate = guess;
  
  // Set maximum epsilon for end of iteration
  var epsMax = 1e-10;
  
  // Set maximum number of iterations
  var iterMax = 50;

  // Implement Newton's method
  var newRate, epsRate, resultValue;
  var iteration = 0;
  var contLoop = true;
  do {
    resultValue = irrResult(values, dates, resultRate);
    newRate = resultRate - resultValue / irrResultDeriv(values, dates, resultRate);
    epsRate = Math.abs(newRate - resultRate);
    resultRate = newRate;
    contLoop = (epsRate > epsMax) && (Math.abs(resultValue) > epsMax);
  } while(contLoop && (++iteration < iterMax));

  if(contLoop) return '#NUM!';

  // Return internal rate of return
  return resultRate;
}

///     ////
function daysLag(d1, d2){
 //     js
 var date1 = new Date(d1);
 var date2 = new Date(d2);
 //  
 return( Math.ceil(Math.abs(date2.getTime() - date1.getTime()) / (1000 * 3600 * 24)) ); 
}