Lxj0511831的博客

原创 【无标题】autocadlisp(数字圆型标识)小程序

(command "style" "汉字" "romans.shx" "" "" "0.8" "" "" "" )(setq p2 (getpoint pt1 "\n请指定标识的方向:"));(setq pt1 (getpoint "\n请指定起点位置:"));(setq n (getint "\n 请输入起始序号 或 按空格键继续:"))(setq pt1 (getpoint "请指定起点位置:"));圆内数字标识---------------------