#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <Array.au3>


;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||Aqui Edité Algo|||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

;Variable Global que cuentas los programas, La usamos para sacar el porcentaje :)
Global $iNProgramas = 0
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||Aqui Terminé de Editar |||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||


GUICreate("Instalador WBD", 650, 580, 200, 100)
GUICtrlSetDefBkColor(0x6699FF)
GUICtrlCreatePic(@ScriptDir & "\oemlogo.bmp", 5, 5, 85, 60)
#################################################################################################################
;Seccion de Botones
$BtnSlr = GUICtrlCreateButton("Salir", 5, 550, 85, 25)
$BtnIns = GUICtrlCreateButton("Instalar", 5, 520, 85, 25)
$BtnDflt = GUICtrlCreateButton("Por Default", 5, 490, 85, 25)
$BtnAgrgr = GUICtrlCreateButton("Agregar Prog", 5, 460, 85, 25)
$BtnCln = GUICtrlCreateButton("Limpiar", 5, 430, 85, 25)
$Fin = GUICtrlCreateCheckbox("Cerra al Final", 5, 400, 85, 25)
#################################################################################################################
;Linea de la información general
GUICtrlCreateLabel("Seleccione el o los programas a instalar.", 5, 70, 85, 40)
$So = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "ProductName")
$SP = @OSServicePack
$OA = @OSArch
If $OA = "X86" Then
	$OA = "32 Bits"
Else
	$OA = "64 Bits"
EndIf
GUICtrlCreateLabel("Info General:" & @CRLF & "Sistema Op:" & @CRLF & $So & @CRLF & $SP & @CRLF & "Arquitectura de:" & @CRLF & $OA, 5, 115, 85, 95)
$User = @UserName
$Org = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "RegisteredOrganization")
$NPc = @ComputerName
$IP = @IPAddress1
GUICtrlCreateLabel("Usuario:" & @CRLF & $User & @CRLF & "Organización:" & @CRLF & $Org & @CRLF & "Nombre en RED:" & @CRLF & $NPc & _
		@CRLF & "IP:" & @CRLF & $IP, 5, 215, 85, 105)



;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||Aqui Edité Algo|||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

;Una mejor forma de hacer lo de la fecha y nos ahoramos unas 96 lineas :)
Global Const $aDias[7] = ["Domingo", "Lunes", "Martes", "Miercoles", "Jueves", "Viernes", "Sabado"] ;array para los dias
Global Const $aMes[12] = ["Enero", "Febrero", "Marzo", "Abril", "Mayo", "Junio", "Julio", "Agosto", "Septiembre", "Octubre", "Noviembre", "Diciembre"]
$Dia = @WDAY
$Dia = $aDias[$Dia - 1]
$Fch = @MDAY
$Mes = $aMes[@MON - 1]

;En ves de esto

;~ 	If $Dia = 1 Then
;~ 	$Dia = "Domingo"
;~ 	EndIf
;~ 	If $Dia = 2 Then
;~ 	$Dia = "Lunes"
;~ 	EndIf
;~ 	If $Dia = 3 Then
;~ 	$Dia = "Martes"
;~ 	EndIf
;~ 	If $Dia = 4 Then
;~ 	$Dia = "Miercoles"
;~ 	EndIf
;~ 	If $Dia = 5 Then
;~ 	$Dia = "Jueves"
;~ 	EndIf
;~ 	If $Dia = 6 Then
;~ 	$Dia = "Viernes"
;~ 	EndIf
;~ 	If $Dia = 7 Then
;~ 	$Dia = "Sabado"
;~ 	EndIf
;~ 	$Fch = @MDAY
;~ 	$Mes = @MON
;~ 	If $Mes = 1 Then
;~ 	$Mes = "Enero"
;~ 	EndIf
;~ 	If $Mes = 2 Then
;~ 	$Mes = "Febrero"
;~ 	EndIf
;~ 	If $Mes = 3 Then
;~ 	$Mes = "Marzo"
;~ 	EndIf
;~ 	If $Mes = 4 Then
;~ 	$Mes = "Abril"
;~ 	EndIf
;~ 	If $Mes = 5 Then
;~ 	$Mes = "Mayo"
;~ 	EndIf
;~ 	If $Mes = 6 Then
;~ 	$Mes = "Junio"
;~ 	EndIf
;~ 	If $Mes = 7 Then
;~ 	$Mes = "Julio"
;~ 	EndIf
;~ 	If $Mes = 8 Then
;~ 	$Mes = "Agosto"
;~ 	EndIf
;~ 	If $Mes = 9 Then
;~ 	$Mes = "Septiembre"
;~ 	EndIf
;~ 	If $Mes = 10 Then
;~ 	$Mes = "Octubre"
;~ 	EndIf
;~ 	If $Mes = 11 Then
;~ 	$Mes = "Noviembre"
;~ 	EndIf
;~ 	If $Mes = 12 Then
;~ 	$Mes = "Diciembre"
;~ 	EndIf




$Yr = @YEAR
$Hr = @HOUR
$AP = $Hr
If $AP >= 13 Then
	$AP = "PM"
Else
	$AP = "AM"
EndIf



;Aqui otra forma para evitar toda esa comparación. solo comparas que este entre 13 y 24 y restas 12 :)
If $Hr >= 13 And $Hr <= 24 Then $Hr -= 12
;así te ahorras lo de abajo
;~ If $Hr = 13 Then
;~    $Hr = 1
;~ EndIf
;~ If $Hr = 14 Then
;~    $Hr = 2
;~ EndIf
;~ If $Hr = 15 Then
;~    $Hr = 3
;~ EndIf
;~ If $Hr = 16 Then
;~    $Hr = 4
;~ EndIf
;~ If $Hr = 17 Then
;~    $Hr = 5
;~ EndIf
;~ If $Hr = 18 Then
;~    $Hr = 6
;~ EndIf
;~ If $Hr = 19 Then
;~    $Hr = 7
;~ EndIf
;~ If $Hr = 20 Then
;~    $Hr = 8
;~ EndIf
;~ If $Hr = 21 Then
;~    $Hr = 9
;~ EndIf
;~ If $Hr = 22 Then
;~    $Hr = 10
;~ EndIf
;~ If $Hr = 23 Then
;~    $Hr = 11
;~ EndIf
;~ If $Hr = 24 Then
;~    $Hr = 12
;~ EndIf

;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||Aqui Terminé de Editar |||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||



GUICtrlCreateLabel($Dia & " " & $Fch & @CRLF & $Mes & @CRLF & $Yr & @CRLF & @CRLF & $Hr & " : " & @MIN & " " & $AP, 5, 325, 85, 67)

