| |
| |
|
p.specht
 | Referencia: El Windows-Funktionstaste, el Tasten DRUCK, F10 sowie el linke ALT-Taste behalten ihre Función a Ventana-Steuerung, qué algo con el Direktabfrage interferiert. El Fn-Taste al Laptop es con isKey() no abfragbar, modifiziert aber Funktionstasten; NumLock schaltet weiterhin el Num-Tastenfunktionen en, UNTERBR wirkt el laufende Programa direkt.
|
|
| |
| Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 24.05.2021 ▲ |
|
| |
|
|
p.specht
| GetKeyName-Función para große Alemán Keyboards
========================================
Diese Función fußt en el obigen Variante, wurde aber hier auch a ScanCode-Namen de großen Normtastaturen ergänzt. Während el XProfan-Befehl WaitScan en %scankey zwar fast todos ScanCodes zurückliefert (no z.B. para Maustasten), hält dieser Befehl el Programmablauf a. Mit isKey(x)-Abfrageketten es el no Fall, y el Programa podría Temporizador-gesteuert una a Keyboardabfrage parallelen Ablauf (z.B. una Anzeige) bedienen.
Fairer Weise muss dazugesagt voluntad: Diese Aussage bezieht se en Eingabe de individual Signo (z.B. para Steuerungen)! Aufgrund el seriellen Abfrage voluntad Scancodes des alphabetisch vorderen Zeichens wiederholt, si zugleich una alphabetisch später abgefragter Tastendruck gemacht se. Für flüssige Eingabe de Cuerdas wäre dagegen 2-Key-rollover, mejor todavía n-Key-rollover erforderlich, qué aber el Erfassen de Key-pressed_Events y Key-release_Events erfordert, also una bastante otro Technik ...
|
|
| |
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 24.05.2021 ▲ |
|
| |
|
|
p.specht
| WaitScan-Studie
=============
Lo scheint en XProfan-11 no posible, Linke y Rechte Shift/Strg/Alt-Tasten mittels WaitScan-Befehl y zugehörigen Systemvariable %ScanKey a unterscheiden. Auch Mauskeys voluntad no erkannt - dazu hay WaitMouse y %MouseKey. Für geringere Ansprüche reicht esta Art el Abfrage wegen ihrer Einfachheit oft de - anbei una Ejemplo.
El Namen el Tasten voluntad hier komprimierter zugewiesen: Für aufeinander folgende TastenCodes es jeweils sólo el Startwert des ersten el konsekutiven Namen erforderlich.
Windowtitle "WaitScan":cls:font 2
var k$="Timer Linke_Maustaste Rechte_Maustaste Unterbr Mittlere_Maustaste 19 Pause 27 Esc "+\
"69 E 78 N 73 I 82 R 83 S 84 T 65 A 68 D 72 H 85 U 76 L 67 C 71 G 77 M 79 O "+\
"66 B 87 W 70 F 75 K 90 Z 86 V 80 P 186 Ü 222 Ä 219 ß 192 Ö 74 J 88 X 89 Y 81 Q "+\
"48 Z0 Z1 Z2 Z3 Z4 Z5 Z6 Z7 Z8 Z9 96 Num0 Num1 Num2 Num3 Num4 Num5 Num6 Num7 Num8 Num9 "+\
"NumMult NumAdd NumSeparator NumSubtr NumDezimal NumDiv 187 Plus Beistrich Minus Punkt Gatter "+\
"220 ^ Accent 226 < 9 Tab 32 Espacio 13 Volver 144 NumLock Rollen "+\
"160 Linkes_Shift Rechtes_Shift 163 Rechtes_Strg 165 Rechtes_Alt 162 Linkes_Strg "+\
"91 Linkes_Windows Rechtes_Windows AppKey 164 Linkes_Alt 18 Alt_Gr 16 Shift Ctrl "+\'oder fuera
"8 BackSpace 12 NumEntfernen 20 CapsLock 33 BildHoch BildRunter Ende Pos1 "+\
"Links Hoch Rechts Runter Select Druck Execute Druck44 Einfg Entf Ayuda "+\
"112 F1 F2 F3 F4 F5 F6 F7 F8 F9 F10 F11 F12 F13 F14 F15 F16 F17 F18 F19 F20 F21 F22 F23 F24"
declarar key$[255],v&,w&,t$[],sz&:t$[]=explode(k$," "):sz&=SizeOf(t$[]):clear t$[]
:whileloop sz&:v&=&Loop:if val(substr$(k$,v&," "))=0:key$[w&]=substr$(k$,v&," "):inc w&:inc v&
más:w&=val(substr$(k$,v&," ")):endif:endwhile:whileloop 0,255:v&=&Loop:caso key$[v&]=""
key$[v&]="ky_"+str$(v&)':imprimir v&,key$[v&]:if %csrlin>31:waitinput:cls:endif
Endwhile
cls:repeat:WaitScan:imprimir Key$[%scankey],:until 0
|
|
| |
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 24.05.2021 ▲ |
|
| |
|
(933)
Deutsch
English
Français
Español
Italia