Scancodes -> Tastennamen

Übersicht BlitzBasic Codearchiv

Neue Antwort erstellen

Cornelius

Betreff: Scancodes -> Tastennamen

 BeitragDo, Jan 22, 2004 22:05
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich musste für mein aktuelles Projekt die Scancodes zurück in die Namen der jeweiligen Tasten übersetzen. Dafür hab ich folgendes kleines Programm geschrieben, vielleicht ist es für euch ja auch nützlich (Dank geht an TheShadow für die Onlinehilfe):BlitzBasic: [AUSKLAPPEN] 
Dim key$(255)

key(1) = \"Esc\"
key(2) = \"1\"
key(3) = \"2\"
key(4) = \"3\"
key(5) = \"4\"
key(6) = \"5\"
key(7) = \"6\"
key(8) = \"7\"
key(9) = \"8\"
key(10) = \"9\"
key(11) = \"0\"
key(12) = \"ß\"
key(13) = \"´\"
key(14) = \"Backspace\"
key(15) = \"Tabulator\"
key(16) = \"Q\"
key(17) = \"W\"
key(18) = \"E\"
key(19) = \"R\"
key(20) = \"T\"
key(21) = \"Z\"
key(22) = \"U\"
key(23) = \"I\"
key(24) = \"O\"
key(25) = \"P\"
key(26) = \"Ü\"
key(27) = \"+\"
key(28) = \"Enter\"
key(29) = \"Strg links\"
key(30) = \"A\"
key(31) = \"S\"
key(32) = \"D\"
key(33) = \"F\"
key(34) = \"G\"
key(35) = \"H\"
key(36) = \"J\"
key(37) = \"K\"
key(38) = \"L\"
key(39) = \"Ö\"
key(40) = \"Ä\"
key(41) = \"^\"
key(42) = \"Shift links\"
key(43) = \"#\"
key(44) = \"Y\"
key(45) = \"X\"
key(46) = \"C\"
key(47) = \"V\"
key(48) = \"B\"
key(49) = \"N\"
key(50) = \"M\"
key(51) = \",\"
key(52) = \".\"
key(53) = \"-\"
key(54) = \"Shift rechts\"
key(55) = \"* (Num)\"
key(56) = \"Alt links\"
key(57) = \"Leertaste\"
key(58) = \"Feststelltaste\"
key(59) = \"F1\"
key(60) = \"F2\"
key(61) = \"F3\"
key(62) = \"F4\"
key(63) = \"F5\"
key(64) = \"F6\"
key(65) = \"F7\"
key(66) = \"F8\"
key(67) = \"F9\"
key(68) = \"F10\"
key(69) = \"NumLock\"
key(70) = \"Rollen\"
key(71) = \"7 (Num)\"
key(72) = \"8 (Num)\"
key(73) = \"9 (Num)\"
key(74) = \"- (Num)\"
key(75) = \"4 (Num)\"
key(76) = \"5 (Num)\"
key(77) = \"6 (Num)\"
key(78) = \"+ (Num)\"
key(79) = \"1 (Num)\"
key(80) = \"2 (Num)\"
key(81) = \"3 (Num)\"
key(82) = \"0 (Num)\"
key(83) = \", (Num)\"
key(86) = \"<\"
key(87) = \"F11\"
key(88) = \"F12\"
key(100) = \"F13\"
key(101) = \"F14\"
key(102) = \"F15\"
key(112) = \"Kana\"
key(115) = \"/?\"
key(121) = \"Convert\"
key(123) = \"NoConvert\"
key(125) = \"Yen\"
key(126) = \". (Num)\"
key(141) = \"= (Num)\"
key(144) = \"PrevTrack\"
key(145) = \"AT\"
key(146) = \":\"
key(147) = \"_\"
key(148) = \"Kanji\"
key(149) = \"Stop\"
key(150) = \"AX\"
key(151) = \"Unlabeled\"
key(153) = \"Next Track (Media)\"
key(156) = \"Enter (Num)\"
key(157) = \"Strg rechts\"
key(160) = \"Mute (Media)\"
key(161) = \"Taschenrechner (Windows)\"
key(162) = \"Play/Pause (Media)\"
key(164) = \"Stop (Media)\"
key(174) = \"Volume - (Media)\"
key(176) = \"Volume + (Media)\"
key(178) = \"Home (Internet)\"
key(179) = \", (Num)\"
key(181) = \"/ (Num)\"
key(183) = \"Druck\"
key(184) = \"AltGr rechts\"
key(197) = \"Pause\"
key(199) = \"Pos1\"
key(200) = \"Pfeiltaste Hoch\"
key(201) = \"Bild hoch\"
key(203) = \"Pfeiltaste Links\"
key(205) = \"Pfeiltaste Rechts\"
key(207) = \"Ende\"
key(208) = \"Pfeiltaste Runter\"
key(209) = \"Bild runter\"
key(210) = \"Einfg\"
key(211) = \"Entf\"
key(219) = \"Windowstaste links\"
key(220) = \"Windowstaste rechts\"
key(221) = \"Menü (Windows)\"
key(222) = \"Power (System)\"
key(223) = \"Sleep (System)\"
key(227) = \"WakeUp (System)\"
key(229) = \"Suchen (Internet)\"
key(230) = \"Favoriten (Internet)\"
key(231) = \"Aktualisieren (Internet)\"
key(232) = \"Abbrechen (Internet)\"
key(233) = \"Vorwärts (Internet)\"
key(234) = \"Zurück (Internet)\"
key(235) = \"Arbeitsplatz (Windows)\"
key(236) = \"E-Mail (Windows)\"
key(237) = \"Media (Windows)\"

