BattleBit AHK NoRecoil

cold visions · 26 Июл 2023

~~спиздил~~ позаимствовал с UC
пока что сам не тестил, не могу сказать норм оно или нет

Код:

#NoEnv
#SingleInstance force
#maxthreadsperhotkey 5
#InstallKeybdHook
#InstallMouseHook


SendMode Input
SetKeyDelay, 0
SetMouseDelay, 0

;SetWorkingDir %A_ScriptDir%
;ScriptName := A_ScriptName
;StringReplace, ScriptName, ScriptName, .ahk,, All
;StringReplace, ScriptName, ScriptName, .exe,, All

;-------------------------------------------------------------------------------
;    Vars
;-------------------------------------------------------------------------------

rpm = 5
NoRecoil = 1
enough = 1
period = 0
;xhair = 0


PixelUp = pgup
PixelDown = pgdn
PixelLeft = del
PixelRight = end
ToggleNoRecoil = Numpad2
DelayUp = Numpad8
DelayDown = Numpad7
PeriodUp =
PeriodDown =
LargeRecoilPreset = Numpad0
SmallRecoilPreset = Numpad1
MoveY = LButton


;-------------------------------------------------------------------------------
;    Hotkeys
;-------------------------------------------------------------------------------

Hotkey, ~*$%PixelLeft%, DoPixelLeft
Hotkey, ~*$%PixelRight%, DoPixelRight
Hotkey, ~*$%PixelUp%, DoPixelUp
Hotkey, ~*$%PixelDown%, DoPixelDown
HotKey, ~*$%ToggleNoRecoil%, DoToggleNoRecoil
HotKey, ~*$%DelayUp%, DoDelayUp
HotKey, ~*$%DelayDown%, DoDelayDown
HotKey, ~*$%PeriodUp%, DoPeriodUp
HotKey, ~*$%PeriodDown%, DoPeriodDown
HotKey, ~*$%LargeRecoilPreset%, GetFromINI
HotKey, ~*$%SmallRecoilPreset%, SaveToINI
HotKey, ~*$%MoveY%, DoMoveY


;-------------------------------------------------------------------------------
;    Functions
;-------------------------------------------------------------------------------


TipRPS(PopupText)
{
    Gui, Destroy
    Gui, +AlwaysOnTop +ToolWindow -SysMenu -Caption
    Gui, Color, 000000
    WinSet, Transparent, 100
    Gui, Font, s8, norm, Verdana
    Gui, Add, Text, x5 y5 c00ff00, %PopupText%
    Gui, Show, NoActivate X0 Y36
   
}


TipOn(PopupText)
{  
    Gui, Destroy
    Gui, +AlwaysOnTop +ToolWindow -SysMenu -Caption
    Gui, Color, 000000
    WinSet, Transparent, 100
    Gui, Font, s8, norm, Verdana
    Gui, Add, Text, x5 y5 c00ff00, %PopupText%
    Gui, Show, NoActivate X0 Y18
}

TipOff(PopupText)
{
    Gui, Destroy
    Gui, +AlwaysOnTop +ToolWindow -SysMenu -Caption
    Gui, Color, 000000
    WinSet, Transparent, 100
    Gui, Font, s8, norm, Verdana
    Gui, Add, Text, x5 y5 cff0000, %PopupText%
    Gui, Show, NoActivate X0 Y54
}


;-------------------------------------------------------------------------------
;    Hotkey labels
;-------------------------------------------------------------------------------

TipClear:
    loop
    {
        Gui, Destroy
        sleep 5000
    }
return

DoToggleNoRecoil:
    if NoRecoil < 1
    {
        NoRecoil += 1
        if NoRecoil = 1
        {
            SoundBeep, 800, 200
            TipOn("ON")
           
           
        }
    }
    else
    {
        NoRecoil := 0
        SoundBeep, 200, 100
        SoundBeep, 200, 100
        TipOff("OFF")
    }
    return

DoPixelLeft:
        if pixelx < 1000
                 pixelx += 1
        TipOn("Pixel X Is " pixelX)
        return

DoPixelRight:
        if pixelx > -1000
                 pixelx -= 1
        TipOn("Pixel X Is " pixelX)
        return

