lisp中有没有这种功能的函数？

丹霞岭

lisp中的getcorner函数让用户指定一个矩形的第二个角，即当用户在屏幕上移动十字光标时，会从基点开始画出一个矩形。如果希望这个矩形长和宽比例是固定的，即可以根据用户设定的长宽比例，移动十字光标时，画出一个矩形。 lisp有这样的函数吗?

ll_j

Lisp没有这样现成的函数，不过这种功能容易达到，就是先画一个矩形，然后动态缩放这个矩形。

但是，这样做有意义么？需要画到什么样，直接画不就行了？

丹霞岭

程序中如果有这样的函数，会很方便。