You can use Autohotkey to do this. I do.I use the following shortcuts
which work system-wide not just in The Guide:
Alt-S to insert 2012-01-10-151147
Alt-D to insert 2012-01-10
Alt-T to insert 15:12
Ctrl-H to insert hyperlink from clipboard on selected text (this one
is sweet!)
IsTheGuide()
{
TheGuideWinClass := "Afx:00400000:b:000100"
WinGetClass, CurrentWinClass, A
WinGetTitle, CurrentWinTitle, A
If (InStr(CurrentWinClass, TheGuideWinClass) And
InStr(CurrentWinTitle, " - The Guide"))
Return 1
Return 0
}
#If IsTheGuide()
;Insert hyperlink
LButton & h::
SendInput {LButton Up} ;When using the mouse button as a hotkey, the
Insert Hyperlink dialogue won't pop up if the mouse button is still
being held down, so force it Up for it to work.
$^+h::
ControlGetFocus, FocusedControl, A
If (FocusedControl = "RICHEDIT50W1") ;Text editor area
If (InStr(Clipboard, ":\")) ;If clipboard contains a file path
SendInput ^+h{Tab 5}file://%Clipboard%{Tab}{Enter} ;Move to URL
field and paste clipboard contents
Else ;Normal hyperlink
SendInput ^+h{Tab 5}%Clipboard%{Tab}{Enter} ;Move to URL field and
paste clipboard contents
Else
SendInput ^+h
Return
I also have shortcuts to insert foreing characters, switch input
language (Chinese/English), etc. Do take a look at Autohotkey.