So, I bought a fun little book.
Land of Lisp by Conrad Barsky M.D
Below is my first Lisp program. It’s a guess the number game.
(defparameter *small* 1)
(defparameter *big* 100)
(defun guess-my-number ()
(ash (+ *small* *big*) -1))
(defun smaller ()
(setf *big* (1- (guess-my-number)))
(guess-my-number))
(defun bigger ()
(setf *small* (1+ (guess-my-number)))
(guess-my-number))
(defun start-over ()
(defparameter *small* 1)
(defparameter *big* 100)
(guess-my-number))
murphytii0 liked this
stephensok85 liked this
sarah7667 liked this
wakameeee liked this
gagege posted this
