neo20.ods: Mittenpunkt(tot) und Punkt drunter(tot) eingefügt; Autohotkey: Sicherung Zwischenablage, DeadKeys erweitert

git-svn-id: https://svn.neo-layout.org@112 b9310e46-f624-0410-8ea1-cfbb3a30dc96

1 files changed, 139 insertions, 140 deletions

diff --git a/windows/XP/autohotkey/neo20.ahk b/windows/XP/autohotkey/neo20.ahk
index 9b4aedd..6da9709 100644
--- a/windows/XP/autohotkey/neo20.ahk
+++ b/windows/XP/autohotkey/neo20.ahk
@@ -22,8 +22,8 @@ disable = Deaktiviere %name%
 

 ; ToDo

 ; --------

-; nobreakspace und schmales Leerzeichen

-

+; nobreakspace und schmales Leerzeichen  

+; , auf Altgr, geht nicht, weil sonst AltGr nur noch , macht

 

 ; ANSI-Darstellung von beliebigen Unicode-Zeichen

 ; -----------------------------------------------

@@ -95,7 +95,7 @@ menu, tray, add, �ffnen, open
    menu, helpmenu, add, http://www.neo-layout.org/, neo

 menu, tray, add, Hilfe, :helpmenu

 menu, tray, add

-menu, tray, add, %disable%, toggleneo

+menu, tray, add, %disable%, togglesuspend

 menu, tray, default, %disable%

 menu, tray, add

 menu, tray, add, Edit, edit

@@ -110,6 +110,21 @@ menu, tray, tip, %name%
 ;1. Ebene

 ;---------

 

+Space::                                       

+  If A_PriorHotkey = ^           ; circumflex 

+    BSUnicode("ˆ")                           

+  Else If A_PriorHotkey = +      ; tilde      

+    BSUnicode("˜")                           

+  Else                                        

+    Send {Space}                              

+Return                                        

+                                              

+Enter::Send {Enter}                           

+Esc::Send {Esc}                               

+                                              

+; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

+

+

 ^::send {^} ; circumflex, tot

 1::send 1

 2::send 2

@@ -440,18 +455,6 @@ Return
     send j

 Return

 

-Space::

-  If A_PriorHotkey = ^           ; circumflex

-    BSUnicode("ˆ")

-  Else If A_PriorHotkey = +      ; tilde 

-    BSUnicode("˜")

-  Else

-    Send {Space}

-Return

-

-Enter::Send {Enter}

-Esc::Send {Esc}

-

 

 ;2. Ebene (Shift)

 ;---------

@@ -587,15 +590,15 @@ Return
 Return

 

 +s::

-  If A_PriorHotkey = #^+ ; Diaerese

+  If A_PriorHotkey = #^+        ; Diaerese

     Send, {bs}�

-  Else If A_PriorHotkey = ++ ; macron

+  Else If A_PriorHotkey = ++    ; macron

     BSUnicode("Ī")

-  Else If A_PriorHotkey = #^^ ; brevis 

+  Else If A_PriorHotkey = #^^   ; brevis 

     BSUnicode("Ĭ")

-  Else If A_PriorHotkey = #^+� ; ogonek

+  Else If A_PriorHotkey = #^+�  ; ogonek

     BSUnicode("Į")

-  Else If A_PriorHotkey = + ; tilde

+  Else If A_PriorHotkey = +     ; tilde

     BSUnicode("Ĩ")

   Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

     BSUnicode("İ")

@@ -604,32 +607,32 @@ Return
 Return

 

 +d::

-  If A_PriorHotkey = #^+ ; Diaerese

+  If A_PriorHotkey = #^+          ; Diaerese

     Send {bs}�

-  Else If A_PriorHotkey = + ; tilde

+  Else If A_PriorHotkey = +       ; tilde

     BSUnicode("Ã")

-  Else If A_PriorHotkey = <^>!+� ; Ring 

+  Else If A_PriorHotkey = <^>!+�  ; Ring 

     Send {bs}�

-  Else If A_PriorHotkey = ++ ; macron

+  Else If A_PriorHotkey = ++      ; macron

     BSUnicode("Ā")

-  Else If A_PriorHotkey = #^^ ; brevis 

