1 Тема от radushev123 (изменено: radushev123, 2017-12-05 15:53:10)

  • radushev123
  • Участник
  • Неактивен

Тема: Помогите дописать скрипт

Помогите дополнить скрипт условием, если за определенный интервал времени действие не выполнено и LAlt не нажат то он сам зажимает кнопку W на секунду и жмет LAlt.

Start1:
TrayTip, Внимание, Игра развернеться через 5 секунд!
Sleep, 5000
WinActivate GTA:SA:MP
goto, start2
start2:
KeyWait, LAlt, D
Sleep, 1000
WinMinimize GTA:SA:MP
sleep, 1500
TrayTip,Внимание, Игра свернута занимайтесь своими делами!

Полный код

+ открыть спойлер
F1::
ButtonЗапустить:
Gui, Submit, NoHide
Msgbox, Бот включен, войдите в игру и нажмите F2 что бы остановить его.
#IfWinActive GTA:SA:MP
Gui, Submit, NoHide
goto, start1
Start1:
TrayTip, Внимание, Игра развернеться через 5 секунд!
Sleep, 5000
WinActivate GTA:SA:MP
goto, start2
start2:
KeyWait, LAlt, D
Sleep, 1000
WinMinimize GTA:SA:MP
sleep, 1500
TrayTip,Внимание, Игра свернута занимайтесь своими делами!
if time =
{
time = 650
}
if time2 =
{
time2 = 750
}
Random, Rand, %time%, %time2%
Timer1:=Rand
Goto, timer
timer:
if timer1>0
{
timer1:=timer1-1
GuiControl,, timer, %timer1%
sleep 1000
goto, timer
}
else
{
goto, Start1
}
GuiClose:
MsgBox, 4, AntiAFK, Вы точно хотите закрыть AntiAFK?
ifMsgBox Yes
ExitApp

2 Ответ от svoboden (изменено: svoboden, 2017-12-07 03:00:35)

  • svoboden
  • Заблокирован
  • Неактивен

Re: Помогите дописать скрипт

if A_ThisHotkey = Lalt

3 Ответ от radushev123

  • radushev123
  • Участник
  • Неактивен

Re: Помогите дописать скрипт

svoboden пишет:
if A_ThisHotkey = Lalt

это не очень описывает мою просьбу разве не вернее тогда:

if not GetKeyState("Lalt", "P")

но это все ровно не объяснение как написать условие 

если за определенный интервал времени действие не выполнено и LAlt не нажат то он сам зажимает кнопку W на секунду и жмет LAlt

4 Ответ от radushev123 (изменено: radushev123, 2017-12-07 13:16:10)

  • radushev123
  • Участник
  • Неактивен

Re: Помогите дописать скрипт

start2:

KeyWait, LAlt, D
Sleep, 12000
if not GetKeyState("Lalt", "P")
{
mod =
   SetTimer, Timer, -600
   KeyWait, RButton
   SetTimer, Timer, Off
   if !mod
      Send, {W}
   Return
   
Timer:
   mod = 1
   Send, {LAlt}
   WinMinimize GTA:SA:MP
   sleep, 1500
   TrayTip,Внимание, Игра свернута занимайтесь своими делами!
   Return
}

я думал о нечто подобном только оно ошибку выдает

5 Ответ от radushev123

  • radushev123
  • Участник
  • Неактивен

Re: Помогите дописать скрипт

Тему можно закрывать сам написал:

start2:
KeyWait, LAlt, D, T30
if ErrorLevel = 0
{
WinMinimize GTA:SA:MP  
sleep, 1500
TrayTip,Внимание, Игра свернута занимайтесь своими делами!
}
else
{
Random, var0, 1, 3
If var0=1
Key=W
If var0=2
Key=S
If var0=3
Key=D
Send, {%Key% Down}
Sleep, 300 
Send, {%Key% Up}
WinMinimize GTA:SA:MP
TrayTip,Внимание, Игра свернута занимайтесь своими делами!
}