Wozza
15th Mar 2007, 05:36 am
I learnt all my lisp from this one. Hard going at the time, as no-one that I worked with knew any coding at all. If something went pear-shaped, I had to work out what was wrong myself.
The only way I could get through it was to not turn a page until I fully understood everything up to that point.
(setq pc (- current_chapter 1)
(seqt nc (+ current_chapter 1)
(if (not (routine work))
(setvar chapter pc)
(setvar chapter nc)
);if
Amazon have one left at $125!
The only way I could get through it was to not turn a page until I fully understood everything up to that point.
(setq pc (- current_chapter 1)
(seqt nc (+ current_chapter 1)
(if (not (routine work))
(setvar chapter pc)
(setvar chapter nc)
);if
Amazon have one left at $125!