Shortcuts.ahk

; Recommended for performance and compatibility with future AutoHotkey releases.
#NoEnv 

; Recommended for catching common errors.
#Warn  

; There's no reason to run this script more than once
#SingleInstance force

;; memo hotkey shortcuts
;; + shift
;; ^ Control
;; ! alt
;; # win

; Recommended for new scripts due to its superior speed and reliability.
SendMode Input 

; Ensures a consistent starting directory.
SetWorkingDir %A_ScriptDir%  

^#r::Run "c:\windows\System32\mstsc.exe", UserProfile
^#t::Run C:\Program Files\totalcmd\TOTALCMD.EXE return
^#e::Run C:\Program Files\Everything\Everything.exe return
^#c::Run E:\dev\utils\Console2\Console.exe return
^+~::Run E:\dev\utils\ProcessExplorer\procexp.exe
^#n::Run C:\Program Files\Notepad++\notepad++.exe
^#p::Run C:\Program Files\Paint.NET\PaintDotNet.exe
^#m::Run "mailto:"  ;create new email
^#F1::Run C:\WINDOWS\system32\rundll32.exe inetcpl.cpl`,ClearMyTracksByProcess 8 return ; (Deletes Temporary Internet Files Only)

;set current date to current input.
^!+d:: ; When you press Ctrl+Alt+Shift+D
    Clip0 = %ClipBoardAll% ; Store current clipboard in Clip0
    FormatTime, ClipBoard,, dd-MM-yyyy ; Set the clipboard to the current date
    Send ^v ; Simulate typing Ctrl-V (paste)
    Sleep 1000 ; Wait 1 second to ensure it's done
    ClipBoard = %Clip0% ; Set the clipboard back
    VarSetCapacity(Clip0, 0) ; Free memory by emptying Clip0
    Return ; End of hotkey
  
;;open sites
#g::Run www.google.nl 
#s::Run www.stackoverflow.com  

;;toggle show hidden files
^#h::
RegRead, HiddenFiles_Status, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden
If HiddenFiles_Status = 2 
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 1
Else 
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 2
WinGetClass, eh_Class,A
If (eh_Class = "#32770" OR A_OSVersion = "WIN_VISTA")
send, {F5}
Else PostMessage, 0x111, 28931,,, A
Return

;; show active windows class
+#q::
WinGetClass, class, A
	MsgBox, The active window's class is "%class%".
return

; Transparent
^!Space::WinSet, Transparent, 125, A
^!Space UP::WinSet, Transparent, OFF, A