overhaul keyboard module include syntax

[sheet.git] / nethack.eng.inc.pl

diff --git a/nethack.eng.inc.pl b/nethack.eng.inc.pl
new file mode 100644 (file)
index 0000000..be69164
--- /dev/null
+++ b/nethack.eng.inc.pl
@@ -0,0 +1,142 @@
+use utf8;
+{
+
+key => {
+       'b' => ["step left down",  'numpad 1'],
+       'j' => ["step down",       'numpad 2'],
+       'n' => ["step right down", 'numpad 3'],
+       'h' => ["step left",       'numpad 4'],
+       'l' => ["step right",      'numpad 6'],
+       'y' => ["step left up",    'numpad 7'],
+       'k' => ["step up",         'numpad 8'],
+       'u' => ["step right up",   'numpad 9'],
+
+       'B' => ["go left down",    'shift numpad 1'],
+       'J' => ["go down",         'shift numpad 2'],
+       'N' => ["go right down",   'shift numpad 3'],
+       'H' => ["go left",         'shift numpad 4'],
+       'L' => ["go right",        'shift numpad 6'],
+       'Y' => ["go left up",      'shift numpad 7'],
+       'K' => ["go up",           'shift numpad 8'],
+       'U' => ["go right up",     'shift numpad 9'],
+
+       '^b'=> ["run left down",   'numpad 5 1'],
+       '^j'=> ["run down",        'numpad 5 2'],
+       '^n'=> ["run right down",  'numpad 5 3'],
+       '^h'=> ["run left",        'numpad 5 4'],
+       '^l'=> ["run right",       'numpad 5 6'],
+       '^y'=> ["run left up",     'numpad 5 7'],
+       '^k'=> ["run up",          'numpad 5 8'],
+       '^u'=> ["run right up",    'numpad 5 9'],
+
+       'g' => ["run until interest"],
+       'm' => ["m$sign{_}ove blind", 'no pickup'],
+       'G' => ["g any$sign{_}where", "follow branches"],
+
+       '?' => ["help menu"],
+       '+?'=> ["more help"],
+       '/' => ["explain symbol"],
+       '&' => ["tell com$sign{_}m$sign{_}and"],
+       '<' => ["climb up ladder"],
+       '>' => ["desc$sign{_}ent ladder"],
+       '.' => ["rest (noop)"],
+       '_' => ["travel to"],
+
+       '+2'=> ["two$sign{_}weapon toggle"],
+       'a' => ["apply tool"],
+       'A' => ["remove all armor"],
+       '^a'=> ["redo comm$sign{_}and", 'Again'],
+       '+a'=> ["adjust inv$sign{_}ent$sign{_}ory"],
+       'c' => ["close door"],
+       'C' => ["call monster"],
+       '+c'=> ["chat"],
+       'd' => ["drop item"],
+       'D' => ["drop items"],
+       '^d'=> ["kick"],
+       '+d'=> ["dip"],
+       'e' => ["eat food"],
+       'E' => ["en$sign{_}grave"],
+       '+e'=> ["weapon skills", 'Enhance'],
+       'f' => ["fire quiver"],
+       'F' => ["fight monster"],
+       '+f'=> ["force lock"],
+       'i' => ["invent$sign{_}ory"],
+       'I' => ["invent$sign{_}ory part"],
+       '+i'=> ["invoke object"],
+       '+j'=> ["jump"],
+       '+l'=> ["loot"],
+       '+m'=> ["mons$sign{_}ter abil$sign{_}ity"],
+       '+n'=> ["name item$sign{_}(s)"],
+       'o' => ["open door"],
+       'O' => ["options"],
+       '+o'=> ["offer sacrifice"],
+       'p' => ["pay bill"],
+       'P' => ["put on"],
+       '^p'=> ["repeat message"],
+       '+p'=> ["pray"],
+       'q' => ["drink", 'Quaff'],
+       'Q' => ["quiver ammo"],
+       '+q'=> ["exit game", 'Quit'],
+       'r' => ["read scroll"],
+       'R' => ["put off", 'Remove accessory'],
+       '^r'=> ["redraw"],
+       '+r'=> ["rub object"],
+       's' => ["search secrets"],
+       'S' => ["save game"],
+       '+s'=> ["sit down"],
+       't' => ["throw$sign{_}/shoot"],
+       'T' => ["remove armor"],
+       '^t'=> ["teleport"],
+       '+t'=> ["turn undead"],
+       '+u'=> ["untrap"],
+       'v' => ["version"],
+       'V' => ["verbose version"],
+       '+v'=> ["compile details"],
+       'w' => ["wield weap$sign{_}on"],
+       'W' => ["wear armor"],
+       '+w'=> ["wipe face"],
+       'x' => ["swap weapons", 'Xchange'],
+       'X' => ["explore mode"],
+       '^x'=> ["show stats"],
+       'z' => ["zap wand"],
+       'Z' => ["cast spell"],
+       '^z'=> ["suspend game"],
+
+       ':' => ["look here"],
+       ';' => ["look else$sign{_}where"],
+       ',' => ["pick up"],
+       '@' => ["toggle pick$sign{_}up"],
+       '^' => ["show trap"],
+       ')' => ["show weapon"],
+       '[' => ["show armor"],
+       '=' => ["show rings"],
+       '"' => ["show amulet"],
+       '(' => ["show tools"],
+       '*' => ["show equip$sign{_}ment"],
+       '$' => ["count gold"],
+       '+' => ["list spells"],
+       '\\'=> ["discover$sign{_}ed obj$sign{_}ects"],
+       '!' => ["shell escape"],
+       '#' => ["more comm$sign{_}ands"],
+
+       'DB' => ['drop blessed'],
+       'DU' => ['drop uncursed'],
+       'DC' => ['drop cursed'],
+       'DX' => ['drop unknown'],
+       'Da' => ['drop all'],
+       'Di' => ["invent$sign{_}ory"],
+       'Du' => ['drop unpaid'],
+       'Dm' => ['drop any'],
+       'D%' => ['drop more'],
+
+       'I*' => ['list gems'],
+       'Iu' => ['list unpaid'],
+       'Ix' => ['list billed'],
+       'I$' => ['count money'],
+},
+
+mode => {
+       '' => 'normal gameplay',
+},
+
+}