#!/bin/bash

version="Nov_15"
negro="\033[0;30;40m"
azul="\033[0;34;40m"
verde="\033[0;32;40m"
cyan="\033[0;36;40m"
rojo="\033[0;31;40m"
purpura="\033[0;35;40m"
marron="\033[0;33;40m"
gris_claro="\033[0;37;40m"

gris_oscuro="\033[1;30;40m"
azul_claro="\033[1;34;40m"
verde_claro="\033[1;32;40m"
cyan_claro="\033[1;36;40m"
rojo_claro="\033[1;31;40m"
purpura_claro="\033[1;35;40m"
amarillo="\033[1;33;40m"
blanco="\033[1;37;40m"


Inicio(){
clear
echo
echo -e "$blanco*******************************************"
echo "*          Cálculo de cargas              *"
echo -e "******************************************* $verde"

echo "            Versión: $version "
echo "                 2016"
echo
}

#**********************************
Seleccion(){
echo;echo -e "$cyan Selecciona una opción y pulsa Enter $verde";echo
select OPCION in GS52 GS20Mn5 GS30Mn5  GS18CrMo5.5 GS45CrMoSi12.4 GS37MnSi5 AceroCrMo AEM-12 AEM-12-Camisas AEM-20 AEM-27 GX290CrMo27-5 Mn-12 Mn-15-1 Mn-18-2
  do
  if [ $OPCION ]; then
      clear;echo "$OPCION"
	$OPCION	
     break
  else
      echo "Opcion no valida"
  fi
done
}

#--------------------------------
Analisis(){
# echo -e $azul_claro $OPCION $verde
echo -e "Especificación:$cyan C $C% Si $Si% Mn $Mn% Cr $Cr% Mo $Mo% $verde"
}

#---------------------------
GS52(){
C=0.20
Si=0.4
Mn=1.2
Cr=0
Mo=0
}
#---------------------------
GS20Mn5(){
C=0.20
Si=0.4
Mn=1.2
Cr=0
Mo=0
}
#---------------------------
GS30Mn5(){
C=0.28
Si=0.4
Mn=1.2
Cr=0
Mo=0
}
#-----------------------
GS18CrMo5.5(){
C=0.17
SI=0.4
Mn=0
Cr=1
Mo=0.35
}
#----------------------
GS45CrMoSi12.4(){
C=0.47
Si=0.8
Mn=0.6
Cr=3
Mo=0.38
}
#---------------------------
GS37MnSi5(){
C=0.35
Si=1.20
Mn=1.20
Cr=0
Mo=0
}
#---------------------------
AceroCrMo(){
C=0.70
Si=0.45
Mn=0.6
Cr=2.2
Mo=0.4
}
#---------------------------
AEM-12-Camisas(){
C=2.6
Si=0.4
Mn=0.5
Cr=13
Mo=0
}
#---------------------------
AEM-12(){
C=2.9
Si=0.4
Mn=0.5
Cr=12
Mo=0
}
#----------------------------
AEM-20(){
C=2.9
Si=0.4
Mn=0.5
Cr=24
Mo=0
}
#-----------------------------
AEM-27(){
C=3.4
Si=0.4
Mn=0.5
Cr=27
Mo=0.45
}
#---------------------------------
GX290CrMo27-5(){
C=2.9
Si=0.4
Mn=0.5
Cr=26
Mo=0.5
}
#---------------------------------
Mn-12(){
C=1.1
Si=0.4
Mn=13
Cr=0
Mo=0
}
#----------------------------------
Mn-15-1(){
C=1.15
Si=0.4
Mn=15
Cr=1
Mo=0
}
#----------------------------------
Mn-18-2(){
C=1.15
Si=0.4
Mn=18
Cr=2
Mo=0
}


#**************************
Carga() {
echo
echo "Carga de la colada: " 
read L
}




#***************************
Totales() {
C_Total=$(echo "scale=2;$L*$C/100" | bc)
echo "Carbono = " $C_Total "Kg"

Cr_Total=$(echo "scale=2;$L*$Cr/100" | bc)
echo "Cromo necesario: " $Cr_Total "Kg"

L_Cr=$(echo "scale=2;$L*$Cr/$ley_FeCr" | bc)
echo "FerroCromo a echar : "$L_Cr "Kg"

C_Aportado_Cr=$(echo "scale=2;$L_Cr*$C_FeCr/100" | bc)
echo "Carbono aportado por el Cr : "$C_Aportado_Cr

Mn_Total=$(echo "scale=2;$L*$Mn/100" | bc)
echo "Manganeso necesario = " $Mn_Total "Kg"

L_Mn=$(echo "scale=2;$L*$Mn/$ley_FeMn" | bc)
echo "FerroManganeso a echar : "$L_Mn "Kg"

C_Aportado_Mn=$(echo "scale=2;$L_Mn*$C_FeMn/100" | bc)
echo "Carbono aportado por el Mn : "$C_Aportado_Mn

C_Aportado_Cr_Mn=$(echo "scale=2;$C_Aportado_Cr+$C_Aportado_Mn" | bc)

L_Mo=$(echo "scale=2;$L*$Mo/$ley_FeMo" | bc)
echo "FerroMolibdeno a echar : "$L_Mo "Kg"

Grafito=$(echo "scale=2;$C_Total-$C_Aportado_Cr_Mn" | bc)
}

#**********************************
Carga_Final(){
# clear
echo
echo "*********************************************************"
echo -e "$cyan Carga para $L Kg de $OPCION $verde"
echo "*********************************************************"
echo
Analisis
Ferro_Aleaciones=$(echo "scale=2;$L_Cr+$L_Mn" | bc)
Carga_Horno=$(echo "scale=2;$L-$Ferro_Aleaciones" | bc)
echo -e $blanco $Carga_Horno $verde " Kg de Chatarra"
Chatarra=$Carga_Horno
# echo $Chatarra
C_Chatarra=$(echo "scale=2;$Chatarra*0.15/100" | bc)
# echo $C_Chatarra
echo
echo -e "                                  Grafito necesario: " $blanco$C_Total$verde
echo -e "                                  Grafito aportado : " $blanco$C_Aportado_Cr_Mn$verde
echo -e "                                  Grafito chatarra : " $blanco$C_Chatarra$verde

echo
echo -e $blanco $L_Cr$verde  " Kg de FeCr carburado"
echo
echo -e $blanco $L_Mn $verde  " Kg de FeMn carburado"
echo
echo -e $blanco $L_Mo $verde  " Kg de FeMo"
echo
C_final=$(echo "scale=2;$Grafito-$C_Chatarra" | bc)
# echo $Grafito
echo -e $blanco $C_final $verde "Kg de Grafito"
echo
}




# Main

ley_FeCr=70
C_FeCr=8
ley_FeMn=70
C_FeMn=6.5
ley_FeMo=70
ley_FeSi=70

while true; do
 Inicio
 Seleccion
 Analisis
 Carga
 Totales
 Carga_Final
 echo -e $cyan
 read -p "Pulsa Enter para continuar o Control-C para salir"
 echo -e $verde
done