Software: Apache. PHP/5.5.15 

uname -a: Windows NT SVR-DMZ 6.1 build 7600 (Windows Server 2008 R2 Enterprise Edition) i586 

SYSTEM 

Safe-mode: OFF (not secure)

E:\nuevo\htdocs\calculadora\   drwxrwxrwx
Free 8 GB of 239.26 GB (3.34%)
Detected drives: [ a ] [ c ] [ d ] [ e ] [ f ]
                            Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    

Viewing file:     consulta_calculadora.php (6.67 KB)      -rw-rw-rw-

<?php 


if ($_GET['consumoum'] == '0' || $_GET['consumomp'] == '0' || $_GET['ultimafactura'] == '0' || $_GET['consumodeseado'] == '0') 
 {

echo "<div class=\"alert\">
  <span class=\"closebtn\" onclick=\"this.parentElement.style.display='none';\">&times;</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['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 "
<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 (320W)</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 (MMCOP):<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 (MMCOP):<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>
";			
}
	
?>