AutoCad - Ayuda LISP

Hola amiguito mi problema es que mi LSP y DCL que te voy a enviar, sobre todo mi LSP tiene el sgte. problema:
Es un programa el cual me cambia Radios pero me los cambia uno por uno, y lo que yo quisiera es que me los cambie todos en una sola entrada.

;;;;;;;;;;; Cambiando el radio ;;;;;;;;;;;;;;;;;;

(Defun c:camcir ()
(setq sel1 (ssget))
(setq sel2 (ssget "p" '((0 . "circle"))))
(setq cant (sslength sel2))
(setq n 0)
(repeat cant
(setq feo (ssname sel2 n))
(setq sel3 (entget (ssname sel2 n)))
(setq sel4 (cdr (assoc 40 sel3)))
(setq dcl_id (load_dialog "c:/camcir.dcl"))
(if (not (new_dialog "camcir" dcl_id))
(exit)
)
(setq val_cir (get_tile "ca"))
(action_tile "Aceptar" "(done_dialog 1)")
(action_tile "Cancelar" "(done_dialog 0)")
(action_tile "ca" "(setq val_cir (get_tile \"ca\"))")
(setq sel5 (start_dialog))
(if (= sel5 1)
(command "change" feo "" "" val_cir)
)
(setq n (+ 1 n))
)
(unload_dialog dcl_id)
(prin1)
)

Revisa tu correo electrónico. Te envié los cambios a tu rutina. Supuse un .dcl y que este se encontraba en el directorio de inicio de AutoCAD.
Se adjuntan el .lsp y .dcl.
Saludos.