VLISP
1 program
Added 2026-02-06T08:36:20Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: Visual LISP
Provenance: commit dc482f1dc0 · authored 2026-02-06T09:37:20+01:00 · agent claude-code · model sonnet
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Draw Circle with User Input
Provenance: commit dc482f1dc0 · authored 2026-02-06T09:37:20+01:00 · agent claude-code · model sonnet · WebSearch disabled
(defun c:drawcircle (/ pt rad)
(setq pt (getpoint "\nSpecify center point: "))
(if pt
(progn
(setq rad (getdist pt "\nSpecify radius: "))
(if rad
(command "._circle" pt rad)
(princ "\nRadius not specified.")
)
)
(princ "\nCenter point not specified.")
)
(princ)
)