第8第9行(setq jd1 (angle &p1 &p2);jd (atoi (angtos jd 0 0)))这里的(angtos jd 0 0) -------------jd没有定义30行40行 (cons前的'截图没发试.
20行和21行建设用cons
