1mm.de#__hotkey-code_»numpad1::run http://1mm..de«

the code shown in the image requiers in the background
the open source program 4rtist.com/autohotkey.exe#_235kb (and a shortcut from this program in the StartUp folder for the permanent usage)
~24 Hotkeys: ins f1-f24 end numpadadd ins +..
~104² 2 digit shortcuts
~46³ 3 digit shortcuts xyz
Option for hotkeys + shortcuts: you can trigger more actions -_- but this requiers a 4 line syntax
1) numpad6::
2) run http://6de.de
3) run c:/unicode.txt
4) return
the easy understandable code » SCR1PT.tk

The 3 steps to test the functions:
1)Download to click the program
2)add script lines to the previously created sample script and save it
3) click again the program

Comments

finished
http://ShortCUTTER.tk#__(portable)_WIN_app__short:»»»1mm.de«««

1) highlight a url/path or text
2)[alt]+y or [alt] + x
3) modify "x & y"* or type an "abbreviation"
4) ok

* to
1) "up" "rctrl" ......
2) "lbutton & 1" "1 & space" " .."
3) "1 & m" "..."

it´s a one file app , this has the advantage that you can use it too on a stick

you can use the following shortcutter.tk code too for the test step

#singleinstance force

Menu,Tray,NoStandard
Menu,Tray,add,&EDIT the script with a double click on the H tray icon,EDIT
Menu,Tray,Default,&EDIT the script with a double click on the H tray icon
Menu,Tray,add,&shortCUTTER.tk -key names -help -tips , x+y
Menu,Tray,add,&exit,exit

return

exit:
exitapp

EDIT:
Run Notepad %A_ScriptFullPath%
Return

x+y: ; = tray menu link
run http://1mm.de#__or__shortCUTTER.tk
return

!y:: ; ALT + y shortcut for the urls/pathes
AutoTrim Off
ClipboardOld = %ClipboardAll%
Clipboard =
Send ^c
ClipWait 1
if ErrorLevel
return
StringReplace, 2keyshortcut, Clipboard, “, ““, All
StringReplace, 2keyshortcut, 2keyshortcut, `r`n, “r, All
StringReplace, 2keyshortcut, 2keyshortcut, `n, “r, All
StringReplace, 2keyshortcut, 2keyshortcut, %A_Tab%, “t, All
StringReplace, 2keyshortcut, 2keyshortcut, `;, “`;, All
Clipboard = %ClipboardOld%
SetTimer, MoveCaret1, 10
InputBox, 2keyshortcut,ShortCUTTER.tk New 2 key shortcut,change x y in the input box to a different key combination or to an non character key name*`rNOTE: you can combine all ~ 104 keyboard keys + the mouse keys`r`rHELP: Use the predefined shortcut x + y together to the shortCutter.tk#_site `r`rFor text replacements ( btw for by the way ) use the [alt]+[x] shortcut`r`r CTRL WIN + ALT shortcuts you can set up with an easier syntax ^x:: #x:: !x::`r`rby clicking the tray icon you can define more url´s + pathes @ the bottom of the script`r`r1st line key-name:: or ~x & y:: shortcut`r2nd line run url or path`r3rd line ” ” “`rlast line RETURN `r`r`r*Key names Rbutton Mbutton Lb. space ins bs esc end del home pgup pgdn up down left right F1-24 numpad1 numpadenter -sub -add -mult -div -dot rWIN rALT rCTRL PrintScreen CtrlBreak Pause ScrollLock Capslock NumLock,,650,440,,,,, ~x & y::run %2keyshortcut%
if ErrorLevel
return
IfInString, 2keyshortcut, ~x & y::run
{
MsgBox You didn’t changed the key names x & y . The shortcut has not been added.
return
}
FileAppend, `n%2keyshortcut%, %A_ScriptFullPath% ; Put a `n at the beginning in case file lacks a blank line at its end.
Reload
Sleep 200 ; If successful, the reload will close this instance during the Sleep, so the line below will never be reached.
MsgBox, 4,, The 2keyshortcut just added appears to be improperly formatted. Would you like to the script for editing? Note that you will find the code line at the bottom of the script.
IfMsgBox, Yes, Edit
return

MoveCaret1:
IfWinNotActive, New 2 key shortcut
return
Send {Home}{Right 2}
SetTimer, MoveCaret1, Off
return

!x:: ; Win+x shortcut
AutoTrim Off
ClipboardOld = %ClipboardAll%
Clipboard =
Send ^c
ClipWait 1
if ErrorLevel ; ClipWait timed out.
return
StringReplace, abbreviation, Clipboard, “, ““, All
StringReplace, abbreviation, abbreviation, `r`n, “r, All
StringReplace, abbreviation, abbreviation, `n, “r, All
StringReplace, abbreviation, abbreviation, %A_Tab%, “t, All
StringReplace, abbreviation, abbreviation, `;, “`;, All
Clipboard = %ClipboardOld%
SetTimer, MoveCaret, 10
InputBox, abbreviation, shortCUTTER.tk New abbreviation, Type your abbreviation at the default cursor position. You can also edit the replacement text if you wish.`n`nExample ::btw::by the way`n`n For linebrakes use “n `n`n With a different syntax you can trigger the text via one of ~25 keys i.e. “ins::SEND text”`n`n View SCR1PT.tk for other understandable code and k.1mm.de for a keylist`n`n If you intent to set up xyz+.. key shortcuts for pathes + url’s do it with the shortcutPAD.tk or in the script source`n`n Hint: Starting the following code line with :*: has the advantage that you can fire the replacement with the latest abbr. char. Otherwise ENTER or space is requiered,,650,340,,,,, ::`::%abbreviation%
if ErrorLevel
return
IfInString, abbreviation, ::::
{
MsgBox You didn’t provide an abbreviation. The abbreviation has not been added.
return
}
FileAppend, `n%abbreviation%, %A_ScriptFullPath%
Reload
Sleep 200 ; If successful, the reload will close this instance during the Sleep, so the line below will never be reached.
MsgBox, 4,, The abbreviation just added appears to be improperly formatted. Would you like to open the script for editing? Note that the bad abbreviation is at the bottom of the script.
IfMsgBox, Yes, Edit
return

MoveCaret:
IfWinNotActive, shortCUTTER.tk New abbreviation
return
Send {Home}{Right 2}
SetTimer, MoveCaret, Off
return

~x & y::run http://1mm.de#__or__shortcutter.tk

;code END

;CREDITS to Chris Mullet -_- founder of the AutoHotkey.com#_project_
;You can view his code with more ;comments as hotstring helper