User:Ineuw/Windows AutoHotKey Scripts
Jump to navigation
Jump to search
 | This page is under construction. This user page or section is currently in the middle of an expansion or major revamping. More Information and Options However, you are welcome to assist in its construction by editing it as well. Please consult the edit history should you wish to contact the person who placed this template. If this article has not been edited in several days, please remove the under construction notice. While actively editing, consider adding {{inuse}} to reduce edit conflicts. |
Introduction[edit]
Last updated: — — Ineuw (talk) 19:17, 17 December 2019 (UTC)
- Autohotkey.ahk is the main keyboard macros script file for proofreading Wikisource text in Windows OS. These macros work in Firefox, Chrome and Opera browsers, but not with Internet Explorer 11.
- The scripts are in two files: Autohotkey.ahk is the main file, and the Proofread.ahk script is the second (sub) file called by the Autohotkey.ahk.
- The installation generates a sample Autohotkey.ahk file in the My Documents folder. Both the file name and the folder are defaults, which means that on start Autohotkey.exe will look for the Autohotkey.ahk scrip in the my Documents folder without any redirection. The contents of sample Autohotkey.ahk file are to be replaced with the code below, but any drive, folder, and file name with the .ahk extension can be specified on the command line of the shortcut link as follows.
"C:\Program Files\AutoHotkey\AutoHotkey.exe" D:\AHKFunctionsLibrary\Autohotkey.ahk
- It is recommended the a shortcut link is also placed in the Windows Startup folder.
- Note that in the script, the working drive "D:\" and the "\AHKFunctionsLibrary" is both my working and library folder. These are my choices of location. Update these to your preferred location.
- The software's limitation is that the U.S. keyboard layout definition is to be used and when editing, the scripts are to be pasted into a text editor which supports ANSI and PC encoding (i.e: Windows Notepad). This is not a limitation when working with text directly in browsers.
- Most keyboard key combination can assigned to satisfy one's preference, with some exceptions of the keys assigned by Microsoft, for their Windows keyboard. These exceptions are noted in my keyboard assignments macro key assignment list.
- The cripts can be reassigned to different keyboard key combinations, deleted, or neutralized by placing the (;) semicolon at the beginning of the lines of code. This means every line of code beginning with the keyboard key assignment and including the "return" at the end of the code segment.
- Some key combinations were omitted because they conflict with Windows, or are needed for more important tasks.
- Ctrl+p for printer/printing is omitted.
- Win+l locks out the user - in Vista and later Windows versions, (but not in XP).
- After changes, the file is to be saved and then reloaded using either of the two following options:
- The Ctrl+\ (Control and backslash) key combination which is assigned to reload the script or,
- Using the right mouse button click on the system tray AutoHotkey icon and select from the context menu options "Reload This Script."
- The script actions were thoroughly tested. The Proofread.ahk macro, in the section below is linked by the #include declaration of the first line of this file. It's location is to be edited according to one's personal preference.
Autohotkey macro key assignment list[edit]
Last updated: — — Ineuw (talk) 19:25, 17 December 2019 (UTC)
This lists the current keyboard key assignments. No uppercase characters used to activate macros.
;alt+' italicise selected text
;alt+. DO NOT USE, assigned to the 'eng-pr.ahk' text format script.
;alt+= emdash
;alt+0 {{fs|150%|selected}}
;alt+1 insert template end braces }}
;alt+2 {{bar|2}} replacement for two or more emdashes
;alt+3 {{brace2|2|l}} graphic curly braces
;alt+4 {{fqm}} floating quotation mark
;alt+5 insert 15% page width, enclosed by two {{Dhr}}
;alt+7 {{c|{{fs75|selected text}}}}
;alt+8 {{c|{{fs85|selected text}}}}
;alt+9 {{c|{{fs90|selected text}}}}
;alt+a UNASSIGNED
;alt+b bold selected text using wiki markup
;alt+backspace DO NOT USE
;alt+c center selected text template
;alt+d double height row surrounded by a newline
;alt+del UNASSIGNED
;alt+e inserts vertical bar for table cell row
;alt+end insert {{fs90/s}} in header and {{fs90/e}} in the footer
;alt+f image container
;alt+f1 strips space from the end of row
;alt+f12 DO NOT USE - ASSIGNED to italics.ahk
;alt+f4 UNASSIGNED
;alt+f5 UNASSIGNED
;alt+g inserts a variable gap in text
;alt+h {{fs|80`%|{{frac||}}}} for reduced font-size fractions
;alt+i italicize <i>selected text<`/i>
;alt+j {{float left|selected text|2em}}
;alt+k |ptb.5 {{ts|table style code}} pad top and pad bottom .5 em
;alt+l {{Plr|selected text}}
;alt+m <math>`\<`/math>
;alt+n {{nop}}
;alt+o copy title from 1st line to the header with page number on the right
;alt+p copy title from 1st line to the header with page number on the left
;alt+pgdn format subscript in <math></math>
;alt+pgup format superscript in <math></math>
;alt+q USED by TextPad
;alt+r create reference tags and move cursor between the <ref></ref>
;alt+s small case selected text
;alt+shift+0 <div style = > </div> with serif font code
;alt+shift+1 UNASSIGNED
;alt+shift+2 UNASSIGNED
;alt+shift+3 UNASSIGNED
;alt+shift+4 UNASSIGNED
;alt+shift+5 chr(0146) ’ minutes
;alt+shift+6 chr(148) ” seconds
;alt+shift+7 insert 50% page width double rule, enclosed by two {{Dhr}}
;alt+shift+9 title case selected text
;alt+shift+a chr(0225) á
;alt+shift+b inserts |pb.5 pad bottom .5em table style code}}
;alt+shift+c chr(0231) ç
;alt+shift+e chr(0233) é
;alt+shift+i chr(0237) í
;alt+shift+l inserts |pl.5 {{ts|pad left .5em table style code}}
;alt+shift+m UNASSIGNED
;alt+shift+n chr(0241) ñ
;alt+shift+o chr(0243) ó
;alt+shift+p PREVIEW KEY IN WIKIMEDIA SOFTWARE
;alt+shift+r inserts |pr.5 {{ts|pad right .5em table style code}}
;alt+shift+s SAVE KEY of Wikimedia SOFTWARE in Firefox
;alt+shift+t inserts |pt.5 {{ts|pad top .5em table style code}}
;alt+shift+u chr(0250) ú
;alt+t created {{ts|}}| for table style code input
;alt+u UNASSIGNED
;alt+v {{di|D}}rop initial at the beginning of the line
;alt+w width = table style code
;alt+x: save wikisource edit in firefox
;alt+y character spacing {{sp|selected text}}
;alt+z add an empty row between two rows
;ctrl+\ reload script
;ctrl+a DO NOT USE - 'SELECT ALL' IN ALL OPERATING SYSTEMS
;ctrl+alt+l lowercase selected text
;ctrl+alt+p {{ping|}}
;ctrl+alt+t title case selected text
;ctrl+alt+u uppercase selected text
;ctrl+b <br />
;ctrl+c DO NOT USE - 'COPY' IN ALL OPERATING SYSTEMS
;ctrl+k {{sic}}
;ctrl+l lowercase selected text in Textpad
;ctrl+m <math>selected</math>
;ctrl+numpad1 ALTERNATIVE TO THE 'End' KEY WHEN LAPTOP NUMPAD IS ON
;ctrl+numpad7 ALTERNATIVE TO THE 'Home' KEY WHEN LAPTOP NUMPAD IS ON
;ctrl+p `n<p>`n
;ctrl+s DO NOT USE - 'SAVE' KEY IN ALL OPERATING SYSTEMS
;ctrl+Shift+1 UNASSIGNED
;ctrl+Shift+2 UNASSIGNED
;ctrl+Shift+3 UNASSIGNED
;ctrl+shift+4 inserts 4 spaces (instead of tab)
;ctrl+Shift+5 UNASSIGNED
;ctrl+Shift+6 UNASSIGNED
;ctrl+shift+8 {{fs85`/s}}selected text{{fs85`/e}}
;ctrl+Shift+8 UNASSIGNED
;ctrl+shift+9 {{fs90`/s}}selected text{{fs90`/e}}
;ctrl+shift+i wiki link to wikionary or wikipedia
;ctrl+shift+l colspan = (table style code)
;ctrl+shift+n DO NOT USE - Irfanview switch to negative image key
;ctrl+shift+p {{Page break|label=|border-width=2px|border-style=solid|border-color=#6479FF}}
;ctrl+shift+r DO NOT USE - RESERVED BY FIREFOX
;ctrl+shift+s DO NOT USE - RESERVED BY FIREFOX
;ctrl+shift+t insert<></>
;ctrl+shift+v RESERVED BY WINDOWS
;ctrl+shift+w rowspan = (table code)
;ctrl+shift+y chr(0176) ° degree indicator
;ctrl+v DO NOT USE - 'PASTE' KEY IN ALL OPERATING SYSTEMS
;ctrl+x DO NOT USE - 'CUT SELECTED' KEY IN ALL OPERATING SYSTEMS
;ctrl+z DO NOT USE - REVERT LAST ACTION IN ALL OPERATING SYSTEMS
;shift+esc paragraph line height and font size templates combined
;win+' edit to search for floating single or double quote
;win+0 <div>selected</div>
;win+1 <section end = E `/>
;win+2 <section end = E `/><section begin = B `/>{Left 3}
;win+3 <section end = B `/>
;win+4 UNASSIGNED
;win+5 UNASSIGNED
;win+6 UNASSIGNED
;win+7 {{under construction}} {{removed existing}}
;win+8 {{fs85|selected text}} without centering
;win+9 {{fs90|selected text}} without centering
;win+a {{anchor|D}} at the left margin
;win+b HTML bold <b>selected text<`/b>
;win+c {{c|''selected text''}} center and italicize selected text
;win+d block of text <div {{ts|width:500px;|mc|ac|sm85|lh11|pb.5}}>selected text<`/div>
;win+down inserts {{hwe| at the beginning of a row
;win+e {{anchor|D}} any place in the text
;win+f DO NOT USE RESERVED BY WINDOWS FOR FEEDBACK
;win+g {{c|sc|selected text}}
;win+h hanging indent
;win+i {{SIC|selected text|selected text|}}
;win+j {{float right|selected text|2em}}
;win+k search and remove caret
;win+l DO NOT USE, WINDOWS LOCK
;win+m <!-- comments out selected text -->
;win+n
;win+numpad1 ALTERNATIVE TO THE 'Shift+End' KEY WHEN LAPTOP NUMPAD IS ON
;win+numpad7 ALTERNATIVE TO THE 'Shift+Home' KEY WHEN LAPTOP NUMPAD IS ON
;win+o {{cdm||}}
;win+p <poem style = ""</poem>
;win+q {{sm|selected text}}
;win+r <ref></ref>
;win+s insert in footer {{rule}}\n{{smallrefs}}
;win+t table and style definition {| {{ts|bt|bb|mc|sm85|lh11|ar|bc|bgt}}
;win+u superscript selected text
;win+up encloses hyphenated text start with {{hws| - place at the end of line and activate
;win+v subscript <sub>selected text<`/sub>
;win+w for Wikisource images {{Do not move to Commons}}
;win+x WINDOWS MENU WHEN WINDOWS SHORTCUTS ARE ENABLED. Disabled with UWTweaks
;win+z z
;mbutton switch to newly opened tab
Autohotkey.ahk[edit]
;2020-03-27 2:11 PM UTC-4
;D:\ahk\eng.ahk
; english desktop version, numpad navigation keys are disabled
; english laptop version, numpad navigation keys are enabled
SetWorkingDir, D:\ahk
#include d:\ahk\eng_pr.ahk
#installkeybdhook
#noenv
#singleinstance force
#warn
SetTimer, AutoReload, 50000
~lwin::vk07
~rwin::return
~appskey::return
~#bs::return
; test keys =======================================================
;~' generate ''
;~'::
; clipboard := ""
; sendinput, '
return
; alt =============================================================
;alt+backspace DO NOT USE
;alt+f1 strips space from the end of row
!f1::
clipboard := ""
autotrim, on
send, ^a^c ; select everything on the page
clipwait, 1
in_put := " `r`n" ; space preceeding crlf
out_put := "`r`n"
clipboard := regexreplace(clipboard, in_put, out_put)
clipwait, 1
send, ^v
send, ^{Home}
return
;alt+f4 UNASSIGNED
;!f4::
clipboard := ""
return
;alt+f5 UNASSIGNED
!f5::
clipboard := ""
return
;alt+f12 DO NOT USE - ASSIGNED to italics.ahk
;alt+pgup format superscript in <math></math>
!pgup::
autotrim, on
clipboard := ""
sendinput, ^c
clipwait, 1
selected= trim(clipboard)
sendinput, {asc 0094}
sendinput, %clipboard%
return
;alt+pgdn format subscript in <math></math>
!pgdn::
autotrim, on
clipboard := ""
sendinput, ^c
clipwait, 1
selected= trim(clipboard)
sendinput, {asc 0095}
sendinput, %clipboard%
return
;alt+del UNASSIGNED
;alt+end insert {{fs90/s}} in header and {{fs90/e}} in the footer
!end::
clipboard := ""
sendinput, {text}<div {{ts|sm90|lh11|aj}}>
clipwait, 0
sendinput, {tab 2}
sendinput, {text}{{div end}}`n
sendinput, +{tab}
sendinput, ^{home}
return
;alt+' italicise selected text
!'::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
if (substr(clipboard, 0) = A_space)
{
selected= trim(clipboard)
clipboard= ''%clipboard%''%A_space%
}
Else
{
selected= trim(%clipboard%)
clipboard= ''%clipboard%''
}
sendinput, ^v
return
;alt+. DO NOT USE, assigned to the 'eng-pr.ahk' text format script.
;alt+= emdash
!=::
clipboard := ""
sendinput, %A_Space%{u+2014}%A_Space%
return
;alt+0 {{fs|150%|selected}}
!0::
autotrim, off
clipboard := ""
sendinput, {home}+{end}
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard = {{fs|150`%|%selected%}}%A_space%
}
else
{
selected := trim(selected)
clipboard = {{fs|150`%|%selected%}}
}
sendinput, ^v
sendinput, {Home}
sendinput, {right 5}
return
;alt+1 insert template end braces }}
!1::
clipboard := ""
sendinput, {text}}}
return
;alt+2 {{bar|2}} replacement for two or more emdashes
!2::
clipboard := ""
sendinput, {text}{{bar|2}}
return
;alt+3 {{brace2|2|l}} graphic curly braces
!3::
clipboard := ""
sendinput, {text}{{brace2|2|l}}
sendinput, {left 3}
return
;alt+4 {{fqm}} floating quotation mark
!4::
clipboard := ""
sendinput, {text}{{fqm}}
return
;alt+5 insert 15% page width, enclosed by two {{Dhr}}
!5::
clipboard := ""
sendinput, {home}
sendinput, {text}`n
sendinput, {text}{{Dhr}}
sendinput, {text}`n`n
sendinput, {raw}{{rule|15`%}}
sendinput, {text}`n`n
sendinput, {text}{{Dhr}}
sendinput, {text}`n
return
;alt+7 {{c|{{fs75|selected text}}}}
!7::
selected =
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard := "{{c|{{fs75|" . %selected% . "}}}}"
sendinput, ^v
return
;alt+8 {{c|{{fs85|selected text}}}}
!8::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard := "{{c|{{fs85|" . %selected% . "}}}}"
sendinput, ^v
return
;alt+9 {{c|{{fs90|selected text}}}}
!9::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard := "{{c|{{fs90|" . %selected% . "}}}}"
sendinput, ^v
return
;alt+a UNASSIGNED
clipboard := ""
;!a::
return
;alt+b bold selected text using wiki markup
!b::
clipboard := ""
selected := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard := %selected%
sendinput, ^v
return
;alt+c center selected text template
!c::
clipboard := ""
selected := ""
sendinput, ^x
clipwait, 1
selected := trim(clipboard)
clipboard := "{{c|" . %selected% . "}}"
sendinput, ^v
return
;alt+d double height row surrounded by a newline
!d::
clipboard := ""
sendinput, {Home}`n
sendinput, {text}{{Dhr}}`n
return
;alt+e inserts vertical bar for table cell row
!e::
sendinput, {Home}|{Down}
return
;alt+f image container
!f::
clipboard := ""
autotrim, off
sendinput, {home}{{}{{}FI `n{home}{space}
sendinput, | file = `n{home}{space}
sendinput, | width = 500px`n{home}{space}
sendinput, | cstyle = margin-top:10px`; margin-bottom:10px`n{home}{space}
; sendinput, | float = left|right`n{home}{space}
; sendinput, | margin-right = 7px`n{home}{space}
; sendinput, | margin-left = 7px`n{home}{space}
sendinput, | tstyle = padding-top:.4em; font-variant: small-caps; `n{home}{space}
sendinput, | talign = center`n{home}{space}
sendinput, | caption = `n{home}
sendinput, {}}{}}`n{home}
return
;alt+g inserts a variable gap in text
!g::
clipboard := ""
sendinput, {text}{{gap}}
return
;alt+h {{fs|80`%|{{frac||}}}} for reduced font-size fractions
!h::
clipboard := ""
sendinput, {text}{{fs|75`%|{{sfrac|1|2}}}}
sendinput, {left 6}
return
;alt+i italicize <i>selected text<`/i>
!i::
clipboard := ""
autotrim, off
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= <i>%selected%<`/i>%A_space%
}
Else
{
selected := trim(selected)
clipboard= <i>%selected%<`/i>
}
sendinput, ^v
return
;alt+j {{float left|selected text|2em}}
!j::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard := "{{left|" . %selected% . "|2em}}"
sendinput, ^v
return
;alt+k |ptb.5 {{ts|table style code}} pad top and pad bottom .5 em
!k::
clipboard := ""
sendinput, |ptb.5{left 6}{down}
return
;alt+l {{Plr|selected text}}
!l::
clipboard := ""
sendinput, ^c
clipwait, 1
clipboard := trim(clipboard)
clipboard= `{`{Plr|%clipboard%`}`}
sendinput, ^v
return
;alt+m <math>`\<`/math>
!m::
clipboard := ""
sendinput, {text}<math>`\<`/math>
sendinput, {left 7}
return
;alt+n {{nop}}
!n::
clipboard := ""
;sendinput, `n
sendinput, {text}{{nop}}`n
; sendinput, {text}{{nop}}`n|-`n|}`n`n
return
;alt+o copy title from 1st line to the header with page number on the right
!o::
clipboard := ""
sendinput, ^x
clipwait, 0
clipboard := trim(clipboard)
sendinput, +{tab}
sendinput, ^{home}
sendinput, +{end}{del}
sendinput, {text}{{rh||%clipboard%|}}
sendinput, {end}
sendinput, {left 2}
return
;alt+p copy title from 1st line to the header with page number on the left
!p::
clipboard := ""
sendinput, ^x
clipwait, 0
clipboard := trim(clipboard)
sendinput, +{tab}
sendinput, ^{home}
sendinput, +{end}{del}
sendinput, {text}{{rh||%clipboard%|}}
sendinput, {home}
sendinput, {right 5}
return
;alt+q USED by TextPad
;alt+r create reference tags and move cursor between the <ref></ref>
!r::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
if (substr(clipboard, 0) = A_space)
{
clipboard := trim(clipboard)
clipboard= <ref>%clipboard%</ref>%A_space%
}
Else
{
selected := trim(clipboard)
clipboard= <ref>%clipboard%</ref>
}
sendinput, ^v
return
;alt+s small case selected text
!s::
clipboard := ""
autotrim, off
sendinput, ^c
clipwait, 0
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= {{sc|%selected%}}%A_space%
}
else
{
selected := trim(selected)
clipboard= {{sc|%selected%}}
}
sendinput, ^v
return
;alt+t created {{ts|}}| for table style code input
!t::
clipboard := ""
sendinput, {text}{{ts|}}|
sendinput, {left 3}
return
;alt+u UNASSIGNED
;alt+v {{di|D}}rop initial at the beginning of the line
!v::
clipboard := ""
sendinput, {Home}
sendinput, {text}{{di|
sendinput, {Right}
sendinput, {text}}}
return
;alt+w width = table style code
!w::
clipboard := ""
sendinput, {text}width = %A_Space%
return
;alt+x: save wikisource edit in firefox
!x::
clipboard := ""
sendinput, !+s
return
;alt+y character spacing {{sp|selected text}}
!y::
clipboard := ""
autotrim, off
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= {{sp|%selected%}}%A_space%
}
else
{
selected := trim(selected)
clipboard= {{sp|%selected%|.4em}}
}
sendinput, ^v
return
;alt+z add an empty row between two rows
!z::
clipboard := ""
send, {home}
send, {home}`n
send, {down}
return
; alt+shift =======================================================
;alt+shift+0 <div style = > </div> with serif font code
!+0::
clipboard := ""
selected =
begin_div =
end_div =
sendinput, ^c
clipwait, 0
selected := trim(clipboard)
begin_div = <div `{`{ts|mc|ffs|ac|pt4|pb1|bc|bgt`}`}>`n
end_div = `n</div>`n
clipboard := %begin_div%%selected%%end_div%
sendinput, ^v
return
;alt+shift+1 UNASSIGNED
;alt+shift+2 UNASSIGNED
;alt+shift+3 UNASSIGNED
;alt+shift+4 UNASSIGNED
;alt+shift+5 chr(0146) ’ minutes
!+5::
clipboard := ""
send, {text}’
return
;alt+shift+6 chr(148) ” seconds
!+6::
clipboard := ""
send, {text}”
return
;alt+shift+7 insert 50% page width double rule, enclosed by two {{Dhr}}
!+7::
clipboard := ""
sendinput, {home}
sendinput, {text}`n
sendinput, {text}{{Dhr}}
sendinput, {text}`n`n
sendinput, {raw}{{rule|50`%}}{{rule|50`%}}
sendinput, {text}`n`n
sendinput, {text}{{Dhr}}
sendinput, {text}`n
return
+8::
clipboard := ""
sendinput, {text}`n{{***|3}}`n
return
;alt+shift+9 title case selected text
!+9::
clipboard := ""
sendinput, ^c
clipwait, 0
stringlower, clipboard, clipboard, t
sendinput, ^v
return
;alt+shift+a chr(0225) á
!+a::
clipboard := ""
sendinput, á
return
;alt+shift+b inserts |pb.5 pad bottom .5em table style code}}
!+b::
clipboard := ""
sendinput, |pb.5{left 5}{down}
return
;alt+shift+c chr(0231) ç
!+c::
clipboard := ""
sendinput, ç
return
;alt+shift+e chr(0233) é
!+e::
clipboard := ""
sendinput, é
return
;alt+shift+i chr(0237) í
!+i::
clipboard := ""
sendinput, í
return
;alt+shift+l inserts |pl.5 {{ts|pad left .5em table style code}}
!+l::
clipboard := ""
sendinput, `|pl.5{left 5}{down}
return
;alt+shift+m UNASSIGNED
;alt+shift+n chr(0241) ñ
!+n::
clipboard := ""
sendinput, ñ
return
;alt+shift+o chr(0243) ó
!+o::
clipboard := ""
sendinput, ó
return
;alt+shift+p PREVIEW KEY IN WIKIMEDIA SOFTWARE
;alt+shift+r inserts |pr.5 {{ts|pad right .5em table style code}}
!+r::
clipboard := ""
sendinput, `|pr.5{left 5}{down}
return
;alt+shift+s SAVE KEY of Wikimedia SOFTWARE in Firefox
;alt+shift+t inserts |pt.5 {{ts|pad top .5em table style code}}
!+t::
clipboard := ""
sendinput, |pt.5{left 5}{down}
return
;alt+shift+u chr(0250) ú
!+u::
clipboard := ""
sendinput, ú
return
; ctrl ============================================================
;ctrl+numpad1 ALTERNATIVE TO THE 'End' KEY WHEN LAPTOP NUMPAD IS ON
;^Numpad1::
; sendinput, {End}
return
;ctrl+numpad7 ALTERNATIVE TO THE 'Home' KEY WHEN LAPTOP NUMPAD IS ON
;^Numpad7::
; sendinput, {Home}
return
;ctrl+\ reload script
^\::
clipboard := ""
reload
return
;ctrl+a DO NOT USE - 'SELECT ALL' IN ALL OPERATING SYSTEMS
;ctrl+b <br />
^b::
clipboard := ""
sendinput, <br `/>
return
;ctrl+c DO NOT USE - 'COPY' IN ALL OPERATING SYSTEMS
;ctrl+k {{sic}}
^k::
clipboard := ""
sendinput, {text}{{sic}}
return
;ctrl+l lowercase selected text in Textpad
;ctrl+m <math>selected</math>
^m::
clipboard := ""
selected := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= <math>{text}%selected%<`/math>%A_space%
}
else
{
selected := trim(selected)
clipboard= <math>{text}%selected%<`/math>
}
sendinput, ^v
return
;ctrl+p `n<p>`n
^p::
clipboard := ""
sendinput, `n<p>`n
return
;ctrl+s DO NOT USE - 'SAVE' KEY IN ALL OPERATING SYSTEMS
;ctrl+v DO NOT USE - 'PASTE' KEY IN ALL OPERATING SYSTEMS
;ctrl+x DO NOT USE - 'CUT SELECTED' KEY IN ALL OPERATING SYSTEMS
;ctrl+z DO NOT USE - REVERT LAST ACTION IN ALL OPERATING SYSTEMS
; ctrl+alt =======================================================
;ctrl+alt+l lowercase selected text
^!l::
clipboard := ""
selected := ""
replaced := ""
sendinput, ^c
clipwait, 1
selected := clipboard
stringlower, replaced, selected
sendinput, %replaced%
sendinput, {Home}
return
;ctrl+alt+p {{ping|}}
^!p::
clipboard := ""
sendinput, {text}{{ping|}}
sendinput {left 2}
return
;ctrl+alt+t title case selected text
^!t::
clipboard := ""
selected := ""
replaced := ""
sendinput, ^c
clipwait, 1
selected := clipboard
stringlower, replaced, selected, T
sendinput, %replaced%
sendinput, {Home}
return
;ctrl+alt+u uppercase selected text
^!u::
clipboard := ""
selected := ""
replaced := ""
sendinput, ^c
clipwait, 1
selected := clipboard
stringupper, replaced, selected
sendinput, %replaced%
sendinput, {Home}
return
; ctrl+shift =====================================================
;ctrl+Shift+1 UNASSIGNED
;ctrl+Shift+2 UNASSIGNED
;ctrl+Shift+3 UNASSIGNED
;ctrl+shift+4 inserts 4 spaces (instead of tab)
^+4::
clipboard := ""
sendinput, %A_space%%A_space%%A_space%%A_space%
return
;ctrl+Shift+5 UNASSIGNED
;ctrl+Shift+6 UNASSIGNED
;ctrl+Shift+8 UNASSIGNED
;ctrl+shift+8 {{fs85`/s}}selected text{{fs85`/e}}
^+8::
clipboard := ""
sendinput, ^c
clipwait, 1
clipboard= {{fs85`/s}}{text}%clipboard%{{fs85`/e}}
sendinput, ^v
return
;ctrl+shift+9 {{fs90`/s}}selected text{{fs90`/e}}
^+9::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard= {{fs90`/s}}%selected%{{fs90`/e}}
sendinput, ^v
return
;ctrl+shift+i wiki link to [[wikt:]]ionary or [[w:]]ikipedia, [[wikt:selected text|selected text]]
^+i::
clipboard := ""
autotrim, off
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= `[`[wikt:%selected%|%selected%`]`]%A_space%
}
Else
{
selected := trim(selected)
clipboard= `[`[wikt:%selected%|%selected%`]`]
}
sendinput, ^v
return
;ctrl+shift+l colspan = (table style code)
^+l::
clipboard := ""
sendinput, {text}colspan = %a_space%
sendinput, {left 1}
return
;ctrl+shift+n DO NOT USE - Irfanview switch to negative image key
;ctrl+shift+p {{Page break|label=|border-width=2px|border-style=solid|border-color=#6479FF}}
^+p::
clipboard := ""
sendinput, {text}{{Page break|label=|border-width=2px|border-style=solid|border-color=#6479FF}}
return
;ctrl+shift+r DO NOT USE - RESERVED BY FIREFOX
;ctrl+shift+s DO NOT USE - RESERVED BY FIREFOX
;ctrl+shift+t insert<></>
^+t::
clipboard := ""
sendinput, {text}<></>
sendinput, {left 3}
return
;ctrl+shift+v RESERVED BY WINDOWS
;ctrl+shift+w rowspan = (table code)
^+w::
clipboard := ""
sendinput, {text}rowspan = %a_space%
sendinput, {left 1}
return
;ctrl+shift+y chr(0176) ° degree indicator
^+y::
clipboard := ""
sendinput, {text}°
return
; shift ======================================================= = = =
;shift+esc paragraph line height and font size templates combined
+esc::
autotrim, on
clipboard := ""
sendinput, ^c
clipwait, 0
selected := trim(clipboard)
clipboard= {{fs|85`%|{{lh|120`%|%selected%}}}}
sendinput, ^v
return
; win ============================================================
;win+numpad1 ALTERNATIVE TO THE 'Shift+End' KEY WHEN LAPTOP NUMPAD IS ON
;#Numpad1::
; sendinput, +{end}
return
;win+numpad7 ALTERNATIVE TO THE 'Shift+Home' KEY WHEN LAPTOP NUMPAD IS ON
;#Numpad7::
; sendinput, +{home}
return
;win+' edit to search for floating single or double quote
#'::
clipboard := ""
sendinput, ^f
clipwait, 0
sendinput, ''
clipwait, 0
sendinput, {esc} {left 1} ; Firefox
; sendinput, {esc} ; Vivaldi
return
;win+down inserts {{hwe| at the beginning of a row
#down::
sendinput, {Home}
sendinput, {text}{{hwe|
sendinput, ^{right}{backspace}
sendinput, {text}|x}}%A_space%
sendinput, {left 4}
return
;win+up encloses hyphenated text start with {{hws| - place at the end of line and activate
#up::
sendinput, {backspace}^{left}
sendinput, {text}{{hws|
sendinput, {end}
sendinput, {text}|x}}
sendinput, {left 3}
return
#-::
autotrim, off
selected =
pasted =
clipboard := ""
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = %A_space%)
{
selected := trim(selected)
stringlower, pasted, selected
clipboard := %pasted%%A_space%
}
else
{
selected := trim(selected)
stringLower, pasted, selected
clipboard := %pasted%
}
sendinput, ^v
return
;win+1 <section end = E `/>
#1::
sendinput, ^{Home}<section begin = E `/>{Left 3}
return
;win+2 <section end = E `/><section begin = B `/>{Left 3}
#2::
sendinput, `n<section end = E `/>`n<section begin = B `/>{Left 3}
return
;win+3 <section end = B `/>
#3::
sendinput, ^{end}<section end = B `/>{Left 3}
return
;win+4 UNASSIGNED
;win+5 UNASSIGNED
;win+6 UNASSIGNED
;win+7 {{under construction}} {{removed existing}}
#7::
clipboard := ""
sendinput, {text}removed existing
return
;win+8 {{fs85|selected text}} without centering
#8::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= {{fs85|%selected%}}%A_space%
}
else
{
selected := trim(selected)
clipboard= {{fs85|%selected%}}
}
sendinput, ^v
return
;win+9 {{fs90|selected text}} without centering
#9::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= {{fs90|%selected%}}%A_space%
}
else
{
selected := trim(selected)
clipboard= {{fs90|%selected%}}
}
sendinput, ^v
return
;win+0 <div>selected</div>
#0::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard= <div>%selected%<`/div>
sendinput, ^v
return
;win+a {{anchor|D}} at the left margin
#a::
sendinput, {Home}
sendinput, {text}{{anchor|D}}
sendinput, {left 2}
return
;win+b HTML bold <b>selected text<`/b>
#b::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= <b>%selected%<`/b>%A_space%
}
else
{
selected := trim(selected)
clipboard= <b>%selected%<`/b>
}
sendinput, ^v
return
;win+c {{c|''selected text''}} center and italicize selected text
#c::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= {{c|%selected%}}%A_space%
}
else
{
selected := trim(selected)
clipboard= {{c|%selected%}}
}
sendinput, ^v
return
;win+d block of text <div {{ts|width:500px;|mc|ac|sm85|lh11|pb.5}}>selected text<`/div>
#d::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard := "<div {{ts|width:500px;|mc|aj|sm90|lh12|pb.5}}>`n%selected%`n<`/div>"
sendinput, ^v
return
;win+e {{anchor|D}} any place in the text
#e::
sendinput, {text}{{anchor|D}}
sendinput, {left 2}
return
;win+f DO NOT USE RESERVED BY WINDOWS FOR FEEDBACK
;win+g {{c|sc|selected text}}
#g::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard= {{c|{{sc|%selected%}}}}
sendinput, ^v
return
;win+h hanging indent
#h::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard= {{hi|%selected%}}
sendinput, ^v
return
;win+i {{SIC|selected text|selected text|}}
#i::
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= {{SIC|%selected%|%selected%}}%A_space%
}
Else
{
selected := trim(selected)
clipboard= {{SIC|%selected%|%selected%}}
}
sendinput, ^v
return
;win+j {{float right|selected text|2em}}
#j::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard= {{right|%selected%|2em}}
sendinput, ^v
return
;win+k search and remove caret
#k::
critical, on
clipboard := ""
newtext := ""
sendinput, ^a^c
newtext := clipboard
newtext := strreplace(newtext, "^")
sleep, 500
clipboard := newtext
sendinput, ^v
critical, off
return
;win+l DO NOT USE, WINDOWS LOCK
;win+m <!-- comments out selected text -->
#m::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard= <!--%A_space%%selected%%A_space%-->
sendinput, ^v
return
;win+n
#n::
clipboard := ""
sendinput, {text}
return
;win+o {{cdm||}}
#o::
clipboard := ""
sendinput, {text}{{cdm||304}}
sendinput, {left 6}q
return
;win+p <poem style = ""</poem>
#p::
clipboard := ""
sendinput, ^c
clipwait, 1
selected := trim(clipboard)
clipboard= <poem style = "display: table; font-size: 90`%; line-height: 120`%; margin-left: auto; margin-right: auto; width: auto;">`n%selected%`n<`/poem>
sendinput, ^v
return
;win+q {{sm|selected text}}
#q::
clipboard := ""
autotrim, off
clipboard := ""
sendinput, ^c
clipwait, 1
selected := clipboard
if (substr(selected, 0) = A_space)
{
selected := trim(selected)
clipboard= {{sm|%selected%}}%A_space%
}
else
{
selected := trim(selected)
clipboard= {{sm|%selected%}}
}
sendinput, ^v
return
;win+r <ref></ref>
#r::
clipboard := ""
sendinput, {text}<ref></ref>
sendinput, {left 6}
return
;win+s insert in footer {{rule}}\n{{smallrefs}}
#s::
clipboard := ""
sendinput, ^a{Del}^{Home}
sendinput, {text}{{rule}}
sendinput, `n ; without rule
; sendinput, `n`n ; with rule
sendinput, {text}{{smallrefs}}
sendinput, `n
return
;win+t table and style definition {| {{ts|bt|bb|mc|sm85|lh11|ar|bc|bgt}}
#t::
clipboard := ""
sendinput, {text}{| {{ts|mc|sm95|lh13|aj|bc|bgt}}`n|- ; border
return
;win+u superscript selected text
#u::
clipboard := ""
sendinput, ^c
clipwait, 0
selected := trim(clipboard)
clipboard= <sup>%selected%<`/sup>
sendinput, ^v
sendinput, {left 6}
return
;win+v subscript <sub>selected text<`/sub>
#v::
clipboard := ""
sendinput, ^c
clipwait, 0
selected := trim(clipboard)
clipboard= <sub>%selected%<`/sub>
sendinput, ^v
return
;win+w for Wikisource images {{Do not move to Commons}}
#w::
clipboard := ""
sendinput, {text}{{Do not move to Commons}}
return
;win+x WINDOWS MENU WHEN WINDOWS SHORTCUTS ARE ENABLED. Disabled through Ultimate Windows Tweaks - Disable Winkey shortcuts
;win+z z
#z::
sendinput, {text}<!--hwe joined with hws-->
return
; mouse ===========================================================
;mbutton switch to newly opened tab
#ifwinactive ahk_exe vivaldi.exe
detecthiddentext, on
mbutton::send, {lshift down}{lbutton}{lshift up}
detecthiddentext, off
#ifwinactive
return
return
AutoReload:
Reload
Return
; =================================================================
Proofread.ahk[edit]
Last update: — — Ineuw talk 22:39, 4 August 2016 (UTC)
- The proofread script is assigned to the combination of he Alt + . keys, but any keyboard key, combinations of keys, or word typed on the keyboard, can be assigned to the user's preference.
- This macro is in a separate file but linked to the Autohotkey.ahk by the #include declaration in the Autohotkey.ahk.
;Alt+. proofread
!.::
clipboard:=
autotrim, on
send, ^a^c
clipwait, 0 ;0 = slows clipboard action with a .5 second delay
;reduce two spaces to one
in_put:=A_Space . A_Space
out_put:=A_Space
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space preceeding a comma
in_put:=" ,"
out_put:=","
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space preceeding a period
in_put:=" ."
out_put:="."
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space preceeding a semicolon
in_put:=" \;"
out_put:=";"
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;space preceeding a colon
in_put:=" :"
out_put:=":"
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space preceeding a question mark
in_put:=" \?"
out_put:="?"
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space preceeding an exclamation mark
in_put:=" !"
out_put:="!"
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space following an open bracket
in_put:="( "
out_put:="("
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space preceeding a close bracket
in_put:=" )"
out_put:=")"
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove space preceeding a hyphen
in_put:=" -"
out_put:="-"
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;space following a hyphen
in_put:="- "
out_put:="-"
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;remove the caret
in_put:="`^"
out_put:=""
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;the word 'modem' to 'modern'
in_put:="modem"
out_put:="modern"
clipboard:=strreplace(clipboard, in_put, out_put)
clipwait, 0
;space preceeding a crlf
in_put:=" `r`n"
out_put:="`r`n"
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;space following a crlf
in_put:="`r`n "
out_put:="`r`n"
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;change three crlfs to two crlf
in_put:="`r`n`r`n`r`n"
out_put:="`r`n`r`n"
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;two crlfs to ~~
in_put:="`r`n`r`n"
out_put:="~~"
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;hyphen preceeding a crlf
in_put:="-`r`n"
out_put:=""
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;single crlf with space
in_put:="`r`n"
out_put:=" "
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;space and mdash
in_put:=chr(0x20)chr(0x2014)
out_put:=chr(0x2014)
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;mdash and space
in_put:=chr(0x2014)chr(0x20)
out_put:=chr(0x2014)
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;two tildes restore paragraph breaks
in_put:="~~"
out_put:="`r`n`r`n"
clipboard:=regexreplace(clipboard, in_put, out_put)
clipwait, 0
;two periods side by side
clipboard:=regexreplace(clipboard, "\.(?=\.)", ". ")
send, ^v^{Home}
sleep, 500
clipclear:=
sleep, 100
send, ^{Home}
send, ^f
send, ^a
send, {Del}
sleep, 100
send, "{esc}{right}+{left}
return