What is this function: (getfileet "")

What is this function: (getfileet "")

paullimapa
Mentor Mentor
745 Views
5 Replies
Message 1 of 6

What is this function: (getfileet "")

paullimapa
Mentor
Mentor

I came across this today and I don't see any documentation for it.

When entered from the command line AutoCAD will return folder path of Express Tools.

Does anyone know if this lisp function is part of Express Tools ?

Also entering a string in the parameter will add the string to the Express Tools path:

command: (getfileet "This Is New")

AutoCAD returns:

"C:\\Program Files\\Autodesk\\AutoCAD 2020\\Express\\This Is New"


Paul Li
IT Specialist
@The Office
Apps & Publications | Video Demos
0 Likes
Accepted solutions (1)
746 Views
5 Replies
Replies (5)
Message 2 of 6

john.uhden
Mentor
Mentor

@paullimapa 

Looks like you answered your own question, so you ought to accept it.

There also appears to be a "findfileet" function, having a self-explanatory name.

John F. Uhden

0 Likes
Message 3 of 6

paullimapa
Mentor
Mentor

I was not aware of the (findfileet) function which only validates found files inside the Express Tools folder.

I wonder what other goodie functions Express Tools added to AutoCAD besides the documented Express Tools functions/commands I've found online here:

*****LIST OF EXPRESS TOOLS***** - Autodesk Community - AutoCAD

An Introduction to AcetUtil Functions (afralisp.net)

AutoCAD LISP acet函數 快速查詢 (eakyle.blogspot.com)

 


Paul Li
IT Specialist
@The Office
Apps & Publications | Video Demos
0 Likes
Message 4 of 6

john.uhden
Mentor
Mentor
Accepted solution

@paullimapa 

I used my own ListFuns (c:LF) routine to find symbols in the atoms-family.

Using "*et" I came up with only the two we've mentioned.

Here, maybe it will help you...

(defun c:LF ( / items match)
  (setq items (atoms-family 1))
  (and
    (setq match (getstring "\nSymbols to find: "))
    (/= match "")
    (setq items
      (vl-remove-if-not
        (function
          (lambda (x)
            (wcmatch (strcase x)(strcase match))
          )
        )
        items
      )
    )
    (foreach item items
      (princ (strcat "\n" item ": "))
      (prin1 (eval (read item)))
    )
  )
  (princ)
)

I've got a better one that allows you to filter for integers, reals, strings, various types of functions, etc.  but I broke it or something and it's still in the shop.

John F. Uhden

Message 5 of 6

paullimapa
Mentor
Mentor

O that's an excellent lisp function you came up with. I even tried finding acet-ui* and sure enough all those came out in a huge list.  Thanks.


Paul Li
IT Specialist
@The Office
Apps & Publications | Video Demos
0 Likes
Message 6 of 6

Sea-Haven
Mentor
Mentor

Just before you jump up and down, EXTRIM using it within a program for auto trimming is (etrim ....... not EXTRIM. 

0 Likes