Может быть с точки зрения потребления памяти этот метод нельзя назвать оптимизированным, однако в отличии от других методов, этот я использовал постоянно, потому могу, так сказать, гарантировать его работоспособность. У меня ещё не возникала необходимость в более совершенных подходах, потому я и не искал способа оптимизировать данный метод.
Так любой способ будет работать, Вам говорят что есть более оптимальный, который тоже будет работать, но не так варварски кушать ресурсы.
Если переименовать - то это работает также, но лучше.
global path_log := A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt"
log := {str:"",find:0,num:0} , log.str := []
FileEncoding, CP0
Loop, read, %path_log%
log.str.Insert(A_LoopReadLine) ,log.num := A_Index
loop 30
if RegExMatch(log.str[log.num + 1 - A_Index],"\[(.*)\] \[(.*)\] (.*)\_(.*) \| Уровень\: (.*)", end_str) and (log.find:=log.num + 1 - A_Index)
break
if (end_str != "") {
msgbox, Уровень игрока: %end_str5%, ID: %end_str2%
} else {
msgbox, Строка не найдена
}F1::
{
SendMessage, 0x50,, 0x4190419,, A
SendInput, {F6}^{sc1E}Здравствуйте, меня зовут Cristopher Jonson, я ваш специалист по выдаче медицинских карт.{Enter}
Sleep, 1500
Send, {F6}Вам обновить или сделать новую медицинскую карту?{Enter}
Send, {F6}Введи up или new -{Space}
Input , idv, V, {enter}
Send, {F6}^{sc1E}
Sleep, 100
SendMessage, 0x50,, 0x4190419,, A
SendInput, {F6}^{sc1E}Отлично, не могли бы вы мне показать ваш паспорт.{Enter}
Sleep, 500
Send, {F6}/b /showpass ID передавать строго по Role Play{Enter}
Send, {F6}Введи айди игрока -{Space}
Input , id, V, {enter}
SendInput, {F6}^{sc1E}
Sleep, 1000
ChatLog = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt ; Путь к ЧатЛогу
FileDelete, %ChatLog% ; Удаляем ЧатЛог
SendInput, {F6}/id %id%{Enter} ; Пишем в чат
Loop
{
FileRead, Chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
RegExMatch(Chatlog, "\Q| Уровень:\E (.*)", out)
RegExMatch(out1, "[0-9]+", out2)
if (out2 > 0 and out2 <= 2){
dollars = 5000
FileDelete, ChatLog ; Удаляем ЧатЛог
goto, MyLabel1
}
FileRead, Chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
RegExMatch(Chatlog, "\Q| Уровень:\E (.*)", out) ; ищем в чат логе слово "Уровень"
RegExMatch(out1, "[0-9]+", out2) ; извлекаем число
if (out2 >= 3 and out2 <= 5){
dollars = 10000
FileDelete, ChatLog ; Удаляем ЧатЛог
Goto, MyLabel1
}
FileRead, Chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
RegExMatch(Chatlog, "\Q| Уровень:\E (.*)", out) ; ищем в чат логе слово "Уровень"
RegExMatch(out1, "[0-9]+", out2)
if (out2 >= 6 and out2 <= 10){
dollars = 15000
Send, {F6} %dollars%{Enter}
FileDelete, ChatLog ; Удаляем ЧатЛог
Sleep, 1000
Send, {F6} %dollars%{Enter}
}
FileRead, Chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
RegExMatch(Chatlog, "\Q| Уровень:\E (.*)", out) ; ищем в чат логе слово "Уровень"
RegExMatch(out1, "[0-9]+", out2) ; извлекаем число
if (out2 >= 11 and out2 <= 15){
dollars = 25000
FileDelete, ChatLog ; Удаляем ЧатЛог
Goto, MyLabel1
}
FileRead, Chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
RegExMatch(Chatlog, "\Q| Уровень:\E (.*)", out)
RegExMatch(out1, "[0-9]+", out2) ; извлекаем число
if (out2 >= 16 and out2 <= 20){
dollars = 35000
FileDelete, ChatLog ; Удаляем ЧатЛог
Goto, MyLabel1
}
FileRead, Chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\Chatlog.txt
RegExMatch(Chatlog, "\Q| Уровень:\E (.*)", out) ; ищем в чат логе слово "Уровень"
RegExMatch(out1, "[0-9]+", out2) ; извлекаем число
if (out2 > 20){
dollars = 50000
FileDelete, ChatLog ; Удаляем ЧатЛог
Goto, MyLabel1
}
MyLabel1:Когда я ввожу new или up в переменную в этой части скрипта,
Send, {F6}Введи up или new -{Space}
Input , idv, V, {enter}
Send, {F6}^{sc1E}
Sleep, 100то должно быть так, если ввести up, тогда для игроков 1-2 уровня (и для остальных уровней : 3-5, 6-10, 11-15, 16-20 и больше 20 переменная dollars умножается на 2 и выводится в метку MyLabel1.
MyLabel1:
Send, {F6}Медкарта вам обойдется в %dollars%Если ввести new, переменная dollars не умножается, просто остаётся указанным значением в функции RegExMath.
]]>