Looking for lisp to draw circle

[Anonymous]

Hi,
I need lisp to draw circle using coordinate with specific diameter.

[ВeekeeCZ]

(defun c:D10 () (command "_circle" pause "_Diameter" 10) (princ))

If you want to use some specific coordinates, use
(defun c:D10 () (command "_circle" "_non" '(10 20 0) "_Diameter" 10) (princ))

[Ranjit_Singh]

Another option

(defun c:somefunc ( / ) 
  (entmake (list '(0 . "circle") (cons 10 '(1 1 0)) '(40 . 5.0))))

will draw circle with radius of 5 units at coordinate 1,1,0