;esta parte la puedes hacer mejor con Arrays :)
#################################################################################################################
;Linea que verifica el el nombre de los programas para los CheckBox
$ReadN1 = FileReadLine(@ScriptDir & "\Programas.txt", 1)
$ReadN2 = FileReadLine(@ScriptDir & "\Programas.txt", 4)
$ReadN3 = FileReadLine(@ScriptDir & "\Programas.txt", 7)
$ReadN4 = FileReadLine(@ScriptDir & "\Programas.txt", 10)
$ReadN5 = FileReadLine(@ScriptDir & "\Programas.txt", 13)
$ReadN6 = FileReadLine(@ScriptDir & "\Programas.txt", 16)
$ReadN7 = FileReadLine(@ScriptDir & "\Programas.txt", 19)
$ReadN8 = FileReadLine(@ScriptDir & "\Programas.txt", 22)
$ReadN9 = FileReadLine(@ScriptDir & "\Programas.txt", 25)
$ReadN10 = FileReadLine(@ScriptDir & "\Programas.txt", 28)
$ReadN11 = FileReadLine(@ScriptDir & "\Programas.txt", 31)
$ReadN12 = FileReadLine(@ScriptDir & "\Programas.txt", 34)
$ReadN13 = FileReadLine(@ScriptDir & "\Programas.txt", 37)
$ReadN14 = FileReadLine(@ScriptDir & "\Programas.txt", 40)
$ReadN15 = FileReadLine(@ScriptDir & "\Programas.txt", 43)
$ReadN16 = FileReadLine(@ScriptDir & "\Programas.txt", 46)
$ReadN17 = FileReadLine(@ScriptDir & "\Programas.txt", 49)
$ReadN18 = FileReadLine(@ScriptDir & "\Programas.txt", 52)
$ReadN19 = FileReadLine(@ScriptDir & "\Programas.txt", 55)
$ReadN20 = FileReadLine(@ScriptDir & "\Programas.txt", 58)
$ReadN21 = FileReadLine(@ScriptDir & "\Programas.txt", 61)
$ReadN22 = FileReadLine(@ScriptDir & "\Programas.txt", 64)
$ReadN23 = FileReadLine(@ScriptDir & "\Programas.txt", 67)
$ReadN24 = FileReadLine(@ScriptDir & "\Programas.txt", 70)
$ReadN25 = FileReadLine(@ScriptDir & "\Programas.txt", 73)
$ReadN26 = FileReadLine(@ScriptDir & "\Programas.txt", 76)
$ReadN27 = FileReadLine(@ScriptDir & "\Programas.txt", 79)
$ReadN28 = FileReadLine(@ScriptDir & "\Programas.txt", 82)
$ReadN29 = FileReadLine(@ScriptDir & "\Programas.txt", 85)
$ReadN30 = FileReadLine(@ScriptDir & "\Programas.txt", 88)
$ReadN31 = FileReadLine(@ScriptDir & "\Programas.txt", 91)
$ReadN32 = FileReadLine(@ScriptDir & "\Programas.txt", 94)
$ReadN33 = FileReadLine(@ScriptDir & "\Programas.txt", 97)
$ReadN34 = FileReadLine(@ScriptDir & "\Programas.txt", 100)
$ReadN35 = FileReadLine(@ScriptDir & "\Programas.txt", 103)
$ReadN36 = FileReadLine(@ScriptDir & "\Programas.txt", 106)
$ReadN37 = FileReadLine(@ScriptDir & "\Programas.txt", 109)
$ReadN38 = FileReadLine(@ScriptDir & "\Programas.txt", 112)
$ReadN39 = FileReadLine(@ScriptDir & "\Programas.txt", 115)
$ReadN40 = FileReadLine(@ScriptDir & "\Programas.txt", 118)
$ReadN41 = FileReadLine(@ScriptDir & "\Programas.txt", 121)
$ReadN42 = FileReadLine(@ScriptDir & "\Programas.txt", 124)
$ReadN43 = FileReadLine(@ScriptDir & "\Programas.txt", 127)
$ReadN44 = FileReadLine(@ScriptDir & "\Programas.txt", 130)
$ReadN45 = FileReadLine(@ScriptDir & "\Programas.txt", 133)
$ReadN46 = FileReadLine(@ScriptDir & "\Programas.txt", 136)
$ReadN47 = FileReadLine(@ScriptDir & "\Programas.txt", 139)
$ReadN48 = FileReadLine(@ScriptDir & "\Programas.txt", 142)
$ReadN49 = FileReadLine(@ScriptDir & "\Programas.txt", 145)
$ReadN50 = FileReadLine(@ScriptDir & "\Programas.txt", 148)
$ReadN51 = FileReadLine(@ScriptDir & "\Programas.txt", 151)
$ReadN52 = FileReadLine(@ScriptDir & "\Programas.txt", 154)
$ReadN53 = FileReadLine(@ScriptDir & "\Programas.txt", 157)
$ReadN54 = FileReadLine(@ScriptDir & "\Programas.txt", 160)
$ReadN55 = FileReadLine(@ScriptDir & "\Programas.txt", 163)
$ReadN56 = FileReadLine(@ScriptDir & "\Programas.txt", 166)
$ReadN57 = FileReadLine(@ScriptDir & "\Programas.txt", 169)
$ReadN58 = FileReadLine(@ScriptDir & "\Programas.txt", 172)
$ReadN59 = FileReadLine(@ScriptDir & "\Programas.txt", 175)
$ReadN60 = FileReadLine(@ScriptDir & "\Programas.txt", 178)
$ReadN61 = FileReadLine(@ScriptDir & "\Programas.txt", 181)
$ReadN62 = FileReadLine(@ScriptDir & "\Programas.txt", 184)
$ReadN63 = FileReadLine(@ScriptDir & "\Programas.txt", 187)
$ReadN64 = FileReadLine(@ScriptDir & "\Programas.txt", 190)
$ReadN65 = FileReadLine(@ScriptDir & "\Programas.txt", 193)
$ReadN66 = FileReadLine(@ScriptDir & "\Programas.txt", 196)
$ReadN67 = FileReadLine(@ScriptDir & "\Programas.txt", 199)
$ReadN68 = FileReadLine(@ScriptDir & "\Programas.txt", 202)
$ReadN69 = FileReadLine(@ScriptDir & "\Programas.txt", 205)
$ReadN70 = FileReadLine(@ScriptDir & "\Programas.txt", 208)
$ReadN71 = FileReadLine(@ScriptDir & "\Programas.txt", 211)
$ReadN72 = FileReadLine(@ScriptDir & "\Programas.txt", 214)
$ReadN73 = FileReadLine(@ScriptDir & "\Programas.txt", 217)
$ReadN74 = FileReadLine(@ScriptDir & "\Programas.txt", 220)
$ReadN75 = FileReadLine(@ScriptDir & "\Programas.txt", 223)
$ReadN76 = FileReadLine(@ScriptDir & "\Programas.txt", 226)
$ReadN77 = FileReadLine(@ScriptDir & "\Programas.txt", 229)
$ReadN78 = FileReadLine(@ScriptDir & "\Programas.txt", 232)
$ReadN79 = FileReadLine(@ScriptDir & "\Programas.txt", 235)
$ReadN80 = FileReadLine(@ScriptDir & "\Programas.txt", 238)
#################################################################################################################
;Linea que crea el listado de los CheckBox
Global $Anch = 120, $Alt = 25, $Sep = 25
Global $ChcBx1[10]
Global $Readsa1[10] = [$ReadN1, $ReadN2, $ReadN3, $ReadN4, $ReadN5, $ReadN6, $ReadN7, $ReadN8, $ReadN9, $ReadN10]
Global $BPI1 = 100, $BPA1 = 35
For $c1 = 0 To UBound($ChcBx1) - 1
	$ChcBx1[$c1] = GUICtrlCreateCheckbox($Readsa1[$c1], $BPI1, $BPA1, $Anch, $Alt)
	$BPA1 += $Sep
