SELECT TEXTS OTHER THAN 3.5..HELP

[leonucadomi]

hello guys:

I need a selection filter to select texts and mtext other than 3.5 in size

try this code from Master Lee 

(ssget '((0 . "CIRCLE") (-4 . "<>") (40 . 5.0)))

modified

 

(defun c:pru (/ ss )
(ssget '((0 . "TEXT") (-4 . "<>") (40 . 3.5))) 
  (princ)
)

 

 

I need to identify texts other than 3.5 with some color.

 

help please  thanks

 

 

[DATVO]

7 hours ago, leonucadomi said:

hello guys:

I need a selection filter to select texts and mtext other than 3.5 in size

 

Try this: 

;; Modified by DV. Visit my page at: https://lispautocad.gumroad.com/

(defun c:PRU (/ ss)
  (if (setq ss (ssget '((0 . "TEXT,MTEXT") (-4 . "<>") (40 . 3.5))))
    (progn
      (sssetfirst nil ss)
      (princ (strcat "\nSelecting: " (itoa (sslength ss)) " objects."))
    )
    (princ "\nNo Object.")
  )
  (princ)
)

 

Edited 2 hours ago by DATVO