#include <File.au3>
#include <Array.au3>
#include <FileConstants.au3>
#include <StringConstants.au3>
#include <Constants.au3>
#include <MsgBoxConstants.au3>
#include <String.au3>

$List = StringSplit(" 0f ff 00 c9 B8 EF 41 42 0A 0d 00 0c   fe fe ", " ")
CreateHexFile("C:\DESKTOP\AUTOIT\Valami.bin", $List)
MsgBox($MB_SYSTEMMODAL, "AutoIt Example", "Finished!")
Exit

; USAGE: STATUS = CreateHexFile(FILENAME, [STRING_OR_LIST])
Func CreateHexFile($FileName, $Content)

  IF IsArray($Content) THEN
    $Content = _ArrayToString($Content, "")
    ENDIF
    MsgBox($MB_SYSTEMMODAL, "", ">>> " & $Content)

    $Content = StringRegExpReplace($Content, "[^0-9a-fA-F]+", "")
    local $output = ""
    local $Stop = StringLen($Content)
    local $x
    local $i
    
	For $i = 1 To $Stop Step 2
		$output &= chr(Dec(StringMid($Content, $i, 2)))
	Next

    ;$StrContent = chr(0) & chr(255) & chr(151) ; StringToBinary(_HexToString($Content), $SB_ANSI)
    ;$HexContent = _StringToHex($StrContent)
    ;MsgBox($MB_SYSTEMMODAL, "", ">>> " & $HexContent & " " & $Content)
    ;#if StringLen($HexContent) == StringLen($Content) Then
    ;  
    ;Endif

	; Create the file.
	Local $FileHandle = FileOpen($FileName, $FO_BINARY + $FO_OVERWRITE)
	If $FileHandle = -1 Then
		MsgBox($MB_SYSTEMMODAL, "", "Error: Cannot create file - " & $FileName);
		Return 0
	EndIf

	; Write some data.
	FileWrite($FileHandle, $output)

	; Close the handle returned by FileOpen.
	FileClose($FileHandle)

EndFunc