anchor.diff:    (defparameter *player* (make-player :health 30 :position (cons 3 3)))
     (make-map 25 25)
     (loop for i upto 40 do (set-contents (random-node *width* *height*) (random-item)))
  -  (loop for i upto 40 do (set-contents (random-node *width* *height*) (new-hydra)))
  +  (loop for i upto 40 do (set-contents (random-node *width* *height*) (list (new-hydra))))
     (game-loop))
   
   (new-game)
positive.code:     (q         (quit-game))
      (t (progn
           (format t "What?")
           (main-menu)))))
           
  (defun user-commands ()
    '("Movement:" " up down left right" "Items:" " inventory (View and manage items)" " pickup (Pick up the item at current location)" "Game:" " quit (Exit game)"))         
  
negative.code: (load "colors")
  (load "map")
  (load "items")
  (load "player")
  (load "monsters")
  (load "combat")
  
  (defun view-inventory ()
    (loop for item across *inventory*
  