DoPixelUp:
    if pixely < 1000
        pixely += 1
    TipOn("Pixel Y Is " pixelY)
    return

DoPixelDown:
    if pixely > -1000
        pixely -= 1
    TipOn("Pixel Y Is " pixelY)
    return

DoDelayUp:
    if rpm > 100
        rpm -= 1
    TipRPS("RPM: " rpm "  " "RPS:"  f(rpm))
    return

DoDelayDown:
    if rpm < 100
        rpm += 1
    TipRPS("RPM: " rpm "  " "RPS:"  f(rpm) )
    return

DoPeriodUp:
    if period > 100
        period -= 100
    TipOn("PERIOD IS " period)
    return

DoPeriodDown:
    if period < 6000
        period += 100
    TipOn("PERIOD IS " period)
    return

GetFromINI:
{
InputBox, WeaponCall, WeaponCall, , Show, 200, 100
if ErrorLevel  
   
return

else
IniRead,pixely,%A_WorkingDir%\config.ini,%WeaponCall%,Y
IniRead,pixelx,%A_WorkingDir%\config.ini,%WeaponCall%,X
IniRead,rpm,%A_WorkingDir%\config.ini,%WeaponCall%,rpm
TipRPS(" Loaded!!    Weapon : " WeaponCall " " "Y : "pixely "  " "X : "pixelx "  "  "RPM : " rpm)
}
sleep 0
Gui, destroy
return
;put in name of weapon before write to INI, every preset can be saved seperate.

SaveToINI:  
{

InputBox, WeaponSend, WeaponSend, , Show, 200, 100,
if ErrorLevel  
   
return

else
IniWrite,%pixely%,%A_WorkingDir%\config.ini,%WeaponSend%,Y
IniWrite,%pixelx%,%A_WorkingDir%\config.ini,%WeaponSend%,X
IniWrite,%rpm%,%A_WorkingDir%\config.ini,%WeaponSend%,rpm
TipRPS(" Saved!!    Weapon :" WeaponSend " " "Y :" pixely "  " "X : " pixelx "  "  "RPM :" rpm)
}
sleep 0
Gui, Destroy
return




DoMoveY:
    if NoRecoil = 1  
        {
            xhair = 0
            enough = 0
            GetKeyState, state, LButton, P
            if state = U
                return
            sleep % f(rpm)
                loop
                {
                    GetKeyState, state2, LButton, P
                    if state2 = U
                        break
                    if enough = 1
                        break
                    DllCall("mouse_event", uint, 1, int, pixelx, int, pixely, uint, 0, int, 0)
                    f(n)
                    {
               
                       return Round(100/n/1)
                    }
                       sleep % f(rpm)  
                }
               
        }
    return

Page Up управляет тем, насколько сильно скрипт будет тянуть мышь вниз
Page Down управляет тем, насколько сильно скрипт будет тянуть мышь вверх
Delete управляет тем, насколько сильно скрипт будет тянуть мышь вправо
End управляет тем, насколько сильно скрипт тянет влево
Клавиша Numpad 2 включает и выключает скрипт.
Numpad 1 сохраняет настройки в .ini
Numpad 0 позволяет извлечь эти настройки из ini. Просто используйте соответствующие имена при сохранении и загрузке.

melihoff · 26 Июл 2023

Иду тестировать

cold visions · 26 Июл 2023

melihoff написал(а):
Иду тестировать

отпиши потом результат как оно тебе

melihoff · 26 Июл 2023

humansouls написал(а):
отпиши потом результат как оно тебе

Говно. Первое конечно, что бросается в глаза, мышку вниз тебе хуярит везде, чтобы поменять снаряжение нужно отключать бинды в трее винды.
Скрипт просто уводит мышку вниз либо вверх, зачем были добавлены значения выше 7 - хз. Если хотите с этим играть - pdown до значения 5-6 и всё.

intredie · 26 Июл 2023

melihoff написал(а):
что бросается в глаза, мышку вниз тебе хуярит везде, чтобы поменять снаряжение нужно отключать бинды в трее винды.

Клавиша Numpad 2 включает и выключает скрипт.