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

kilpanta

kilpanta

Новичок
1
0
Помогите не кликает запускаю не кликает

#NoTrayIcon
#CommentFlag //
WinActivate Rage Multiplayer
Gui, Add, Button, x12 y9 w100 h30 gFishing , Hotkeys
Gui, Add, Button, x12 y49 w100 h30 gFAQ , FAQ
Gui, Add, Button, x292 y29 w120 h20 gDonate , Donate
Gui, Add, Button, x150 y15 w120 h25 gSpeed , Скорость кликера
Gui, Add, Button, x292 y9 w120 h20 gTelegram , Telegram
Gui, Add, Text, x372 y69 w250 h30 , GTA V Role Play
Gui, Show, w462 h100, GTA 5 RP Bot by Kadony
Gui, Color, 2e6b3c
return
F5:: Reload
F9:: Pause, Off
F8:: Pause, On
F7::
Loop{
if faster := 1
{
Label1:
BlockInput, SendAndMouse
SendInput, {sc17}
BlockInput, Default
sleep 500
PixelGetColor, color, 1580, 440, alt
Var1 = %color%
if ( Var1 = 0x2A68FC ) | ( Var1 = 0x1C5FFC ) | ( Var1 = 0x1C60FC ) | ( Var1 = 0x1C61FC )
{
SoundBeep, 750, 500
BlockInput, SendAndMouse
SendInput, {F8}
BlockInput, Default
Goto, Label1
}
BlockInput, SendAndMouse
Click Left 550,394 ,
sleep, 500
Click Left 550, 520,
BlockInput, Default
sleep, 1000
PixelGetColor, color, 786, 484, alt
Var1 = %color%
if ( Var1 = 0x221E1B )
{
sum:= 0
i:=1
while ( i < 7 )
{
ImageSearch, xp, yp, 895, 500, 922, 535, *170 %A_ScriptDir%\img\%i%.png
If ( xp > 0 )
{
sum:= sum + i
break
}
i++
}
i:=1
while ( i < 7 )
{
ImageSearch, xp, yp, 943, 500, 973, 535, *170 %A_ScriptDir%\img\%i%.png
If ( xp > 0 )
{
sum:= sum + i
break
}
i++
}
ImageSearch, xp, yp, 785, 550, 1140, 575, *170 %A_ScriptDir%\imgb\%sum%.png
If xp > 0
{
BlockInput, SendAndMouse
MouseMove, %xp%, %yp%
sleep, 2000
Click, %xp%, %yp%
BlockInput, Default
}
}
sleep, 10000
Label2:
 
Trapo

Trapo

Потрачен
167
45
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
kilpanta написал(а):
Помогите не кликает запускаю не кликает

#NoTrayIcon
#CommentFlag //
WinActivate Rage Multiplayer
Gui, Add, Button, x12 y9 w100 h30 gFishing , Hotkeys
Gui, Add, Button, x12 y49 w100 h30 gFAQ , FAQ
Gui, Add, Button, x292 y29 w120 h20 gDonate , Donate
Gui, Add, Button, x150 y15 w120 h25 gSpeed , Скорость кликера
Gui, Add, Button, x292 y9 w120 h20 gTelegram , Telegram
Gui, Add, Text, x372 y69 w250 h30 , GTA V Role Play
Gui, Show, w462 h100, GTA 5 RP Bot by Kadony
Gui, Color, 2e6b3c
return
F5:: Reload
F9:: Pause, Off
F8:: Pause, On
F7::
Loop{
if faster := 1
{
Label1:
BlockInput, SendAndMouse
SendInput, {sc17}
BlockInput, Default
sleep 500
PixelGetColor, color, 1580, 440, alt
Var1 = %color%
if ( Var1 = 0x2A68FC ) | ( Var1 = 0x1C5FFC ) | ( Var1 = 0x1C60FC ) | ( Var1 = 0x1C61FC )
{
SoundBeep, 750, 500
BlockInput, SendAndMouse
SendInput, {F8}
BlockInput, Default
Goto, Label1
}
BlockInput, SendAndMouse
Click Left 550,394 ,
sleep, 500
Click Left 550, 520,
BlockInput, Default
sleep, 1000
PixelGetColor, color, 786, 484, alt
Var1 = %color%
if ( Var1 = 0x221E1B )
{
sum:= 0
i:=1
while ( i < 7 )
{
ImageSearch, xp, yp, 895, 500, 922, 535, *170 %A_ScriptDir%\img\%i%.png
If ( xp > 0 )
{
sum:= sum + i
break
}
i++
}
i:=1
while ( i < 7 )
{
ImageSearch, xp, yp, 943, 500, 973, 535, *170 %A_ScriptDir%\img\%i%.png
If ( xp > 0 )
{
sum:= sum + i
break
}
i++
}
ImageSearch, xp, yp, 785, 550, 1140, 575, *170 %A_ScriptDir%\imgb\%sum%.png
If xp > 0
{
BlockInput, SendAndMouse
MouseMove, %xp%, %yp%
sleep, 2000
Click, %xp%, %yp%
BlockInput, Default
}
}
sleep, 10000
Label2:
Нажмите для раскрытия...
1605386297290.png
 
Darth_Vader

Darth_Vader

Новичок
2
0
Как сделать чтобы когда жал "q" все действия скрипта блокировались, а при повторном нажатие работали. Вставьте пожалуйста код паузы, в мой код, буду благодарен.
Код:

mouseXY(x,y)
{
DllCall("mouse_event",short,1,short,x,short,y,short,0,short,0)
}
*~$A::
while GetKeyState("A","P")
{
mouseXY(-50,0) ;Change this value to your preference
Sleep 1 ;Change this value to your preference
}
return
*~$D::
while GetKeyState("D","P")
{
mouseXY(50,0) ;Change this value to your preference
Sleep 1 ;Change this value to your preference
}
return
 
degrando

degrando

Известный
362
127
Darth_Vader написал(а):
Как сделать чтобы когда жал "q" все действия скрипта блокировались, а при повторном нажатие работали. Вставьте пожалуйста код паузы, в мой код, буду благодарен.
Код:

mouseXY(x,y)
{
DllCall("mouse_event",short,1,short,x,short,y,short,0,short,0)
}
*~$A::
while GetKeyState("A","P")
{
mouseXY(-50,0) ;Change this value to your preference
Sleep 1 ;Change this value to your preference
}
return
*~$D::
while GetKeyState("D","P")
{
mouseXY(50,0) ;Change this value to your preference
Sleep 1 ;Change this value to your preference
}
return
Нажмите для раскрытия...
AutoHotKey: 
q::
Pause
return
 
Trapo

Trapo

Потрачен
167
45
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Darth_Vader написал(а):
вставь в мой код, пожалуйста и отправь
Нажмите для раскрытия...
CODE: 
mouseXY(x,y)
{
DllCall("mouse_event",short,1,short,x,short,y,short,0,short,0)
}
*~$A::
while GetKeyState("A","P")
{
mouseXY(-50,0) ;Change this value to your preference
Sleep 1 ;Change this value to your preference
}
return
*~$D::
while GetKeyState("D","P")
{
mouseXY(50,0) ;Change this value to your preference
Sleep 1 ;Change this value to your preference
}
return

q::
Pause
return
 
vaddos

vaddos

Новичок
2
0
нужен код в GTA V rp чтобы бот бегал от точки до точки на плантации точки появляются в рандомном месте
 
oldbase

oldbase

Новичок
1
0
Помогите пожалуйста, суть в том чтобы скрипт определенное время. А именно 10 секунд нажимал клавишу Е потом остановился. Нашел код в интернете, но если активировать его он работает постоянно без остановки, но надо чтобы остановился. Меня return в конце на stop и end ничего не помогало.
E::
Label3:
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
Goto, Label3
^1::
KeyWait, E,
Return
 
У

Удалённый пользователь 411156

Гость
oldbase написал(а):
Помогите пожалуйста, суть в том чтобы скрипт определенное время. А именно 10 секунд нажимал клавишу Е потом остановился. Нашел код в интернете, но если активировать его он работает постоянно без остановки, но надо чтобы остановился. Меня return в конце на stop и end ничего не помогало.
E::
Label3:
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
sleep, 100
Send, {e}
Goto, Label3
^1::
KeyWait, E,
Return
Нажмите для раскрытия...
E::
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
send,{e}
sleep, 100
Return

Ты чё то реально мудренный код взял,лучше этот используй
 
iliyasyeskhatov

iliyasyeskhatov

Участник
89
6
Мне нужно сделать так, чтобы при нажатии на "Принять игрока" открылася 1-ый тип диалога, туда надо ввести ID и нажать enter. Потом пойдет РП отыгровка и автоматически напишется /invite ID. Можете написать данный скрипт, а я уже подстрою его под остальные строки. Желательно чтобы он был написан под udf, прикрепленный выше.

UDF https://github.com/Drygok/CRMP_UDF.git
1608365038265.png
 
chapo

chapo

🫡 В армии с 17.10.2023. В ЛС НЕ ОТВЕЧАЮ
Друг
8,769
11,213
как написать ахк, что бы при нажатии на "=" зажимались W т SHIFT, а при повторном нажатии что бы они отжимались?
 
Trapo

Trapo

Потрачен
167
45
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Chapо написал(а):
как написать ахк, что бы при нажатии на "=" зажимались W т SHIFT, а при повторном нажатии что бы они отжимались?
Нажмите для раскрытия...
CODE: 
vkBB::SetTimer, Cycle, % (IsStart:=!IsStart) ? 1:"Off"

Cycle:
   Send, {vkA0 Down} ; Shift
   Send, {vk57 Down} ; w
   SetKeyDelay, 1, 1
1:
   Send, {vkA0} ; Shift
   Send, {vk57} ; w
   Sleep, -1
   Goto, % IsStart ? "1":"2"
2:
   SetKeyDelay, 1, 1
   Send, {vkA0 Up} ; Shift
   Send, {vk57 Up} ; w
   Return
 
  • Нравится
Реакции: chapo
chapo

chapo

🫡 В армии с 17.10.2023. В ЛС НЕ ОТВЕЧАЮ
Друг
8,769
11,213
Trapo написал(а):
CODE: 
vkBB::SetTimer, Cycle, % (IsStart:=!IsStart) ? 1:"Off"

Cycle:
   Send, {vkA0 Down} ; Shift
   Send, {vk57 Down} ; w
   SetKeyDelay, 1, 1
1:
   Send, {vkA0} ; Shift
   Send, {vk57} ; w
   Sleep, -1
   Goto, % IsStart ? "1":"2"
2:
   SetKeyDelay, 1, 1
   Send, {vkA0 Up} ; Shift
   Send, {vk57 Up} ; w
   Return
Нажмите для раскрытия...
Мне надо, что бы клавиши зажимались до тех пор, пока я не нажму на = еще раз, а это просто их прокликивает
 
chapo

chapo

🫡 В армии с 17.10.2023. В ЛС НЕ ОТВЕЧАЮ
Друг
8,769
11,213
Кто может переписать это на ахк?
Lua: 
if wasKeyPressed(тут типо =) then
    if active then
        active = false
    else
        active = false
    end
end

if active then
    setVirtualKeyDown(тут w, true)
    setVirtualKeyDown(тут shift, true)
end
if not active then
    setVirtualKeyDown(тут w, false)
    setVirtualKeyDown(тут shift, false)
end
п.с просто нужен автобег для гта5
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. Revalto
    • Закрыта
    Гайд [AHK] Чтение чата
      • Нравится
    Ответы
    25
    Просмотры
    17K
    AutoHotKey
    Revalto
    Revalto
  2. meowprd
    Проверено Исполнитель LUA / WEB / AHK - Качественная разработка проектов
      • Нравится
      • Bug
    Ответы
    44
    Просмотры
    6K
    Работа и услуги
    #Tirack
    T
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    1K
    Общение
    ChromiusJ
    ChromiusJ
  4. Nehozit
    • Вопрос
    Anim
    Ответы
    2
    Просмотры
    675
    Вопросы
    Pizduk2277
    Pizduk2277
  5. SuperArs
    [AHK] [Arizona V] Авто игра на игровых автоматах
    Ответы
    0
    Просмотры
    1K
    Читы
    SuperArs
    SuperArs
Сверху Снизу