-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathcodes.pl
More file actions
91 lines (90 loc) · 3.5 KB
/
codes.pl
File metadata and controls
91 lines (90 loc) · 3.5 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
% game code translation facts
/**
* Maps game codes to their corresponding descriptions.
*/
code(333, 'player_monk'). % @ Player when Monk Class
code(413, 'pet'). % f Tame Kitten Pet (MON_GLYPH + 381)
code(397, 'pet'). % d Small dog
code(2316, 'gold'). % $
code(2353, 'boulder').
code(2359, 'void'). %
code(2360, 'wallv'). % | wall vertical
code(2361, 'wallh'). % _ wall horizontal
code(2362, 'topleftc'). % |- up left corner
code(2363, 'toprightc'). % -| up right corner
code(2364, 'botleftc'). % |_ down left corner
code(2365, 'botrightc'). % _| down right corner
code(2366, 'crosswall').
code(2367, 'tupwall').
code(2368, 'tdownwall').
code(2369, 'tleftwall').
code(2370, 'trightwall').
code(2371, 'passage'). % opening in a wall
code(2372, 'doorop'). % - Door Opened Vertical
code(2373, 'doorop').
code(2374, 'door'). % + Door Closed Vertical
code(2375, 'door'). % + Door Closed Horizontal
code(2376, 'ironbars').
code(2377, 'tree').
code(2378, 'floor'). % . floor you can see
code(2379, 'floor'). % . floor you've discoverd but can't currently see
code(2380, 'floortunel'). % # floor tile between rooms
code(2381, 'floortunel'). % # Likely also floor or a passage
code(2382, 'stairsup'). % < staircase going up
code(2383, 'stairsdown'). % > staircase going down
code(2384, 'ladderup').
code(2385, 'ladderdown').
code(2386, 'altar').
code(2387, 'grave').
code(2388, 'throne').
code(2389, 'sink').
code(2390, 'fountain'). % { water fountain (we can't quaff but it's good to know)
code(2391, 'pool').
code(2392, 'ice').
code(2393, 'lava').
code(2394, 'vertopendrawbridge').
code(2395, 'horopendrawbridge').
code(2396, 'vertcloseddrawbridge').
code(2397, 'horcloseddrawbdrige').
code(2398, 'air').
code(2399, 'cloud').
code(2400, 'water').
code(2401, 'trap').
code(2402, 'trap').
code(2403, 'trap').
code(2404, 'trap').
code(2405, 'trap').
code(2406, 'trap').
code(2407, 'trap').
code(2408, 'trap').
code(2409, 'trap').
code(2410, 'trap').
code(2411, 'trap').
code(2412, 'trap').
code(2413, 'trap'). %hole
code(2414, 'trap'). %trapdoor
code(2415, 'trap'). %tptrap
code(2416, 'trap'). %lvltptrap
code(2417, 'trap'). %magicportal
code(2418, 'trap').
code(2419, 'trap').
code(2420, 'trap').
code(2421, 'trap').
code(2422, 'trap').
% //need to set these as non monster
% 367 - 380 - quest guardians
% 342 - 354 - quest givers
% 267 - 272 - peaceful - shopkeepers and the like
% 278-279 - peaceful - watch and watch captain
%monsters start at 0
code(Code, 'monster'):- Code < 267.
code(Code,'human'):- Code =< 272. %shopkeeper and the like 267-272
code(278,'human'). %watch
code(279,'human'). %watch captain
code(Code, 'monster'):- Code < 342.
code(Code,'human'):- Code =< 354. %from 342-354 Lord Carnarvon -Neferet the Green quest givers
code(Code,'monster'):- Code =< 366. % Quest nemesis 355-366
code(Code, 'human'):- Code =< 380. % quest guardians 367-380
%code(Code, 'food'):- Code >= 1144, Code =< 1524. %these are actually corpses --- need to take out the bad food - most corpses shouldn't be eaten...
code(Code, 'food'):- Code >= 2145, Code =< 2177.
code(_, 'misc').