请教：如何用mline画圆弧？

mandala

请教：如何用mline画圆弧？比如说下边这样，指定一个wall线型画多线，但只能画直线，无法画圆弧。有什么其他办法解决吗？
( E6 L5 U/ w/ ^) ^5 A$ n6 D
7 t  A# r) n( r) n4 x# C5 P(DEFUN C:test ()
& X( N& H6 M. M             (setq th (getreal "输入墙厚度：（默认为0.5）："))
(command "mline" "j" "b" "s" th "st" "wall"   )
6 {3 E3 \5 d! C/ ])