Next

Global $ChcBx2[10]
Global $Readsa2[10] = [$ReadN11, $ReadN12, $ReadN13, $ReadN14, $ReadN15, $ReadN16, $ReadN17, $ReadN18, $ReadN19, $ReadN20]
Global $BPI2 = 100, $BPA2 = 325
For $c2 = 0 To UBound($ChcBx2) - 1
	$ChcBx2[$c2] = GUICtrlCreateCheckbox($Readsa2[$c2], $BPI2, $BPA2, $Anch, $Alt)
	$BPA2 += $Sep
Next

Global $ChcBx3[10]
Global $Readsa3[10] = [$ReadN21, $ReadN22, $ReadN23, $ReadN24, $ReadN25, $ReadN26, $ReadN27, $ReadN28, $ReadN29, $ReadN30]
Global $BPI3 = 240, $BPA3 = 35
For $c3 = 0 To UBound($ChcBx3) - 1
	$ChcBx3[$c3] = GUICtrlCreateCheckbox($Readsa3[$c3], $BPI3, $BPA3, $Anch, $Alt)
	$BPA3 += $Sep
Next

Global $ChcBx4[10]
Global $Readsa4[10] = [$ReadN31, $ReadN32, $ReadN33, $ReadN34, $ReadN35, $ReadN36, $ReadN37, $ReadN38, $ReadN39, $ReadN40]
Global $BPI4 = 240, $BPA4 = 325
For $c4 = 0 To UBound($ChcBx4) - 1
	$ChcBx4[$c4] = GUICtrlCreateCheckbox($Readsa4[$c4], $BPI4, $BPA4, $Anch, $Alt)
	$BPA4 += $Sep
Next

Global $ChcBx5[10]
Global $Readsa5[10] = [$ReadN41, $ReadN42, $ReadN43, $ReadN44, $ReadN45, $ReadN46, $ReadN47, $ReadN48, $ReadN49, $ReadN50]
Global $BPI5 = 380, $BPA5 = 35
For $c5 = 0 To UBound($ChcBx5) - 1
	$ChcBx5[$c5] = GUICtrlCreateCheckbox($Readsa5[$c5], $BPI5, $BPA5, $Anch, $Alt)
	$BPA5 += $Sep
Next

Global $Anch = 120, $Alt = 25, $Sep = 25
Global $ChcBx6[10]
Global $Readsa6[10] = [$ReadN51, $ReadN52, $ReadN53, $ReadN54, $ReadN55, $ReadN56, $ReadN57, $ReadN58, $ReadN59, $ReadN60]
Global $BPI6 = 380, $BPA6 = 325
For $c6 = 0 To UBound($ChcBx6) - 1
	$ChcBx6[$c6] = GUICtrlCreateCheckbox($Readsa6[$c6], $BPI6, $BPA6, $Anch, $Alt)
	$BPA6 += $Sep
Next

Global $ChcBx7[10]
Global $Readsa7[10] = [$ReadN61, $ReadN62, $ReadN63, $ReadN64, $ReadN65, $ReadN66, $ReadN67, $ReadN68, $ReadN69, $ReadN70]
Global $BPI7 = 520, $BPA7 = 35
For $c7 = 0 To UBound($ChcBx7) - 1
	$ChcBx7[$c7] = GUICtrlCreateCheckbox($Readsa7[$c7], $BPI7, $BPA7, $Anch, $Alt)
	$BPA7 += $Sep
Next

Global $ChcBx8[10]
Global $Readsa8[10] = [$ReadN71, $ReadN72, $ReadN73, $ReadN74, $ReadN75, $ReadN76, $ReadN77, $ReadN78, $ReadN79, $ReadN80]
Global $BPI8 = 520, $BPA8 = 325
For $c8 = 0 To UBound($ChcBx8) - 1
	$ChcBx8[$c8] = GUICtrlCreateCheckbox($Readsa8[$c8], $BPI8, $BPA8, $Anch, $Alt)
	$BPA8 += $Sep
Next
#################################################################################################################


;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||Aqui Edité Algo|||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||


;aqui reducimos las 562 lineas de mas abajo a tan solo 11 :)
Global $nLinea[80]
Local $x = 0
For $i = $ChcBx1[0] To $ChcBx8[9]
	$nLinea[$x] = FileReadLine(@ScriptDir & "\Programas.txt", $i)
	If Number($nLinea[$x]) = 1 Then
		GUICtrlSetState($i, $GUI_CHECKED)
	Else
		GUICtrlSetState($i, $GUI_UNCHECKED) ;No necesario porque por defecto estan deseleccionados
	EndIf
	$x += 1
Next


;te ahorras las 562 lines de aqui abajo :)

;~ ;Linea que verifica el estado de los CheckBox en el doc
;~ $ReadS1 = FileReadLine(@ScriptDir & "\Programas.txt", 3)
;~ $ReadS2 = FileReadLine(@ScriptDir & "\Programas.txt", 6)
;~ $ReadS3 = FileReadLine(@ScriptDir & "\Programas.txt", 9)
;~ $ReadS4 = FileReadLine(@ScriptDir & "\Programas.txt", 12)
;~ $ReadS5 = FileReadLine(@ScriptDir & "\Programas.txt", 15)
;~ $ReadS6 = FileReadLine(@ScriptDir & "\Programas.txt", 18)
;~ $ReadS7 = FileReadLine(@ScriptDir & "\Programas.txt", 21)
;~ $ReadS8 = FileReadLine(@ScriptDir & "\Programas.txt", 24)
;~ $ReadS9 = FileReadLine(@ScriptDir & "\Programas.txt", 27)
;~ $ReadS10 = FileReadLine(@ScriptDir & "\Programas.txt", 30)

;~ $ReadS11 = FileReadLine(@ScriptDir & "\Programas.txt", 33)
;~ $ReadS12 = FileReadLine(@ScriptDir & "\Programas.txt", 36)
;~ $ReadS13 = FileReadLine(@ScriptDir & "\Programas.txt", 39)
;~ $ReadS14 = FileReadLine(@ScriptDir & "\Programas.txt", 42)
;~ $ReadS15 = FileReadLine(@ScriptDir & "\Programas.txt", 45)
;~ $ReadS16 = FileReadLine(@ScriptDir & "\Programas.txt", 48)
;~ $ReadS17 = FileReadLine(@ScriptDir & "\Programas.txt", 51)
;~ $ReadS18 = FileReadLine(@ScriptDir & "\Programas.txt", 54)
;~ $ReadS19 = FileReadLine(@ScriptDir & "\Programas.txt", 57)
;~ $ReadS20 = FileReadLine(@ScriptDir & "\Programas.txt", 60)

