Func CheckPath($handel = 0)
	Local $__Path = GUICtrlRead($handel)
	IF 	Not StringRegExp($__Path, "((?<!.)([a-zA-Z]\:\\)(?!\s)(([\w-+.]*((?<!\s)(\s{1})(?!\\)|(?<!\\)(\\{1})(?!\s))*)*)(\\?)(?!.))", 0) Or _
		Not FileExists($__Path) Then
		GUICtrlSetData($handel, "")
		Return False
	EndIf
	Return True
EndFunc

Func CheckX($string = "")
	Local $StringLen = StringLen($string)
	If 	Not StringInStr($string, ' ') Then Return 2
	IF $StringLen < 3 Then Return 3
	IF $StringLen > 19 Then Return 4
	Return 1
EndFunc

Func CheckCharacterName($handel)
	Local $name = GUICtrlRead($handel)
	$name = StringRegExpReplace($name, "\s$", "")
	Local $State = CheckX($name)
	GUICtrlSetData($handel, $name);Make Sure the User not set aWhite Space at the end of tipping https://regex101.com/r/EiRCTB/1
	Local $_error_array = [4, "Check is tells there is a Space, there is a no lower 3 and not higher len than 19!", "No Space Found", "StringLen is lower 3", "StringLen is higher 19"]
	ConsoleWrite($_error_array[$State] & @CRLF)
	IF $State > 1 Then
		GUICtrlSetData($handel, "")
		Return False
	EndIf
	Local $StringSplit = StringSplit($name, " ")
	If IsArray($StringSplit) Then
		IF $StringSplit[0] > 1 Then
			For $n = 1 To $StringSplit[0]
				IF $StringSplit[$n] <> "" Then
					IF Not  StringRegExp($StringSplit[$n], "(^[A-Z])([a-z]+)", 0) Then
						GUICtrlSetData($handel, "")
						Return False
					EndIf
				EndIf
			Next
		EndIf
	EndIf
	Return True
EndFunc

Func CheckStringFromInput($handel, $ClassCheck = 0)
	Local $String = GUICtrlRead($handel)
	If $String = "" Then Return False
	Switch($ClassCheck)
		Case 1
			IF Not StringRegExp($String,"(\[\w+:\w+; \w+:\d+\])", 0) Then
				GUICtrlSetData($handel ,"")
				Return False; https://regex101.com/r/auydEg/1
			EndIf
		Case 2
			;https://de.wikipedia.org/wiki/Dateiname
;~ 			$String = StringRegExpReplace($String, '[?*<>,\\+:=\/";\[\]\|]', "")
			IF StringRegExp($String,'[?*<>,\\+:=\/";\[\]\|]+', 0) Then
				GUICtrlSetData($handel ,"")
				Return False
			EndIf
		Case 3
			;https://de.wikipedia.org/wiki/Dateiname
			IF StringRegExp($String,"[\w\`\'\{\}\(\)\%\&\-\@\#\$\~\!\_\^. ]+", 0) Then Return False;
	EndSwitch
	Return True
EndFunc

Func ChanceArrayData(byref $Array, $index = 0 , $Handel = 0)
$Array[$index] = GUICtrlRead($Handel)
GUICtrlSetData($Handel, "")
EndFunc

Func WINDOWS_SETTINGS($debug = False)
	Local $_array = 	[ _
						[7], _
						["CheckPath($GUI_ADD_GW_WAY)", "GW Path is not a Path or dont exists!", "ChanceArrayData($GuiPathToGw, $A, $GUI_ADD_GW_WAY)"], _
						["CheckPath($GUI_ADD_NEW_BOT_WAY)", "Bot Path is not a Path or dont exists!", "ChanceArrayData($GuiPathToBot, $A, $GUI_ADD_NEW_BOT_WAY)"], _
						["CheckCharacterName($GUI_ADD_NICK_NAME)", "The Charactername not equal with the rules!", "ChanceArrayData($GuiNameOfCharacter, $A, $GUI_ADD_NICK_NAME)"], _
						["CheckStringFromInput($GUI_ADD_BOT_NAME, 2)", "No Bot Name is set or" & @CRLF & "it holds Symbolys wich not are allowed!", "ChanceArrayData($GuiNameOfBot, $A, $GUI_ADD_BOT_NAME)"], _
						["CheckStringFromInput($GUI_ADD_BOT_NAME_SELECTOR, 1)", "No Classname for NameSelector is set or Format is not allwoed", "ChanceArrayData($GuiAutoClickNameSelector, $A, $GUI_ADD_BOT_NAME_SELECTOR)"], _
						["CheckStringFromInput($GUI_ADD_BOT_START_BUTTON, 1)", "No Classname of Start Button is set or Format is not allwoed", "ChanceArrayData($GuiAutoClickStartButton, $A, $GUI_ADD_BOT_START_BUTTON)"], _
						["CheckStringFromInput($GUI_ADD_BOT_DISABLE_RENDERING_BUTTON, 1)", "No Classname of Disable Rendering is set or Format is not allwoed", "ChanceArrayData($GUiAutoClickDisableRendering, $A, $GUI_ADD_BOT_DISABLE_RENDERING_BUTTON)"]]
	Local $count = 0, $Info = ""
	For $i = 1 To $_array[0][0]
		Local $State = Execute($_array[$i][0])
		ConsoleWrite($_array[$i][0] & " State = " & $State &  @CRLF)
		IF Not $State Then
			$count += 1
			$Info &= @CRLF & $_array[$i][1] & (($i < $_array[0][0]) ? (@CRLF) : (''))
		EndIf
	Next
	If $count > 0 Then
		MsgBox(0, "Info", $Info, 8, $guiMainWorkingControl)
	Else
		For $i = 1 To $_array[0][0]
			Execute($_array[$i][2])
		Next
		GUISetState(False, $subGuiSettings)
		ADD_NEW_ACCOUNT()
	EndIf
	GUICtrlSetState($GUI_BUTTON_ADD_ACCOUNT, $GUI_ENABLE)
EndFunc   ;==>WINDOWS_SETTINGS