chtoto Topic is solved

Помощь в написании скриптов
NESIGMA_A_SIKMA

chtoto  Topic is solved

19 Mar 2024, 10:49

Code: Select all

#SingleInstance force

global NoClip
global WallHop

Gui +LastFound
hGui := WinExist()

Gui, Add, Button, x16 y112 w120 h23 gBtnOnAntiAFK, On
Gui, Add, Button, x16 y136 w120 h23 gBtnOffAntiAFK, Off
Gui, Font, s16
Gui, Add, Text, x32 y88 w120 h23 +0x200, Anti AFK
Gui, Font, s20
Gui, Add, Text, x208 y0 w201 h53 +0x200, LLLLLLLLL
Gui, Font, s16
Gui, Add, Text, x216 y88 w181 h23 +0x200, NoClip(Press LAlt)
Gui, Add, Button, x240 y112 w120 h23 gBtnOnNoClip, On
Gui, Add, Button, x240 y136 w120 h23 gBtnOffNoClip, Off
Gui, Font, s14
Gui, Add, Text, x432 y88 w194 h23 +0x200, WallHop(Press RCtrl)
Gui, Add, Button, x456 y112 w120 h23 gBtnOnWallHop, On
Gui, Add, Button, x456 y136 w120 h23 gBtnOffWallHop, Off
Gui, Show, w620 h420, Lol

OnExit, ExitApp

BtnOnWallHop:
    SetTimer, PressKeys, 500
return

BtnOffWallHop:
    SetTimer, PressKeys, Off
return

BtnOnNoClip:
    NoClip := true
    if NoClip {
        Hotkey, Alt, spin, On
    }
return

BtnOffNoClip:
    NoClip := false
    Hotkey, Alt, Off ; Remove Alt hotkey when NoClip is turned off
return

BtnOnAntiAFK:
    SetTimer, PressKeys, 500
return

BtnOffAntiAFK:
    SetTimer, PressKeys, Off
return

PressKeys:
    SendInput, {W down}
    Sleep, 500
    SendInput, {W up}

    SendInput, {A down}
    Sleep, 500
    SendInput, {A up}

    SendInput, {S down}
    Sleep, 500
    SendInput, {S up}

    SendInput, {D down}
    Sleep, 500
    SendInput, {D up}
return

spin(amount, speed, durationMS) {
    end := A_TickCount + durationMS
    While A_TickCount < end {
        MouseMove, amount, 0, speed, R ; 0 = fastest, 100 = slowest
    }
}
Я не могу исправить код чтобы он работал
Last edited by joedf on 19 Mar 2024, 10:52, edited 1 time in total.
Reason: fix [code] tags

Return to “Помощь”

Who is online

Users browsing this forum: No registered users and 93 guests