我是初学lsp,由于作图需要常用到fillet命令,对图形进行倒圆角,可是不知道如何应用代码?

我的思路是:

(defun c:dj(/ ds1 pt1 pt2 ) ;倒圆角
(setq ds1 (getpoint "\n请输入圆角半径（2.000）:"))
(setq pt1 (getangle pt1 "\n请选择第一条边:"))
(setq pt2 (getpoint pt1 "\n请选择第二条边:"))
(command "fillet" "R" "")
)

请高手指点,要加入什么代码去如何完善?

谢谢