From a79f538254e2ee4044e4a2022df1246346e82c53 Mon Sep 17 00:00:00 2001
From: martin_r <martin_r@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Mon, 27 Oct 2008 19:39:39 +0000
Subject: Anpassung an die Referenz

git-svn-id: https://svn.neo-layout.org@1046 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 windows/autohotkey/Source/Keys-Numbers.ahk | 46 ++++++++++++++++--------------
 1 file changed, 24 insertions(+), 22 deletions(-)

(limited to 'windows/autohotkey/Source/Keys-Numbers.ahk')

diff --git a/windows/autohotkey/Source/Keys-Numbers.ahk b/windows/autohotkey/Source/Keys-Numbers.ahk
index e4f5641..4f47afb 100644
--- a/windows/autohotkey/Source/Keys-Numbers.ahk
+++ b/windows/autohotkey/Source/Keys-Numbers.ahk
@@ -8,6 +8,8 @@ neo_0:
      OutputChar("’", "rightsingleqoutemark")
    else if (Ebene = 4)
      OutputChar("{NumpadSub}", "KP_Minus")
+   else if (Ebene = 5)
+     SendUnicodeChar(0x2080, "U2080")
    else if (Ebene = 6)
      SendUnicodeChar(0x2205, "emptyset") ; leere Menge
 return
@@ -19,27 +21,25 @@ neo_1:
                 or CheckDeadUni("a3",0x2081)) ; Tiefgestellte 1
     OutputChar12(1,"°",1,"degree")
   else if (Ebene = 3)
-    SendUnicodeChar(0x00B9, "onesuperior") ; Hochgestellte 1
+    OutputChar("¹", "onesuperior") ; Hochgestellte 1
   else if (Ebene = 4)
-    SendUnicodeChar(0x2022, "enfilledcircbullet") ; Bullet
+    OutputChar("º", "U00BA") ; männlicher Ordinalindikator (º)
   else if (Ebene = 5)
     SendUnicodeChar(0x2081, "U2081") ; Tiefgestellte 1
   else if (Ebene = 6)
-    SendUnicodeChar(0x00AC, "notsign") ; Nicht-Symbol
+    OutputChar("¬", "notsign") ; Nicht-Symbol
 return
 
 neo_2:
   noCaps = 1
   EbeneAktualisieren()
-  if (Ebene = 1 and !(CheckDeadUni("c1",0x00B2) ; Hochgestellte 2
-                   or CheckDeadUni("a3",0x2082))) ; Tiefgestellte 2
-    OutputChar(2,2)
-  else if (Ebene = 2)
-    SendUnicodeChar(0x2116, "numerosign") ; Numero
+  if Ebene12 and !(CheckDeadUni("c1",0x00B2) ; Hochgestellte 2
+                or CheckDeadUni("a3",0x2082)) ; Tiefgestellte 2
+    OutputChar12(2,"§",2,"section")
   else if (Ebene = 3)
-    SendUnicodeChar(0x00B2, "twosuperior") ; Hochgestellte 2
+    OutputChar("²", "twosuperior") ; Hochgestellte 2
   else if (Ebene = 4)
-    SendUnicodeChar(0x2023, "U2023") ; Aufzählungspfeil
+    OutputChar("ª", "U00AA") ; weiblicher Ordinalindikator (ª)
   else if (Ebene = 5)
     SendUnicodeChar(0x2082, "U2082") ; Tiefgestellte 2
   else if (Ebene = 6)
@@ -49,13 +49,15 @@ return
 neo_3:
   noCaps = 1
   EbeneAktualisieren()
-  if Ebene12 and !(CheckDeadUni("c1",0x00B3) ; Hochgestellte 3
-                or CheckDeadUni("a3",0x2083)) ; Tiefgestellte 3
-    OutputChar12(3,"§",3,"section")
+  if (Ebene = 1) and !(CheckDeadUni("c1",0x00B3) ; Hochgestellte 3
+                    or CheckDeadUni("a3",0x2083)) ; Tiefgestellte 3
+    OutputChar(3,3)
+  else if (Ebene = 2)
+    SendUnicodeChar(0x2113, "U2113") ; kleines l (Skript)
   else if (Ebene = 3)
-    SendUnicodeChar(0x00B3, "threesuperior") ; Hochgestellte 3
+    OutputChar("³", "threesuperior") ; Hochgestellte 3
   else if (Ebene = 4)
-    SendUnicodeChar(0x266B, "U226B") ; 2 Achtelnoten
+    SendUnicodeChar(0x2116, "numerosign") ; Numero
   else if (Ebene = 5)
     SendUnicodeChar(0x2083, "U2083") ; Tiefgestellte 3
   else if (Ebene = 6)
@@ -69,13 +71,13 @@ neo_4:
                     or CheckDeadUni("a3",0x2084)) ; Tiefgestellte 4
     OutputChar(4,4)
   else if (Ebene = 2)
-    SendUnicodeChar(0x00BB, "guillemotright") ; Double guillemot right
+    OutputChar("»", "guillemotright")
   else if (Ebene = 3)
     OutputChar("›", "U230A") ; Single guillemot right
   else if (Ebene = 4)
     OutputChar("{PgUp}", "Prior") ; Bild auf
   else if (Ebene = 5)
-    SendUnicodeChar(0x2113, "U2213") ; Script small L
+    OutputChar("†", "dagger") ; Kreuz
   else if (Ebene = 6)
     SendUnicodeChar(0x22A5, "uptack") ; Senkrecht
 return
@@ -87,11 +89,11 @@ neo_5:
                     or CheckDeadUni("a3",0x2085)) ; Tiefgestellte 5
     OutputChar(5,5)
   else if (Ebene = 2)
-    SendUnicodeChar(0x00AB, "guillemotleft") ; Double guillemot left
+    OutputChar("«", "guillemotleft") ; Double guillemot left
   else if (Ebene = 3)
     OutputChar("‹", "U2039") ; Single guillemot left
   else if (Ebene = 5)
-    SendUnicodeChar(0x0AF8, "femalesymbol") ; Kreuz (Dagger)
+    SendUnicodeChar(0x2640, "femalesymbol")
   else if (Ebene = 6)
     SendUnicodeChar(0x2221, "U2221") ; Winkel
 return
@@ -109,7 +111,7 @@ neo_6:
   else if (Ebene = 4)
     OutputChar("£", "sterling")
   else if (Ebene = 5)
-    SendUnicodeChar(0x0AF7, "malesymbol")
+    SendUnicodeChar(0x2642, "malesymbol")
   else if (Ebene = 6)
     SendUnicodeChar(0x2225, "U2225") ; parallel
 return
@@ -127,7 +129,7 @@ neo_7:
   else if (Ebene = 5)
     SendUnicodeChar(0x03BA, "Greek_kappa") ; greek small letter kappa
   else if (Ebene = 6)
-    SendUnicodeChar(0x2209, "notelementof") ; nicht Element von
+    SendUnicodeChar(0x2192, "rightarrow") ; Rechtspfeil
 return
 
 neo_8:
@@ -143,7 +145,7 @@ neo_8:
   else if (Ebene = 5)
     SendUnicodeChar(0x27E8, "U27E8") ; bra (öffnende spitze Klammer)
   else if (Ebene = 6)
-    SendUnicodeChar(0x2204, "U2204") ; es existiert nicht
+    SendUnicodeChar(0x221E, "infinity")
 return
 
 neo_9:
-- 
cgit v1.2.3