diff --git a/archinstall/chrootinstall.sh b/archinstall/chrootinstall.sh
index 949964e..d3a7fb5 100755
--- a/archinstall/chrootinstall.sh
+++ b/archinstall/chrootinstall.sh
@@ -104,96 +104,111 @@ pacman -S xf86-video-vesa mesa-libgl --noconfirm
 
 function programasuser {
 clear
-mostrardialog "Leer" "Ahora customizaremos e instalaremos los programas que escoja. Puede seleccionar 'cancelar' en cualquier apartado para no instalar ninguno \n \n Se seleccionan o des seleccionan con la tecla espacio, y con el enter se acepta la seleccion"
+mostrardialog "Leer" "Ahora se le presenta la opcion de elegir que programas quieres que sean instalados, cosa que recomendamos, aunque, dejamos tambien una opcion rapida, que instalara lo basico y recomendado desde nuestro punto de vista."
+tipoinstall=`dialog --stdout --nocancel --menu "¿Elegir los programas que quiere?" 0 0 5 1 "Si, elegir (Muy recomendado)" 2 "No, opcion rapida (No recomendado)"`
+case $tipoinstall in
+	1)
+		personalizado=0
+		pacman -S firefox flashplugin vlc qt4 libreoffice-fresh leafpad noto-fonts --noconfirm ;;
+	2) 
+		# Instalación personalizada de los programas
+		mostrardialog "Leer" "Ahora podras elegir los programas pasando por varias categorias. Puede seleccionar 'cancelar' en cualquier apartado para no instalar ninguno \n \n Se seleccionan o des seleccionan con la tecla espacio, y con el enter se acepta la seleccion"
 
-##Navegadores
-opta=`dialog --stdout --checklist "¿Que navegador web quieres?" 0 0 6 1 "Firefox" on 2 "Chrome" off 3 "Chromium" off 4 "Opera" off 5 "Otter Browser" off 6 "Soporte Flash Player" on`
+		##Navegadores
+		opt=`dialog --stdout --checklist "¿Que navegador web quieres?" 0 0 6 1 "Firefox" on 2 "Chrome" off 3 "Chromium" off 4 "Opera" off 5 "Otter Browser" off 6 "Soporte Flash Player" on`
 
-case $opta in
-	*1*)
-		packa="firefox";;&
-	*2*) 
-		packa="$packa google-chrome";;&
-	*3*)
-		packa="$packa chromium";;&
-	*4*)
-		packa="$packa opera";;&
-	*5*)
-		packa="$packa otter-browser";;&
-	*6*)
-		packa="$packa flashplugin";;&
+		case $opt in
+			*1*)
+				packages="firefox";;&
+			*2*) 
+				packages="$packages google-chrome";;&
+			*3*)
+				packages="$packages chromium";;&
+			*4*)
+				packages="$packages opera";;&
+			*5*)
+				packages="$packages otter-browser";;&
+			*6*)
+				packages="$packages flashplugin";;&
+		esac
+		pacman -S $packages --noconfirm
+		packages=""
+		
+		##Editores de texto/Office
+		opt=`dialog --stdout --checklist "¿Editores de texto y/o office?" 0 0 6 1 "Libreoffice (Recomendado)" on 2 "AbiWord" off 3 "Gnumeric" off 4 "WPS Office" off 5 "leafpad (Bloc de notas)" on 6 "gedit" off 7 "notepadqq" off`
+
+		case $opt in
+			*1*)
+				packages="libreoffice-fresh";;&
+			*2*) 
+				packages="$packages abiword";;&
+			*3*)
+				packages="$packages gnumeric";;&
+			*4*)
+				packages="$packages wps-office";;&
+			*5*)
+				packages="$packages leafpad";;&
+			*6*)
+				packages="$packages gedit";;&
+			*7*)
+				packages="$packages notepadqq";;&
+		esac
+		pacman -S $packages --noconfirm
+		packages=""
+		
+		##Audio y video
+		opt=`dialog --stdout --checklist "Audio y Video" 0 0 6 1 "VLC (Recomendado)" on 2 "SMPlayer" off 3 "Totem" off 4 "Clementine" off 5 "Banshee" off`
+
+		case $opt in
+			*1*)
+				packages="vlc qt4";;&
+			*2*) 
+				packages="$packages smplayer";;&
+			*3*)
+				packages="$packages totem";;&
+			*4*)
+				packages="$packages clementine";;&
+			*5*)
+				packages="$packages banshee";;&
+		esac
+		pacman -S $packages --noconfirm
+		packages=""
+
+		##Fuentes del sistema
+		opt=`dialog --stdout --checklist "Fuentes/Tipos de letra" 0 0 6 1 "noto-fonts (Muy recomendado)" on 2 "Microsoft Fonts" off 3 "Recopilatorio de fuentes de Google (mas de 300)" off`
+
+		case $opt in
+			*1*)
+				packages="noto-fonts";;&
+			*2*) 
+				packages="$packages ttf-ms-fonts";;&
+			*3*)
+				packages="$packages ttf-google-fonts-git";;&
+		esac
+		pacman -S $packages --noconfirm
+		packages=""
+
+		##Utilidades varias
+		opt=`dialog --stdout --checklist "Utilidades varias" 0 0 8 1 "Dropbox" off 2 "MEGA" off 3 "Visor de correo Evolution" off 4 "Grabador de discos (k3b)" off 5 "Java (jre8)" off`
+
+		case $opt in
+			*1*)
+				packages="dropbox";;&
+			*2*) 
+				packages="$packages megasync";;&
+			*3*)
+				packages="$packages geary";;&
+			*4*)
+				packages="$packages k3b";;&
+			*5*)
+				packages="$packages jre8-openjdk";;&
+		esac
+		pacman -S $packages --noconfirm
+		packages=""
+		##Fin de la personalizacion
+		#Acabamos el case tipoinstall anterior
+		;;
 esac
