How to Write Original Jokes (Or Have A Computer Do It For You)

This is a Common Lisp code walkthrough for generating original jokes. You seed the generator with the knowledge about different objects, and it uses that vocabulary to generate unique jokes. All of the jokes are of the form: ?What do you get when you cross X with Y?? This code was originally written for my CS288: An AI Approach to Natural Language Processing class at UC Berkeley in 2004.

http://grok-code.com/12/how-to-write-original-jokes-or-have-a-computer-do-it-for-you/

http://lispm.dyndns.org/lisp/source/new-jokes.lisp

http://groups.google.co.jp/group/comp.lang.lisp/msg/68785e314149682c

http://dobbscodetalk.com/index.php?option=com_myblog&show=Jess-Johnsons-Joke-Generator-in-Lisp.html&Itemid=29

Benzer Yazılar / Similar Posts:

• Common Lisp olmayınca ne yapılır? Otomatik kod üretme
• Bir sabahlamanın ardından
• turkish-deasciifier: Firefox add-on
• Common Lisp programcısı aranıyor; GNUS, Emacs ve SuperCite; cl-wiki 0.1.1 çıktı
• Bilgi Üniversitesi’nde Müzik ve GNU/Linux Dersi
• Turkish deasciifier in Python and state of the art in deasciification
• Common Lisp, dilbilim, Debian
• Access To Certain Google Services Blocked From Turkey
• Lisp, C kadar hızlı olur mu? Stalin, Bigloo, MLton
• Retro Lisp: MIT CADR Lisp Machine fontlarını GNU/Linux ortamında kullanmak