How can I play the game "guess.lisp"?
Posted: Sat Jul 30, 2011 2:38 am
I just started with lisp and installed CLISP and LispIDE.
When I type (load "guess.lisp") there is the message:
;; Datei guess.lisp wird geladen...
;; Datei guess.lisp ist geladen.
but the game does not start. How can I play the game?
Thanks, Ahdan
(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))
[1]> (load "guess.lisp")
;; Datei guess.lisp wird geladen...
;; Datei guess.lisp ist geladen.
T
[2]>
When I type (load "guess.lisp") there is the message:
;; Datei guess.lisp wird geladen...
;; Datei guess.lisp ist geladen.
but the game does not start. How can I play the game?
Thanks, Ahdan
(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))
[1]> (load "guess.lisp")
;; Datei guess.lisp wird geladen...
;; Datei guess.lisp ist geladen.
T
[2]>