请高手帮忙！急

samshs

defun c:r5()
 (想在这里先输入块名(getdist "\n输入块的名称:"))
  (command "leader" pause pause pause "f" "S" pause "B" )
)
(princ)

想法:分二次回车以下的命令

第一先输入块名再画曲线的箭头按回车就可以输入块名,找到块的插入点回车完成

多谢！