worlds/haxima-1.002/mushroom-cave.scm

   1 ;;----------------------------------------------------------------------------
   2 ;; Map
   3 ;;----------------------------------------------------------------------------
   4 (mk-dungeon-room
   5  'p_mushroom_cave "¥¥Î¥³¤ÎÆ¶·¢"
   6         (list
   7                 "rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
   8                 "rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
   9                 "rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn "
  10                 "rn r8 r8 rn rn r8 r8 r8 r8 r8 rn rn rn r8 rn rn rn rn rn "
  11                 "r4 %3 %d r2 rc tf .. .. .. tf ra rn r4 {{ ra rn rn rn rn "
  12                 "r4 %% r3 rc |X t# .. .. .. t% |t ra r4 tf {A r2 rn rn rn "
  13                 "r4 %% r6 tf %7 bb .. .. .. bb %7 |% r6 t% t7 r2 rn rn rn "
  14                 "r4 %e r6 %b %% %% %5 .. .. %b %% te r6 .. te r2 rn rn rn "
  15                 "rn r9 rc t7 %% bb %e .. .. bb %% %5 r6 {c {{ r2 rn rn rn "
  16                 "r4 .. |B |X %% %d .. .. .. %b %% %% r6 {{ {{ r2 rn rn rn "
  17                 "r4 .. r7 || %% bb .. %b %5 bb %a %c r6 {{ {{ r2 rn rn rn "
  18                 "r4 t7 r6 te %% .. .. .. %a %d t3 t5 r6 {5 {{ r2 rn rn rn "
  19                 "r4 tt r6 %b %c bb .. .. .. bb |X |C r6 {4 {{ r2 rn rn rn "
  20                 "r4 te ra r5 tf %f .. .. .. tb |X r3 rc .. t7 r2 rn rn rn "
  21                 "r4 t% tf ra r9 r5 .. .. .. r3 r9 rc .. tC tt r2 rn rn rn "
  22                 "r4 .. .. .. && ra r5 .. r3 rc .. .. tC t3 |C r2 rn rn rn "
  23                 "r4 .. .. .. .. .. r2 r1 r4 {{ {2 tC t3 |C r3 rn rn rn rn "
  24                 "rn r5 tf .. .. r3 rn rn rn r5 tb tt |C r3 rn rn rn rn rn "
  25                 "rn rn r1 r1 r1 rn rn rn rn rn r1 r1 r1 rn rn rn rn rn rn "
  26         )
  27  (put (spawn-pt 'yellow-slime) 7 7)
  28  (put (mk-ladder-up 'p_shard 78 74) 7 12)
  29  (put (kern-mk-obj t_royal_cape 1) 4 15)
  30  )
  31
  32 (mk-place-music p_mushroom_cave 'ml-dungeon-adventure)