lisp-猜数字升级版

0[2] (defun mystart() (defparameter *small* 1)(defparameter *big* 100)(guess-number))
0[3] (mystart)
; No debug variables for current frame: using EVAL instead of EVAL-IN-FRAME.
50
0[3] (bigger)
; No debug variables for current frame: using EVAL instead of EVAL-IN-FRAME.
75
0[3] (bigger)
; No debug variables for current frame: using EVAL instead of EVAL-IN-FRAME.
88
0[3] (smaller)
; No debug variables for current frame: using EVAL instead of EVAL-IN-FRAME.
81
0[3] (smaller)
; No debug variables for current frame: using EVAL instead of EVAL-IN-FRAME.
78
0[3]

 我们要猜的数字为78，在上次的基础上增加一个函数用于初始化