Viewing file:  consulta_calculadora.php (7.01 KB) -rw-rw-rw-
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
<?php
if ($_GET['consumoum'] == '0' || $_GET['consumomp'] == '0' || $_GET['ultimafactura'] == '0' || $_GET['consumodeseado'] == '0' || $_GET['potenciapaneles'] == '0')
{
echo "<div class=\"alert\">
<span class=\"closebtn\" onclick=\"this.parentElement.style.display='none';\">×</span>
<strong>Error,</strong> no pueden ir valores en 0.
</div>";
}
else{
/*echo $_GET['consumoum'];
echo $_GET['consumomp'];
echo $_GET['ultimafactura'];
echo $_GET['consumodeseado'];
echo $_GET['techoinclinado'];
echo $_GET['potenciapaneles'];*/
$consumodeseado=($_GET['consumodeseado']/100);
/*echo "$consumodeseado";*/
$cea=$_GET['consumomp']*12;
$ce=$_GET['ultimafactura']/$_GET['consumomp'];
$EI=0.8; /* constante */
$IA=1340; /* constante */
$pc=round(((($cea*$consumodeseado)/$EI)/$IA), 2);
$PPS=$_GET['potenciapaneles'];
$npc=(($pc*1000)/$PPS);
$ep= $PPS/2000*0.85*100; /*eficiencia del panel instalado*/
$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= 7000;
}
if($pi > 5 && $pi <= 10){
$cp= 6000;
}
if($pi > 10 && $pi <= 20){
$cp= 5500;
}
if($pi > 20 && $pi <= 30){
$cp= 5000;
}
if($pi > 30 && $pi <= 100){
$cp= 4500;
}
if($pi > 100 && $pi <= 9999.9){
$cp= 4000;
}
$ctp=$pi*$cp*1000;
$ctpm=$ctp/1000000;
/*echo "juan".$ctpm;*/
$tec=round((($cea*0.166)/1000), 2);
$tde=round((($pea*0.591)/1000), 2);
$tde1=$pea*0.591/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+3.18+3.80+1.61)/21;
/*echo "promedio::".$promedioipc;*/
$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))), 1, PHP_ROUND_HALF_UP);
$AA=$aamtotal+$bfmt+$damt;
/*echo "$aamtotal...";
echo "$bfmt...";
echo "$damt...";
echo "$AA";*/
$cesinfv=$cea*25;
$cesinfvmt=round(($cesinfvmt+($cea*($ce/1000000))), 2);
/*echo "$cesinfvmt";*/
echo "
<div class='flex-w size1 p-b-47'>
<div class='txt1 p-r-25'>
<span class='lnr lnr-map-marker'></span>
</div>
<div class='flex-col size2'>
<span class='txt1 p-b-20'>
RESULTADOS DEL SIMULADOR
</span>
<span class='txt2'>
Consumo energía anual (Kwh):<span class='txt3'> $cea</span>
</span>
<span class='txt2'>
Costo energía ($/Kwh): <span class='txt3'>$ $ce</span>
</span>
<span class='txt2'>
Potencia calculada por consumo (Kwp):<span class='txt3'> $pc</span>
</span>
<span class='txt2'>
Número de paneles calculado:<span class='txt3'> $npc ($PPS W)</span>
</span>
<span class='txt2'>
Eficiencia panel:<span class='txt3'> $ep %</span>
</span>
<span class='txt2'>
Potencia a instalar (Kwp):<span class='txt3'> $pi</span>
</span>
<span class='txt2'>
Producción de energía anual 1er año (Kwh):<span class='txt3'> $pea</span>
</span>
<span class='txt2'>
% Real de ahorro <span class='txt3'> $rea %</span>
</span>
<span class='txt2'>
Área requerida en M<sup>2</sup> -> Techo: Inclinado <span class='txt3'> $ti </span> Plano <span class='txt3'> $tp </span>
</span>
</div>
</div>
<div class='dis-flex size1 p-b-47'>
<div class='txt1 p-r-25'>
<span class='lnr lnr-phone-handset'></span>
</div>
<div class='flex-col size2'>
<span class='txt1 p-b-20'>
Financieros
</span>
<span class='txt2'>
Costo proyecto/Wp instalado ($/Wp): $<span class='txt3'> $cp</span>
</span>
<span class='txt2'>
Costo total proyectos ($): $<span class='txt3'> $ctp</span>
</span>
<span class='txt2'>
Producción energía FV total 25 años (Kwh):<span class='txt3'> $pet</span>
</span>
<span class='txt2'>
Ahorros en 25 años (COP):<span class='txt3'> $AA</span>
</span>
<span class='txt2'>
Punto de equiibrio (Retorno de inversión-Años): <span class='txt3'> $ra</span>
</span>
<div class='alert'>
<strong>Lo anterior,</strong> cuando se acceden a incentivos tributarios de la ley 1715 de 2014.
</div>
<span class='txt2'>
Consumo energía sin FV en 25 años (Kwh):<span class='txt3'>$ $cesinfv</span>
</span>
<span class='txt2'>
Costo energía sin FV en 25 años (COP):<span class='txt3'>$ $cesinfvmt</span>
</span>
</div>
</div>
<div class='dis-flex size1 p-b-47'>
<div class='txt1 p-r-25'>
<span class='lnr lnr-envelope'></span>
</div>
<div class='flex-col size2'>
<span class='txt1 p-b-20'>
Ambientales
</span>
<span class='txt2'>
Toneladas Co<sub>2</sub> emitidas con energía convencional ultimo año:<span class='txt3'> $tec</span>
</span>
<span class='txt2'>
Ton Co<sub>2</sub> equivalente dejadas de emitir anualmente:<span class='txt3'> $tde</span>
</span>
<span class='txt2'>
Equivalente en árboles adultos :<span class='txt3'> $ea</span>
</span>
</div>
</div>
";
}
?>
|