+  Else If A_PriorHotkey = #^^     ; brevis 

     BSUnicode("Ă")

-  Else If A_PriorHotkey = #^+� ; ogonek

+  Else If A_PriorHotkey = #^+�    ; ogonek

     BSUnicode("Ą")

   Else 

     Send A

 Return 

 

 +f::

-  If A_PriorHotkey = #^+ ; Diaerese

+  If A_PriorHotkey = #^+        ; Diaerese

     Send, {bs}�

-  Else If A_PriorHotkey = +^ ; caron

+  Else If A_PriorHotkey = +^    ; caron

     BSUnicode("Ě")

-  Else If A_PriorHotkey = ++ ; macron

+  Else If A_PriorHotkey = ++    ; macron

     BSUnicode("Ē")

-  Else If A_PriorHotkey = #^^ ; brevis 

+  Else If A_PriorHotkey = #^^   ; brevis 

     BSUnicode("Ĕ")

-  Else If A_PriorHotkey = #^+� ; ogonek 

+  Else If A_PriorHotkey = #^+�  ; ogonek 

     BSUnicode("Ę")

   Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

     BSUnicode("Ė")

@@ -638,32 +641,32 @@ Return
 Return 

 

 +g::

-  If A_PriorHotkey = <^>!+ ; Schr�gstrich

+  If A_PriorHotkey = <^>!+     ; Schr�gstrich

     BSUnicode("Ø")

-  Else If A_PriorHotkey = + ; tilde

+  Else If A_PriorHotkey = +    ; tilde

     BSUnicode("Õ")

   Else If A_PriorHotkey = #^++ ; doppelakut

     BSUnicode("Ő")

-  Else If A_PriorHotkey = #^+ ; Diaerese

+  Else If A_PriorHotkey = #^+  ; Diaerese

     Send {bs}�

-  Else If A_PriorHotkey = ++ ; macron 

+  Else If A_PriorHotkey = ++   ; macron 

     BSUnicode("Ō")

-  Else If A_PriorHotkey = #^^ ; brevis 

+  Else If A_PriorHotkey = #^^  ; brevis 

     BSUnicode("Ŏ")

   Else

     send O

 Return

 

 +h::

-  If A_PriorHotkey = ^ ; circumflex

+  If A_PriorHotkey = ^           ; circumflex

     BSUnicode("Ŝ")

-  Else If A_PriorHotkey = +^ ; caron

+  Else If A_PriorHotkey = +^     ; caron

     BSUnicode("Š")

-  Else If A_PriorHotkey = � ; akut 

+  Else If A_PriorHotkey = �      ; akut 

     BSUnicode("Ś")

-  Else If A_PriorHotkey = #^� ; cedilla 

+  Else If A_PriorHotkey = #^�    ; cedilla 

     BSUnicode("Ş")

-  Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

+  Else If A_PriorHotkey = <^>!�  ; punkt dar�ber 

     BSUnicode("�")

   Else If A_PriorHotkey = <^>!+^ ; punkt darunter 

     BSUnicode("Ṣ")

@@ -672,13 +675,13 @@ Return
 Return

 

 +j::

-  If A_PriorHotkey = +^ ; caron

+  If A_PriorHotkey = +^         ; caron

     BSUnicode("Ň")

-  Else If A_PriorHotkey = + ; tilde

+  Else If A_PriorHotkey = +     ; tilde

     BSUnicode("Ñ")

-  Else If A_PriorHotkey = � ; akut 

+  Else If A_PriorHotkey = �     ; akut 

     BSUnicode("Ń")

-  Else If A_PriorHotkey = #^� ; cedilla 

+  Else If A_PriorHotkey = #^�   ; cedilla 

     BSUnicode("Ņ")

   Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

     BSUnicode("Ṅ")

@@ -687,13 +690,13 @@ Return
 Return

 

 +k::

-  If A_PriorHotkey = +^ ; caron

+  If A_PriorHotkey = +^          ; caron

     BSUnicode("Ř")

-  Else If A_PriorHotkey = � ; akut 

+  Else If A_PriorHotkey = �      ; akut 

     BSUnicode("Ŕ")

-  Else If A_PriorHotkey = #^� ; cedilla 