For i = 0 To 255
	If key(i) = \"\" Then key(i) = \"Unbekannte Taste (Code \" + i + \")\"
Next
  • Zuletzt bearbeitet von Cornelius am Fr, Jan 23, 2004 23:56, insgesamt einmal bearbeitet
 

OJay

 BeitragDo, Jan 22, 2004 22:10
Antworten mit Zitat
Benutzer-Profile anzeigen
hm, warum ein array? wieso keine konstanten? aber da braucht man ja nur einen replace drüberlaufen lassen Smile

Cornelius

 BeitragDo, Jan 22, 2004 22:21
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich möchte NICHT praktische Konstanten haben, damit man nichtmehr die Nummern eintippen muss (sowas gab's schon irgendwo (evtl. auch nur im alten Forum)).

Ich habe die Scancodes in einer Variable und möchte nun anstatt der Nummern einen netten Text anzeigen lassen.
 

BIG BUG

 BeitragFr, Jan 23, 2004 16:03
Antworten mit Zitat
Benutzer-Profile anzeigen
Ist sehr nützlich wenn man z.B. eine frei belegbare Steuerung einbauen möchte.

Allerdings gelten diese Scancodes nur für deutsche Tastaturen.
Besser wäre es vielleicht diese Texte sprachabhängig in einer Datei zuzuordnen. So kann man die Übersetzung der Texte sowie Anpassen der Scancodes mit einer Klappe erschlagen.
B3D-Exporter für Cinema4D!(V1.4)
MD2-Exporter für Cinema4D!(final)

XCrash

Betreff: ...

 BeitragMi, März 26, 2008 20:25
Antworten mit Zitat
Benutzer-Profile anzeigen
also, ich find allein die liste schon gut:-) ich hatte vorher eine, da stimmte rein gar nichts, das war echt zu kotz**

mfg

XCrash
Meine erstes kleines game xD
http://rapidshare.de/files/388...e.rar.html
is nich viel, aber is ja auch mein erstes:-)

peacemaker

 BeitragMi, März 26, 2008 23:10
Antworten mit Zitat
Benutzer-Profile anzeigen
Obwohl sie schon irgendwo mal gezeigt wurden, hier noch als Konstanten:

Code: [AUSKLAPPEN]


; Zahlen
Const KEY_1   =   2
Const KEY_2   =   3
Const KEY_3   =   4
Const KEY_4   =   5

; Buchstaben
Const KEY_Q   =   16
Const KEY_W   =   17
Const KEY_E   =   18
Const KEY_R   =   19
Const KEY_T   =   20
Const KEY_Z   =   21
Const KEY_U   =   22
Const KEY_I   =   23
Const KEY_O   =   24
Const KEY_P   =   25

