Вопросы по AHK-скриптингу

[darksoor]

Ребят,помогите дополнить сркипт.Нужно туда вписать,дополнить NickName.Скрипт ниже.

F3::
sleep 500
File=%A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt
FileRead,read,%file%
RegExMatch(read, "\E(.*)\Q играет уже \E(.*)\Q минут. Всего за сегодня он играет: \E(.*)\Q минут", atime)
filedelete, %File%
fileappend,, %File%
SendMessage,0x50,,0x4190419,,A
Sendinput,{F6}/a С момента последнего захода: %atime2% минут.Всего за сегодня: %atime3% минут{enter}
return

Пример команды(в чате)

Помощники... Прежде чем помогать, вчитывайтесь в текст!

Решение твоей проблемы очень простое. Регулярное выражение в твоём случае выводит три переменные:

; atime1 - NickName
; atime2 - играет уже (кол-во минут)
; atime3 - наигранно за сегодня минут

Следовательно вставь в свой код переменную atime1:

F3::
sleep 500
File=%A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt
FileRead,read,%file%
RegExMatch(read, "\E(.*)\Q играет уже \E(.*)\Q минут. Всего за сегодня он играет: \E(.*)\Q минут", atime)
filedelete, %File%
fileappend,, %File%
SendMessage,0x50,,0x4190419,,A
Sendinput,{F6}/a %atime1% с момента последнего захода: %atime2% минут.Всего за сегодня: %atime3% минут{enter}
return

 

[Petya2282]

Спасибо,всё работает,но теперь ещё в чат пишется лишняя информация тапк сказать.А именно точное время когда я написал команду.Можно ли это как-то исправить ?

 

[#Rin]

Спасибо,всё работает,но теперь ещё в чат пишется лишняя информация тапк сказать.А именно точное время когда я написал команду.Можно ли это как-то исправить ?

/timestamp

 

[Petya2282]

/timestamp

НЕ помогло

 

[SergeyCheat]

НЕ помогло

Уверен? Других кмд нет. Мне кажется, ты ввел неправильно.

 

[darksoor]

/timestamp

Ринат, тебе лишь бы ответить? Я не пойму этого...
UPD: Не сразу понял твою мысль, извини за наезд)

Спасибо,всё работает,но теперь ещё в чат пишется лишняя информация тапк сказать.А именно точное время когда я написал команду.Можно ли это как-то исправить ?

Легко.. Всё дело в регулярном выражении. Держи код:

F3::
sleep 500
File=%A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt
FileRead,read,%file%
RegExMatch(read, "\[\d+\:\d+\:\d+\] \E(.*)\Q играет уже \E(\d+)\Q минут. Всего за сегодня он играет: \E(\d+)\Q минут", atime)
filedelete, %File%
fileappend,, %File%
SendMessage,0x50,,0x4190419,,A
Sendinput,{F6}/a %atime1% с момента последнего захода: %atime2% минут. Всего за сегодня: %atime3% минут{enter}
return

И почитай документацию по RegExMatch. Как будешь понимать регулярные выражения, сразу отпадут все вопросы.
Регулярки можно проверять на regex101.

 

[Petya2282]

Ринат, тебе лишь бы ответить? Я не пойму этого...
UPD: Не сразу понял твою мысль, извини за наезд)


Легко.. Всё дело в регулярном выражении. Держи код:

F3::
sleep 500
File=%A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt
FileRead,read,%file%
RegExMatch(read, "\[\d+\:\d+\:\d+\] \E(.*)\Q играет уже \E(\d+)\Q минут. Всего за сегодня он играет: \E(\d+)\Q минут", atime)
filedelete, %File%
fileappend,, %File%
SendMessage,0x50,,0x4190419,,A
Sendinput,{F6}/a %atime1% с момента последнего захода: %atime2% минут. Всего за сегодня: %atime3% минут{enter}
return

И почитай документацию по RegExMatch. Как будешь понимать регулярные выражения, сразу отпадут все вопросы.
Регулярки можно проверять на regex101.

Спасибо,теперь всё работает)

 

[Cod]

Как можно решить проблему?
Когда читаешь чат через память, после окончания скрипта по команде, если нажать энтер, не открыв перед этим чат, скрипт повторяться заново.

 

[darksoor]

Как можно решить проблему?
Когда читаешь чат через память, после окончания скрипта по команде, если нажать энтер, не открыв перед этим чат, скрипт повторяться заново.

Обнуляй переменную:

getChatLine(0, var)
; code
var := 0

А лучше предоставь код, тебе так быстрее поможем, так как у меня без обнуления все работает хорошо.

 

[Cod]

Обнуляй переменную:

getChatLine(0, var)
; code
var := 0

А лучше предоставь код, тебе так быстрее поможем, так как у меня без обнуления все работает хорошо.

Ты не так немного понял наверное,

$~Enter::
if (isInChat() && !isDialogOpen())
  Sleep 200
  dwAddress := dwSAMP + 0x12D8F8
  chatInput := readString(hGTA, dwAddress, 256)
  {
    if(chatInput == "/hello") {
        SendChat("Привет")
   }
}
return

Вот если после выполнения /hello, нажать энтер, "Привет" может отправиться ещё раз, без ввода команды.

 

[#Rin]

Ты не так немного понял наверное,

$~Enter::
if (isInChat() && !isDialogOpen())
  Sleep 200
  dwAddress := dwSAMP + 0x12D8F8
  chatInput := readString(hGTA, dwAddress, 256)
  {
    if(chatInput == "/hello") {
        SendChat("Привет")
   }
}
return

Вот если после выполнения /hello, нажать энтер, "Привет" может отправиться ещё раз, без ввода команды.

Стирай текст по этому адресу после обработки.

 

[Cod]

Стирай текст по этому адресу после обработки.

Получилось, спасибо.

 

[bh.cheat]

Как в строке переместить курсор в нужное место? {Left..} не подходит, т.к. текст разной длины может быть в чате. Нужно в конкретное место поставить курсор крч.

 

[Revalto]

Ты не так немного понял наверное,

$~Enter::
if (isInChat() && !isDialogOpen())
  Sleep 200
  dwAddress := dwSAMP + 0x12D8F8
  chatInput := readString(hGTA, dwAddress, 256)
  {
    if(chatInput == "/hello") {
        SendChat("Привет")
   }
}
return

Вот если после выполнения /hello, нажать энтер, "Привет" может отправиться ещё раз, без ввода команды.

Что за фигурные кавычки от переменной?

 

[#Rin]

Как в строке переместить курсор в нужное место? {Left..} не подходит, т.к. текст разной длины может быть в чате. Нужно в конкретное место поставить курсор крч.

Вычислять длину динамический.