+  Else If A_PriorHotkey = #^�    ; cedilla 

     BSUnicode("Ŗ")

-  Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

+  Else If A_PriorHotkey = <^>!�  ; punkt dar�ber 

     BSUnicode("Ṙ")

   Else If A_PriorHotkey = <^>!+^ ; punkt darunter 

     BSUnicode("Ṛ")

@@ -702,13 +705,13 @@ Return
 Return

 

 +l::

-  If A_PriorHotkey = +^ ; caron

+  If A_PriorHotkey = +^          ; caron

     BSUnicode("Ť")

-  Else If A_PriorHotkey = #^� ; cedilla 

+  Else If A_PriorHotkey = #^�    ; cedilla 

     BSUnicode("Ţ")

-  Else If A_PriorHotkey = #^+^ ; Querstrich

+  Else If A_PriorHotkey = #^+^   ; Querstrich

     BSUnicode("Ŧ")

-  Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

+  Else If A_PriorHotkey = <^>!�  ; punkt dar�ber 

     BSUnicode("Ṫ")

   Else If A_PriorHotkey = <^>!+^ ; punkt darunter 

     BSUnicode("Ṭ")

@@ -718,11 +721,11 @@ Return
 

 

 +�::

-  If A_PriorHotkey = #^+^ ; Querstrich

+  If A_PriorHotkey = #^+^        ; Querstrich

     BSUnicode("Đ")

-  Else If A_PriorHotkey = +^ ; caron 

+  Else If A_PriorHotkey = +^     ; caron 

     BSUnicode("Ď")

-  Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

+  Else If A_PriorHotkey = <^>!�  ; punkt dar�ber 

     BSUnicode("Ḋ")

   Else If A_PriorHotkey = <^>!+^ ; punkt darunter 

     BSUnicode("Ḍ")

@@ -730,9 +733,9 @@ Return
 Return

 

 +�::  

-  If A_PriorHotkey = #^+ ; Diaerese

+  If A_PriorHotkey = #^+     ; Diaerese

     Send {bs}�

-  Else If A_PriorHotkey = ^ ; circumflex

+  Else If A_PriorHotkey = ^  ; circumflex

     BSUnicode("Ŷ")

   Else

     send Y

@@ -743,16 +746,16 @@ Return
 +c::send �

 

 +v::

-  If A_PriorHotkey = <^>!� ; punkt dar�ber 

+  If A_PriorHotkey = <^>!�    ; punkt dar�ber 

     BSUnicode("Ṗ")

   Else 

     send P

 Return

 

 +b::  

-  If A_PriorHotkey = +^ ; caron  

+  If A_PriorHotkey = +^         ; caron  

     BSUnicode("Ž")

-  Else If A_PriorHotkey = � ; akut 

+  Else If A_PriorHotkey = �     ; akut 

     BSUnicode("Ź")

   Else If A_PriorHotkey = <^>!� ; punkt dar�ber 

     BSUnicode("Ż")

@@ -761,14 +764,14 @@ Return
 Return

 

 +n::

-  If A_PriorHotkey = <^>!� ; punkt dar�ber 

+  If A_PriorHotkey = <^>!�       ; punkt dar�ber 

     BSUnicode("Ḃ")

   Else 

     send B

 Return

 

 +m::

-  If A_PriorHotkey = <^>!� ; punkt dar�ber 

+  If A_PriorHotkey = <^>!�       ; punkt dar�ber 

     BSUnicode("Ṁ")

   Else If A_PriorHotkey = <^>!+^ ; punkt darunter 

     BSUnicode("Ṃ")

@@ -780,7 +783,7 @@ Return
 +.::send :

 

 +-::

-  If A_PriorHotkey = ^ ; circumflex

+  If A_PriorHotkey = ^            ; circumflex

     BSUnicode("Ĵ")

   Else

     send J

@@ -791,7 +794,7 @@ Return
 ;(Win+Ctrl)

 ;----------------

 

-#^^::Unicode("˘") ; brevis, soll tot

+#^^::Unicode("˘")   ; brevis

 #^1::Unicode("¬")

 #^2::send {^}{space} 

 #^3::send 3 

