- 3
- 0
- Версия SA-MP
-
- 0.3.7-R2
- Любая
Переделайте это АХК чтобы на жалобы реагировало, для админки
numpad1::
{
FileDelete, %A_MyDocuments%%path%suspect.txt
sleep 50
Loop
{
Loop, read, %A_MyDocuments%%path%chatlog.txt, %A_MyDocuments%%path%suspect.txt
{
IfInString, A_LoopReadLine, ] Вопрос от , FileAppend, %A_LoopReadLine%`n
}
Loop, read, %A_MyDocuments%%path%suspect.txt
{
RegExMatch(A_LoopReadLine, "] Вопрос от (.*) ID ", suspectname)
RegExMatch(A_LoopReadLine, " ID (.*): ", suspectid)
}
NewStr := RegExReplace(suspectid, " ID (.*):", "$1")
sendinput {f6}/answ %NewStr%
Break
if SLES <> 0
{
SLES := 0
Break
}
}
sleep 1000
}
return
numpad1::
{
FileDelete, %A_MyDocuments%%path%suspect.txt
sleep 50
Loop
{
Loop, read, %A_MyDocuments%%path%chatlog.txt, %A_MyDocuments%%path%suspect.txt
{
IfInString, A_LoopReadLine, ] Вопрос от , FileAppend, %A_LoopReadLine%`n
}
Loop, read, %A_MyDocuments%%path%suspect.txt
{
RegExMatch(A_LoopReadLine, "] Вопрос от (.*) ID ", suspectname)
RegExMatch(A_LoopReadLine, " ID (.*): ", suspectid)
}
NewStr := RegExReplace(suspectid, " ID (.*):", "$1")
sendinput {f6}/answ %NewStr%
Break
if SLES <> 0
{
SLES := 0
Break
}
}
sleep 1000
}
return