anchor.diff:  			  "you would be $1"))
       ("my mother (.+)" ("Who else in your family $0 ?"
   		       "Tell me more about your family"))
  -    ("I want (.+)" ("Why would anyone want $a0"
  +    ("I (want|wanted) (.+)" ("Why would anyone want $a0"
   		    "Yes, that would be nice"))
       ("I like (.+)" ("I like $a0 too!"))
       ("I demand (.+)" ("oh, you *demand* do you?"))
  
positive.code: 	     "music is my life !"
  	     "do you play any instrument ?"))
  
  
      ;; clutch at straws
  
  
negative.code: 	     "I think it's clear that you're full of shit when you say that $0."))))
  
  (defun respond-to (bot string)
    (respond bot (preprocess (remove #\? string)) *eliza-responses*))
  
  (defcommand - ("(.+)" string)
    "Syntax: '- <string>' - Test Eliza."
  