Const KEY_A   =   30
Const KEY_S   =   31
Const KEY_D   =   32
Const KEY_F   =   33
Const KEY_G   =   34
Const KEY_H   =   35
Const KEY_J   =   36
Const KEY_K   =   37
Const KEY_L   =   38

Const KEY_Y   =   44
Const KEY_X   =   45
Const KEY_C   =   46
Const KEY_V   =   47
Const KEY_B   =   48
Const KEY_N   =   49
Const KEY_M   =   50

; Sonstige Sachen wie Enter, Tab usw
Const KEY_TAB   =   15
Const KEY_CAPS   =   58
Const KEY_SHIFT   =   42
Const KEY_CTRL   =   29

Const KEY_WIN   =   219
Const KEY_ALT   =   56
Const KEY_LEER   =   57
Const KEY_ALTGR   =   184
Const KEY_WIN_R   =   220
Const KEY_APP   =   221
Const KEY_CTRL_R=   157

Const KEY_SHIFT_R   =   54
Const KEY_ENTER      =   28
Const KEY_RETURN   =   14

; Oberste Reihe
Const KEY_ESC   =   1
Const KEY_F1   =   59
Const KEY_F2   =   60
Const KEY_F3   =   61
Const KEY_F4   =   62
Const KEY_F5   =   63
Const KEY_F6   =   64
Const KEY_F7   =   65
Const KEY_F8   =   66
Const KEY_F9   =   67
Const KEY_F10   =   68
Const KEY_F11   =   87
Const KEY_F12   =   88

Const KEY_PRINT   =   183
Const KEY_SCROLL=   79
Const KEY_PAUSE   =   197

; Internet-Stuff
Const KEY_INSERT   =   210
Const KEY_HOME      =   199
Const KEY_DELETE   =   211
Const KEY_PAGE_UP   =   201
Const KEY_PAGE_DOWN   =   209
Const KEY_END      =   207

; Pfeiltasten
Const KEY_LEFT      =   203
Const KEY_RIGHT      =   205
Const KEY_UP      =   200
Const KEY_DOWN      =   208

; Zahleblock
Const KEY_Z0      =   82
Const KEY_Z1      =   79
Const KEY_Z2      =   80
Const KEY_Z3      =   81

Const KEY_Z4      =   75
Const KEY_Z5      =   76
Const KEY_Z6      =   77

Const KEY_Z7      =   71
Const KEY_Z8      =   72
Const KEY_Z9      =   73

Const KEY_NUM_LOCK   =   69
Const KEY_SLASH      =   181
Const KEY_STAR      =   55
Const KEY_MINUS      =   74
Const KEY_PLUS      =   78
Const KEY_ENTER_R   =   156

Const KEY_DEL_R      =   83

; Maus
Const MOUSE_LEFT   =   1
Const MOUSE_RIGHT   =   2
Const MOUSE_WHEEL   =   3


Gehört denke ich in jede utils.BB.

mfG
~Tehadon~
www.tehadon.de
http://www.blitzforum.de/worklogs/14/

Silver_Knee

 BeitragDo, März 27, 2008 11:44
Antworten mit Zitat
Benutzer-Profile anzeigen
das hat aber einen Vollkommen anderen sinn

deine Liste kann Taste->Scancode und die liste des ersten Posts Scancode->Taste.

Also ich find die obere liste echt praktisch gerade weil ich die Func WaitScan (vllt kennt sie einer von Coffees wetbewerben) bis jetzt immer nur Die Zahlen zurückgibt...

Code: [AUSKLAPPEN]
Function WaitScan()
   Repeat
      For scan=1To 255
         If KeyHit(scan) Then Return scan
      Next
      Delay 100
   Forever
End Function

peacemaker

 BeitragDo, März 27, 2008 13:22
Antworten mit Zitat
Benutzer-Profile anzeigen
Stell dir vor, das ist mir auch klar. Aber ich hab sie trotzdem hier reingetan, vielleicht kann sie jemand gebrauchen. Wer sie nicht braucht muss sie nicht nehmen.

mfG
~Tehadon~
www.tehadon.de
http://www.blitzforum.de/worklogs/14/

Neue Antwort erstellen


Übersicht BlitzBasic Codearchiv

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group