Sea of Thieves multifunctioning AHK Script

[Vindeta]

Welcome everyone!

Today i will share with you a good AHK Script that can do alot of stuff and help you!

Spoiler: Download

You cant view this link please login.

/

You cant view this link please login.

Instruction how to use this:
1.Create a new enpty txt file on your desctop -------------Or just simply download ready file above
2.Copy and paste this code below
3.Save and add .ahk
4.Then launch Sea of Thieves
5.Right click on a something.ahk and choose run as a script (something like that)
to run this you need to have AHK [autohotkey.com]
6.Success!

Features:
AntiAFK
Crosshair
Crate Filler
Crate Emptier
Barrel Filler
Barrel Emptier

Controls:
F1 - Help Menu
F2 - Toggle Crosshair
F3 - Pause/Unpause Script
F4 - AntiAFK On/Off
F5 - Close the script

#NoEnv
#SingleInstance, Force
;Initial Settings
SetMouseDelay -1
WinTitleSOT := Sea of Thieves

; Vars
AFKMode := 0
HelpMenuActive := 0
invisible = 0

if not WinExist("Sea of Thieves")
{
    MsgBox Please start the game first.
    ExitApp
}

Gui, crosshair:new, -Caption +AlwaysOnTop +ToolWindow +LastFound
Gui, crosshair:Margin, 0, 0
Gui, crosshair:Font, cBA3035 S14 Q3
Gui, crosshair:Add, Text, BackgroundTrans vT1, +
Controlgetpos, , , picW, picH, ,
xPos := A_ScreenWidth/2 - picW/2
yPos := A_ScreenHeight/2 - picH/2
Gui crosshair:show, x%xPos% y%yPos% NA
Gui, crosshair:Color, 000000
WinSet, TransColor, 000000

Gui, Credits:new, -Caption +AlwaysOnTop +ToolWindow +LastFound
Gui, Credits:Margin, 0, 0
Gui, Credits:Font, cBA3035 S10 Q3 Bold, Arial
Gui, Credits:Add, Text, BackgroundTrans vT1, Credits: Ouizzy
yPos2 := A_ScreenHeight - 60
Gui Credits:show, x0 y%yPos2%
Gui, Credits:Color, 000000
WinSet, TransColor, 000000

Gui, AntiAFK:new, -Caption +AlwaysOnTop +ToolWindow +LastFound
Gui, AntiAFK:Margin, 0, 0
Gui, AntiAFK:Font, c000000 S20 Q3 Bold, Arial
Gui, AntiAFK:Add, Text, BackgroundTrans vT1, AntiAFK: ON
Controlgetpos, , , picW, picH, ,
xPos := A_ScreenWidth/2 - picW/2
yPos := A_ScreenHeight/2 - picH/2
Gui AntiAFK:show, x%xPos% y%yPos% NA
Gui, AntiAFK:Color, 000000
WinSet, TransColor, 000000

SetTimer, CheckForWindowed, 500
SetTimer, CheckForCursor, 500

SOTWasInactive = 0
SOTCursorInactive = 0

CheckForCursor:
    if WinActive("Sea of Thieves") and MouseIsOver("Sea of Thieves") and SOTWasInactive = 0
    {
        if not A_Cursor = "Unknown"
        {
            Gui, crosshair:Font, c000000 S14 Q3
            GuiControl, crosshair:Font, T1
            SOTCursorInactive = 1
            return
        }
        if SOTCursorInactive = 1
        {
            SOTCursorInactive = 0
            ToggleCrosshair(invisible -1)
        }
    }
return

MouseIsOver(WinTitle) {
    MouseGetPos,,, WinId
    WinGetTitle, WinTitle2, ahk_id %WinId%
    if(WinTitle = WinTitle2){
        Return true
    }
    else{
        Return false
    }
}

