Серый форум — AHK: Объединить 2 скрипта

Re: AHK: Объединить 2 скрипта

null@example.com (__Михаил__) — Thu, 23 Jul 2020 20:38:56 +0000

teadrinker

В руках профессионала любой код можно сократить, чуть ли не до 2-3 строк...
Итак пытался сделать минимум, без лишних переменных и проверок. Но так как поторопился упустил такой вариант сокращения, ведь он очевиден.

Re: AHK: Объединить 2 скрипта

null@example.com (__Михаил__) — Thu, 23 Jul 2020 20:36:30 +0000

teadrinker

Это великий и ужасный код, неведомый обычному смертному кодеру.

Re: AHK: Объединить 2 скрипта

null@example.com (fgslm) — Thu, 23 Jul 2020 18:31:43 +0000

teadrinker пишет:

? 0 : 1

что обозначает?

Re: AHK: Объединить 2 скрипта

null@example.com (teadrinker) — Thu, 23 Jul 2020 18:30:37 +0000

__Михаил__ пишет:

If InStr(A_ThisHotkey, "E") ? 0 : 1

Довольно странная конструкция.

e::
t::
   while GetKeyState(A_ThisHotkey, "P")
      Send % A_ThisHotkey = "e" ? "8" : "{F11}"
   Return

Re: AHK: Объединить 2 скрипта

null@example.com (fgslm) — Thu, 23 Jul 2020 18:26:27 +0000

__Михаил__ пишет:

Flooo

E::
T::
Loop
{
 If not getkeystate(A_ThisHotkey,"p") ;Было бы неплохо, если бы вы после каждой строки оставляли пояснение
  Break

 If InStr(A_ThisHotkey, "E") ? 0 : 1 ;что именно происходит в той или иной строке/функции
 {
  Send, {F11} ; А то я тоже например, бы хотел использовать функцию "A_ThisHotkey" или др. в своих кодах
 }
 Else
 {
  Send, 8 ; Но вместо этого приходится лезть в справку и переворачиватьтонны текста чтобы найти внятное пояснение 
 }
} ;Хотябы небольшой функции
Return

Спасибо

Re: AHK: Объединить 2 скрипта

null@example.com (Flooo) — Thu, 23 Jul 2020 18:22:45 +0000

__Михаил__ ох, спасибо большое. Это просто идеально. И кнопки быстро спамятся и в include тоже вписывается хорошо

Re: AHK: Объединить 2 скрипта

null@example.com (__Михаил__) — Thu, 23 Jul 2020 17:58:00 +0000

Flooo

E::
T::
Loop
{
 If not getkeystate(A_ThisHotkey,"p")
  Break

 If InStr(A_ThisHotkey, "E") ? 0 : 1
 {
  Send, {F11}
 }
 Else
 {
  Send, 8
 }
}
Return

Re: AHK: Объединить 2 скрипта

null@example.com (Flooo) — Thu, 23 Jul 2020 17:40:35 +0000

__Михаил__ по отдельности они работают. Нажимаю e спамится 8. Нажиммаю t спамит F11.

То есть я запускаю 2 скрипта все время, чтобы они работали.
Теперь Я хочу запускать один обьединенный скрипт, чтобы он работал также как 2 скрипта одновременно.

Re: AHK: Объединить 2 скрипта

null@example.com (__Михаил__) — Thu, 23 Jul 2020 17:30:55 +0000

Не работает должным образом - нефиг копировать чужой код и глупо пытаться от него получить желаемого без должной правки.

Опишите что именно вы желаете получить от скрипта.

Re: AHK: Объединить 2 скрипта

null@example.com (Flooo) — Thu, 23 Jul 2020 17:26:11 +0000

__Михаил__ этот код я скопироавл откуда то, и поэтому сам незнаю что за "timer"
Мне здесь ясно только то, что надо Return и End удалить, чтобы работал в #include.(но код не спамит с должной скоростью)

Также пытался вписать всё в один скрипт, но как я вычитал там нужно форма кода:
Клавиша::
{
действие
}
Return

Почти получилось, но кнопка практически не спамится. Будто строки с указанием таймера не читаются

Re: AHK: Объединить 2 скрипта

null@example.com (__Михаил__) — Thu, 23 Jul 2020 17:11:28 +0000

Префикс языка укажите в шапке темы.

Метка timer дублируется, либо меняйте название, либо делайте определение текущей клавиши.

Кнопку End нужно оставить только одну.

AHK: Объединить 2 скрипта

null@example.com (Flooo) — Thu, 23 Jul 2020 17:03:23 +0000

Помогите, не получается обьединить 2 сценария. Пробывал через #include, но там выдает ошибки дупликатов. Удаляю дубликатные строки - скрипт не работает должным образом.
Здесь 2 одинаковых скрипта:
1

e::                  ; Change this button on other
settimer, timer, 1    ; запустить таймер каждые 80мс
return

timer:   ; таймер
If !GetKeyState("e", "P")   ; and here too
{
    settimer, timer, off   ; выключить таймер
    Return
}
send {8}  ;  this button will click many times if u pressing button
Return

End::Suspend

t::                  ; Change this button on other
settimer, timer, 1    ; запустить таймер каждые 80мс
return

timer:   ; таймер
If !GetKeyState("t", "P")   ; and here too
{
    settimer, timer, off   ; выключить таймер
    Return
}
send {F11}  ;  this button will click many times if u pressing button
Return

End::Suspend

Скрипт при зажатии клавиши e спамит цифру 8. Другой аналогично другую клавигу спамит.