unicode: copy glyph to clipboard on cell click
[sheet.git] / nethack.inc.pl
1 use utf8;
2
3 '' => {
4         desc => 'normal gameplay',
5
6         'b' => ["step left down",  'pm', 'numpad 1'],
7         'j' => ["step down",       'pm', 'numpad 2'],
8         'n' => ["step right down", 'pm', 'numpad 3'],
9         'h' => ["step left",       'pm', 'numpad 4'],
10         'l' => ["step right",      'pm', 'numpad 6'],
11         'y' => ["step left up",    'pm', 'numpad 7'],
12         'k' => ["step up",         'pm', 'numpad 8'],
13         'u' => ["step right up",   'pm', 'numpad 9'],
14
15         'B' => ["go left down",    'po', 'shift numpad 1'],
16         'J' => ["go down",         'po', 'shift numpad 2'],
17         'N' => ["go right down",   'po', 'shift numpad 3'],
18         'H' => ["go left",         'po', 'shift numpad 4'],
19         'L' => ["go right",        'po', 'shift numpad 6'],
20         'Y' => ["go left up",      'po', 'shift numpad 7'],
21         'K' => ["go up",           'po', 'shift numpad 8'],
22         'U' => ["go right up",     'po', 'shift numpad 9'],
23
24         '^b'=> ["run left down",   'po', 'numpad 5 1'],
25         '^j'=> ["run down",        'po', 'numpad 5 2'],
26         '^n'=> ["run right down",  'po', 'numpad 5 3'],
27         '^h'=> ["run left",        'po', 'numpad 5 4'],
28         '^l'=> ["run right",       'po', 'numpad 5 6'],
29         '^y'=> ["run left up",     'po', 'numpad 5 7'],
30         '^k'=> ["run up",          'po', 'numpad 5 8'],
31         '^u'=> ["run right up",    'po', 'numpad 5 9'],
32
33         'g' => ["run until interest", 'po argm'],
34         'm' => ["m$sign{_}ove blind", 'po argm', 'no pickup'],
35         'G' => ["g any$sign{_}where", 'po argm', "follow branches"],
36
37         '?' => ["help menu", 'mv mode?'], #help
38         '+?'=> ["more help", 'mv'],
39         '/' => ["explain symbol", 'mi arg mode/'], #whatis
40         '&' => ["tell com$sign{_}m$sign{_}and", 'mi arg'],
41         '<' => ["climb up ladder", 'pm'], #up
42         '>' => ["desc$sign{_}ent ladder", 'pm'], #down
43         '.' => ["rest (noop)", 'pm'], #rest
44         '_' => ["travel to", 'po argM'], #travel
45
46         '+2'=> ["two$sign{_}weapon toggle", 'co'], #twoweapon
47         'a' => ["apply tool", 'co argi'], #apply
48         'A' => ["remove all armor", 'co'], #armor
49         '^a'=> ["redo comm$sign{_}and", 'co', 'Again'], #again
50         '+a'=> ["adjust inv$sign{_}ent$sign{_}ory", 'mi'], #adjust
51         'c' => ["close door", 'co argm'], #close
52         'C' => ["call monster", 'co arg'], #call
53         '+c'=> ["chat", 'co arg'], #chat
54         'd' => ["drop item", 'co argi'], #drop
55         'D' => ["drop items", 'co arg modeD'], #Drop
56         '^d'=> ["kick", 'co argm'], #kick
57         '+d'=> ["dip", 'co argi'], #dip
58         'e' => ["eat food", 'co argi'], #eat
59         'E' => ["en$sign{_}grave", 'co argi'], #engrave
60         '+e'=> ["weapon skills", 'co', 'Enhance'], #enhance
61         'f' => ["fire quiver", 'co argm'], #fire
62         'F' => ["fight monster", 'co argm'], #fight
63         '+f'=> ["force lock", 'co'], #force
64         'i' => ["invent$sign{_}ory", 'mo'], #invent
65         'I' => ["invent$sign{_}ory part", 'mo arg modeI'], #Invent
66         '+i'=> ["invoke object", 'co argi'], #invoke
67         '+j'=> ["jump", 'co'], #jump
68         '+l'=> ["loot", 'co'], #loot
69         '+m'=> ["mons$sign{_}ter abil$sign{_}ity", 'co'], #monster
70         '+n'=> ["name item$sign{_}(s)", 'mo arg'], #name
71         'o' => ["open door", 'co argm'], #open
72         'O' => ["options", 'mv modeO'], #options
73         '+o'=> ["offer sacrifice", 'co argi'], #offer
74         'p' => ["pay bill", 'co'], #pay
75         'P' => ["put on", 'co argi'], #puton
76         '^p'=> ["repeat message", 'mi'], #prevmsg
77         '+p'=> ["pray", 'co arg'], #pray
78         'q' => ["drink", 'co argi', 'Quaff'], #quaff
79         'Q' => ["quiver ammo", 'co argi'], #quiver
80         '+q'=> ["exit game", 'mi', 'Quit'], #quit
81         'r' => ["read scroll", 'co argi'], #read
82         'R' => ["put off", 'co argi', 'Remove accessory'], #remove
83         '^r'=> ["redraw", 'mi'], #redraw
84         '+r'=> ["rub object", 'co argi'], #rub
85         's' => ["search secrets", 'co'], #search
86         'S' => ["save game", 'mi'], #save
87         '+s'=> ["sit down", 'co'], #sit
88         't' => ["throw$sign{_}/shoot", 'co argm'], #throw
89         'T' => ["remove armor", 'co argi'], #takeoff
90         '^t'=> ["teleport", 'co'], #'port
91         '+t'=> ["turn undead", 'co'], #turn
92         '+u'=> ["untrap", 'co'], #untrap
93         'v' => ["version", 'mi'],
94         'V' => ["verbose version", 'mi'], #history
95         '+v'=> ["compile details", 'mi'], #version
96         'w' => ["wield weap$sign{_}on", 'co argi'], #wield
97         'W' => ["wear armor", 'co argi'], #wear
98         '+w'=> ["wipe face", 'co'], #wipe
99         'x' => ["swap weapons", 'co', 'Xchange'], #xchange
100         'X' => ["explore mode", 'mi'], #explore
101         '^x'=> ["show stats", 'mi'], #show
102         'z' => ["zap wand", 'co argm'], #zap
103         'Z' => ["cast spell", 'co argi'], #Zap
104         '^z'=> ["suspend game", 'mi'], #suspend
105
106         ':' => ["look here", 'mi'], #look
107         ';' => ["look else$sign{_}where", 'mi argM'], #farlook
108         ',' => ["pick up", 'co'], #pickup
109         '@' => ["toggle pick$sign{_}up", 'mi'],
110         '^' => ["show trap", 'mi argm'], #trap_id
111         ')' => ["show weapon", 'mo'],
112         '[' => ["show armor", 'mo'],
113         '=' => ["show rings", 'mo'],
114         '"' => ["show amulet", 'mo'],
115         '(' => ["show tools", 'mo'],
116         '*' => ["show equip$sign{_}ment", 'mo'],
117         '$' => ["count gold", 'mi'], #gold
118         '+' => ["list spells", 'mo'], #spells
119         '\\'=> ["discover$sign{_}ed obj$sign{_}ects", 'mo'], #known
120         '!' => ["shell escape", 'mi'], #sh
121         '#' => ["more comm$sign{_}ands", 'mv'],
122 },
123
124 'D' => {
125         'B' => ['drop blessed', 'co'],
126         'U' => ['drop uncursed', 'co'],
127         'C' => ['drop cursed', 'co'],
128         'X' => ['drop unknown', 'co'],
129         'a' => ['drop all', 'co'],
130         'i' => ["invent$sign{_}ory", 'mi'],
131         'u' => ['drop unpaid', 'co'],
132         'm' => ['drop any', 'co argi'],
133         '%' => ['drop more', 'co arg'],
134 },
135
136 'I' => {
137         '*' => ['list gems', 'mi'],
138         'u' => ['list unpaid', 'mi'],
139         'x' => ['list billed', 'mi'],
140         '$' => ['count money', 'mi'],
141 },
142