Topic: Fence Selection with Express Tools Version 2013, 2014 and 2015

[ymg]

The following is a routine that I use regularly on Autocad 2012
with Express Tools to effect a Fence Selection from a polyline.

Code: [Select]

;; getfencesel        by ymg                                               ;
   ;;                                                                         ;
   ;; Arguments:  en,  Linear Entity Name (Polylines, Arc, Ellipse etc.)      ;
   ;;            flt,  A valid Entity filer Ex: '((0 . "3DFACE"))  or nil     ;
   ;;                                                                         ;
   ;;   Returns: A Selection Set of Entities touching the selecting entity.   ;
   ;;                                                                         ;
   ;;  Requires: Express Tools                                                ;
   ;;                                                                         ;

   (defun getfencesel (en flt / fe px ss)   
      (acet-ss-zoom-extents (setq ss (ssadd en)))
      (setq px (* 0.75 (acet-geom-pixel-unit))
            fe (acet-list-remove-adjacent-dups (acet-geom-object-point-list en (/ px 2.0)))
            ss (if flt (ssget "_F" fe flt) (ssget "_F" fe))
      )     
   )

On another board, one poster is telling me it does not work with Autocad 2014.
However I suspect his installation might not be complete.

I would appreciate if some of you coud test it on Version 2013, 2014 and 2015

Thanks,

ymg

[Kerry]

AC 2014 Vanilla

Code - Auto/Visual Lisp: [Select]

1. (defun c:testIt ( /ss)
2.   (setq ss (getfencesel (car (entsel)) nil))
3.   (princ (strcat "\nObject count : " (itoa (sslength ss))))
4.   (princ)
5. )

Command: TESTIT
Select object:
Object count : 7

Seems fine.

[Kerry]

Interestingly though , the count differs depending on the shape of the pline

[ymg]

Kerry,

Thanks, but now it means that I need to check Version.

Would like to know if the one I submitted would run OK
or Express Tools has changed???

Or maybe I understand wrong is there a getfencesel in ACAD 2014
or you used the one I supplied?

The different count I believe has to do with the dotted line.

ymg

[ymg]

Anybody running 2015 Out There ?

ymg

[ronjonp]

Works fine here running 2015 x64.

[ymg]

Thanks Kerry and RonJomp

Appreciated!

ymg