Функции с чатом.

Статус
В этой теме нельзя размещать новые ответы.

madrasso

Потрачен
Автор темы
883
325
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Доброго дня.
Помогите сделать авто-ввод команды, когда в чат приходит то или иное сообщение.

Когда в чат логе появляется это:
Код:
^Enrique_Madrasso поймал\(а\) \{AFAFAF\}(.*)\{B00058\}, снял\(а\) с крючка и кинул\(а\) рыбу в мешок
Здесь уже все расставлено.

либо это

Код:
^У Enrique_Madrasso случилась поклевка, но он(а) не стал(а) предпринимать каких-либо действий
Здесь уже все расставлено.

то он вводит команду: /fish.
 

FSFFGSF

Новичок
28
0
Вот я писал для себя давно
Код:
global FileCLog:=% A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt"
loop
{
lastline := GetNewLine(FileCLog)
if lastline contains "^Enrique_Madrasso поймал\(а\) \{AFAFAF\}(.*)\{B00058\}, снял\(а\) с крючка и кинул\(а\) рыбу в мешок"
sleep 1s
SendInput, {F6} /fish{Enter}
}
}
return
GetNewLine(filename)
{
static old
static new
if !old
{
FileGetSize, old, %filename%
new := old
}
while old = new
{
sleep 100
FileGetSize, new, %filename%
}
old := new
Loop, read, %filename%
if A_LoopReadLine
{
last := A_LoopReadLine
}
return last
}
скомпилить не могу с ahk проблемы не тестил

Если не робит убери ковычки где то что надо найти активация при запуске сразу я просто сам не скомпилю ахк не робит + синтаксис забыл
 
Последнее редактирование модератором:

madrasso

Потрачен
Автор темы
883
325
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Вот я писал для себя давно
Код:
global FileCLog:=% A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt"
loop
{
lastline := GetNewLine(FileCLog)
if lastline contains "^Enrique_Madrasso поймал\(а\) \{AFAFAF\}(.*)\{B00058\}, снял\(а\) с крючка и кинул\(а\) рыбу в мешок"
sleep 1s
SendInput, {F6} /fish{Enter}
}
}
return
GetNewLine(filename)
{
static old
static new
if !old
{
FileGetSize, old, %filename%
new := old
}
while old = new
{
sleep 100
FileGetSize, new, %filename%
}
old := new
Loop, read, %filename%
if A_LoopReadLine
{
last := A_LoopReadLine
}
return last
}
скомпилить не могу с ahk проблемы не тестил

Если не робит убери ковычки где то что надо найти активация при запуске сразу я просто сам не скомпилю ахк не робит + синтаксис забыл

Он тупо этим флудит /fish

Проще так:
Код:
SetTimer, huyznaet, 1
huyznaet:
    chat := trim(getChatLineEx())
    if(RegExMatch(chat, "^У " getUsername() " случилась поклевка, но") || RegExMatch(chat, "^" getUsername() " поймал"))
    {
        SetTimer, autofish, Off
        SetTimer, autofish, 1
    }
return
autofish:
SendInput, {f6}/fish{enter}
sleep, 440005623
return
Но я не пойму, он отключается сразу после первого раза, и больше не работает...
 
Последнее редактирование модератором:
Статус
В этой теме нельзя размещать новые ответы.