Unzip a file using lisp
(setq filename (getfiled "Select the File \"CAD-TOOLS-OCT-25-2022\"" "" "ZIP" 16))
(startapp (strcat "powershell -command Expand-Archive -Path '" filename "' -DestinationPath 'C:/CAD-TOOLS' -FORCE")) ; unzip
(alert "programs unzipped to C:/CAD-TOOLS")
lisp to set paths and menu follows from here.