Atlas macros

atlas.ahk

; https://www.autohotkey.com/docs/Hotkeys.htm
; ^ = Control
; * = Wildcard: Fire the hotkey even if extra modifiers are being held down
; ~ = When the hotkey fires, its key's native function will not be blocked (hidden from the system)
; Click positions assume 1920x1080 resolution

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
#MaxThreadsPerHotkey 1
SetDefaultMouseSpeed 0

; Sprint Toggle
; Ctrl + F1
*^F1::
F1Toggle := !F1Toggle
If (F1Toggle) {
  Send, {lshift down}{w down}
} else {
  Send, {lshift up}{w up}
}
return

; Swim Toggle
; Ctrl + F2
*^F2::
F2Toggle := !F2Toggle
If (F2Toggle) {
  Send, {space down}{lshift down}{w down}
} else {
  Send, {space up}{lshift up}{w up}
}
return

; Attack toggle
*^F3::
F3Toggle := !F3Toggle
If (F3Toggle) {
  SetTimer, Click, 500
} else {
  SetTimer, Click, off
}
return

Click:
while F3Toggle
  click
return

; Open Inventory and Give All Items
; Ctrl + F4 
*^F4::
gosub GiveItems
return

; Ctrl + F5
; Open Inventory and Take All Items
*^F5::
Send F
Sleep, 1000
Click, 1880, 165
Sleep, 100
Send {Esc}
return

GiveItems:
Send F
Sleep, 1000
Click, 42, 180
Sleep, 500
Click, 800, 600
Sleep, 500
Send {Esc}
return

; Ctrl + F10
*^F10::
gosub gunpowder
return

*^F8::
gosub moarGrog
return

*^F9::
F9Toggle := !F9Toggle
If (F9Toggle) {
  SetTimer, SendE, 500
} else {
  SetTimer, SendE, off
}
return

SendE:
  ;MouseMove, 1243, 641
  send,e
return

;; Open Inventory and Give All Items Toggle
;; Ctrl + F8
;*^F8::
;F8Toggle := !F8Toggle
;If(F8Toggle) {
;  gosub GiveItems
;  SetTimer,GiveItems,5000,On
;} else {
;  SetTimer,GiveItems,off
;}
;return

DisableEverything:
Send, {lshift up}
Send, {space up}
F1Toggle := 0
F2Toggle := 0
F3Toggle := 0
F7Toggle := 0
F9Toggle := 0
F10Toggle := 0
SetTimer,Click,off
SetTimer,SendE,off
SetTimer,Popcorn,off
SetTimer,GiveItems,off
SetTimer,Grog,off
SetTimer,moarGrog,off
return

; Disable everything
; Ctrl + F6
*^F6::
Send, {w up}
gosub DisableEverything
return

; Pressing w moves forward and cancels macros
~w::
gosub DisableEverything
return

; Popcorn item under mouse cursor by bringing into character inventory then dropping
; Useful for emptying flags
; Ctrl + F7
*^F7::
F7Toggle := !F7Toggle 
If(F7Toggle) {
  MouseGetPos, xpos, ypos
  SetTimer,Popcorn,500,On
} else {
  SetTimer,Popcorn,off
}
return

; Popcorn
Popcorn:
MouseMove, xpos, ypos
Sleep 50
Loop, 10 {
  Send t
  Sleep 10
}
MouseMove, 250, 250
Sleep 50
Loop, 12 {
  MouseMove, 250, 250
  Sleep 5
  MouseGetPos, currentX, currentY
  if(currentX = 250) and (currentY = 250) {
    Send o
  }

  MouseMove, 350, 250
  Sleep 5
  MouseGetPos, currentX, currentY
  if(currentX = 350) and (currentY = 250) {
    Send o
  }

  MouseMove, 450, 250
  Sleep 5
  MouseGetPos, currentX, currentY
  if(currentX = 450) and (currentY = 250) {
    Send o
  }

  MouseMove, 550, 250
  Sleep 5
  MouseGetPos, currentX, currentY
  if(currentX = 550) and (currentY = 250) {
    Send o
  }

  MouseMove, 650, 250
  Sleep 5
  MouseGetPos, currentX, currentY
  if(currentX = 650) and (currentY = 250) {
    Send o
  }
}
Sleep 50
return

; Bind LAlt to nothing
LAlt::
return

; drop all
DropAll:
send,f
sleep,1000
click,1880,226
sleep,500
send,f
return

Grog:
Click, 1677, 119
sleep,100
send o
sleep,100
click, 1870, 161
sleep, 100
click, 33, 187
sleep, 100
mousemove, 1282, 220
sleep, 200
send, a
sleep, 200
return

moarGrog:
loop, 4 {
  send, f
  sleep, 1000
  gosub Grog
   send, f
  sleep, 1000
  send,{d down}
  sleep, 380
  send, {d  up}
}
return

gunpowder:
;1000 coal
click, 570,111
sleep, 100
send, {backspace}{backspace}{backspace}c
sleep,500
;click first inventory slot
click, 256, 222
sleep, 100
loop, 2 {
  send, {t down}
  sleep, 350
  send, {t up}
}

;2000 flint
click, 570,111
sleep, 100
send, {backspace}f
sleep,100
;click first inventory slot
click, 256, 222
sleep, 100
sleep, 250
loop, 4 {
  send, {t down}
  sleep, 350
  send, {t up}
}

;1000 gunpowder
click, 1243, 643
sleep, 250
loop, 10 {
  send, a
  sleep, 100
}
return

^!p::Pause