LISP

LISP

앞날이 기대되는 리스프

LISP 맛보기

내 숫자를 맞춰봐 게임.
마음속으로 1~100사이의 숫자를 정하고 컴퓨터에게 맞추게 하는 게임이다.

(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))

기본 수칙

전역변수

전역 함수

etc

Referenes

comments powered by Disqus