;~ $ReadS21 = FileReadLine(@ScriptDir & "\Programas.txt", 63)
;~ $ReadS22 = FileReadLine(@ScriptDir & "\Programas.txt", 66)
;~ $ReadS23 = FileReadLine(@ScriptDir & "\Programas.txt", 69)
;~ $ReadS24 = FileReadLine(@ScriptDir & "\Programas.txt", 72)
;~ $ReadS25 = FileReadLine(@ScriptDir & "\Programas.txt", 75)
;~ $ReadS26 = FileReadLine(@ScriptDir & "\Programas.txt", 78)
;~ $ReadS27 = FileReadLine(@ScriptDir & "\Programas.txt", 81)
;~ $ReadS28 = FileReadLine(@ScriptDir & "\Programas.txt", 84)
;~ $ReadS29 = FileReadLine(@ScriptDir & "\Programas.txt", 87)
;~ $ReadS30 = FileReadLine(@ScriptDir & "\Programas.txt", 90)

;~ $ReadS31 = FileReadLine(@ScriptDir & "\Programas.txt", 93)
;~ $ReadS32 = FileReadLine(@ScriptDir & "\Programas.txt", 96)
;~ $ReadS33 = FileReadLine(@ScriptDir & "\Programas.txt", 99)
;~ $ReadS34 = FileReadLine(@ScriptDir & "\Programas.txt", 102)
;~ $ReadS35 = FileReadLine(@ScriptDir & "\Programas.txt", 105)
;~ $ReadS36 = FileReadLine(@ScriptDir & "\Programas.txt", 108)
;~ $ReadS37 = FileReadLine(@ScriptDir & "\Programas.txt", 111)
;~ $ReadS38 = FileReadLine(@ScriptDir & "\Programas.txt", 114)
;~ $ReadS39 = FileReadLine(@ScriptDir & "\Programas.txt", 117)
;~ $ReadS40 = FileReadLine(@ScriptDir & "\Programas.txt", 120)

;~ $ReadS41 = FileReadLine(@ScriptDir & "\Programas.txt", 123)
;~ $ReadS42 = FileReadLine(@ScriptDir & "\Programas.txt", 126)
;~ $ReadS43 = FileReadLine(@ScriptDir & "\Programas.txt", 129)
;~ $ReadS44 = FileReadLine(@ScriptDir & "\Programas.txt", 132)
;~ $ReadS45 = FileReadLine(@ScriptDir & "\Programas.txt", 135)
;~ $ReadS46 = FileReadLine(@ScriptDir & "\Programas.txt", 138)
;~ $ReadS47 = FileReadLine(@ScriptDir & "\Programas.txt", 141)
;~ $ReadS48 = FileReadLine(@ScriptDir & "\Programas.txt", 144)
;~ $ReadS49 = FileReadLine(@ScriptDir & "\Programas.txt", 147)
;~ $ReadS50 = FileReadLine(@ScriptDir & "\Programas.txt", 150)

;~ $ReadS51 = FileReadLine(@ScriptDir & "\Programas.txt", 153)
;~ $ReadS52 = FileReadLine(@ScriptDir & "\Programas.txt", 156)
;~ $ReadS53 = FileReadLine(@ScriptDir & "\Programas.txt", 159)
;~ $ReadS54 = FileReadLine(@ScriptDir & "\Programas.txt", 162)
;~ $ReadS55 = FileReadLine(@ScriptDir & "\Programas.txt", 165)
;~ $ReadS56 = FileReadLine(@ScriptDir & "\Programas.txt", 168)
;~ $ReadS57 = FileReadLine(@ScriptDir & "\Programas.txt", 171)
;~ $ReadS58 = FileReadLine(@ScriptDir & "\Programas.txt", 174)
;~ $ReadS59 = FileReadLine(@ScriptDir & "\Programas.txt", 177)
;~ $ReadS60 = FileReadLine(@ScriptDir & "\Programas.txt", 180)

;~ $ReadS61 = FileReadLine(@ScriptDir & "\Programas.txt", 183)
;~ $ReadS62 = FileReadLine(@ScriptDir & "\Programas.txt", 186)
;~ $ReadS63 = FileReadLine(@ScriptDir & "\Programas.txt", 189)
;~ $ReadS64 = FileReadLine(@ScriptDir & "\Programas.txt", 192)
;~ $ReadS65 = FileReadLine(@ScriptDir & "\Programas.txt", 195)
;~ $ReadS66 = FileReadLine(@ScriptDir & "\Programas.txt", 198)
;~ $ReadS67 = FileReadLine(@ScriptDir & "\Programas.txt", 201)
;~ $ReadS68 = FileReadLine(@ScriptDir & "\Programas.txt", 204)
;~ $ReadS69 = FileReadLine(@ScriptDir & "\Programas.txt", 207)
;~ $ReadS70 = FileReadLine(@ScriptDir & "\Programas.txt", 210)

;~ $ReadS71 = FileReadLine(@ScriptDir & "\Programas.txt", 213)
;~ $ReadS72 = FileReadLine(@ScriptDir & "\Programas.txt", 216)
;~ $ReadS73 = FileReadLine(@ScriptDir & "\Programas.txt", 219)
;~ $ReadS74 = FileReadLine(@ScriptDir & "\Programas.txt", 222)
;~ $ReadS75 = FileReadLine(@ScriptDir & "\Programas.txt", 225)
;~ $ReadS76 = FileReadLine(@ScriptDir & "\Programas.txt", 228)
;~ $ReadS77 = FileReadLine(@ScriptDir & "\Programas.txt", 231)
;~ $ReadS78 = FileReadLine(@ScriptDir & "\Programas.txt", 234)
;~ $ReadS79 = FileReadLine(@ScriptDir & "\Programas.txt", 237)
;~ $ReadS80 = FileReadLine(@ScriptDir & "\Programas.txt", 240)
;~ #################################################################################################################
;~ ;Esta linea cheque si los checkbox deben estar activados o desactivados