CheckForWindowed:
    Suspend Permit
    if WinActive("Sea of Thieves")
    {
        if SOTWasInactive = 1
        {
            Suspend Off
            SOTWasInactive = 0
            Gui, Credits:Font, cBA3035 S10 Q3 Bold
            GuiControl, Credits:Font, T1
            ToggleCrosshair(invisible - 1)
        }
        return
    }
    SOTWasInactive = 1
    Gui, crosshair:Font, c000000 S14 Q3
    GuiControl, crosshair:Font, T1
    Gui, Credits:Font, c000000 S10 Q3 Bold
    GuiControl, Credits:Font, T1
    Suspend On
return

^!r::Reload  ; Ctrl+Alt+R

Numpad1::
while (GetKeyState("Numpad1"))
{
    SendInput {E}
    Sleep 25
    SendInput {F}
    Sleep 25
}
SendInput {X}
return

Numpad2::
while (GetKeyState("Numpad2"))
{
    SendInput {Q}
    Sleep 25
    SendInput {F}
    Sleep 25
}
SendInput {X}
return

Numpad4::
while (GetKeyState("Numpad4"))
{
    SendInput {E}
    Sleep 25
    SendInput {R}
    Sleep 25
}
SendInput {X}
return

Numpad5::
while (GetKeyState("Numpad5"))
{
    SendInput {Q}
    Sleep 25
    SendInput {R}
    Sleep 25
}
SendInput {X}
return

;Help menu
F1::
if HelpMenuActive = 0
{
    SplashTextOn, 300, 200, Help Menu, F1 = Help`nF2 = Toggle Crosshair`nF3 = Pause the script`nF4 = Anti AFK`nF5 = Close the script`nNUM1 = Empty Barrel`nNUM2 = Fill Barrel`nNUM4 = Empty Storage Crate`nNUM5 = Fill Storage Crate`nCTRL+ALT+R = Reset the script
    WinMove, Help Menu,, 50, 50
    HelpMenuActive := 1
    return
}
HelpMenuActive := 0
SplashTextOff Help Menu
return

F2::
invisible := ToggleCrosshair(invisible)
return

ToggleCrosshair(invisible)
{
    if invisible = 0
    {
        inv = 1
        Gui, crosshair:Font, c000000 S14 Q3
        GuiControl, crosshair:Font, T1
    }
    Else
    {
        WinGetActiveTitle, Active
        inv = 0
        Gui, crosshair:Font, cBA3035 S14 Q3
        GuiControl, crosshair:Font, T1
    }
    return inv
}

F3::
Suspend, toggle

if A_IsSuspended = 0
{
    Soundset, -5
    SoundBeep , 225, 75
    SoundBeep , 500, 75
    Soundset, +5
    if WinActive("Sea of Thieves")
    {
        ToggleCrosshair(invisible -1)
        Gui Credits:Font, cBA3035 S14 Q3
        GuiControl Credits:Font, T1
    }
}
else
{
    Soundset, -5
    SoundBeep , 100, 75
    SoundBeep , 225, 75
    Soundset, +5
    Gui crosshair:Font, c000000 S14 Q3
    GuiControl crosshair:Font, T1
    Gui Credits:Font, c000000 S14 Q3
    GuiControl Credits:Font, T1
}

return


F4::
    if AFKMode = 0
    {
        Gui, crosshair:Font, c000000 S14 Q3
        GuiControl, crosshair:Font, T1
        Gui, AntiAFK:Font, cBA3035 S20 Q3
        GuiControl, AntiAFK:Font, T1
        SetTimer, AntiAFKMode, 30000
        AFKMode := 1
        return
    }
    Gui, crosshair:Font, cBA3035 S14 Q3
    GuiControl, crosshair:Font, T1
    Gui, AntiAFK:Font, c000000 S20 Q3
    GuiControl, AntiAFK:Font, T1
    AFKMode := 0
    SetTimer, AntiAFKMode, Off
return

AntiAFKMode()
{
    SendInput {LButton}
}

F5::
Suspend Permit
exitapp
return

 

[mainframe]