-pacman -S $packa --noconfirm
-
-##Editores de texto/Office
-optb=`dialog --stdout --checklist "¿Editores de texto y/o office?" 0 0 6 1 "Libreoffice (Recomendado)" on 2 "AbiWord" off 3 "Gnumeric" off 4 "WPS Office" off 5 "leafpad (Bloc de notas)" on 6 "gedit" off 7 "notepadqq" off`
-
-case $optb in
-	*1*)
-		packb="libreoffice-fresh";;&
-	*2*) 
-		packb="$packb abiword";;&
-	*3*)
-		packb="$packb gnumeric";;&
-	*4*)
-		packb="$packb wps-office";;&
-	*5*)
-		packb="$packb leafpad";;&
-	*6*)
-		packb="$packb gedit";;&
-	*7*)
-		packb="$packb notepadqq";;&
-esac
-pacman -S $packb --noconfirm
-
-##Audio y video
-optc=`dialog --stdout --checklist "Audio y Video" 0 0 6 1 "VLC (Recomendado)" on 2 "SMPlayer" off 3 "Totem" off 4 "Clementine" off 5 "Banshee" off`
-
-case $optc in
-	*1*)
-		packc="vlc qt4";;&
-	*2*) 
-		packc="$packc smplayer";;&
-	*3*)
-		packc="$packc totem";;&
-	*4*)
-		packc="$packc clementine";;&
-	*5*)
-		packc="$packc banshee";;&
-esac
-pacman -S $packc --noconfirm
-
-##Fuentes del sistema
-optd=`dialog --stdout --checklist "Fuentes/Tipos de letra" 0 0 6 1 "noto-fonts (Muy recomendado)" on 2 "Microsoft Fonts" off 3 "Recopilatorio de fuentes de Google (mas de 300)" off`
-
-case $optd in
-	*1*)
-		packd="noto-fonts";;&
-	*2*) 
-		packd="$packd ttf-ms-fonts";;&
-	*3*)
-		packd="$packd ttf-google-fonts-git";;&
-esac
-pacman -S $packd --noconfirm
-
-
-##Utilidades varias
-opte=`dialog --stdout --checklist "Utilidades varias" 0 0 8 1 "Dropbox" off 2 "MEGA" off 3 "Visor de correo Evolution" off 4 "Grabador de discos (k3b)" off 5 "Java (jre8)" off`
-
-case $opte in
-	*1*)
-		packe="dropbox";;&
-	*2*) 
-		packe="$packe megasync";;&
-	*3*)
-		packe="$packe geary";;&
-	*4*)
-		packe="$packe k3b";;&
-	*5*)
-		packe="$packe jre8-openjdk";;&
-esac
-pacman -S $packe --noconfirm
-
 }
 
 function entorno {