我经常使用它来查找点列表和整体x&y大小的限制：
- (defun plimits (l)
- (setq mnx (apply 'min (mapcar 'car l))
- mxx (apply 'max (mapcar 'car l))
- mny (apply 'min (mapcar 'cadr l))
- mxy (apply 'max (mapcar 'cadr l))
- ysz (- mxy mny)
- xsz (- mxx mnx))
- )
根据您的需要，您可以将LWPOLYLINE图元中的点值提供给调用：
这是一个起点-大卫 | 
