Помощь с АНК.

[Удалённый пользователь 111847]

Здравствуйте, нужна помощь.
На днях пытался снубировать скрипт для бота-рекламщика в /ad.
Объясню суть:
- Нужно, что бы при активации 1-2 команд был бесконечный цикл объявлений на Advance RP.
ну, типо, пишешь команду - оно кидает /ad и скринит, далее ахк читает чат и если ловит "Отправил Nick_Name" - оно ещё раз кидает и скринит, и так нужно до бесконечности.

Что то типо такого, только проблема - /checkad не ловит ник и кидает объявы до бесконечности.

#Include SAMP.ahk
:?:/piar::
addMessageToChatWindow("{FFFFFF}Автоматический пиар для Advance RP: {04B431}Активирован.")
addMessageToChatWindow("{FFFFFF}Для паузы скрипта, нажмите кнопку END, для закрытия - Del.")
sendChatMessage("/ad LC | В „СТО ЖДСФ“ завезли качественную зимнюю резину. GPS 8>17")
Sleep 500
sendChatMessage("/c 60")
Send {F8}
return
:?:/checkad::
fileread, txt, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
SelectedFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
Piar:
Loop, Read, %SelectedFile%
{
    IfInString, A_LoopReadLine, Lucas_Caparelli
{
    Goto, rekl
}
}
goto, Piar
rekl:
filedelete, %SelectedFile%
fileappend, %SelectedFile%
sendChatMessage("/ad LC | В „СТО ЖДСФ“ завезли качественную зимнюю резину. GPS 8>17")
Sleep 500
sendChatMessage("/c 60")
Sleep 500
Send {F8}
goto Piar

 

[Brakeoff]

Опробовал разок на реде, вроде работает.

#Include SAMP.ahk
:?:/piar::
addMessageToChatWindow("{FFFFFF}Автоматический пиар для Advance RP: {04B431}Активирован.")
addMessageToChatWindow("{FFFFFF}Для паузы скрипта, нажмите кнопку END, для закрытия - Del.")
filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
sendChatMessage("/ad В „СТО ЖДСФ“ завезли качественную зимнюю резину. GPS 8-33")
Sleep 500
sendChatMessage("/c 60")
Sleep 500
Send {F8}
loop
{
fileread, chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
IfInString, chatlog, Отправил Brian_Patterson
{
filedelete, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
sendChatMessage("/ad В „СТО ЖДСФ“ завезли качественную зимнюю резину. GPS 8>17")
Sleep 500
sendChatMessage("/c 60")
Sleep 500
Send {F8}
}
}

END:: Pause

Delete:: Exitapp