Textdatei umschreiben

Hallo Autoit,

zwar habe ich grade ein Blackout und weiß nicht mehr weiter
Ich habe eine textdatei die gut 6000 zeilen umfasst, wo ich immer die erste 8zahlen umschreiben soll.

So ist der Aufbau der Textdatei:

0B2E0000,SKILL_EU_CLERIC_RECOVERYA_GROUP_A_04,Recovery Division,58,0,1334,1166,20000,1685418593,784,772,4,518,2,0,0,2512

Nach dem umschreiben sollte es so aussehen:

0x2E0B,SKILL_EU_CLERIC_RECOVERYA_GROUP_A_04,Recovery Division,58,0,1334,1166,20000,1685418593,784,772,4,518,2,0,0,2512

Sprich die ersten 8 zahlen soll er umschreiben und wieder speichern.
Soweit bin ich bis jetzt gekommen

;~ 0B2E0000,SKILL_EU_CLERIC_RECOVERYA_GROUP_A_04,Recovery Division,58,0,1334,1166,20000,1685418593,784,772,4,518,2,0,0,2512
;~ 0x2E0B

;~ 01000000,SKILL_PUNCH_01,SKILL_PUNCH_01,0,0,0,1500,1500,5,172,0,1,0,2,0,1,0
;~ 02000000,SKILL_CH_SWORD_BASE_01,SKILL_CH_SWORD_BASE_01,0,0,0,1200,1200,5,173,0,1,257,2,0,1,0
;~ 03000000,SKILL_CH_SWORD_SMASH_A_01,Strike Smash,5,0,411,1022,3000,5,174,0,1,257,2,0,1,19
;~ 04000000,SKILL_CH_SWORD_SMASH_B_01,Stab Smash,27,0,500,1100,3000,5,175,174,1,257,2,0,1,91

Local $file = FileOpen(@ScriptDir & "\Skill.txt", 0)
$test = FileRead($file)
$a = 0
While 1
Local $line = FileReadLine($file)
If @error = -1 Then ExitLoop
$result = StringLeft($line,
ConsoleWrite(@CRLF & "Zeilen:" & $a & " - " & AppendByte($result) & @CRLF)

$a += 1
WEnd
ConsoleWrite(@CRLF & "Zeilen:" & $a & @CRLF)

Func AppendByte($val)
Return Hex(Binary($val))
EndFunc

FileClose($file)

chip: Danke dir klappt.

Meine funktion AppendByte war nur ein test, aber so kann ich die Zahlen z.B. 0B2E0000 nicht in sowas umschreiben 0x2E0B.
Hat da jemand eine andere idee ?
Dachte mit Hex & Binary kommt das ergebnis raus, aber war doch nicht so.

Ich brauch die textdatei für ein anders Program, was sie nur auslesen kann wenn die Zahlen umgeschrieben sind

danke klappt wunderbar.