猜数字游戏及自动解猜数字程序

都是寂寞惹得祸...网络故障已经四天了，强烈谴责华数网通这种低效率的行为（好吧，谴责有个屁用）。

实在无聊，于是写了一个猜数字游戏：随机生成一个[0, 99]之间的整数，如果猜得小了就显示 Too small，大了显示 Too big，否则显示 You are right。作为添头，前面会以英文序数词输出 The first time, The second time...

expect$ ./main.tclspawn clisp guess.lispGive a number between 0 to 99: 50The first time: Too small.Give a number between 0 to 99: 75The second time: Too small.Give a number between 0 to 99: 87The third time: Too small.Give a number between 0 to 99: 93The fourth time: Too big.Give a number between 0 to 99: 90The fifth time: Too big.Give a number between 0 to 99: 88The sixth time: Too small.Give a number between 0 to 99: 89The seventh time: You are right!expect$