Skip to content

Instantly share code, notes, and snippets.

@swyxio
Last active December 7, 2021 10:37
Show Gist options
  • Save swyxio/52e63f2e9b9faf6520d15309e2f06dfe to your computer and use it in GitHub Desktop.
Save swyxio/52e63f2e9b9faf6520d15309e2f06dfe to your computer and use it in GitHub Desktop.
swyx's autohotkey circa 2014. i used this thing extensively from 2010-2014. In one case it was at least responsible for automating away part of my own job.
Settitlematchmode, 2
F12::
winmove, A,, 1,1,600,600
return
#IfWinActive, Microsoft Word
::sigma::
;Send {Backspace 1}
Send {Alt}JE
Sleep 300
Send Q
Sleep 300
Click 62, 7
Sleep 300
Click 65, 42
Sleep 300
Click 45, 83
return
::beta::
;Send {Backspace 1}
Send {Alt}JE
Sleep 300
Send Q
Sleep 300
Click 62, 7
Sleep 300
Click 65, 42
Sleep 300
Click 45, 48
return
::squared::
;Send {Backspace 1}
Send {Shiftdown}{left}{Shiftup}{Alt}JE
Sleep 300
Send S
Sleep 300
Click 43, 68
Send {Right 2}2
return
::X2::
;Send {Backspace 1}
Send X{Shiftdown}{left}{Shiftup}{Alt}JE
Sleep 300
Send S
Sleep 300
Click 125, 70
Sleep 300
Send {Right 2}2{Right}
return
::X1::
;Send {Backspace 1}
Send X{Shiftdown}{left}{Shiftup}{Alt}JE
Sleep 300
Send S
Sleep 300
Click 125, 70
Sleep 300
Send {Right 2}1{Right}
return
::swyxhat::
;Send {Backspace 1}
Send {Shiftdown}{left}{Shiftup}{Alt}JE
Sleep 300
Send a
Sleep 300
Click 197, 43
Send {Right 2}
return
#IfWinActive
#c::Run calc.exe
#g::
inputbox, inputstring, Enter Search Terms, use quotes for phrases.
if Errorlevel=0
{
Stringleft, checkfirstletter, inputstring, 1
StringReplace, searchstring, inputstring, %A_SPACE%,+,All
if checkfirstletter="
{
StringRight, checklastletter, inputstring, 1
if checklastletter="
junk := "%22"
StringReplace, searchstring, searchstring, ", %junk%, All
}
Run chrome.exe http://www.google.com/search?q=%searchstring%
}
return
#d::Run C:\Documents and Settings\Work\Desktop
#u::Run C:\Users\Play\Desktop
#ifwinactive ahk_class Chrome_WidgetWin_0
$^w::Send ^w
#ifwinactive ahk_class Chrome_WidgetWin_1
$^w::Send ^w
#ifwinactive ahk_class XLMAIN
$^w::Send ^w
#ifwinactive ahk_class SunAwtFrame
$^w::Send ^w
#ifwinactive
^w::winclose, A
#ifwinactive AutoHotkey.ahk
Ins::
Send ^s
Reload
return
#ifwinactive
Ins::Run notepad.exe C:\Users\Work\Documents\AutoHotkey.ahk
#f::Run chrome.exe http://finance.google.com/
#n::
Send, {Tab}{CtrlDown}c{CtrlUp}
SetWorkingDir C:\Documents and Settings\1408510\Desktop
FileCreateDir, %clipboard%\New Swyx Folder\
Sleep 1500
Send, {Tab}{End}
return
!Up::WinMaximize, A
!Down::WinRestore, A
@swyxio
Copy link
Author

swyxio commented Dec 7, 2021

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
OSZAR »