worlds/haxima-1.002/void-temple.scm

   1 ;; ----------------------------------------------------------------------------
   2 ;; Map
   3 ;; ----------------------------------------------------------------------------
   4 (mk-19x19-town
   5  'p_void_temple "µõ¶õ¤Î»û±¡" s_shrine
   6  (list
   7   "cc cc cc cc cc cc cc .. .. .. .. .. cc cc cc cc cc cc cc "
   8   "cc cc cc cc cc cc cc cc .. .. .. cc cc cc cc cc cc cc cc "
   9   "cc cc t3 tt tt *3 *1 *5 bb .. bb *3 *1 *5 tt tt t5 cc cc "
  10   "cc cc tt tt *3 ** *. ** *5 cc *3 ** ** ** *5 tt tt cc cc "
  11   "cc cc tt *3 *. ** ** ** *4 cc *2 ** ** *. *. *5 tt cc cc "
  12   "cc cc *3 ** ** *. ** ** *c cc *a ** ** ** ** *. *5 cc cc "
  13   "cc cc *2 *. *. ** *. *c bb .. bb *a *. ** *. ** *4 cc cc "
  14   ".. cc *a ** *. ** *c .g .. .. .. .h *a ** ** ** *c cc .. "
  15   ".. .. bb *a *8 *c bb .. .. .. .. .. bb *a *8 *c bb .. .. "
  16   ".. .. .. cc cc cc .. .. .. .. .. .. .. cc cc cc .. .. .. "
  17   ".. .. bb *3 *1 *5 bb .. .. .. .. .. bb *3 *1 *5 bb .. .. "
  18   ".. cc *3 ** ** ** *5 .j .. .. .. .l *3 ** *. ** *5 cc .. "
  19   "cc cc *2 *. *. ** ** *5 bb .. bb *3 ** *. *. *. *4 cc cc "
  20   "cc cc *a *. *. ** ** *. *5 cc *3 ** ** *. ** ** *c cc cc "
  21   "cc cc tt *a ** *. ** *. *4 cc *2 *. *. *. *. *c tt cc cc "
  22   "cc cc tt tt *a *. *. ** *c cc *a ** *. *. *c tt tt cc cc "
  23   "cc cc ta tt tt *a *8 *c bb .. bb *a *8 *c tt tt tc cc cc "
  24   "cc cc cc cc cc cc cc cc .. .. .. cc cc cc cc cc cc cc cc "
  25   "cc cc cc cc cc cc cc .. .. .. .. .. cc cc cc cc cc cc cc "
  26   )
  27   nil ;;entrances
  28  (put (kern-mk-obj t_rune_d 1) 9 9)
  29
  30  (put (kern-mk-obj F_sleep_perm 1)  15 9)
  31  (put (kern-mk-obj F_fire_perm 1)   14 9)
  32  (put (kern-mk-obj F_energy_perm 1) 13 9)
  33
  34  (put (kern-mk-obj F_sleep_perm 1)  3 9)
  35  (put (kern-mk-obj F_fire_perm 1)   4 9)
  36  (put (kern-mk-obj F_energy_perm 1) 5 9)
  37
  38  (put (kern-mk-obj F_sleep_perm 1)  9 3)
  39  (put (kern-mk-obj F_fire_perm 1)   9 4)
  40  (put (kern-mk-obj F_energy_perm 1) 9 5)
  41
  42  (put (kern-mk-obj F_sleep_perm 1)  9 15)
  43  (put (kern-mk-obj F_fire_perm 1)   9 14)
  44  (put (kern-mk-obj F_energy_perm 1) 9 13)
  45
  46  (put (spawn-pt 'wisp) 7 9)
  47  (put (spawn-pt 'wisp) 9 7)
  48  (put (spawn-pt 'wisp) 11 9)
  49  (put (spawn-pt 'wisp) 9 11)
  50  )
  51
  52
  53 (mk-place-music p_void_temple 'ml-outdoor-adventure)