测试像素与误差fuzz的关系

自贡黄明儒

;;测试像素与误差fuzz的关系
(defun C:t1 (/ E P SS)
  ;;画一个1000 1000的方框(中心坐标500 500)，在右上角开一个10mm的缺口，不断缩小方框，看什么时候
  ;;cad认为那个缺口是封闭的
  ;;先把方框放到最大
  (setq ss (ssget))
  (setq p '(500 500))
  (setq e (entlast))

  (while (equal (entlast) e)
    (command "_zoom" "_C" '(500 500) "0.5x")
    (setvar "nomutt" 1)
    (APPLY 'bpoly (list p ss '(1 0)))
    (while (not (equal (getvar "cmdnames") ""))
      (apply 'command (list ""))
    )
    (setvar "nomutt" 0)
    (command "_delay" 50)
  )
  
  (princ (getvar "viewsize"))
  (princ)
)

aws

我记得孤岛检测就很容易，把缺口当成封闭的，搞得我都不敢用了