1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
|
neo_0:
noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2070) ; Hochgestellte 0
or CheckDeadUni("a3",0x2080)) ; Tiefgestellte 0
OutputChar12(0,"”",0,"rightdoublequotemark")
else if (Ebene = 3)
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
neo_1:
noCaps=1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x00B9) ; Hochgestellte 1
or CheckDeadUni("a3",0x2081)) ; Tiefgestellte 1
OutputChar12(1,"°",1,"degree")
else if (Ebene = 3)
OutputChar("¹", "onesuperior") ; Hochgestellte 1
else if (Ebene = 4)
OutputChar("º", "U00BA") ; männlicher Ordinalindikator (º)
else if (Ebene = 5)
SendUnicodeChar(0x2081, "U2081") ; Tiefgestellte 1
else if (Ebene = 6)
OutputChar("¬", "notsign") ; Nicht-Symbol
return
neo_2:
noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x00B2) ; Hochgestellte 2
or CheckDeadUni("a3",0x2082)) ; Tiefgestellte 2
OutputChar12(2,"§",2,"section")
else if (Ebene = 3)
OutputChar("²", "twosuperior") ; Hochgestellte 2
else if (Ebene = 4)
OutputChar("ª", "U00AA") ; weiblicher Ordinalindikator (ª)
else if (Ebene = 5)
SendUnicodeChar(0x2082, "U2082") ; Tiefgestellte 2
else if (Ebene = 6)
SendUnicodeChar(0x2228, "logicalor") ; Logisches Oder
return
neo_3:
noCaps = 1
EbeneAktualisieren()
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)
OutputChar("³", "threesuperior") ; Hochgestellte 3
else if (Ebene = 4)
SendUnicodeChar(0x2116, "numerosign") ; Numero
else if (Ebene = 5)
SendUnicodeChar(0x2083, "U2083") ; Tiefgestellte 3
else if (Ebene = 6)
SendUnicodeChar(0x2227, "logicaland") ; Logisches Und
return
neo_4:
noCaps = 1
EbeneAktualisieren()
if (Ebene = 1) and !(CheckDeadUni("c1",0x2074) ; Hochgestellte 4
or CheckDeadUni("a3",0x2084)) ; Tiefgestellte 4
OutputChar(4,4)
else if (Ebene = 2)
OutputChar("»", "guillemotright")
else if (Ebene = 3)
OutputChar("›", "U230A") ; Single guillemot right
else if (Ebene = 4)
OutputChar("{PgUp}", "Prior") ; Bild auf
else if (Ebene = 5)
OutputChar("†", "dagger") ; Kreuz
else if (Ebene = 6)
SendUnicodeChar(0x22A5, "uptack") ; Senkrecht
return
neo_5:
noCaps = 1
EbeneAktualisieren()
if (Ebene = 1) and !(CheckDeadUni("c1",0x2075) ; Hochgestellte 5
or CheckDeadUni("a3",0x2085)) ; Tiefgestellte 5
OutputChar(5,5)
else if (Ebene = 2)
OutputChar("«", "guillemotleft") ; Double guillemot left
else if (Ebene = 3)
OutputChar("‹", "U2039") ; Single guillemot left
else if (Ebene = 5)
SendUnicodeChar(0x2640, "femalesymbol")
else if (Ebene = 6)
SendUnicodeChar(0x2221, "U2221") ; Winkel
return
neo_6:
noCaps = 1
EbeneAktualisieren()
if (Ebene = 1) and !(CheckDeadUni("c1",0x2076) ; Hochgestellte 6
or CheckDeadUni("a3",0x2086)) ; Tiefgestellte 6
OutputChar(6,6)
else if (Ebene = 2)
SendUnicodeChar(0x20AC, "EuroSign")
else if (Ebene = 3)
OutputChar("¢", "cent")
else if (Ebene = 4)
OutputChar("£", "sterling")
else if (Ebene = 5)
SendUnicodeChar(0x2642, "malesymbol")
else if (Ebene = 6)
SendUnicodeChar(0x2225, "U2225") ; parallel
return
neo_7:
noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2077) ; Hochgestellte 7
or CheckDeadUni("a3",0x2087)) ; Tiefgestellte 7
OutputChar12(7,"$",7,"dollar")
else if (Ebene = 3)
OutputChar("¥", "yen")
else if (Ebene = 4)
OutputChar("¤", "currency")
else if (Ebene = 5)
SendUnicodeChar(0x03BA, "Greek_kappa") ; greek small letter kappa
else if (Ebene = 6)
SendUnicodeChar(0x2192, "rightarrow") ; Rechtspfeil
return
neo_8:
noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2078) ; Hochgestellte 8
or CheckDeadUni("a3",0x2088)) ; Tiefgestellte 8
OutputChar12(8,"„",8,"doublelowquotemark")
else if (Ebene = 3)
OutputChar("‚", "singlelowquotemark")
else if (Ebene = 4)
OutputChar("{NumpadDiv}", "KP_Divide")
else if (Ebene = 5)
SendUnicodeChar(0x27E8, "U27E8") ; bra (öffnende spitze Klammer)
else if (Ebene = 6)
SendUnicodeChar(0x221E, "infinity")
return
neo_9:
noCaps = 1
EbeneAktualisieren()
if Ebene12 and !(CheckDeadUni("c1",0x2079) ; Hochgestellte 9
or CheckDeadUni("a3",0x2089)) ; Tiefgestellte 9
OutputChar12(9,"“",9,"leftdoublequotemark")
else if (Ebene = 3)
OutputChar("‘", "leftsinglequotemark")
else if (Ebene = 4)
OutputChar("{NumpadMult}", "KP_Multiply")
else if (Ebene = 5)
SendUnicodeChar(0x27E9, "U27E9") ; ket (schließende spitze Klammer)
else if (Ebene = 6)
SendUnicodeChar(0x2226, "U2226") ; nicht parallel
return
|
