svip16 发表于 2024-7-28 17:11:28

插件问题求助

(defun c:tt( / pt pt_x pt_y)
      (setq pt (getpoint "\n插入点: "))
      (setq pt_x (car pt)
                              pt_y (cadr pt))
      (command "polygon" 3 pt "I" (list pt_x (+ pt_y 100) 0) pause "rotate" (entlast) "" "")
      (command "-bhatch" "p" "SOLID" 00 "s" pt "" "")
      )

问题1:为何这样绘制出的三角形是高为150?是数字“100”的1.5倍,求解析控制的参数含义,另外可否改为定义三角形的边长?
问题2:为何第二个command不能填充生成的三角形?
问题3:为何生成三角形后需要点一下才能旋转角度?

代码基础太薄弱,求热心大佬悉心指点,谢谢~
页: [1]
查看完整版本: 插件问题求助