Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Opt("SendKeyDelay", 0)
- ; Made with a belgian AZERTY keyboard in mind. Change hotkeys as desired.
- HotKeySet("µ", SendCodeTag) ;Replace µ with the key you want replaced by a single `
- HotKeySet("ù", SendEmHyphen) ;Replace ù with the key you want replaced by a — (em hyphen)
- HotKeySet("é", SendVector) ;Replace é with the Vector3 representation
- HotKeySet("²", SendCodeBlock) ;Replace ² with a code block
- HotKeySet("$", SendSurroundWithImageTag) ;Replace $ with an image tag surround
- HotKeySet("à", SendRightArrow); ;Replace à with an image tag surround
- ;HotKeySet("x", SendQuickPasteSaveClose)
- While 1
- Sleep(50)
- WEnd
- Func SendCodeTag()
- Send("``")
- Send("{BACKSPACE}")
- EndFunc
- Func SendEmHyphen()
- Send("—")
- EndFunc
- Func SendVector()
- Send("**(X:0, Y:0, Z:0)**")
- EndFunc
- Func SendCodeBlock()
- Send("```cs")
- Send("{Enter 2}")
- Send("``` ")
- EndFunc
- ;~ Func SendSurroundWithImageTag()
- ;~ Send("{HOME}")
- ;~ Send("{!}[width=70%](images/")
- ;~ Send("{END}")
- ;~ Send(")")
- ;~ EndFunc
- Func SendSurroundWithImageTag()
- Send("{HOME}")
- Send("{!}[](images/")
- Send("{END}")
- Send(")")
- EndFunc
- Func SendQuickPasteSaveClose()
- Send("^v")
- Send("^s")
- Send("^w")
- EndFunc
- Func SendRightArrow()
- Send("{ASC 16}")
- EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement