1;; ----------------------------------------------------------------------------
2;; Level 2 of the Thief's Ladder
3;; ----------------------------------------------------------------------------
4(mk-dungeon-room
5 'p_traps_2 "The Choice"
6 (list
7  "xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx xx "
8  "xx ,, ,, ,, ,, ,, ,, ,, xx xx xx ,, ,, ,, ,, ,, ,, ,, xx "
9  "xx ,, ,, ,, ,, ,, ,, ,, xx xx xx ,, ,, ,, ,, ,, ,, ,, xx "
10  "xx ,, ,, ,, ,, ,, ,, ,, xx xx xx ,, ,, ,, ,, ,, ,, ,, xx "
11  "xx ,, ,, ,, ,, ,, ,, ,, xx xx xx ,, ,, ,, ,, ,, ,, ,, xx "
12  "xx ,, ,, ,, ,, ,, ,, ,, xx xx xx ,, ,, ,, ,, ,, ,, ,, xx "
13  "xx xx ,, ,, ,, ,, ,, xx xx xx xx xx ,, ,, ,, ,, ,, xx xx "
14  "xx xx xx ,, ,, ,, xx xx ,, ,, ,, xx xx ,, ,, ,, xx xx xx "
15  "xx xx xx xx ,, xx xx ,, ,, ,, ,, ,, xx xx ,, xx xx xx xx "
16  "xx xx xx ,, ,, ,, xx ,, ,, ,, ,, ,, xx ,, ,, ,, xx xx xx "
17  "xx xx xx ,, ,, ,, xx ,, ,, ,, ,, ,, xx ,, ,, ,, xx xx xx "
18  "xx xx xx xx ,, xx xx xx xx ~x xx xx xx xx ,, xx xx xx xx "
19  "xx xx xx xx ,, xx xx .C .H ~O .O .S .E xx ,, xx xx xx xx "
20  "xx xx xx xx ,, xx xx !! !! ~! !! !! !! xx ,, xx xx xx xx "
21  "xx xx xx xx ,, xx xx ,, ,, ,, ,, ,, ,, xx ,, xx xx xx xx "
22  "xx xx xx xx ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, ,, xx xx xx xx "
23  "xx xx xx xx xx xx xx ,, ,, ,, ,, ,, ,, xx xx xx xx xx xx "
24  "xx xx xx xx xx xx xx !! !! !! !! !! !! xx xx xx xx xx xx "
25  "xx xx xx xx xx xx xx .W .I .S .E .L .Y xx xx xx xx xx xx "
26  )
27 (put (mk-step-clue "Doesn't the other way look better?") 13 15)
28 (put (mk-step-clue "Doesn't the other way look better?") 6 15)
29
30 ;; secret path through wall
31 (put (mk-secret-path) 9 14)
32 (put (mk-secret-path) 9 13)
33 (put (mk-secret-path) 9 12)
34 (put (mk-secret-path) 9 11)
35 (put (mk-secret-path) 9 10)
36 (put (mk-secret-path) 9 9)
37
38 ;; ladders "down" that link to each other
39 (put (mk-ladder-down 'p_traps_2 14 3) 4 3)
40 (put (mk-ladder-down 'p_traps_2 4 3) 14 3)
41
42 ;; monster generators
43 (put (spawn-pt 'bandit) 4 3)
44 (put (spawn-pt 'bomber) 3 4)
45 (put (spawn-pt 'blackguard) 5 4)
46
47 (put (spawn-pt 'skeletal-warrior) 14 4)
48 (put (spawn-pt 'skeletal-spear-thrower) 13 3)
49 (put (spawn-pt 'skeletal-archer) 15 3)
50
51 ;; doors
52 (put (mk-door) 14 8)
53 (put (mk-door) 4 8)
54
55 ;; true ladder down
56 (put (mk-ladder-down 'p_traps_3 9 9) 9 9)
57 (put (mk-ladder-up 'p_traps_1 14 2) 9 15)
58 )
59
60(mk-place-music p_traps_2 'ml-dungeon-adventure)
61
62(kern-place-add-on-entry-hook p_traps_2 'quest-thiefrune-den2)
63