;~ If $ReadS1 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS1 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS2 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS2 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS3 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS3 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS4 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS4 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS5 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS5 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS6 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS6 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS7 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS7 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS8 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS8 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS9 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS9 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS10 = 1 Then
;~ 	GUICtrlSetState($ChcBx1[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS10 = 0 Then
;~ 	GUICtrlSetState($ChcBx1[9], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS11 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS11 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS12 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS12 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS13 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS13 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS14 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS14 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS15 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS15 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS16 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS16 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS17 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS17 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS18 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS18 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS19 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS19 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS20 = 1 Then
;~ 	GUICtrlSetState($ChcBx2[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS20 = 0 Then
;~ 	GUICtrlSetState($ChcBx2[9], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS21 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS21 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS22 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS22 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS23 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS23 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS24 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS24 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS25 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS25 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS26 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS26 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS27 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS27 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS28 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS28 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS29 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS29 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS30 = 1 Then
;~ 	GUICtrlSetState($ChcBx3[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS30 = 0 Then
;~ 	GUICtrlSetState($ChcBx3[9], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS31 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS31 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS32 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS32 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS33 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS33 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS34 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS34 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS35 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS35 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS36 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS36 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS37 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS37 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS38 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS38 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS39 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS39 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS40 = 1 Then
;~ 	GUICtrlSetState($ChcBx4[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS40 = 0 Then
;~ 	GUICtrlSetState($ChcBx4[9], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS41 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS41 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS42 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS42 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS43 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS43 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS44 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS44 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS45 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS45 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS46 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS46 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS47 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS47 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS48 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS48 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS49 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS49 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS50 = 1 Then
;~ 	GUICtrlSetState($ChcBx5[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS50 = 0 Then
;~ 	GUICtrlSetState($ChcBx5[9], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS51 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS51 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS52 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS52 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS53 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS53 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS54 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS54 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS55 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS55 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS56 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS56 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS57 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS57 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS58 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS58 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS59 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS59 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS60 = 1 Then
;~ 	GUICtrlSetState($ChcBx6[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS60 = 0 Then
;~ 	GUICtrlSetState($ChcBx6[9], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS61 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS61 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS62 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS62 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS63 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS63 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS64 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS64 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS65 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS65 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS66 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS66 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS67 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS67 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS68 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS68 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS69 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS69 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS70 = 1 Then
;~ 	GUICtrlSetState($ChcBx7[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS70 = 0 Then
;~ 	GUICtrlSetState($ChcBx7[9], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS71 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[0], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS71 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[0], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS72 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[1], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS72 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[1], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS73 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[2], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS73 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[2], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS74 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[3], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS74 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[3], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS75 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[4], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS75 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[4], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS76 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[5], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS76 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[5], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS77 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[6], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS77 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[6], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS78 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[7], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS78 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[7], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS79 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[8], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS79 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[8], $GUI_UNCHECKED)
;~ EndIf
;~ If $ReadS80 = 1 Then
;~ 	GUICtrlSetState($ChcBx8[9], $GUI_CHECKED)
;~ EndIf
;~ If $ReadS80 = 0 Then
;~ 	GUICtrlSetState($ChcBx8[9], $GUI_UNCHECKED)
;~ EndIf

;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||Aqui Terminé de Editar |||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

#################################################################################################################
;Esta linea es de los GRUPOS
Global $AncG = 133, $GrsG = 275, $PosI1 = 93, $PosI2 = 233, $PosI3 = 373, $PosI4 = 513, $PosA1 = 10, $PosA2 = 300
Global $ColorG = 0x6699FF, $TamFG = 10, $GrsFG = 600, $AtrbFG = 1, $FontG = "Time New Rodman"

$Conf = GUICtrlCreateGroup("Configuraciónes", $PosI1, $PosA1, $AncG, $GrsG)
GUICtrlSetFont($Conf, $TamFG, $GrsFG, $AtrbFG, $FontG)

$Apli = GUICtrlCreateGroup("Aplicaciónes", $PosI1, $PosA2, $AncG, $GrsG)
GUICtrlSetFont($Apli, $TamFG, $GrsFG, $AtrbFG, $FontG)

$Ofic = GUICtrlCreateGroup("Oficina", $PosI2, $PosA1, $AncG, $GrsG)
GUICtrlSetFont($Ofic, $TamFG, $GrsFG, $AtrbFG, $FontG)

$Repr = GUICtrlCreateGroup("Reproductores", $PosI2, $PosA2, $AncG, $GrsG)
GUICtrlSetFont($Repr, $TamFG, $GrsFG, $AtrbFG, $FontG)

$Edit = GUICtrlCreateGroup("Editores", $PosI3, $PosA1, $AncG, $GrsG)
GUICtrlSetFont($Edit, $TamFG, $GrsFG, $AtrbFG, $FontG)

$Prog = GUICtrlCreateGroup("Programación", $PosI3, $PosA2, $AncG, $GrsG)
GUICtrlSetFont($Prog, $TamFG, $GrsFG, $AtrbFG, $FontG)

$Comp = GUICtrlCreateGroup("Complementos", $PosI4, $PosA1, $AncG, $GrsG)
GUICtrlSetFont($Comp, $TamFG, $GrsFG, $AtrbFG, $FontG)

$Herr = GUICtrlCreateGroup("Herramientas", $PosI4, $PosA2, $AncG, $GrsG)
GUICtrlSetFont($Herr, $TamFG, $GrsFG, $AtrbFG, $FontG)
#################################################################################################################
GUISetState(@SW_SHOW)
#################################################################################################################
While 1
	$msg = GUIGetMsg()
	Switch $msg

		Case $BtnIns
			;Esta linea hace las instalaciones
			If GUICtrlRead($ChcBx1[0]) = 1 Then
				$FlRd1 = FileReadLine(@ScriptDir & "\Programas.txt", 2)
				ShellExecuteWait($FlRd1)
			EndIf
			If GUICtrlRead($ChcBx1[1]) = 1 Then
				$FlRd2 = FileReadLine(@ScriptDir & "\Programas.txt", 5)
				ShellExecuteWait($FlRd2)
			EndIf
			If GUICtrlRead($ChcBx1[2]) = 1 Then
				$FlRd3 = FileReadLine(@ScriptDir & "\Programas.txt", 8)
				ShellExecuteWait($FlRd3)
			EndIf
			If GUICtrlRead($ChcBx1[3]) = 1 Then
				$FlRd4 = FileReadLine(@ScriptDir & "\Programas.txt", 11)
				ShellExecuteWait($FlRd4)
			EndIf
			If GUICtrlRead($ChcBx1[4]) = 1 Then
				$FlRd5 = FileReadLine(@ScriptDir & "\Programas.txt", 14)
				ShellExecuteWait($FlRd5)
			EndIf
			If GUICtrlRead($ChcBx1[5]) = 1 Then
				$FlRd6 = FileReadLine(@ScriptDir & "\Programas.txt", 17)
				ShellExecuteWait($FlRd6)
			EndIf
			If GUICtrlRead($ChcBx1[6]) = 1 Then
				$FlRd7 = FileReadLine(@ScriptDir & "\Programas.txt", 20)
				ShellExecuteWait($FlRd7)
			EndIf
			If GUICtrlRead($ChcBx1[7]) = 1 Then
				$FlRd8 = FileReadLine(@ScriptDir & "\Programas.txt", 23)
				ShellExecuteWait($FlRd8)
			EndIf
			If GUICtrlRead($ChcBx1[8]) = 1 Then
				$FlRd9 = FileReadLine(@ScriptDir & "\Programas.txt", 26)
				ShellExecuteWait($FlRd9)
			EndIf
			If GUICtrlRead($ChcBx1[9]) = 1 Then
				$FlRd10 = FileReadLine(@ScriptDir & "\Programas.txt", 29)
				ShellExecuteWait($FlRd10)
			EndIf
			If GUICtrlRead($ChcBx2[0]) = 1 Then
				$FlRd11 = FileReadLine(@ScriptDir & "\Programas.txt", 32)
				ShellExecuteWait($FlRd11)
			EndIf
			If GUICtrlRead($ChcBx2[1]) = 1 Then
				$FlRd12 = FileReadLine(@ScriptDir & "\Programas.txt", 35)
				ShellExecuteWait($FlRd12)
			EndIf
			If GUICtrlRead($ChcBx2[2]) = 1 Then
				$FlRd13 = FileReadLine(@ScriptDir & "\Programas.txt", 38)
				ShellExecuteWait($FlRd13)
			EndIf
			If GUICtrlRead($ChcBx2[3]) = 1 Then
				$FlRd14 = FileReadLine(@ScriptDir & "\Programas.txt", 41)
				ShellExecuteWait($FlRd14)
			EndIf
			If GUICtrlRead($ChcBx2[4]) = 1 Then
				$FlRd15 = FileReadLine(@ScriptDir & "\Programas.txt", 44)
				ShellExecuteWait($FlRd15)
			EndIf
			If GUICtrlRead($ChcBx2[5]) = 1 Then
				$FlRd16 = FileReadLine(@ScriptDir & "\Programas.txt", 47)
				ShellExecuteWait($FlRd16)
			EndIf
			If GUICtrlRead($ChcBx2[6]) = 1 Then
				$FlRd17 = FileReadLine(@ScriptDir & "\Programas.txt", 50)
				ShellExecuteWait($FlRd17)
			EndIf
			If GUICtrlRead($ChcBx2[7]) = 1 Then
				$FlRd18 = FileReadLine(@ScriptDir & "\Programas.txt", 53)
				ShellExecuteWait($FlRd18)
			EndIf
			If GUICtrlRead($ChcBx2[8]) = 1 Then
				$FlRd19 = FileReadLine(@ScriptDir & "\Programas.txt", 56)
				ShellExecuteWait($FlRd19)
			EndIf
			If GUICtrlRead($ChcBx2[9]) = 1 Then
				$FlRd20 = FileReadLine(@ScriptDir & "\Programas.txt", 59)
				ShellExecuteWait($FlRd20)
			EndIf
			If GUICtrlRead($ChcBx3[0]) = 1 Then
				$FlRd21 = FileReadLine(@ScriptDir & "\Programas.txt", 62)
				ShellExecuteWait($FlRd21)
			EndIf
			If GUICtrlRead($ChcBx3[1]) = 1 Then
				$FlRd22 = FileReadLine(@ScriptDir & "\Programas.txt", 65)
				ShellExecuteWait($FlRd22)
			EndIf
			If GUICtrlRead($ChcBx3[2]) = 1 Then
				$FlRd23 = FileReadLine(@ScriptDir & "\Programas.txt", 68)
				ShellExecuteWait($FlRd23)
			EndIf
			If GUICtrlRead($ChcBx3[3]) = 1 Then
				$FlRd24 = FileReadLine(@ScriptDir & "\Programas.txt", 71)
				ShellExecuteWait($FlRd24)
			EndIf
			If GUICtrlRead($ChcBx3[4]) = 1 Then
				$FlRd25 = FileReadLine(@ScriptDir & "\Programas.txt", 74)
				ShellExecuteWait($FlRd25)
			EndIf
			If GUICtrlRead($ChcBx3[5]) = 1 Then
				$FlRd26 = FileReadLine(@ScriptDir & "\Programas.txt", 77)
				ShellExecuteWait($FlRd26)
			EndIf
			If GUICtrlRead($ChcBx3[6]) = 1 Then
				$FlRd27 = FileReadLine(@ScriptDir & "\Programas.txt", 80)
				ShellExecuteWait($FlRd27)
			EndIf
			If GUICtrlRead($ChcBx3[7]) = 1 Then
				$FlRd8 = FileReadLine(@ScriptDir & "\Programas.txt", 83)
				ShellExecuteWait($FlRd8)
			EndIf
			If GUICtrlRead($ChcBx3[8]) = 1 Then
				$FlRd9 = FileReadLine(@ScriptDir & "\Programas.txt", 86)
				ShellExecuteWait($FlRd9)
			EndIf
			If GUICtrlRead($ChcBx3[9]) = 1 Then
				$FlRd30 = FileReadLine(@ScriptDir & "\Programas.txt", 89)
				ShellExecuteWait($FlRd30)
			EndIf
			If GUICtrlRead($ChcBx4[0]) = 1 Then
				$FlRd31 = FileReadLine(@ScriptDir & "\Programas.txt", 92)
				ShellExecuteWait($FlRd31)
			EndIf
			If GUICtrlRead($ChcBx4[1]) = 1 Then
				$FlRd32 = FileReadLine(@ScriptDir & "\Programas.txt", 95)
				ShellExecuteWait($FlRd32)
			EndIf
			If GUICtrlRead($ChcBx4[2]) = 1 Then
				$FlRd33 = FileReadLine(@ScriptDir & "\Programas.txt", 98)
				ShellExecuteWait($FlRd33)
			EndIf
			If GUICtrlRead($ChcBx4[3]) = 1 Then
				$FlRd34 = FileReadLine(@ScriptDir & "\Programas.txt", 101)
				ShellExecuteWait($FlRd34)
			EndIf
			If GUICtrlRead($ChcBx4[4]) = 1 Then
				$FlRd35 = FileReadLine(@ScriptDir & "\Programas.txt", 104)
				ShellExecuteWait($FlRd35)
			EndIf
			If GUICtrlRead($ChcBx4[5]) = 1 Then
				$FlRd36 = FileReadLine(@ScriptDir & "\Programas.txt", 107)
				ShellExecuteWait($FlRd36)
			EndIf
			If GUICtrlRead($ChcBx4[6]) = 1 Then
				$FlRd37 = FileReadLine(@ScriptDir & "\Programas.txt", 110)
				ShellExecuteWait($FlRd37)
			EndIf
			If GUICtrlRead($ChcBx4[7]) = 1 Then
				$FlRd38 = FileReadLine(@ScriptDir & "\Programas.txt", 113)
				ShellExecuteWait($FlRd38)
			EndIf
			If GUICtrlRead($ChcBx4[8]) = 1 Then
				$FlRd39 = FileReadLine(@ScriptDir & "\Programas.txt", 116)
				ShellExecuteWait($FlRd39)
			EndIf
			If GUICtrlRead($ChcBx4[9]) = 1 Then
				$FlRd40 = FileReadLine(@ScriptDir & "\Programas.txt", 119)
				ShellExecuteWait($FlRd40)
			EndIf
			If GUICtrlRead($ChcBx5[0]) = 1 Then
				$FlRd41 = FileReadLine(@ScriptDir & "\Programas.txt", 122)
				ShellExecuteWait($FlRd41)
			EndIf
			If GUICtrlRead($ChcBx5[1]) = 1 Then
				$FlRd42 = FileReadLine(@ScriptDir & "\Programas.txt", 125)
				ShellExecuteWait($FlRd42)
			EndIf
			If GUICtrlRead($ChcBx5[2]) = 1 Then
				$FlRd43 = FileReadLine(@ScriptDir & "\Programas.txt", 128)
				ShellExecuteWait($FlRd43)
			EndIf
			If GUICtrlRead($ChcBx5[3]) = 1 Then
				$FlRd44 = FileReadLine(@ScriptDir & "\Programas.txt", 131)
				ShellExecuteWait($FlRd44)
			EndIf
			If GUICtrlRead($ChcBx5[4]) = 1 Then
				$FlRd45 = FileReadLine(@ScriptDir & "\Programas.txt", 134)
				ShellExecuteWait($FlRd45)
			EndIf
			If GUICtrlRead($ChcBx5[5]) = 1 Then
				$FlRd46 = FileReadLine(@ScriptDir & "\Programas.txt", 137)
				ShellExecuteWait($FlRd46)
			EndIf
			If GUICtrlRead($ChcBx5[6]) = 1 Then
				$FlRd47 = FileReadLine(@ScriptDir & "\Programas.txt", 140)
				ShellExecuteWait($FlRd47)
			EndIf
			If GUICtrlRead($ChcBx5[7]) = 1 Then
				$FlRd48 = FileReadLine(@ScriptDir & "\Programas.txt", 143)
				ShellExecuteWait($FlRd48)
			EndIf
			If GUICtrlRead($ChcBx5[8]) = 1 Then
				$FlRd49 = FileReadLine(@ScriptDir & "\Programas.txt", 146)
				ShellExecuteWait($FlRd49)
			EndIf
			If GUICtrlRead($ChcBx5[9]) = 1 Then
				$FlRd50 = FileReadLine(@ScriptDir & "\Programas.txt", 149)
				ShellExecuteWait($FlRd50)
			EndIf
			If GUICtrlRead($ChcBx6[0]) = 1 Then
				$FlRd51 = FileReadLine(@ScriptDir & "\Programas.txt", 152)
				ShellExecuteWait($FlRd51)
			EndIf
			If GUICtrlRead($ChcBx6[1]) = 1 Then
				$FlRd52 = FileReadLine(@ScriptDir & "\Programas.txt", 155)
				ShellExecuteWait($FlRd52)
			EndIf
			If GUICtrlRead($ChcBx6[2]) = 1 Then
				$FlRd53 = FileReadLine(@ScriptDir & "\Programas.txt", 158)
				ShellExecuteWait($FlRd53)
			EndIf
			If GUICtrlRead($ChcBx6[3]) = 1 Then
				$FlRd54 = FileReadLine(@ScriptDir & "\Programas.txt", 161)
				ShellExecuteWait($FlRd54)
			EndIf
			If GUICtrlRead($ChcBx6[4]) = 1 Then
				$FlRd55 = FileReadLine(@ScriptDir & "\Programas.txt", 164)
				ShellExecuteWait($FlRd55)
			EndIf
			If GUICtrlRead($ChcBx6[5]) = 1 Then
				$FlRd56 = FileReadLine(@ScriptDir & "\Programas.txt", 167)
				ShellExecuteWait($FlRd56)
			EndIf
			If GUICtrlRead($ChcBx6[6]) = 1 Then
				$FlRd57 = FileReadLine(@ScriptDir & "\Programas.txt", 170)
				ShellExecuteWait($FlRd57)
			EndIf
			If GUICtrlRead($ChcBx6[7]) = 1 Then
				$FlRd58 = FileReadLine(@ScriptDir & "\Programas.txt", 173)
				ShellExecuteWait($FlRd58)
			EndIf
			If GUICtrlRead($ChcBx6[8]) = 1 Then
				$FlRd59 = FileReadLine(@ScriptDir & "\Programas.txt", 176)
				ShellExecuteWait($FlRd59)
			EndIf
			If GUICtrlRead($ChcBx6[9]) = 1 Then
				$FlRd60 = FileReadLine(@ScriptDir & "\Programas.txt", 179)
				ShellExecuteWait($FlRd60)
			EndIf
			If GUICtrlRead($ChcBx7[0]) = 1 Then
				$FlRd61 = FileReadLine(@ScriptDir & "\Programas.txt", 182)
				ShellExecuteWait($FlRd61)
			EndIf
			If GUICtrlRead($ChcBx7[1]) = 1 Then
				$FlRd62 = FileReadLine(@ScriptDir & "\Programas.txt", 185)
				ShellExecuteWait($FlRd62)
			EndIf
			If GUICtrlRead($ChcBx7[2]) = 1 Then
				$FlRd63 = FileReadLine(@ScriptDir & "\Programas.txt", 188)
				ShellExecuteWait($FlRd63)
			EndIf
			If GUICtrlRead($ChcBx7[3]) = 1 Then
				$FlRd64 = FileReadLine(@ScriptDir & "\Programas.txt", 191)
				ShellExecuteWait($FlRd64)
			EndIf
			If GUICtrlRead($ChcBx7[4]) = 1 Then
				$FlRd65 = FileReadLine(@ScriptDir & "\Programas.txt", 194)
				ShellExecuteWait($FlRd65)
			EndIf
			If GUICtrlRead($ChcBx7[5]) = 1 Then
				$FlRd66 = FileReadLine(@ScriptDir & "\Programas.txt", 197)
				ShellExecuteWait($FlRd66)
			EndIf
			If GUICtrlRead($ChcBx7[6]) = 1 Then
				$FlRd67 = FileReadLine(@ScriptDir & "\Programas.txt", 200)
				ShellExecuteWait($FlRd67)
			EndIf
			If GUICtrlRead($ChcBx7[7]) = 1 Then
				$FlRd68 = FileReadLine(@ScriptDir & "\Programas.txt", 203)
				ShellExecuteWait($FlRd68)
			EndIf
			If GUICtrlRead($ChcBx7[8]) = 1 Then
				$FlRd69 = FileReadLine(@ScriptDir & "\Programas.txt", 206)
				ShellExecuteWait($FlRd69)
			EndIf
			If GUICtrlRead($ChcBx7[9]) = 1 Then
				$FlRd70 = FileReadLine(@ScriptDir & "\Programas.txt", 209)
				ShellExecuteWait($FlRd70)
			EndIf
			If GUICtrlRead($ChcBx8[0]) = 1 Then
				$FlRd71 = FileReadLine(@ScriptDir & "\Programas.txt", 212)
				ShellExecuteWait($FlRd71)
			EndIf
			If GUICtrlRead($ChcBx8[1]) = 1 Then
				$FlRd72 = FileReadLine(@ScriptDir & "\Programas.txt", 215)
				ShellExecuteWait($FlRd72)
			EndIf
			If GUICtrlRead($ChcBx8[2]) = 1 Then
				$FlRd73 = FileReadLine(@ScriptDir & "\Programas.txt", 218)
				ShellExecuteWait($FlRd73)
			EndIf
			If GUICtrlRead($ChcBx8[3]) = 1 Then
				$FlRd74 = FileReadLine(@ScriptDir & "\Programas.txt", 221)
				ShellExecuteWait($FlRd74)
			EndIf
			If GUICtrlRead($ChcBx8[4]) = 1 Then
				$FlRd75 = FileReadLine(@ScriptDir & "\Programas.txt", 224)
				ShellExecuteWait($FlRd75)
			EndIf
			If GUICtrlRead($ChcBx8[5]) = 1 Then
				$FlRd76 = FileReadLine(@ScriptDir & "\Programas.txt", 227)
				ShellExecuteWait($FlRd76)
			EndIf
			If GUICtrlRead($ChcBx8[6]) = 1 Then
				$FlRd77 = FileReadLine(@ScriptDir & "\Programas.txt", 230)
				ShellExecuteWait($FlRd77)
			EndIf
			If GUICtrlRead($ChcBx8[7]) = 1 Then
				$FlRd78 = FileReadLine(@ScriptDir & "\Programas.txt", 233)
				ShellExecuteWait($FlRd78)
			EndIf
			If GUICtrlRead($ChcBx8[8]) = 1 Then
				$FlRd79 = FileReadLine(@ScriptDir & "\Programas.txt", 236)
				ShellExecuteWait($FlRd79)
			EndIf
			If GUICtrlRead($ChcBx8[9]) = 1 Then
				$FlRd80 = FileReadLine(@ScriptDir & "\Programas.txt", 239)
				ShellExecuteWait($FlRd80)
			EndIf
			If GUICtrlRead($Fin) = 1 Then
				MsgBox(0, "Instalador WBD", "Se ha terminado de instalar los programas, ahora se cerrara el instalador...Grasias....wbueso@hotmail.com", 5)
				WinClose("Instalador WBD")
			Else
				MsgBox(0, "Instalador WBD", "Se ha terminado de instalar los programas, puede seleccionar otros programas para instalar...Grasias....wbueso@hotmail.com", 5)
			EndIf
			#################################################################################################################


			;Esta linea selecciona los programas que se instalan por Default
		Case $BtnDflt

			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||Aqui Edité Algo|||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

			;creo que por Default son todos lo puedes hacer así, en tan solo 5 lineas :)
			Local $x = 0
			For $i = $ChcBx1[0] To $ChcBx8[9]
				If Number($nLinea[$x]) = 1 Then GUICtrlSetState($i, $GUI_CHECKED)
				$x += 1
			Next



			;Te ahorras estas 240 lineas :)

;~ 			If $ReadS1 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS2 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS3 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS4 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS5 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS6 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS7 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS8 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS9 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS10 = 1 Then
;~ 				GUICtrlSetState($ChcBx1[9], $GUI_CHECKED)
;~ 			EndIf

;~ 			If $ReadS11 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS12 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS13 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS14 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS15 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS16 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS17 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS18 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS19 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS20 = 1 Then
;~ 				GUICtrlSetState($ChcBx2[9], $GUI_CHECKED)
;~ 			EndIf

;~ 			If $ReadS21 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS22 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS23 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS24 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS25 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS26 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS27 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS28 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS29 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS30 = 1 Then
;~ 				GUICtrlSetState($ChcBx3[9], $GUI_CHECKED)
;~ 			EndIf

;~ 			If $ReadS31 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS32 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS33 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS34 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS35 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS36 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS37 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS38 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS39 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS40 = 1 Then
;~ 				GUICtrlSetState($ChcBx4[9], $GUI_CHECKED)
;~ 			EndIf

;~ 			If $ReadS41 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS42 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS43 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS44 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS45 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS46 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS47 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS48 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS49 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS50 = 1 Then
;~ 				GUICtrlSetState($ChcBx5[9], $GUI_CHECKED)
;~ 			EndIf

;~ 			If $ReadS51 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS52 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS53 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS54 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS55 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS56 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS57 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS58 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS59 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS60 = 1 Then
;~ 				GUICtrlSetState($ChcBx6[9], $GUI_CHECKED)
;~ 			EndIf

;~ 			If $ReadS61 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS62 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS63 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS64 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS65 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS66 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS67 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS68 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS69 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS70 = 1 Then
;~ 				GUICtrlSetState($ChcBx7[9], $GUI_CHECKED)
;~ 			EndIf

;~ 			If $ReadS71 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[0], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS72 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[1], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS73 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[2], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS74 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[3], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS75 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[4], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS76 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[5], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS77 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[6], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS78 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[7], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS79 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[8], $GUI_CHECKED)
;~ 			EndIf
;~ 			If $ReadS80 = 1 Then
;~ 				GUICtrlSetState($ChcBx8[9], $GUI_CHECKED)
;~ 			EndIf


			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||Aqui Terminé de Editar |||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||



			#################################################################################################################
			;Esta linea desactiva todos los checkbox
		Case $BtnCln

			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||Aqui Edité Algo|||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||



;~       GUICtrlSetState($ChcBx1[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx1[9],$GUI_UNCHECKED)

;~       GUICtrlSetState($ChcBx2[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx2[9],$GUI_UNCHECKED)

;~       GUICtrlSetState($ChcBx3[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx3[9],$GUI_UNCHECKED)

;~       GUICtrlSetState($ChcBx4[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx4[9],$GUI_UNCHECKED)

;~       GUICtrlSetState($ChcBx5[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx5[9],$GUI_UNCHECKED)

;~       GUICtrlSetState($ChcBx6[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx6[9],$GUI_UNCHECKED)

;~       GUICtrlSetState($ChcBx7[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx7[9],$GUI_UNCHECKED)

;~       GUICtrlSetState($ChcBx8[0],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[1],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[2],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[3],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[4],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[5],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[6],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[7],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[8],$GUI_UNCHECKED)
;~       GUICtrlSetState($ChcBx8[9],$GUI_UNCHECKED)


;~  Para desactivar puedes hacer mejor esto, así te ahorras las 80 lienas de arriba :)
			For $i = $ChcBx1[0] To $ChcBx8[9]
				GUICtrlSetState($i, $GUI_UNCHECKED)
			Next
;~ limpiamos la variable de los programas :)
$iNProgramas=0
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||Aqui Terminé de Editar |||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||




			#################################################################################################################
			;Esta linea habre la GUI para agregar los programas al instalador para luego instalarlos
		Case $BtnAgrgr
			WinClose("Instalador WBD", "")
			ShellExecute(@ScriptDir & "\Agregar Programas.exe")
			#################################################################################################################
			;Esta linea cierra el programa con el boton salir
		Case $BtnSlr
			Exit
			#################################################################################################################
			;Esta linea cierra el programa con el boton X de la Esquina
		Case $GUI_EVENT_CLOSE
			Exit



			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||Aqui Edité Algo|||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;esto seria una idea del porcentaje.
			;Tambien modifique el Switch completo, ya que lo usabas como un Select


		Case $ChcBx1[0] To $ChcBx8[9] ;Al presionar cualquier checkbox de los programas editamos nuestra variable del porcentaje
			Local $iPorcentaje = 0
			$iNProgramas += (GUICtrlRead($msg) = $GUI_CHECKED) ? 1 : -1
			$iPorcentaje = ($iNProgramas = 0) ? 100 : 100 / $iNProgramas;Opcional
			ConsoleWrite("controlID = " & $msg & " Numero de Programas: " & $iNProgramas & " Porcentaje= " & $iPorcentaje & @CRLF)



			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||Aqui Terminé de Editar |||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
			;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||


			#################################################################################################################
	EndSwitch

WEnd