XProfan

Título de la ventana "Volle Kontrolle encima todos Tasten inkl. Maus"
Windowstyle 24
CLS'Ventana 0,0-%maxx,%maxy-40
Font 2

Repeat

    imprimir %mousepressed,%mousex,%mousey,"   ",

    seleccionar %mousekey

        caseof 1:imprimir "Linke Maustaste",

        caseof 2:imprimir "Rechte Maustaste",

    endselect

    seleccionar %scankey

        caseof 1:imprimir "$01 Linke Botón del ratón VK_LBUTTON",'??

        caseof 2:imprimir "$02 Rechte Botón del ratón VK_RBUTTON",'??

        caseof 3:imprimir "$03 Strg-Unterbrechung VK_CANCEL",

        caseof 4:imprimir "$04 Mittlere Botón del ratón VK_MBUTTON",

        caseof 8:imprimir "$08 BackSpace VK_BACK",

        caseof 9:imprimir "$09 Tab-Taste VK_TAB",

        caseof 12:imprimir "$0C Entfernen VK_CLEAR",

        caseof 13:imprimir "$0D Volver VK_RETURN",

        caseof 16:imprimir "$10 Shift VK_SHIFT",

        caseof 17:imprimir "$11 Strg VK_CONTROL",

        caseof 18:imprimir "$12 Alt / Menü VK_MENU",

        caseof 19:imprimir "$13 Pause VK_PAUSE",

        caseof 20:imprimir "$14 CapsLock VK_CAPITAL",

        caseof 27:imprimir "$1B Esc VK_ESCAPE",

        caseof 32:imprimir "$20 Espacio VK_SPACE",

        caseof 33:imprimir "$21 BildHoch VK_PRIOR",

        caseof 34:imprimir "$22 BildRunter VK_NEXT",

        caseof 35:imprimir "$23 Ende VK_END",

        caseof 36:imprimir "$24 Pos1 VK_HOME",

        caseof 37:imprimir "$25 Links VK_LEFT",

        caseof 38:imprimir "$26 Hoch VK_UP",

        caseof 39:imprimir "$27 Rechts VK_RIGHT",

        caseof 40:imprimir "$28 Runter VK_DOWN",

        caseof 41:imprimir "$29 Select VK_SELECT",

        caseof 42:imprimir "$2A Druck VK_PRINT",

        caseof 43:imprimir "$2B Execute VK_EXECUTE",

        caseof 44:imprimir "$2C Druck VK_SNAPSHOT",

        caseof 45:imprimir "$2D Einfg VK_INSERT",

        caseof 46:imprimir "$2E Entf VK_DELETE",

        caseof 47:imprimir "$2F Ayuda VK_HELP",

        caseof 48:imprimir "$VK_0",

        caseof 49:imprimir "VK_1",

        caseof 50:imprimir "VK_2",

        caseof 51:imprimir "VK_3",

        caseof 52:imprimir "VK_4",

        caseof 53:imprimir "VK_5",

        caseof 54:imprimir "VK_6",

        caseof 55:imprimir "VK_7",

        caseof 56:imprimir "VK_8",

        caseof 57:imprimir "VK_9",

        caseof 65:imprimir "VK_A",

        caseof 66:imprimir "VK_B",

        caseof 67:imprimir "VK_C",

        caseof 68:imprimir "VK_D",

        caseof 69:imprimir "VK_E",

        caseof 70:imprimir "$VK_F",

        caseof 71:imprimir "VK_G",

        caseof 72:imprimir "VK_H",

        caseof 73:imprimir "VK_I",

        caseof 74:imprimir "VK_J",

        caseof 75:imprimir "VK_K",

        caseof 76:imprimir "VK_L",

        caseof 77:imprimir "VK_M",

        caseof 78:imprimir "VK_N",

        caseof 79:imprimir "VK_O",

        caseof 80:imprimir "VK_P",

        caseof 81:imprimir "VK_Q",

        caseof 82:imprimir "VK_R",

        caseof 83:imprimir "VK_S",

        caseof 84:imprimir "VK_T",

        caseof 85:imprimir "VK_U",

        caseof 86:imprimir "VK_V",

        caseof 87:imprimir "VK_W",

        caseof 88:imprimir "VK_X",

        caseof 89:imprimir "VK_Y",

        caseof 90:imprimir "VK_Z",

        caseof 91:imprimir "VK_LWIN",

        caseof 92:imprimir "VK_RWIN",

        caseof 93:imprimir "VK_APPS",

        caseof 96:imprimir "VK_NUMPAD0",

        caseof 97:imprimir "VK_NUMPAD1",

        caseof 98:imprimir "VK_NUMPAD2",

        caseof 99:imprimir "VK_NUMPAD3",

        caseof 100:imprimir "VK_NUMPAD4",

        caseof 101:imprimir "VK_NUMPAD5",

        caseof 102:imprimir "VK_NUMPAD6",

        caseof 103:imprimir "VK_NUMPAD7",

        caseof 104:imprimir "VK_NUMPAD8",

        caseof 105:imprimir "VK_NUMPAD9",

        caseof 106:imprimir "NUMPAD VK_MULTIPLY",

        caseof 107:imprimir "NUMPAD VK_ADD",

        caseof 108:imprimir "NUMPAD VK_SEPARATOR",

        caseof 109:imprimir "NUMPAD VK_SUBTRACT",

        caseof 110:imprimir "NUMPAD(,) VK_DECIMAL",

        caseof 111:imprimir "NUMPAD(/) VK_DIVIDE",

        caseof 112:imprimir "VK_F1",

        caseof 113:imprimir "VK_F2",

        caseof 114:imprimir "VK_F3",

        caseof 115:imprimir "VK_F4",

        caseof 116:imprimir "VK_F5",

        caseof 117:imprimir "VK_F6",

        caseof 118:imprimir "VK_F7",

        caseof 119:imprimir "VK_F8",

        caseof 120:imprimir "VK_F9",

        caseof 121:imprimir "VK_F10",

        caseof 122:imprimir "VK_F11",

        caseof 123:imprimir "VK_F12",

        caseof 124:imprimir "VK_F13",

        caseof 125:imprimir "VK_F14",

        caseof 126:imprimir "VK_F15",

        caseof 127:imprimir "VK_F16",

        caseof 128:imprimir "VK_F17",

        caseof 129:imprimir "VK_F18",

        caseof 130:imprimir "VK_F19",

        caseof 131:imprimir "VK_F20",

        caseof 132:imprimir "VK_F21",

        caseof 133:imprimir "VK_F22",

        caseof 134:imprimir "VK_F23",

        caseof 135:imprimir "VK_F24",

        caseof 144:imprimir "VK_NUMLOCK",

        caseof 145:imprimir "VK_SCROLL",

        caseof 160:imprimir "VK_LSHIFT",

        caseof 161:imprimir "VK_RSHIFT",

        caseof 162:imprimir "VK_LCONTROL",

        caseof 163:imprimir "VK_RCONTROL",

        caseof 164:imprimir "Linke Alt VK_LMENU",

        caseof 165:imprimir "Rechte_Alt VK_RMENU",

        caseof 186:imprimir "Ü_UE",

        caseof 187:imprimir "Plus",

        caseof 188:imprimir "Semicolon",

        caseof 189:imprimir "UnderScore",

        caseof 190:imprimir "FullStop",

        caseof 191:imprimir "Number#",

        caseof 192:imprimir "Ö_OE",

        caseof 219:imprimir "Backslash",

        caseof 220:imprimir "ToThePowerOf",

        caseof 221:imprimir "Accent",

        caseof 222:imprimir "Ä_AE",

        caseof 226:imprimir "LessThan",

        otherwise :imprimir "?";%scankey,

    endselect

    waitinput
    cls

until 0