Срочно! Помогите

[FOREVER()]

Ребят, в общем, код не мой, хочу, чтобы вы помогли.
В общем, я хочу, чтобы, когда я наказывал человека - создавался какой-либо текстовый документ на рабочем столе и выписывалось это наказание туда, например:
"Администратор Имя_Фамилия посадил игрока Имя_Фамилия по причине: причина".
Вот сам код:

TXTname := violators.txt  ; название txt куда запиывается вся инфо.
WayToFile := A_ScriptDir/AdmInfo/%TXTname% ; Путь до txt файла с инфо.
CL :=   ; Путь до чатлога
RegRead, AdmNickName, HKEY_CURRENT_USER, SoftWare\www.gtasrv.ru\CR-MP\GenerationC, player_name  ; Путь до ника игрока в реестре, или можно прописать свой
cleanCL(WayToLog)
{
    FileDelete, %WayToLog%
    FileAppend, , %WayToLog%
}

Loop
{
    FileRead, ChatLog, %CL%
    IfInString, ChatLog, Администратор: %AdmNickName%
    {
        RegExMatch(Chatlog, "Администратор (.*)[id] посадил игрока (.*)[id] (.*). Причина: (.*)", out) ; Ник адм, ник игрока, наказание, причина
        FileAppend, `n, %WayToFile%
        FileAppend, Администратор %out1% посадил игрока %out2% %out3%. По причине %out4%, %WayToFile%
        cleanCL(WayToFile)
    }
    Sleep, 50
}

Я попробовал, но почему-то при наказании - не выписывается ((
Помогите, буду рад.

 

[Smer4]

Путь до чат лога то прописывал?

 

[BASS_DEVSOFTWARE]

Администратор (.*)\[id\] посадил игрока (.*)\[id\] (.*)\. Причина: (.*)

Регулярка как минимум. Далее не смотрел.

upd: И я не думаю что id не имеет в себе цифр. \d\d\d? закрывай.

 

[FOREVER()]

Путь до чат лога то прописывал?

+

 

[FOREVER()]

Регулярка как минимум. Далее не смотрел.

upd: И я не думаю что id не имеет в себе цифр. \d\d\d? закрывай.

Сделал, но все равно ничего(

 

[FOREVER()]

Помогите плез((

 

[Smer4]

Попробуй так

TXTname := violators.txt  ; название txt куда запиывается вся инфо.
WayToFile := A_ScriptDir/AdmInfo/%TXTname% ; Путь до txt файла с инфо.
CL :=   ; Путь до чатлога
RegRead, AdmNickName, HKEY_CURRENT_USER, SoftWare\www.gtasrv.ru\CR-MP\GenerationC, player_name  ; Путь до ника игрока в реестре, или можно прописать свой
cleanCL(WayToLog)
{
    FileDelete, %WayToLog%
    FileAppend, , %WayToLog%
}

Loop
{
    FileRead, ChatLog, %CL%
    IfInString, ChatLog, Администратор: %AdmNickName%
    {
        RegExMatch(Chatlog, "Администратор (.*)[(.*)] посадил игрока (.*)[(.*)] (.*). Причина: (.*)<", out) ; Ник адм, ник игрока, наказание, причина
        FileAppend, `n, %WayToFile%
        FileAppend, Администратор %out1% посадил игрока %out3%. По причине %out5%, %WayToFile%
        cleanCL(WayToFile)
    }
    Sleep, 50
}

 

[FOREVER()]

Попробуй так

TXTname := violators.txt  ; название txt куда запиывается вся инфо.
WayToFile := A_ScriptDir/AdmInfo/%TXTname% ; Путь до txt файла с инфо.
CL :=   ; Путь до чатлога
RegRead, AdmNickName, HKEY_CURRENT_USER, SoftWare\www.gtasrv.ru\CR-MP\GenerationC, player_name  ; Путь до ника игрока в реестре, или можно прописать свой
cleanCL(WayToLog)
{
    FileDelete, %WayToLog%
    FileAppend, , %WayToLog%
}

Loop
{
    FileRead, ChatLog, %CL%
    IfInString, ChatLog, Администратор: %AdmNickName%
    {
        RegExMatch(Chatlog, "Администратор (.*)[(.*)] посадил игрока (.*)[(.*)] (.*). Причина: (.*)<", out) ; Ник адм, ник игрока, наказание, причина
        FileAppend, `n, %WayToFile%
        FileAppend, Администратор %out1% посадил игрока %out3%. По причине %out5%, %WayToFile%
        cleanCL(WayToFile)
    }
    Sleep, 50
}

Хммм, странно, не работает ;(