;; 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_class MozillaWindowClass

!s::^k
^'::^g
F3::SendInput, !{Left}
F4::SendInput, !{Right}
F1::SendInput, {WheelUp}
F2::SendInput, {WheelDown}
!F1::
Loop, 5
	SendInput, {WheelUp}
return
!F2::
Loop, 5
	SendInput, {WheelDown}
return

#IfWinActive ahk_exe kompozer.exe

^q::SendInput, !vd ; design
^w::SendInput, !vs ; split
^e::SendInput, !vh ; source
^1::SendInput, !op1 ; heading 1
^2::SendInput, !op2
^3::SendInput, !op3
^4::SendInput, !op4
^5::SendInput, !op5
^6::SendInput, !op6
^p::SendInput, !opp ; paragraph
^+b::SendInput, !ost ; strong
^+i::SendInput, !ose ; emphasis
^+-::SendInput, !ozr ; smaller
^++::SendInput, !ozg ; smaller
^+c::SendInput, !oso ; code
^+t::SendInput, !osx ; tt
^h:: ; horizontal rule
SendInput, !ih
Sleep, 100
SendInput, <hr>{Tab}{Enter}
return

#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::
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::
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

; crop to 4:3
Numpad0::
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

#IfWinActive