From c28196abb2a1ded06c3e8fb6e2d516f13ac9ef56 Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Sat, 19 Jul 2008 15:21:14 -0700
Subject: [PATCH] keyboard scancodes vocab

---
 extra/game-input/scancodes/scancodes.factor | 175 ++++++++++++++++++++
 1 file changed, 175 insertions(+)
 create mode 100644 extra/game-input/scancodes/scancodes.factor

diff --git a/extra/game-input/scancodes/scancodes.factor b/extra/game-input/scancodes/scancodes.factor
new file mode 100644
index 0000000000..747d883822
--- /dev/null
+++ b/extra/game-input/scancodes/scancodes.factor
@@ -0,0 +1,175 @@
+IN: game-input.scancodes
+
+: key-undefined HEX: 0000 ; inline
+: key-error-roll-over HEX: 0001 ; inline
+: key-error-post-fail HEX: 0002 ; inline
+: key-error-undefined HEX: 0003 ; inline
+: key-a HEX: 0004 ; inline
+: key-b HEX: 0005 ; inline
+: key-c HEX: 0006 ; inline
+: key-d HEX: 0007 ; inline
+: key-e HEX: 0008 ; inline
+: key-f HEX: 0009 ; inline
+: key-g HEX: 000a ; inline
+: key-h HEX: 000b ; inline
+: key-i HEX: 000c ; inline
+: key-j HEX: 000d ; inline
+: key-k HEX: 000e ; inline
+: key-l HEX: 000f ; inline
+: key-m HEX: 0010 ; inline
+: key-n HEX: 0011 ; inline
+: key-o HEX: 0012 ; inline
+: key-p HEX: 0013 ; inline
+: key-q HEX: 0014 ; inline
+: key-r HEX: 0015 ; inline
+: key-s HEX: 0016 ; inline
+: key-t HEX: 0017 ; inline
+: key-u HEX: 0018 ; inline
+: key-v HEX: 0019 ; inline
+: key-w HEX: 001a ; inline
+: key-x HEX: 001b ; inline
+: key-y HEX: 001c ; inline
+: key-z HEX: 001d ; inline
+: key-1 HEX: 001e ; inline
+: key-2 HEX: 001f ; inline
+: key-3 HEX: 0020 ; inline
+: key-4 HEX: 0021 ; inline
+: key-5 HEX: 0022 ; inline
+: key-6 HEX: 0023 ; inline
+: key-7 HEX: 0024 ; inline
+: key-8 HEX: 0025 ; inline
+: key-9 HEX: 0026 ; inline
+: key-0 HEX: 0027 ; inline
+: key-return HEX: 0028 ; inline
+: key-escape HEX: 0029 ; inline
+: key-backspace HEX: 002a ; inline
+: key-tab HEX: 002b ; inline
+: key-space HEX: 002c ; inline
+: key-- HEX: 002d ; inline
+: key-= HEX: 002e ; inline
+: key-[ HEX: 002f ; inline
+: key-] HEX: 0030 ; inline
+: key-/ HEX: 0031 ; inline
+: key-# HEX: 0032 ; inline
+: key-; HEX: 0033 ; inline
+: key-' HEX: 0034 ; inline
+: key-` HEX: 0035 ; inline
+: key-, HEX: 0036 ; inline
+: key-. HEX: 0037 ; inline
+: key-/ HEX: 0038 ; inline
+: key-caps-lock HEX: 0039 ; inline
+: key-f1 HEX: 003a ; inline
+: key-f2 HEX: 003b ; inline
+: key-f3 HEX: 003c ; inline
+: key-f4 HEX: 003d ; inline
+: key-f5 HEX: 003e ; inline
+: key-f6 HEX: 003f ; inline
+: key-f7 HEX: 0040 ; inline
+: key-f8 HEX: 0041 ; inline
+: key-f9 HEX: 0042 ; inline
+: key-f10 HEX: 0043 ; inline
+: key-f11 HEX: 0044 ; inline
+: key-f12 HEX: 0045 ; inline
+: key-print-screen HEX: 0046 ; inline
+: key-scroll-lock HEX: 0047 ; inline
+: key-pause HEX: 0048 ; inline
+: key-insert HEX: 0049 ; inline
+: key-home HEX: 004a ; inline
+: key-page-up HEX: 004b ; inline
+: key-delete HEX: 004c ; inline
+: key-end HEX: 004d ; inline
+: key-page-down HEX: 004e ; inline
+: key-right-arrow HEX: 004f ; inline
+: key-left-arrow HEX: 0050 ; inline
+: key-down-arrow HEX: 0051 ; inline
+: key-up-arrow HEX: 0052 ; inline
+: key-keypad-numlock HEX: 0053 ; inline
+: key-keypad-slash HEX: 0054 ; inline
+: key-keypad-asterisk HEX: 0055 ; inline
+: key-keypad-dash HEX: 0056 ; inline
+: key-keypad-plus HEX: 0057 ; inline
+: key-keypad-enter HEX: 0058 ; inline
+: key-keypad-1 HEX: 0059 ; inline
+: key-keypad-2 HEX: 005a ; inline
+: key-keypad-3 HEX: 005b ; inline
+: key-keypad-4 HEX: 005c ; inline
+: key-keypad-5 HEX: 005d ; inline
+: key-keypad-6 HEX: 005e ; inline
+: key-keypad-7 HEX: 005f ; inline
+: key-keypad-8 HEX: 0060 ; inline
+: key-keypad-9 HEX: 0061 ; inline
+: key-keypad-0 HEX: 0062 ; inline
+: key-keypad-. HEX: 0063 ; inline
+: key-\-non-us HEX: 0064 ; inline
+: key-application HEX: 0065 ; inline
+: key-power HEX: 0066 ; inline
+: key-keypad-= HEX: 0067 ; inline
+: key-f13 HEX: 0068 ; inline
+: key-f14 HEX: 0069 ; inline
+: key-f15 HEX: 006a ; inline
+: key-f16 HEX: 006b ; inline
+: key-f17 HEX: 006c ; inline
+: key-f18 HEX: 006d ; inline
+: key-f19 HEX: 006e ; inline
+: key-f20 HEX: 006f ; inline
+: key-f21 HEX: 0070 ; inline
+: key-f22 HEX: 0071 ; inline
+: key-f23 HEX: 0072 ; inline
+: key-f24 HEX: 0073 ; inline
+: key-execute HEX: 0074 ; inline
+: key-help HEX: 0075 ; inline
+: key-menu HEX: 0076 ; inline
+: key-select HEX: 0077 ; inline
+: key-stop HEX: 0078 ; inline
+: key-again HEX: 0079 ; inline
+: key-undo HEX: 007a ; inline
+: key-cut HEX: 007b ; inline
+: key-copy HEX: 007c ; inline
+: key-paste HEX: 007d ; inline
+: key-find HEX: 007e ; inline
+: key-mute HEX: 007f ; inline
+: key-volume-up HEX: 0080 ; inline
+: key-volume-down HEX: 0081 ; inline
+: key-locking-caps-lock HEX: 0082 ; inline
+: key-locking-num-lock HEX: 0083 ; inline
+: key-locking-scroll-lock HEX: 0084 ; inline
+: key-keypad-, HEX: 0085 ; inline
+: key-keypad-=-as-400 HEX: 0086 ; inline
+: key-international-1 HEX: 0087 ; inline
+: key-international-2 HEX: 0088 ; inline
+: key-international-3 HEX: 0089 ; inline
+: key-international-4 HEX: 008a ; inline
+: key-international-5 HEX: 008b ; inline
+: key-international-6 HEX: 008c ; inline
+: key-international-7 HEX: 008d ; inline
+: key-international-8 HEX: 008e ; inline
+: key-international-9 HEX: 008f ; inline
+: key-lang-1 HEX: 0090 ; inline
+: key-lang-2 HEX: 0091 ; inline
+: key-lang-3 HEX: 0092 ; inline
+: key-lang-4 HEX: 0093 ; inline
+: key-lang-5 HEX: 0094 ; inline
+: key-lang-6 HEX: 0095 ; inline
+: key-lang-7 HEX: 0096 ; inline
+: key-lang-8 HEX: 0097 ; inline
+: key-lang-9 HEX: 0098 ; inline
+: key-alternate-erase HEX: 0099 ; inline
+: key-sysreq HEX: 009a ; inline
+: key-cancel HEX: 009b ; inline
+: key-clear HEX: 009c ; inline
+: key-prior HEX: 009d ; inline
+: key-return HEX: 009e ; inline
+: key-separator HEX: 009f ; inline
+: key-out HEX: 00a0 ; inline
+: key-oper HEX: 00a1 ; inline
+: key-clear HEX: 00a2 ; inline
+: key-crsel HEX: 00a3 ; inline
+: key-exsel HEX: 00a4 ; inline
+: key-left-control HEX: 00e0 ; inline
+: key-left-shift HEX: 00e1 ; inline
+: key-left-alt HEX: 00e2 ; inline
+: key-left-gui HEX: 00e3 ; inline
+: key-right-control HEX: 00e4 ; inline
+: key-right-shift HEX: 00e5 ; inline
+: key-right-alt HEX: 00e6 ; inline
+: key-right-gui HEX: 00e7 ; inline