@@ -803,7 +806,7 @@ Return
 #^9::send �

 #^0::send �

 #^�::Unicode("—")

-#^�::send � ; cedilla, soll tot

+#^�::send � ; cedilla

 

 #^q::send @ 

 #^w::send _

@@ -815,8 +818,8 @@ Return
 #^i::send >

 #^o::send `=

 #^p::send `;

-#^�::Unicode("ij")  ;ij

-#^+::Unicode("¨") ; Diaerese, soll tot

+#^�::Unicode("ij")   ; ij

+#^+::Unicode("¨")   ; Diaerese

 

 #^a::send \

 #^s::send `/

@@ -859,12 +862,12 @@ Return
 #^+9::send � 

 #^+0::send � 

 #^+�::send � 

-#^+�::Unicode("˛") ; ogonek, soll tot

+#^+�::Unicode("˛") ; ogonek

 

-#^+q::Unicode("ξ")  ;xi

+#^+q::Unicode("ξ") ;xi

 #^+w::send v

-#^+e::Unicode("λ")  ;lambda

-#^+r::Unicode("χ")  ;chi 

+#^+e::Unicode("λ") ;lambda

+#^+r::Unicode("χ") ;chi 

 #^+t::send w

 #^+z::Unicode("κ") ;kappa

 #^+u::Unicode("ψ") ;psi

@@ -872,7 +875,7 @@ Return
 #^+o::Unicode("φ") ;phi

 #^+p::send q

 #^+�::Unicode("IJ") ;IJ

-#^++::send " ;doppelakut, soll tot

+#^++::send "        ;doppelakut

 

 #^+a::send u

 #^+s::Unicode("ι") ;iota

@@ -906,13 +909,13 @@ Return
 ;(AltGr)

 ;-----------------

 

-<^>!^::Unicode("·") ; Mittenpunkt, tot mit l und L

-<^>!4::Send {PgUp} ;Prev

+<^>!^::Unicode("·") ; Mittenpunkt

+<^>!4::Send {PgUp}   ; Prev

 <^>!8::Send /

 <^>!9::Send *

 <^>!0::Send -

 <^>!�::Unicode("ð") ; eth

-<^>!�::Unicode("˙") ; punkt oben dr�ber, soll tot

+<^>!�::Unicode("˙") ; punkt oben dr�ber

 

 <^>!q::Send {Esc}

 <^>!w::Send {Backspace}

@@ -924,7 +927,7 @@ Return
 <^>!o::Send 9

 <^>!p::Send {+}

 <^>!�::Unicode("ə") ; ?

-<^>!+::Unicode("/") ; Schr�gstrich, soll tot 

+<^>!+::Unicode("/")  ; Schr�gstrich 

 

 <^>!a::Send {Home}

 <^>!s::Send {Left}

@@ -936,12 +939,12 @@ Return
 <^>!k::Send 5

 <^>!l::Send 6

 <^>!�::Send `,

-<^>!�::Send � ; thorn

+<^>!�::Send �        ; thorn

 

 

 <^>!y::Send {Tab}

 <^>!x::Send {Del}

-<^>!c::Send {PgDn} ;Next

+<^>!c::Send {PgDn}   ; Next

 <^>!n::Send �

 <^>!m::Send 1

 <^>!,::Send 2

@@ -958,7 +961,7 @@ Return
 ;(AltGr+Shift)

 ;-----------------------

 

-<^>!+^::Send . ; punkt darunter

+<^>!+^::Send .        ; punkt darunter

 <^>!+4::Send +{Prev}

 <^>!+�::Unicode("Ð") ; Eth

 <^>!+�::Unicode("˚") ; ring obendrauf

@@ -1094,56 +1097,51 @@ Return
 ;Win-Ebene

 ;---------

 

-#1::send #1

-#2::send #2

-#3::send #3

-#4::send #4

-#5::send #5

-#6::send #6

-#7::send #7

-#8::send #8

-#9::send #9

-#0::send #0

-#�::send #-

-

-#q::send #x

-#w::send #v

-

-#e::  

-  Run,%A_WinDir%\System32\Rundll32.exe User32.dll`,LockWorkStation 

-  return

-   ; #e::send #l  funktioniert nicht, Computer wird nicht gesperrt

