Hey guys,
So I have these Roman numbers, such as "VI"; "XX"; "XIV"; "XXIV"; "XXXIV"
and I'm iterating a selection set with "TEXT" objects (on a particular layer) in order to filter these in -
(repeat (setq i (sslength SS))
(setq enx (entget (ssname SS (setq i (1- i)))))
(setq s (cdr (assoc 1 enx)))
(if (vl-every (function (lambda (x) (member x '(88 73 86)))) (vl-string->list s))
(setq L (cons enx L))
)
)
I'm not that good with the wcmatch function, so my question is how I could substitute the vl-every check I did with it ?
Meaning that every character of the string is a member of '("X" "I" "V").