;; Program shortcuts ----------------------------------------------------------

;; -> body

#IfWinActive ahk_class Emacs

; RAlt::Alt

#IfWinActive ahk_class ConsoleWindowClass

!F4::WinClose, A

#IfWinActive ahk_exe WINWORD.EXE

XButton1::SendInput, +{F5} ; cycle cursor position backwards

#IfWinActive ahk_class Audition v1.5

+WheelUp::
Loop, 30
	SendInput, ^+{Left}
return

+WheelDown::
Loop, 30
	SendInput, ^+{Right}
return

#IfWinActive ahk_class EVERYTHING

WheelUp::Up
WheelDown::Down

#IfWinActive ahk_class SciTEWindow

F2::Gosub, TrayRebuild ; rebuild scripts.ahk

#IfWinActive ahk_exe firefox.exe ahk_class MozillaWindowClass

^'::^g

F1::SendInput, {WheelUp}
F2::SendInput, {WheelDown}
!F1::
Loop, 5
	SendInput, {WheelUp}
return
!F2::
Loop, 5
	SendInput, {WheelDown}
return

F3::SendInput, !{Left}
F4::SendInput, !{Right}

; No stylesheet
F8::SendInput, {Alt}{Right}{Right}{Down}{Down}{Down}{Down}{Right}{Enter}
; First stylesheet
F9::SendInput, {Alt}{Right}{Right}{Down}{Down}{Down}{Down}{Right}{Down}{Enter}

!F8::
SendInput, {LButton}{LButton}{LButton}^f
Sleep, 100
SendInput, {Alt}{Right}{Right}{Down}{Down}{Down}{Down}{Right}{Enter}
Sleep, 100
SendInput, ^g{Delete}{Escape}
return
!F9::
SendInput, {LButton}{LButton}{LButton}^f
Sleep, 100
SendInput, {Alt}{Right}{Right}{Down}{Down}{Down}{Down}{Right}{Down}{Enter}
Sleep, 100
SendInput, ^g{Delete}{Escape}
return

; Default window size
F10::WinMove, A,,,, 1211, 1118

#IfWinActive ahk_class KMeleon Browser Window

F3::SendInput, !{Left}
F4::SendInput, !{Right}
!F1::SendInput, {LAlt Up}{Up}
!F2::SendInput, {LAlt Up}{Down}
F1::
Loop, 5
	SendInput, {WheelUp}
return
F2::
Loop, 5
	SendInput, {WheelDown}
return

#IfWinActive ahk_class MediaPlayerClassicW

Esc::
WinGetPos, x, y, w, h
if (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
	SendInput, !{Enter}
return

~RShift:: ; show controls (including time remaining)
WinGetPos, x, y, w, h, A
if not (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
	return
MouseGetPos, mx, my
MouseMove, % A_ScreenWidth, % A_ScreenHeight, 0
KeyWait, RShift
MouseMove, % mx, % my, 0
return

~LShift:: ; show playlist
WinGetPos, x, y, w, h, A
MouseGetPos, mx, my
SendInput, {LCtrl Down}7{LCtrl Up}
if (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
	MouseMove, % A_ScreenWidth, 0, 0
KeyWait, LShift
MouseMove, % mx, % my, 0
SendInput, {LCtrl Down}7{LCtrl Up}
return

Numpad0:: ; crop to 4:3
SendInput, {Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}
return

#IfWinActive

#IfWinActive ahk_class Photoshop

MButton::
SendInput, {Space Down}{LButton Down}
KeyWait, MButton
SendInput, {Space Up}{LButton Up}
return

#If WinActive("ahk_class PuTTY") and Layout() = layouts.sv ; see tt.layout.ahk
+SC00D::SendInput, ``{Space}
+SC01B::SendInput, {^}{Space}
<^>!SC01B::SendInput, ~{Space}
#If

#IfWinActive