[Maza Faka]

Всё, разобрался.

Код:

#include <File.au3>
#include <Array.au3>
Dim $strArray, $file = "c:\test.txt"

Write($strArray)

Func Write($strArray)
_FileReadToArray($file ,$strArray)
For $i = 1 To $strArray[0]
    $search = _ArraySearch($strArray, $strArray[$i])
    If $search <> $i Then
        _FileWriteToLine($file, $i, "", 1)
        $strArray = 0
        Write($strArray)
    EndIf
Next
EndFunc

А, что скажут знатоки? Можно ли так обрабатывать текст?