http://www.titane.ca/concordia/dfar251/igod/

It's aiml code could be written a lot better but since it's based off ALICE it should entertain for a little while.