1 ;; ----------------------------------------------------------------------------
3 ;; ----------------------------------------------------------------------------
5 'm_thiefs_den 19 19 pal_expanded
7 "xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx "
8 "xx && ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
9 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
10 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
11 "xx ,, ,, ,, pp ,, ,, ,, ,, pp ,, ,, ,, ,, pp ,, ,, ,, xx "
12 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
13 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
14 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
15 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
16 "xx ,, ,, ,, pp ,, ,, ,, ,, ,, ,, ,, ,, ,, pp ,, ,, ,, xx "
17 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
18 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
19 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
20 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
21 "xx ,, ,, ,, pp ,, ,, ,, ,, pp ,, ,, ,, ,, pp ,, ,, ,, xx "
22 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
23 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
24 "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
25 "xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx "
28 ;;----------------------------------------------------------------------------
30 ;;----------------------------------------------------------------------------
31 (kern-load "mouse.scm")
34 ;;----------------------------------------------------------------------------
36 ;;----------------------------------------------------------------------------
37 ;(kern-load "thiefs_den_mechs.scm")
39 ;;----------------------------------------------------------------------------
40 ;; Other dungeon rooms
41 ;;----------------------------------------------------------------------------
43 ;;----------------------------------------------------------------------------
45 ;;----------------------------------------------------------------------------
53 #f ; large-scale (wilderness)
61 (put (mk-ladder-up 'p_traps_4 9 7) 9 9)
64 (put (kern-mk-obj t_food 10) 4 1)
65 (put (kern-mk-obj t_wine 1) 4 2)
68 (put (kern-mk-obj t_cure_potion 1) 3 4)
69 (put (kern-mk-obj t_mana_potion 1) 4 5)
70 (put (kern-mk-obj t_heal_potion 1) 5 5)
71 (put (kern-mk-obj t_poison_immunity_potion 1) 6 5)
72 (put (kern-mk-obj t_invisibility_potion 1) 7 5)
75 (put (kern-mk-obj t_torch 1) 8 5)
76 (put (kern-mk-obj t_picklock 1) 8 6)
77 (put (kern-mk-obj t_gem 1) 8 7)
80 (put (kern-mk-obj t_an_tym_scroll 1) 9 7)
81 (put (kern-mk-obj t_in_mani_corp_scroll 1) 10 7)
82 (put (kern-mk-obj t_vas_rel_por_scroll 1) 10 8)
83 (put (kern-mk-obj t_sanct_lor_scroll 1) 10 10)
84 (put (kern-mk-obj t_in_quas_xen_scroll 1) 9 10)
85 (put (kern-mk-obj t_an_xen_ex_scroll 1) 8 9)
86 (put (kern-mk-obj t_in_an_scroll 1) 7 9)
87 (put (kern-mk-obj t_in_ex_por_scroll 1) 6 9)
88 (put (kern-mk-obj t_vas_mani_scroll 1) 6 8)
89 (put (kern-mk-obj t_wis_quas_scroll 1) 6 7)
92 (put (kern-mk-obj t_spell_book_illusion_1 1) 3 1)
93 (put (kern-mk-obj t_spell_book_force_magick_fields 1) 2 12)
94 (put (kern-mk-obj t_spell_book_force_magick_matter 1) 16 17)
97 (put (kern-mk-obj t_gold_coins 74) 6 2)
98 (put (kern-mk-obj t_gold_coins 112) 2 9)
99 (put (kern-mk-obj t_gold_coins 243) 1 17)
100 (put (kern-mk-obj t_gold_coins 30) 7 3)
106 (list 'quest-thiefrune-den5) ; hooks
110 (mk-place-music p_thiefs_den 'ml-dungeon-adventure)