Create QuickType.ahk

Author: ben-howard-postopmedia

SCRIPTS-UTIL/QuickType.ahk

@@ -0,0 +1,118 @@
+; AutoHotKey - QuickType (a Text Expander type-dealy)
+; by Ben Howard - [email protected]
+
+; You can customize this template by editing "C:\Windows\ShellNew\Template.ahk"
+;===============================================================================================
+; This Template.ahk file contains several of the most common items that I find myself often
+; needing or adding to my scripts. It's not all essential. Here's a short list of what's here:
+; - Function (CheckScriptUpdate) that will auto-reload the script when it detects a change
+;	in the last modified timestamp on the script file itself
+; - Sleep duration shortcuts - so that sleep times can be modified in one place to affect all
+; - Modifier Memory Helper - just a comment section to remind you of what the codes are for things
+;
+; See comments througout the file to figure out what something is here for.
+
+;===== START OF AUTO-EXECUTION SECTION =========================================================
+#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
+; #Warn  ; Enable warnings to assist with detecting common errors.
+SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
+SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
+; #Persistent ; Keeps script permanently running.
+#SingleInstance force ; Ensures that there is only a single instance of this script running.
+; SetTitleMatchMode, 2 ; sets title matching to search for "containing" instead of "exact"
+
+; The 2 lines below pertain to the 'reload on save' function below (CheckScriptUpdate).
+; They are required for it to work.
+FileGetTime ScriptStartModTime, %A_ScriptFullPath%
+SetTimer CheckScriptUpdate, 100, 0x7FFFFFFF ; 100 ms, highest priority
+
+;===== INITIALIZATION - VARIABLES ==============================================================
+; Sleep shortcuts - use these to standardize sleep times. Change here to change everywhere.
+sleepShort = 333
+sleepMedium = 666
+sleepLong = 1500
+sleepDeep = 3500
+
+splashScreenX = %1%
+splashScreenY = %2%
+splashScreenTimeout = %3%
+Location_currentSystemLocation = %4%
+
+;===== SPLASH SCREEN TO ANNOUNCE WHAT SCRIPT DOES ==============================================
+SplashTextOn, 600, 100, Launching %A_ScriptFullPath%, Expand text shortcuts.`nEdit this file to add/change shortcuts.
+WinMove, Launching %A_ScriptFullPath%, , %splashScreenX%, %splashScreenY%
+SetTimer, RemoveSplashScreen, %splashScreenTimeout%
+Sleep, sleepDeep
+SplashTextOff
+
+;===== END OF AUTO-EXECUTE =====================================================================
+;===== MODIFIER MEMORY HELPER ==================================================================
+; combine below with key and '::' to define hotkey
+; e.g.- ^f1::Msgbox You pressed Control and F1
+; #=Win | !=Alt | ^=Ctrl | +=Shift | &=combine keys | *=ignore other mods
+; <=use left mod key| >=use right mod key  | UP=fires on release
+
+;===== MAIN HOTKEY DEFINITIONS HERE ============================================================
+
+; The text expanding 'Hotsrings' are simple to format.
+; Just type them in this format:
+; ::shortcut::Text to type in place of shortcut
+; (This is documented in the AHK docs here - https://www.autohotkey.com/docs/Hotstrings.htm)
+
+::bp::buttonpusher
+::embp::[email protected]
+::empom::[email protected]
+
+
+
+::]ts:: ; <-- Send time & date as text
+FormatTime, now,, hh:mm tt
+today = %A_YYYY%-%A_MMM%-%A_DD%
+theTimeStamp = %now% - %today%
+Send, %theTimeStamp%
+return
+
+::]t:: ; <-- Send time ONLY as text
+FormatTime, now,, hh:mm tt
+theTimeStamp = %now%
+Send, %theTimeStamp%
+return
+
+::]d:: ; <-- Send date ONLY as text
+today = %A_YYYY%-%A_MMM%-%A_DD%
+theTimeStamp = %today%
+Send, %theTimeStamp%
+return
+;===== FUNCTIONS ===============================================================================
+RemoveSplashScreen:
+    SplashTextOff
+    SetTimer RemoveSplashScreen, Off
+return
+
+; use this function to Remove ToolTips - pretty self-explanatory
+RemoveToolTip(duration) {
+  SetTimer, ToolTipOff, %duration%
+  Return
+
+ToolTipOff:
+    ToolTip
+    return
+}
+
+; This function will auto-reload the script on save.
+CheckScriptUpdate() {
+    global ScriptStartModTime
+    FileGetTime curModTime, %A_ScriptFullPath%
+    If (curModTime <> ScriptStartModTime) {
+        Loop
+        {
+            reload
+            Sleep 300 ; ms
+            MsgBox 0x2, %A_ScriptName%, Reload failed. ; 0x2 = Abort/Retry/Ignore
+            IfMsgBox Abort
+                ExitApp
+            IfMsgBox Ignore
+                break
+        } ; loops reload on "Retry"
+    }
+}