-   ; http://www.autohotkey.com/forum/viewtopic.php?p=66937#66937

-

-#r::send #c

-#t::send #w

-#z::send #k

-#u::send #h

-#i::send #g

-#o::send #f

-#p::send #q

-#�::send #�

-

-#a::send #u

-#s::send #i

-#d::send #a

-#f::send #e

-#g::send #o

-#h::send #s

-#j::send #n

-#k::send #r

-#l::send #t

-#�::send #d

-#�::send #y

-

-#y::send #�

-#x::send #�

-#c::send #�

-#v::send #p

-#b::send #z

-#n::send #b

-#m::send #m

-#-::send #j

+#1::sendevent #1

+#2::sendevent #2

+#3::sendevent #3

+#4::sendevent #4

+#5::sendevent #5

+#6::sendevent #6

+#7::sendevent #7

+#8::sendevent #8

+#9::sendevent #9

+#0::sendevent #0

+#�::sendevent #-

+

+#q::sendevent #x

+#w::sendevent #v

+#e::sendevent #l  

+#r::sendevent #c

+#t::sendevent #w

+#z::sendevent #k

+#u::sendevent #h

+#i::sendevent #g

+#o::sendevent #f

+#p::sendevent #q

+#�::sendevent #�

+

+#a::sendevent #u

+#s::sendevent #i

+#d::sendevent #a

+#f::sendevent #e

+#g::sendevent #o

+#h::sendevent #s

+#j::sendevent #n

+#k::sendevent #r

+#l::sendevent #t

+#�::sendevent #d

+#�::sendevent #y

+

+#y::sendevent #�

+#x::sendevent #�

+#c::sendevent #�

+#v::sendevent #p

+#b::sendevent #z

+#n::sendevent #b

+#m::sendevent #m

+#-::sendevent #j

+

 

 ;Strg-Shift-Ebene

 ;-----------------

@@ -1218,16 +1216,16 @@ Return
 #^NumpadMult::send �

 #^NumpadSub::send -

 #^NumpadAdd::send �

-#^NumpadEnter::Unicode("�") ; neq

+#^NumpadEnter::Unicode("≠") ; neq

 

-#^Numpad7::Unicode("⅞")   ; 7/8

-#^Numpad8::Unicode("↑")   ; uparrow

-#^Numpad9::Unicode("⅜")   ; 3/8

-#^Numpad4::Unicode("�?")   ; leftarrow

+#^Numpad7::Unicode("⅞")     ; 7/8

+#^Numpad8::Unicode("↑")     ; uparrow

+#^Numpad9::Unicode("⅜")     ; 3/8

+#^Numpad4::Unicode("←")     ; leftarrow

 #^Numpad5::send �

-#^Numpad6::Unicode("→")   ; rightarrow

+#^Numpad6::Unicode("→")     ; rightarrow

 #^Numpad1::send � 

-#^Numpad2::Unicode("↓")   ; downarrow

+#^Numpad2::Unicode("↓")     ; downarrow

 #^Numpad3::send �

 #^Numpad0::send `%

 #^NumPadDot::send .

@@ -1248,7 +1246,7 @@ Return
 #^+NumpadEnter::Unicode("≈") ; approx

 

 #^+NumpadHome::Unicode("⅛")  ; 1/8

-#^+NumpadUp::Unicode("�?")    ; 5/8

+#^+NumpadUp::Unicode("⅝")    ; 5/8

 #^+NumpadPgUp::Unicode("⅜")  ; 3/8

 #^+NumpadLeft::send �

 #^+NumpadClear::send �

@@ -1276,7 +1274,7 @@ Return
 

 

 <^>!Numpad7::Unicode("⅛")  ; 1/8

-<^>!Numpad8::Unicode("�?")  ; 5/8

+<^>!Numpad8::Unicode("⅝")  ; 5/8

 <^>!Numpad9::Unicode("⅜")  ; 3/8

 <^>!Numpad4::send �

 <^>!Numpad5::send �

@@ -1306,8 +1304,9 @@ BSUnicode(code)
   Clipboard := saved_clipboard

   }

 

+; ------------------------------------

 

-toggleneo:

+togglesuspend:

    if state <>

    {

       state =