1(mk-dungeon-room
2 'p_forsaken_prison "Forsaken Prison"
3 (list
4	  "rn rn rn rn xx xx xx xx xx xx xx xx xx xx xx rn rn rn rn "
5	  "rn rn rn rn xx ,, ,, xx ,, ,, ,, xx ,, ,, xx rn rn rn rn "
6	  "rn rn rn rn xx ,, ,, ,, ,, ,, ,, ,, ,, ,, xx rn rn rn rn "
7	  "rn rn rn rn xx ,, ,, xx ,, ,, ,, xx ,, ,, xx rn rn rn rn "
8	  "rn rn rn xx xx xx xx xx ,, ,, ,, xx xx xx xx xx rn rn rn "
9	  "rn rn rn xx ,, ,, ,, xx ,, ,, ,, xx ,, ,, ,, xx rn rn rn "
10	  "rn rn rn xx ,, ,, ,, xx ,, ,, ,, xx ,, ,, ,, xx rn rn rn "
11	  "xx xx xx xx xx ,, xx xx ,, ,, ,, xx xx ,, xx xx xx xx xx "
12	  "xx ,, ,, xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx ,, ,, xx "
13	  "xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx "
14	  "xx ,, ,, xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx ,, ,, xx "
15	  "xx xx xx xx xx ,, xx xx ,, ,, ,, xx xx ,, xx xx xx xx xx "
16	  "rn xx xx xx ,, ,, ,, xx ,, ,, ,, xx ,, ,, ,, xx rn rn rn "
17	  "rn xx ?? ?? ,, ,, ,, xx ,, ,, ,, xx ,, ,, ,, xx rn rn rn "
18	  "xx xx ?? xx xx xx xx xx ,, ,, ,, xx xx xx xx xx rn rn rn "
19	  "xx ,, ,, ,, xx ,, ,, xx ,, ,, ,, xx ,, ,, xx rn rn rn rn "
20	  "xx ,, ,, ,, xx ,, ,, ,, ,, ,, ,, ,, ,, ,, xx rn rn rn rn "
21	  "xx ,, ,, ,, xx ,, ,, xx ,, ,, ,, xx ,, ,, xx rn rn rn rn "
22	  "xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx rn rn rn rn "
23  )
24 (put (mk-ladder-up 'p_paladins_hold 8 17) 9 9)
25 (put (mk-ladder-up 'p_mans_hideout 9 3) 2 16)
26 (put (mk-locked-door) 7 2)
27 (put (mk-locked-door) 11 2)
28 (put (mk-locked-door) 13 7)
29 (put (mk-locked-door) 15 9)
30 (put (mk-locked-door) 13 11)
31 (put (mk-locked-door) 11 16)
32 (put (mk-locked-door) 7 16)
33 (put (mk-locked-door) 5 11)
34 (put (mk-locked-door) 3 9)
35 (put (mk-locked-door) 5 7)
36
37 ;; prisoners
38 (put (mk-npc 'bandit 4) 5 2)
39 (put (mk-npc 'cave-goblin-berserker 4) 6 15)
40 (put (mk-npc 'troll 6) 2 9)
41 (put (mk-npc 'warlock 8) 13 16)
42 (put (mk-npc 'corrupt-halberdier 3) 17 9)
43 (put (mk-npc 'skeletal-warrior 5) 13 1)
44
45 ;; alas, expired prisoners
46 (put (mk-corpse-with-loot) 14 5)
47 (put (mk-corpse-with-loot) 12 12)
48 (put (mk-corpse-with-loot) 14 5)
49 (put (mk-corpse-with-loot) 5 6)
50
51 )
52
53(mk-place-music p_forsaken_prison 'ml-dungeon-adventure)
54