× Error, no pueden ir valores en 0. "; } else{ /*echo $_GET['consumoum']; echo $_GET['consumomp']; echo $_GET['ultimafactura']; echo $_GET['consumodeseado']; echo $_GET['techoinclinado']; echo $_GET['techoplano'];*/ $consumodeseado=($_GET['consumodeseado']/100); /*echo "$consumodeseado";*/ $cea=$_GET['consumomp']*12; $ce=$_GET['ultimafactura']/$_GET['consumomp']; $EI=0.8; /* constante */ $IA=1460; /* constante */ $pc=round(((($cea*$consumodeseado)/$EI)/$IA), 2); $PPS=320;/* constante */ $npc=(($pc*1000)/$PPS); $npcf=intval($npc); if($npc > $npcf) { $npc=$npcf+1; /*echo "$npc";*/ } $pi=(($npc*$PPS)/1000); $ti=$pi*6; $tp=$pi*10; $pea=$pi*$EI*$IA; $rea=round((($pea/$cea)*100), 1); $ICA=0.045; $DP25=0.20; $DPA=0.008; if($pi <= 5){ $cp= 8000; } if($pi > 5 && $pi <= 10){ $cp= 7000; } if($pi > 10 && $pi <= 20){ $cp= 6500; } if($pi > 20 && $pi <= 30){ $cp= 6000; } if($pi > 30 && $pi <= 100){ $cp= 5300; } if($pi > 100 && $pi <= 9999.9){ $cp= 4000; } $ctp=$pi*$cp*1000; $ctpm=$ctp/1000000; $tec=round((($cea*0.21)/1000), 2); $tde=round((($pea*0.21)/1000), 2); $tde1=$pea*0.21/1000; $ea=round(($tde1/0.0226), 2); $DM = 1; $PE = 0; $TOTALPE =0; $promedioipc=(8.75+7.65+6.99+6.49+5.50+4.85+4.48+5.69+7.67+2.00+3.17+3.73+2.44+1.94+3.66+6.77+5.75+4.09)/18 ; $VF=0; $aam=0; $aamt=0; $aamtotal=0; $cesinfv=0; /*echo "ipc $promedioipc";*/ /*$DM = array();*/ $isr2018=0.33;/*constante*/ $bfm=round((($ctpm/2/5)*$isr2018), 2); $af=5;/*numero de años fiscales - constante*/ $bfmt=$bfm*$af; $damt=round((($ctpm/5)*$isr2018), 2)*$af; $dam=$damt/5; $ahorroanualinicial=round(($pea*($ce/1000000)+$bfm+$dam),2); $ahorroacumulado=$ahorroanualinicial; $ahorroanterior=$ahorroanualinicial; $j=1; $cesinfvmt=0; $ra=0; for ($i = 1; $i <= 24; $i++) { $DM=$DM-$DPA; $PE=round(($pea*$DM),2); /*$DM[$i]=DM[$i]-$DPA;*/ /*$DM= $DM-$DPA; $pea*/ $TOTALPE=$TOTALPE+$PE; $VF=round(($ce*pow(((1+($promedioipc/100))),($i))), 2); $aam=round(($PE*($VF/1000000)),2); /*echo "$i DEGRAD. MÓDULOS = $aam ...";*/ $aamt=$aamt+$aam; if($j == '1'){ $ahorroanual=$ahorroanualinicial; /*echo "$j=$ahorroanual inicial";*/ $j=$j+1; } if($j > $af){ $ahorroanual=$aam; /*echo "$j=$ahorroanual sin beneficios $aam ";*/ $j=$j+1; } if($j <= $af){ $ahorroanual=$aam+$bfm+$dam; /*echo "$j=$ahorroanual beneficios ($aam+$bfm+$dam)";*/ $j=$j+1; } $ahorroanterior=$ahorroacumulado; $ahorroacumulado=$ahorroacumulado+$ahorroanual; if ($ctpm >= $ahorroanterior && $ctpm < $ahorroacumulado){ $ra= $i; } if ($ctpm > $ahorroacumulado){ $ra= "25 o más"; } /*echo "if $ctpm >= $ahorroanterior && $ctpm < $ahorroacumulado => $i ";*/ /*echo " if $ctpm >= $ahorroanterior && $ctpm < $ahorroacumulado => $i+1 "; if ($ctpm >= $ahorroacumulado && $ctpm < $ahorroanual){ $ra= $i; }*/ $cesinfvm=$cea*($VF/1000000); $cesinfvmt=$cesinfvmt+$cesinfvm; } $PETOTAL=$TOTALPE+$pea; $pet=round($PETOTAL, 1); /*echo "BENEFICIOS FISCALES (MMCOP) = $damt";*/ $aamtotal=round($aamt+(($pea*($ce/1000000))), 2, PHP_ROUND_HALF_UP); $AA=$aamtotal+$bfmt+$damt; $cesinfv=$cea*25; /*echo "$AA";*/ $cesinfvmt=round(($cesinfvmt+($cea*($ce/1000000))), 2); /*echo "$cesinfvmt";*/ echo "

RESULTADOS DEL SIMULADOR Consumo energía anual (Kwh): $cea Costo energía ($/Kwh): $ $ce Potencia calculada por consumo (Kwp): $pc Número de paneles calculado: $npc (320W) Potencia a instalar (Kwp): $pi Producción de energía anual 1er año (Kwh): $pea % Real de ahorro $rea % Área requerida en M² -> Techo: Inclinado $ti Plano $tp

Financieros Costo proyecto/Wp instalado ($/Wp): $ $cp Costo total proyectos ($): $ $ctp Producción energía FV total 25 años (Kwh): $pet Ahorros en 25 años (MMCOP): $AA Punto de equiibrio (Retorno de inversión-Años): $ra

Lo anterior, cuando se acceden a incentivos tributarios de la ley 1715 de 2014.

Consumo energía sin FV en 25 años (Kwh):$ $cesinfv Costo energía sin FV en 25 años (MMCOP):$ $cesinfvmt

Ambientales Toneladas Co₂ emitidas con energía convencional ultimo año: $tec Ton Co₂ equivalente dejadas de emitir anualmente: $tde Equivalente en árboles adultos : $ea

"; } ?>