8 ms·
See https://github.com/jeffshrager/elizagen/blob/master/coselleliza1969and1972.lisp https://github.com/jeffshrager/elizagen/blob/master/cosellel...
by junke 8y ago
See https://github.com/jeffshrager/elizagen/blob/master/coselleliza1969and1972.lisp https://github.com/jeffshrager/elizagen/blob/master/cosellel...
- acqq 8y agoIt's much bigger (close to 3000 lines) than the version from the original post, which is only around 700 lines for the program and the separate "knowledge": https://github.com/retro-software/B5500-software/blob/master/CUBE-Library-13/Files/ELIZA-SCRIPT.dat https://github.com/retro-software/B5500-software/blob/master... https://github.com/retro-software/B5500-software/blob/master/CUBE-Library-13/Files/ELIZA-Z100010.gtl https://github.com/retro-software/B5500-software/blob/master...
- junke 8y agoThe first 380 lines are used to change the Common Lisp environment so that it can read and evaluate the two different versions that follows. There are comments that add information about the original page numbers, etc, but roughly speaking, the code is split as follows: - From 381 to 749 (368 lines) : DOCFN (1969 doctor functions) - From 751 to 1831 (1080 lines) : 1969 script (knowledge) - From 1834 to 1870 (36 lines) : Eliza 72 header - From 1870 to 2242 (372 lines) : 1972 Doctor program - From 2245 to 2915 (670 lines) : 1972 Script (knowledge)