1;; --------------- regular water ------------------------
2
3
4(define (mk-blend-terrain tag . sprites)
5  (kern-mk-terrain tag "water" pclass-deep
6                   (mk-composite-sprite (cons s_shallow sprites))
7                   trn 0 nil))
8
9(mk-blend-terrain 't_wshore_n  s_grass_n )
10(mk-blend-terrain 't_wshore_w  s_grass_w )
11(mk-blend-terrain 't_wshore_nw s_grass_nw)
12(mk-blend-terrain 't_wshore_e  s_grass_e )
13(mk-blend-terrain 't_wshore_ne s_grass_ne)
14(mk-blend-terrain 't_wshore_we s_grass_e s_grass_w)
15(mk-blend-terrain 't_wshore_nwe s_grass_ne s_grass_nw)
16(mk-blend-terrain 't_wshore_s  s_grass_s )
17(mk-blend-terrain 't_wshore_ns s_grass_s s_grass_n)
18(mk-blend-terrain 't_wshore_ws s_grass_sw)
19(mk-blend-terrain 't_wshore_nws s_grass_sw s_grass_nw)
20(mk-blend-terrain 't_wshore_es s_grass_se)
21(mk-blend-terrain 't_wshore_nes s_grass_se s_grass_ne)
22(mk-blend-terrain 't_wshore_wes s_grass_se s_grass_sw)
23(mk-blend-terrain 't_wshore_c s_grass_se s_grass_sw s_grass_ne s_grass_nw)
24
25(define (mk-blend-terrain tag . sprites)
26  (kern-mk-terrain tag "deep water" pclass-deep
27                   (mk-composite-sprite (cons s_deep sprites))
28                   trn 0 nil))
29
30(mk-blend-terrain 't_dshore_n  s_grass_n )
31(mk-blend-terrain 't_dshore_w  s_grass_w )
32(mk-blend-terrain 't_dshore_nw s_grass_nw)
33(mk-blend-terrain 't_dshore_e  s_grass_e )
34(mk-blend-terrain 't_dshore_ne s_grass_ne)
35(mk-blend-terrain 't_dshore_we s_grass_e s_grass_w)
36(mk-blend-terrain 't_dshore_nwe s_grass_ne s_grass_nw)
37(mk-blend-terrain 't_dshore_s  s_grass_s )
38(mk-blend-terrain 't_dshore_ns s_grass_s s_grass_n)
39(mk-blend-terrain 't_dshore_ws s_grass_sw)
40(mk-blend-terrain 't_dshore_nws s_grass_sw s_grass_nw)
41(mk-blend-terrain 't_dshore_es s_grass_se)
42(mk-blend-terrain 't_dshore_nes s_grass_se s_grass_ne)
43(mk-blend-terrain 't_dshore_wes s_grass_se s_grass_sw)
44(mk-blend-terrain 't_dshore_c s_grass_se s_grass_sw s_grass_ne s_grass_nw)
45
46(kern-mk-terrain 't_water_rocks "boulder" pclass-waterboulder
47                   (mk-composite-sprite (list s_shoals s_boulder_over))
48                   lgt 0 nil)
49
50;;----------------------------
51;; Water edges
52
53(define (mk-blend-terrain tag . sprites)
54  (kern-mk-terrain tag "grass" pclass-grass
55                   (mk-composite-sprite (cons s_shoals (cons s_grassi_c sprites)))
56                   trn 0 nil))
57
58(mk-blend-terrain 't_grassw_ne s_grasso_se s_grasso_sw s_grasso_nw)
59(mk-blend-terrain 't_grassw_nw s_grasso_se s_grasso_sw s_grasso_ne)
60(mk-blend-terrain 't_grassw_es s_grasso_sw s_grasso_ne s_grasso_nw)
61(mk-blend-terrain 't_grassw_ws s_grasso_se s_grasso_ne s_grasso_nw)
62(mk-blend-terrain 't_grassw_nwe s_grasso_se s_grasso_sw)
63(mk-blend-terrain 't_grassw_nes s_grasso_sw s_grasso_nw)
64(mk-blend-terrain 't_grassw_nws s_grasso_se s_grasso_ne)
65(mk-blend-terrain 't_grassw_wes s_grasso_ne s_grasso_nw)
66
67(kern-mk-terrain 't_grassw_c "grass" pclass-shoals
68                   (mk-composite-sprite (list s_shoals s_grassi_c))
69                   trn 0 nil)
70
71(define (mk-blend-terrain tag . sprites)
72  (kern-mk-terrain tag "trees" pclass-trees
73                   (mk-composite-sprite (cons s_shoals (cons s_trees_c sprites)))
74                   lgt 0 nil))
75
76(mk-blend-terrain 't_treew_ne s_trees_se s_trees_sw s_trees_nw)
77(mk-blend-terrain 't_treew_nw s_trees_se s_trees_sw s_trees_ne)
78(mk-blend-terrain 't_treew_es s_trees_sw s_trees_ne s_trees_nw)
79(mk-blend-terrain 't_treew_ws s_trees_se s_trees_ne s_trees_nw)
80(mk-blend-terrain 't_treew_nwe s_trees_se s_trees_sw)
81(mk-blend-terrain 't_treew_nes s_trees_sw s_trees_nw)
82(mk-blend-terrain 't_treew_nws s_trees_se s_trees_ne)
83(mk-blend-terrain 't_treew_wes s_trees_ne s_trees_nw)
84
85(kern-mk-terrain 't_treew_c "trees" pclass-trees
86                   (mk-composite-sprite (list s_shoals s_trees_c))
87                   lgt 0 nil)
88
89(define (mk-blend-terrain tag . sprites)
90  (kern-mk-terrain tag "hills" pclass-hills
91                   (mk-composite-sprite (cons s_shoals (cons s_hills_c sprites)))
92                   dns 0 nil))
93
94(mk-blend-terrain 't_hillw_ne s_hills_se s_hills_sw s_hills_nw)
95(mk-blend-terrain 't_hillw_nw s_hills_se s_hills_sw s_hills_ne)
96(mk-blend-terrain 't_hillw_es s_hills_sw s_hills_ne s_hills_nw)
97(mk-blend-terrain 't_hillw_ws s_hills_se s_hills_ne s_hills_nw)
98(mk-blend-terrain 't_hillw_nwe s_hills_se s_hills_sw)
99(mk-blend-terrain 't_hillw_nes s_hills_sw s_hills_nw)
100(mk-blend-terrain 't_hillw_nws s_hills_se s_hills_ne)
101(mk-blend-terrain 't_hillw_wes s_hills_ne s_hills_nw)
102
103(kern-mk-terrain 't_hillw_c "hills" pclass-trees
104                   (mk-composite-sprite (list s_shoals s_hills_c))
105                   dns 0 nil)
106
107(define (mk-blend-terrain tag . sprites)
108  (kern-mk-terrain tag "mountains" pclass-mountains
109                   (mk-composite-sprite (cons s_shoals (cons s_mount_c sprites)))
110                   opq 0 nil))
111
112(mk-blend-terrain 't_mountw_ne s_mount_se s_mount_sw s_mount_nw)
113(mk-blend-terrain 't_mountw_nw s_mount_se s_mount_sw s_mount_ne)
114(mk-blend-terrain 't_mountw_es s_mount_sw s_mount_ne s_mount_nw)
115(mk-blend-terrain 't_mountw_ws s_mount_se s_mount_ne s_mount_nw)
116(mk-blend-terrain 't_mountw_nwe s_mount_se s_mount_sw)
117(mk-blend-terrain 't_mountw_nes s_mount_sw s_mount_nw)
118(mk-blend-terrain 't_mountw_nws s_mount_se s_mount_ne)
119(mk-blend-terrain 't_mountw_wes s_mount_ne s_mount_nw)
120
121(kern-mk-terrain 't_mountw_c "mountains" pclass-mountains
122                   (mk-composite-sprite (list s_shoals s_mount_c))
123                   opq 0 nil)
124
125;;----------------------------------------------------------------------------
126;; Some blended hill terrain types
127
128(define (mk-blend-terrain tag . sprites)
129  (kern-mk-terrain tag "grass" pclass-grass
130                   (mk-composite-sprite (cons s_grass sprites))
131                   trn 0 nil))
132
133(mk-blend-terrain 't_hilledge_n  s_hill_n )
134(mk-blend-terrain 't_hilledge_w  s_hill_w )
135(mk-blend-terrain 't_hilledge_nw s_hill_n s_hill_w)
136(mk-blend-terrain 't_hilledge_e  s_hill_e )
137(mk-blend-terrain 't_hilledge_ne s_hill_n s_hill_e)
138(mk-blend-terrain 't_hilledge_we s_hill_e s_hill_w)
139(mk-blend-terrain 't_hilledge_nwe s_hill_n s_hill_e s_hill_w)
140(mk-blend-terrain 't_hilledge_s  s_hill_s )
141(mk-blend-terrain 't_hilledge_ns s_hill_s s_hill_n)
142(mk-blend-terrain 't_hilledge_ws s_hill_s s_hill_w)
143(mk-blend-terrain 't_hilledge_nws s_hill_s s_hill_w s_hill_n)
144(mk-blend-terrain 't_hilledge_es s_hill_s s_hill_e)
145(mk-blend-terrain 't_hilledge_nes s_hill_s s_hill_e s_hill_n)
146(mk-blend-terrain 't_hilledge_wes s_hill_s s_hill_e s_hill_w)
147(mk-blend-terrain 't_hilledge_c s_hill_s s_hill_e s_hill_w s_hill_n)
148
149;; inner hill corners
150
151(define (mk-blend-terrain tag . sprites)
152  (kern-mk-terrain tag "hills" pclass-hills
153                   (mk-composite-sprite (cons s_grass (cons s_hills_c sprites)))
154                   dns 0 nil))
155
156(mk-blend-terrain 't_hilli_ne s_hills_se s_hills_sw s_hills_nw)
157(mk-blend-terrain 't_hilli_nw s_hills_se s_hills_sw s_hills_ne)
158(mk-blend-terrain 't_hilli_es s_hills_sw s_hills_ne s_hills_nw)
159(mk-blend-terrain 't_hilli_ws s_hills_se s_hills_ne s_hills_nw)
160(mk-blend-terrain 't_hilli_nwe s_hills_se s_hills_sw)
161(mk-blend-terrain 't_hilli_nes s_hills_sw s_hills_nw)
162(mk-blend-terrain 't_hilli_nws s_hills_se s_hills_ne)
163(mk-blend-terrain 't_hilli_wes s_hills_ne s_hills_nw)
164
165(kern-mk-terrain 't_hilli_c "hills" pclass-trees
166                   (mk-composite-sprite (list s_grass s_hills_c))
167                   1 0 nil)
168
169;;---------------------------------------------------------------------------
170;; swamp corners
171
172(define (mk-blend-terrain tag . sprites)
173  (kern-mk-terrain tag "bog" pclass-hills
174                   (mk-composite-sprite (cons s_bog sprites))
175                   trn 0 'terrain-effect-swamp))
176
177(mk-blend-terrain 't_bog_nw s_grass_nw)
178(mk-blend-terrain 't_bog_ne s_grass_ne)
179(mk-blend-terrain 't_bog_nwe s_grass_ne s_grass_nw)
180(mk-blend-terrain 't_bog_ws s_grass_sw)
181(mk-blend-terrain 't_bog_nws s_grass_sw s_grass_nw)
182(mk-blend-terrain 't_bog_es s_grass_se)
183(mk-blend-terrain 't_bog_nes s_grass_se s_grass_ne)
184(mk-blend-terrain 't_bog_wes s_grass_se s_grass_sw)
185(mk-blend-terrain 't_bog_c s_grass_se s_grass_sw s_grass_ne s_grass_nw)
186
187;;----------------------------------------------------------------
188;; mountain corners
189
190(define (mk-blend-terrain tag . sprites)
191  (kern-mk-terrain tag "mountains" pclass-mountains
192                   (mk-composite-sprite (cons s_grass (cons s_mount_c sprites)))
193                   opq 0 nil))
194
195(mk-blend-terrain 't_mountg_ne s_mount_se s_mount_sw s_mount_nw)
196(mk-blend-terrain 't_mountg_nw s_mount_se s_mount_sw s_mount_ne)
197(mk-blend-terrain 't_mountg_es s_mount_sw s_mount_ne s_mount_nw)
198(mk-blend-terrain 't_mountg_ws s_mount_se s_mount_ne s_mount_nw)
199(mk-blend-terrain 't_mountg_nwe s_mount_se s_mount_sw)
200(mk-blend-terrain 't_mountg_nes s_mount_sw s_mount_nw)
201(mk-blend-terrain 't_mountg_nws s_mount_se s_mount_ne)
202(mk-blend-terrain 't_mountg_wes s_mount_ne s_mount_nw)
203
204(kern-mk-terrain 't_mountg_c "mountains" pclass-mountains
205                   (mk-composite-sprite (list s_grass s_mount_c))
206                   0 0 nil)
207
208;;----------------------------------------------------------------
209;; forest corners
210
211
212(define (mk-blend-terrain tag . sprites)
213  (kern-mk-terrain tag "forest" pclass-forest
214                   (mk-composite-sprite (cons s_grass (cons s_forest_c sprites)))
215                   hvy 0 nil))
216
217(mk-blend-terrain 't_forestg_ne s_forest_se s_forest_sw s_forest_nw)
218(mk-blend-terrain 't_forestg_nw s_forest_se s_forest_sw s_forest_ne)
219(mk-blend-terrain 't_forestg_es s_forest_sw s_forest_ne s_forest_nw)
220(mk-blend-terrain 't_forestg_ws s_forest_se s_forest_ne s_forest_nw)
221(mk-blend-terrain 't_forestg_nwe s_forest_se s_forest_sw)
222(mk-blend-terrain 't_forestg_nes s_forest_sw s_forest_nw)
223(mk-blend-terrain 't_forestg_nws s_forest_se s_forest_ne)
224(mk-blend-terrain 't_forestg_wes s_forest_ne s_forest_nw)
225
226
227
228;;-------------------------------------------------------
229;; void *
230
231(define (mk-blend-terrain tag . sprites)
232  (kern-mk-terrain tag "cliff edge" pclass-space
233                   (mk-composite-sprite (cons s_null sprites))
234                   trn 0 nil))
235
236(mk-blend-terrain 't_voids_n  s_grass_n )
237(mk-blend-terrain 't_voids_w  s_grass_w )
238(mk-blend-terrain 't_voids_nw s_grass_nw)
239(mk-blend-terrain 't_voids_e  s_grass_e )
240(mk-blend-terrain 't_voids_ne s_grass_ne)
241(mk-blend-terrain 't_voids_we s_grass_e s_grass_w)
242(mk-blend-terrain 't_voids_nwe s_grass_ne s_grass_nw)
243(mk-blend-terrain 't_voids_s  s_grass_s )
244(mk-blend-terrain 't_voids_ns s_grass_s s_grass_n)
245(mk-blend-terrain 't_voids_ws s_grass_sw)
246(mk-blend-terrain 't_voids_nws s_grass_sw s_grass_nw)
247(mk-blend-terrain 't_voids_es s_grass_se)
248(mk-blend-terrain 't_voids_nes s_grass_se s_grass_ne)
249(mk-blend-terrain 't_voids_wes s_grass_se s_grass_sw)
250(mk-blend-terrain 't_voids_c s_grass_se s_grass_sw s_grass_ne s_grass_nw)
251
252(define (mk-blend-terrain tag . sprites)
253  (kern-mk-terrain tag "grass" pclass-grass
254                   (mk-composite-sprite (cons s_null (cons s_grassi_c sprites)))
255                   trn 0 nil))
256
257(mk-blend-terrain 't_grassv_ne s_grasso_se s_grasso_sw s_grasso_nw)
258(mk-blend-terrain 't_grassv_nw s_grasso_se s_grasso_sw s_grasso_ne)
259(mk-blend-terrain 't_grassv_es s_grasso_sw s_grasso_ne s_grasso_nw)
260(mk-blend-terrain 't_grassv_ws s_grasso_se s_grasso_ne s_grasso_nw)
261(mk-blend-terrain 't_grassv_nwe s_grasso_se s_grasso_sw)
262(mk-blend-terrain 't_grassv_nes s_grasso_sw s_grasso_nw)
263(mk-blend-terrain 't_grassv_nws s_grasso_se s_grasso_ne)
264(mk-blend-terrain 't_grassv_wes s_grasso_ne s_grasso_nw)
265
266(define (mk-blend-terrain tag . sprites)
267  (kern-mk-terrain tag "hills" pclass-hills
268                   (mk-composite-sprite (cons s_null (cons s_hills_c sprites)))
269                   dns 0 nil))
270
271(mk-blend-terrain 't_hillv_ne s_hills_se s_hills_sw s_hills_nw)
272(mk-blend-terrain 't_hillv_nw s_hills_se s_hills_sw s_hills_ne)
273(mk-blend-terrain 't_hillv_es s_hills_sw s_hills_ne s_hills_nw)
274(mk-blend-terrain 't_hillv_ws s_hills_se s_hills_ne s_hills_nw)
275(mk-blend-terrain 't_hillv_nwe s_hills_se s_hills_sw)
276(mk-blend-terrain 't_hillv_nes s_hills_sw s_hills_nw)
277(mk-blend-terrain 't_hillv_nws s_hills_se s_hills_ne)
278(mk-blend-terrain 't_hillv_wes s_hills_ne s_hills_nw)
279
280(define (mk-blend-terrain tag . sprites)
281  (kern-mk-terrain tag "mountains" pclass-mountains
282                   (mk-composite-sprite (cons s_null (cons s_mount_c sprites)))
283                   opq 0 nil))
284
285(mk-blend-terrain 't_mountv_ne s_mount_se s_mount_sw s_mount_nw)
286(mk-blend-terrain 't_mountv_nw s_mount_se s_mount_sw s_mount_ne)
287(mk-blend-terrain 't_mountv_es s_mount_sw s_mount_ne s_mount_nw)
288(mk-blend-terrain 't_mountv_ws s_mount_se s_mount_ne s_mount_nw)
289(mk-blend-terrain 't_mountv_nwe s_mount_se s_mount_sw)
290(mk-blend-terrain 't_mountv_nes s_mount_sw s_mount_nw)
291(mk-blend-terrain 't_mountv_nws s_mount_se s_mount_ne)
292(mk-blend-terrain 't_mountv_wes s_mount_ne s_mount_nw)
293
294;;---------------------------------------------------------------------------
295;; tree corners
296
297(define (mk-blend-terrain tag . sprites)
298  (kern-mk-terrain tag "trees" pclass-trees
299                   (mk-composite-sprite (cons s_trees sprites))
300                   lgt 0 nil))
301
302(mk-blend-terrain 't_trees_nw s_treesi_nw s_grasso_nw)
303(mk-blend-terrain 't_trees_ne s_treesi_ne s_grasso_ne)
304(mk-blend-terrain 't_trees_nwe s_treesi_ne s_grasso_ne s_treesi_nw s_grasso_nw)
305(mk-blend-terrain 't_trees_ws s_treesi_sw s_grasso_sw)
306(mk-blend-terrain 't_trees_nws s_treesi_sw s_grasso_sw s_treesi_nw s_grasso_nw)
307(mk-blend-terrain 't_trees_es s_treesi_se s_grasso_se)
308(mk-blend-terrain 't_trees_nes s_treesi_se s_grasso_se s_treesi_ne s_grasso_ne)
309(mk-blend-terrain 't_trees_wes s_treesi_se s_grasso_se s_treesi_sw s_grasso_sw)
310(mk-blend-terrain 't_trees_c s_treesi_se s_grasso_se s_treesi_sw s_grasso_sw s_treesi_ne s_grasso_ne s_treesi_nw s_grasso_nw)
311
312;; grass with tree corners
313
314(define (mk-blend-terrain tag . sprites)
315  (kern-mk-terrain tag "grass" pclass-grass
316                   (mk-composite-sprite (cons s_grass sprites))
317                   trn 0 nil))
318
319(mk-blend-terrain 't_grasst_nw s_treeso_nw)
320(mk-blend-terrain 't_grasst_ne s_treeso_ne)
321(mk-blend-terrain 't_grasst_nwe s_treeso_ne s_treeso_nw)
322(mk-blend-terrain 't_grasst_ws s_treeso_sw)
323(mk-blend-terrain 't_grasst_nws s_treeso_sw s_treeso_nw)
324(mk-blend-terrain 't_grasst_es s_treeso_se)
325(mk-blend-terrain 't_grasst_nes s_treeso_se s_treeso_ne)
326(mk-blend-terrain 't_grasst_wes s_treeso_se s_treeso_sw)
327(mk-blend-terrain 't_grasst_c s_treeso_se s_treeso_sw s_treeso_ne s_treeso_nw)
328
329
330;;--------------------------------------------------------------------------
331;; lava corners
332
333(define (mk-blend-terrain tag . sprites)
334  (kern-mk-terrain tag "lava" pclass-hills
335                   (mk-composite-sprite (cons s_lava sprites))
336                   trn 0 'terrain-effect-lava))
337
338(mk-blend-terrain 't_lava_n  s_grass_n )
339(mk-blend-terrain 't_lava_w  s_grass_w )
340(mk-blend-terrain 't_lava_nw s_grass_nw)
341(mk-blend-terrain 't_lava_e  s_grass_e )
342(mk-blend-terrain 't_lava_ne s_grass_ne)
343(mk-blend-terrain 't_lava_we s_grass_e s_grass_w)
344(mk-blend-terrain 't_lava_nwe s_grass_ne s_grass_nw)
345(mk-blend-terrain 't_lava_s  s_grass_s )
346(mk-blend-terrain 't_lava_ns s_grass_s s_grass_n)
347(mk-blend-terrain 't_lava_ws s_grass_sw)
348(mk-blend-terrain 't_lava_nws s_grass_sw s_grass_nw)
349(mk-blend-terrain 't_lava_es s_grass_se)
350(mk-blend-terrain 't_lava_nes s_grass_se s_grass_ne)
351(mk-blend-terrain 't_lava_wes s_grass_se s_grass_sw)
352(mk-blend-terrain 't_lava_c s_grass_se s_grass_sw s_grass_ne s_grass_nw)
353
354;;----------------------------------------------------------------
355;; natural stone edges
356
357(define (mk-blend-terrain tag . sprites)
358  (kern-mk-terrain tag "natural stone wall" pclass-wall
359                   (mk-composite-sprite (cons s_nat_rock sprites))
360                   opq 0 nil))
361
362(mk-blend-terrain 't_nat_rock_n s_nat_rock_n)
363(mk-blend-terrain 't_nat_rock_s s_nat_rock_s)
364(mk-blend-terrain 't_nat_rock_w s_nat_rock_w)
365(mk-blend-terrain 't_nat_rock_e s_nat_rock_e)
366(mk-blend-terrain 't_nat_rock_nw s_nat_rock_n s_nat_rock_w)
367(mk-blend-terrain 't_nat_rock_ne s_nat_rock_n s_nat_rock_e)
368(mk-blend-terrain 't_nat_rock_ns s_nat_rock_n s_nat_rock_s)
369(mk-blend-terrain 't_nat_rock_we s_nat_rock_w s_nat_rock_e)
370(mk-blend-terrain 't_nat_rock_ws s_nat_rock_w s_nat_rock_s)
371(mk-blend-terrain 't_nat_rock_es s_nat_rock_e s_nat_rock_s)
372(mk-blend-terrain 't_nat_rock_nwe s_nat_rock_n s_nat_rock_w s_nat_rock_e)
373(mk-blend-terrain 't_nat_rock_nws s_nat_rock_n s_nat_rock_w s_nat_rock_s)
374(mk-blend-terrain 't_nat_rock_nes s_nat_rock_n s_nat_rock_e s_nat_rock_s)
375(mk-blend-terrain 't_nat_rock_wes s_nat_rock_w s_nat_rock_e s_nat_rock_s)
376(mk-blend-terrain 't_nat_rock_nwes s_nat_rock_n s_nat_rock_w s_nat_rock_e s_nat_rock_s)
377
378;;--------------------------------------------------------------------
379;; fix terrain types
380
381(define bad-terrain-list
382  (list t_bog
383        t_lava
384        t_deep_lava
385        t_fire_terrain
386        t_fireplace
387        t_inv_wall
388        t_wall_torch
389		t_lava_n t_lava_w t_lava_nw t_lava_e
390		t_lava_ne t_lava_we t_lava_nwe t_lava_s
391		t_lava_ns t_lava_ws t_lava_nws t_lava_es
392		t_lava_nes t_lava_wes t_lava_c
393		t_lava
394		t_bog_nw t_bog_ne t_bog_nwe t_bog_ws
395		t_bog_nws t_bog_es t_bog_nes t_bog_wes
396		t_bog_c
397        ))
398
399(define inflammable-terrain-list
400  (list t_bog
401        t_deep
402        t_shallow
403        t_shoals
404        t_sunlit_deep
405        t_stars
406		t_void
407		t_chasm
408		t_bog_nw t_bog_ne t_bog_nwe t_bog_ws
409		t_bog_nws t_bog_es t_bog_nes t_bog_wes
410		t_bog_c
411		t_shore_n t_shore_w t_shore_nw t_shore_e
412		t_shore_ne t_shore_we t_shore_nwe t_shore_s
413		t_shore_ns t_shore_ws t_shore_nws t_shore_es
414		t_shore_nes t_shore_wes t_shore_c
415		t_wshore_n t_wshore_w t_wshore_nw t_wshore_e
416		t_wshore_ne t_wshore_we t_wshore_nwe t_wshore_s
417		t_wshore_ns t_wshore_ws t_wshore_nws t_wshore_es
418		t_wshore_nes t_wshore_wes t_wshore_c
419		t_dshore_n t_dshore_w t_dshore_nw t_dshore_e
420		t_dshore_ne t_dshore_we t_dshore_nwe t_dshore_s
421		t_dshore_ns t_dshore_ws t_dshore_nws t_dshore_es
422		t_dshore_nes t_dshore_wes t_dshore_c
423		t_voids_n t_voids_w t_voids_nw t_voids_e
424		t_voids_ne t_voids_we t_voids_nwe t_voids_s
425		t_voids_ns t_voids_ws t_voids_nws t_voids_es
426		t_voids_nes t_voids_wes t_voids_c
427        ))
428