anchor.diff:  	     "music is my life !"
   	     "do you play any instrument ?"))
   
  +    ("girls" ("GIRLS? no girl on irc stupid"))
  +
  +    ("(.+) you$" (,(defresp (build-string "~A you ~A" (elt groups 0)
  +					  (if (scan-to-strings "n\\'t" (elt groups 0))
  +					      "either"
  +					      "too")))))
   
       ;; clutch at straws
   
  
positive.code: 				 ("we'd" . "we would") ("we'll" . "we will")
  				 ("they'd" . "they would") ("they'll" . "they will")
  				 ("i've" . "I have") ("i'm" . "I am")
  				 ("ima" . "I am going to")
  				 ("he's" . "he is") ("she's" . "she is") 
  				 ("it's" . "it is")))
  (defun preprocess (string)
    (translate string *preprocessings*))
  
  
negative.code: 			  "you would be $1"))
      ("my mother (.+)" ("Who else in your family $0 ?"
  		       "Tell me more about your family"))
      ("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?"))
  