[Помощь] Знающие люди. Замена кнопки - Форум Cheat-Master.ru

  • Страница 1 из 1
  • 1
Модератор форума: tumkin, Junger  
Форум » Программирование » AHK Программирование » [Помощь] Знающие люди. Замена кнопки
[Помощь] Знающие люди. Замена кнопки
MaskeranoДата: Понедельник, 19.09.2016, 16:39 | Сообщение # 1
Новичок
Группа: Пользователи
Сообщений: 9
Статус: Offline
Уважаемые форумчане. Что то я совсем запутался. Прошу у вас помощи.
Есть Код:
Код
delete::
Loop
{
SendMessage, 0x50,, 0x4190419,, A
Wordes = (warn|kick|ban|jail|offban|offwarn|skin|unwarn|unjail|testahk)
FileRead, Str, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
StringReplace, Str, Str, `r`n, `n, 1
StringReplace, Str, Str, `r, `n, 1
RegExMatch("`n" Str "`n" , "i).*\n\[\d+:\d+:\d+]\s*\[A]\s(.).*_(.*)\[.*?]:\s*(/`*" Wordes "\s.*?)\n", Match)
StringReplace, Match3, Match3, +, {ASC 0043} , 1
StringReplace, Match3, Match3, !, {ASC 0033} , 1
FileAppend,%Match3% By %Match1%%Match2%`n,logachat.ini
Sleep 100
SendInput,{BS 50}{F6}%Match3% | %Match1%. %Match2%{space} {enter}
FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
Return
}


Вопрос: Посоветуйте как заменить delete:: , на автовыдачу, т.е не надо будет нажимать делит , а сам будет реагировать и выдавать варны кики и тд...
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
shamanchik9991Дата: Понедельник, 19.09.2016, 18:09 | Сообщение # 2
Любитель
Группа: Пользователи
Сообщений: 32
Статус: Offline
Лучше не делать на автомате, ибо если будет слив, ты там всех перебанишь
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
MaskeranoДата: Понедельник, 19.09.2016, 18:18 | Сообщение # 3
Новичок
Группа: Пользователи
Сообщений: 9
Статус: Offline
Цитата shamanchik9991 ()
Лучше не делать на автомате

Вот решил пока так сделать.
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
MrGProДата: Понедельник, 19.09.2016, 18:42 | Сообщение # 4
Боец
Группа: Пользователи
Сообщений: 125
Статус: Offline
delete - код кнопки или (название), :: - определяет что это кнопка
При нажатии на кнопку выполняется всё что ниже
Loop - это цикл "петля" (повторяет действие {...code...} 'n раз (Null - бесконечно, 25 - 25 раз)
Return - заканчивает цикл действия (скрипт дальше ничего не делает),кто не читает док ahk лепят его везде
Null - Пустое значение аналог if (steam ="")

Обычный Цикл: Действия
Код
start:
{
.... code ....
}
return


Пример цикла бесконечной петли
Код
#SingleInstance force

F2:: ; запускает скрипт по нажатию кнопки чтобы отключить такую активацию  удали (F2:: и 1й return после кода)
Loop ; Null петля - бесконечная петля
{
    if a_index = 5 ; количество выполненых повторов
    {
  MsgBox,,Статус петли, Выполнено %a_index% задано 5 раз и остановлена #1
  break
    }
    MsgBox,,Статус петли, Выполнено %a_index% задано 5 раз ; просто для показа цикла  петли
}
MsgBox,,Статус петли, Действие после петли ;то что появится после выполнения остановки loop
return ; скрипт дальше ничего не делает -> Удали return и посмотри что будет

Delete:
MsgBox,,Скрипт, Вы не указали return выше скрипт выполняет действие дальше
return

DeleteX:
MsgBox,,Скрипт, Вы указали return выше скрипт не выполняет действие дальше
return


Пример цикла петли по количествам повтора
Код
#SingleInstance force

F2:: ; запускает скрипт по нажатию кнопки чтобы отключить такую активацию  удали (F2:: и 1й return после кода)
Loop, 15 ; 15 - петля которая будет повторяться 15 раз
{
    MsgBox,,Статус петли, Выполнено %a_index% задано 15 раз ; просто для показа цикла  петли
}
MsgBox,,Статус петли, Действие после петли ;то что появится после выполнения остановки loop
return ; скрипт дальше ничего не делает -> Удали return и посмотри что будет

Delete:
MsgBox,,Скрипт, Вы не указали return выше скрипт выполняет действие дальше
return

DeleteX:
MsgBox,,Скрипт, Вы указали return выше скрипт не выполняет действие дальше
return


P.S: >>> Для ознакомления: Нажми на меня


Тебе помогли не забывай про благодарность >> тыкни репутацию
--------------------------------------------------------------------------------------------


Сообщение отредактировал MrGPro - Понедельник, 19.09.2016, 19:07
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
MaskeranoДата: Понедельник, 19.09.2016, 19:23 | Сообщение # 5
Новичок
Группа: Пользователи
Сообщений: 9
Статус: Offline
Цитата MrGPro ()
Пример цикла бесконечной петли

Как я понял , так. правильно ?
Код

#SingleInstance force
Start:
Loop
{
SendMessage, 0x50,, 0x4190419,, A
Wordes = (warn|kick|ban|jail|offban|offwarn|skin|unwarn|unjail|testahk)
FileRead, Str, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
StringReplace, Str, Str, `r`n, `n, 1
StringReplace, Str, Str, `r, `n, 1
RegExMatch("`n" Str "`n" , "i).*\n\[\d+:\d+:\d+]\s*\[A]\s(.).*_(.*)\[.*?]:\s*(/`*" Wordes "\s.*?)\n", Match)
StringReplace, Match3, Match3, +, {ASC 0043} , 1
StringReplace, Match3, Match3, !, {ASC 0033} , 1
FileAppend,%Match3% By %Match1%%Match2%`n,logachat.ini
Sleep 100
SendInput,{BS 50}{F6}%Match3% | %Match1%. %Match2%{space} {enter}
FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
Return
}


Сообщение отредактировал Maskerano - Понедельник, 19.09.2016, 19:59
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
MrGProДата: Понедельник, 19.09.2016, 20:13 | Сообщение # 6
Боец
Группа: Пользователи
Сообщений: 125
Статус: Offline
Maskerano, Return - заканчивает цикл действия (скрипт дальше ничего не делает)

Смотри return заканчивает действие и скрип дальше ничего не делает так сказать переходит в режим ожидания просто не выполняет ни каких действий в loop он не уместен, чтобы сработала функция типа

Код
start:
ваш код
return


нужно поместить в самое начало скрипта если нужно чтобы он запускался с другим цыклом используй SetTimer, time, on/off


Тебе помогли не забывай про благодарность >> тыкни репутацию
--------------------------------------------------------------------------------------------
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
MaskeranoДата: Понедельник, 19.09.2016, 21:42 | Сообщение # 7
Новичок
Группа: Пользователи
Сообщений: 9
Статус: Offline
Цитата MrGPro ()
чтобы сработала функция

Return - С этим я понял. Что бы повторялся код ставлю "Loop [Повторяет участок кода несколько раз]"
или While-Loop- [Повторяет участок кода пока условие не выполнится]
Код
#SingleInstance force
F2::
Start:
{
SendMessage, 0x50,, 0x4190419,, A
Wordes = (warn|kick|ban|jail|offban|offwarn|skin|unwarn|unjail|testahk)
FileRead, Str, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
StringReplace, Str, Str, `r`n, `n, 1
StringReplace, Str, Str, `r, `n, 1
RegExMatch("`n" Str "`n" , "i).*\n\[\d+:\d+:\d+]\s*\[A]\s(.).*_(.*)\[.*?]:\s*(/`*" Wordes "\s.*?)\n", Match)
StringReplace, Match3, Match3, +, {ASC 0043} , 1
StringReplace, Match3, Match3, !, {ASC 0033} , 1
FileAppend,%Match3% By %Match1%%Match2%`n,logachat.ini
Sleep 100
SendInput,{BS 50}{F6}%Match3% | %Match1%. %Match2%{space} {enter}
FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
{
Loop ; <----- Именно вот тут
}
}
, выдает ошибку кода.


Сообщение отредактировал Maskerano - Понедельник, 19.09.2016, 21:43
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
MrGProДата: Вторник, 20.09.2016, 00:51 | Сообщение # 8
Боец
Группа: Пользователи
Сообщений: 125
Статус: Offline
Maskerano, Слушай я рассмотрел твой код подробней, если не добавить проверки if то скажу честно что ничего хорошего не выйдет. В коде проблемные строки описаны комментами. Если можно скинь примеры строк чат-лога на которое должен реагировать скрипт.

Код
F2::
SendInput, {F6} test ключено{enter}
goto, start
return

Start:
FileGetSize, NowSize, C:\GTA San Andreas User Files\SAMP\chatlog.txt
Loop
{
    SendMessage, 0x50,, 0x4190419,, A
    FileGetSize, LastSize, C:\GTA San Andreas User Files\SAMP\chatlog.txt
    if (NowSize < LastSize)
    {
  NowSize := LastSize
  FileRead, Str, C:\GTA San Andreas User Files\SAMP\chatlog.txt
  Wordes = (warn|kick|ban|jail|offban|offwarn|skin|unwarn|unjail|testahk)
  StringReplace, Str, Str, `r`n, `n,
  StringReplace, Str, Str, `r, `n,
  RegExMatch("`n" Str "`n" , "i).*\n\[\d+:\d+:\d+]\s*\[A]\s(.).*_(.*)\[.*?]:\s*(/`*" Wordes "\s.*?)\n", Match)
  StringReplace, Match3, Match3, +, {ASC 0043} , 1
  StringReplace, Match3, Match3, !, {ASC 0033} , 1
  FileAppend, %Match3% By %Match1%%Match2%`n, logachat.ini ; постоянно будет добавлять строки в файл без остановки
  Sleep 100
  SendInput,{BS 50}{F6}%Match3% | %Match1%. %Match2%{space} {enter} ; постоянно будет херачить в чат без остановки
  FileDelete,%A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt ; постоянно будет удалять лог чата
    }
}
return


Добавлено (20.09.2016, 00:51)
---------------------------------------------
Цитата Maskerano ()
{
Loop ; <----- Именно вот тут
}
}
, выдает ошибку кода.


Если есть { то должна быть и } - всегда закрывай скобки либо будет ошибка
Код
loop, 23
{ - эта скобка показывает что это начало кода
- код
} - эта скобка показывает что это конец кода


В основном ее использует в коде где много строк и проверок так
Код

;------------------------------------------ одно строчный код -------------------------------------
If fantik = 1
   fantki = luser
else
   fantik = noob
;------------------------------------------ много строчный код -------------------------------------
If (fantik = 1)
{
   if (noobka = 1 or noobka = 10)
   {
     goto, start
   }
   else
   {
     goto, run
   }
}
else
{
fantki = noobka
}


Тебе помогли не забывай про благодарность >> тыкни репутацию
--------------------------------------------------------------------------------------------


Сообщение отредактировал MrGPro - Вторник, 20.09.2016, 00:57
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
MaskeranoДата: Вторник, 20.09.2016, 08:34 | Сообщение # 9
Новичок
Группа: Пользователи
Сообщений: 9
Статус: Offline
Цитата MrGPro ()
Если можно скинь примеры строк чат-лога на которое должен реагировать скрипт


В чатлоге : [12:28:10] [A] Santi_Maskerano[0]: /mute 0 1 Мат
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Форум » Программирование » AHK Программирование » [Помощь] Знающие люди. Замена кнопки
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
Отдаю даром все баззы сти... [serega73]

ТАКТИКА СТАВОК НА ФУТБОЛ!... [[CM]Drunya]

ПИАР CHEAT-MASTER [1-ЫЙ В... [Franz[CM]]

Куплю вирты месса arizona... [adwdwawad3222]

Аккаунт Instagram 6к подп... [cashmoney]

Раздача аккаунтов Вконтак... [serega73]

Diamond RP БОТ СТРОИТЕЛЯ [XaXbIch]

●●●СКУПКА/ПРОДАЖА ВИРТОВ●... [Киндер_Сюрприз]

❗ DRP | ПРОДАЖА/ПОКУ... [Filkovskiy]

☔▲▲▲▲▲ ✭ [Samp-Rp]✭▲▲▲▲▲☔... [4utak_ot_boga]

Раздача аккаунтов на SRP/... [shepel]

Недоработка (баг) в систе... [Drygok]

[1]>[0.3z][RUS] S0beit modified by MishaN [10001]

[2]>Курилка [10000]

[3]>Поиск CLEO скриптов | Вопросы по клео скриптам [9988]

[4]>Флудильная [9936]

[5]>Курилка [9688]

[6]>Курилка [9614]

[7]>RakBot - Качай аккаунты не напрягаясь! [9602]

[8]>Общение читеров [CM] [9546]

[9]>S0beit - pr9n project for samp 0.3.7 [9490]

[10]>Часто задаваемые вопросы... [8223]

[11]>Скуплю Advance по 300р за 1кк и DIamond по 250р [7624]

[12]>Вопросы и ответы [6466]

[1]>АК_47 [31166]

[2]>GеNius [7073]

[3]>romka619 [5403]

[4]>[CM]Russel [5211]

[5]>[CM]AGRESSOR [4653]

[6]>Сэс [4430]

[7]>Snake_Firm [4381]

[8]>Artem_Buero [4182]

[9]>[CM]Durman [3271]

[10]>sky_Woker [2997]

[11]>iMaddy [2867]

[12]>[CM]Рафаэль [2768]

[13]>Sa1nteD [2692]

[14]>Ch0c0Cube [2453]

[15]>BY [2343]

yura1233 [23.05.2018|19:45]

MbО[4] [23.05.2018|19:44]

Kbvskb[555q0] [23.05.2018|19:33]

reupload [23.05.2018|19:24]

SemperFi [23.05.2018|19:15]

KOGAL [23.05.2018|19:14]

Bms[q55q2] [23.05.2018|19:13]

FalurFa [23.05.2018|19:07]

YzkizPower [23.05.2018|19:02]

STem17 [23.05.2018|19:00]

Lnbbs010a [23.05.2018|18:56]

kasper1968 [23.05.2018|18:47]

rustamus_03 [23.05.2018|18:31]

mkozachenko [23.05.2018|18:25]

VoidQQ [23.05.2018|18:21]


CM Team © 2009-2018 Администрация не несёт ответственности за размещённые материалы. Условия пользования
Все материалы предоставлены в ознакомительных целях и администрация предлагает удалить их после ознакомления.

Положение о защите персональных данных на сайте, Пользовательское соглашение, Договор оказания услуг.