TE
TechEcho
Home24h TopNewestBestAskShowJobs
GitHubTwitter
Home

TechEcho

A tech news platform built with Next.js, providing global tech news and discussions.

GitHubTwitter

Home

HomeNewestBestAskShowJobs

Resources

HackerNews APIOriginal HackerNewsNext.js

© 2025 TechEcho. All rights reserved.

Micro-Talespin: A Story Generator in Common Lisp (1992)

44 pointsby 32bitkidalmost 10 years ago

5 comments

enduseralmost 10 years ago
For those who don&#x27;t have Lisp handy, here&#x27;s some sample output:<p><pre><code> JOE WAS NEAR THE CAVE. JOE KNEW THAT JOE WAS NEAR THE CAVE. IRVING WAS NEAR THE OAK-TREE. IRVING KNEW THAT IRVING WAS NEAR THE OAK-TREE. JOE KNEW THAT IRVING WAS NEAR THE OAK-TREE. THE WATER WAS NEAR THE RIVER. JOE KNEW THAT THE WATER WAS NEAR THE RIVER. THE HONEY WAS NEAR THE ELM-TREE. IRVING KNEW THAT THE HONEY WAS NEAR THE ELM-TREE. THE WORM WAS NEAR THE GROUND. JOE KNEW THAT THE WORM WAS NEAR THE GROUND. IRVING KNEW THAT JOE WAS NEAR THE CAVE. THE FISH WAS NEAR THE RIVER. IRVING KNEW THAT THE FISH WAS NEAR THE RIVER. One day, JOE WAS THIRSTY . JOE WANTED NOT TO BE THIRSTY . JOE WANTED TO BE NEAR THE WATER. JOE WENT TO THE RIVER. JOE WAS NEAR THE RIVER. JOE DRANK THE WATER. JOE WAS NOT THIRSTY . The end.</code></pre>
mark_l_watsonalmost 10 years ago
The original Talespin was Jim Meehan&#x27;s PhD thesis, if I remember correctly. Jim advised my team for a week one time, many decades ago, and he sort of became a role model to me showing that one could make a good living in AI. He works at Google now, or at least did when I was there.<p>This miniature program was in a Shank and Riesback book, which I still have.
kazinatoralmost 10 years ago
&quot;Backquote ignorant&quot; coding, ouch!<p>Original:<p><pre><code> (defun mloc (actor con) (list &#x27;mloc (list &#x27;con con) (list &#x27;val (list &#x27;cp (list &#x27;part actor))))) </code></pre> New, improved:<p><pre><code> (defun mloc (actor con) `(mloc (con ,con) (val (cp (part ,actor)))))</code></pre>
评论 #9950490 未加载
whittenalmost 10 years ago
I wonder if the Talespin source code is lost. All I&#x27;ve ever seen are reproductions like this one.
评论 #9948803 未加载
listicalmost 10 years ago
What&#x27;s the current state of the art in this kind of software and what is it called, anyway? I assume it should be <i>natural language synthesis</i> or <i>story generation</i>?
评论 #9949156 未加载
评论 #9950189 未加载