Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 04/25/2023 in all areas

  1. Some old code HERE to do what you want.
    2 points
  2. This is a radio button dcl generator can be used in any code it needs like 3 lines of code to work, its a library routine gets loaded as required so no hard coding dcl's. Also Multi Getvals & Multi Toggles, Radio buttons 2 col and 3 col. Look at the help in the start of the code for examples. These two steps should be outside of dcl.You can not pick an object without closing dcl so why have them in there. ":row {:button {label=\"Select a closed polyline\";key=\"YYL\";width=10;fixed_width=true;}" ":button {label=\"Pick fill interior points\";key=\"YYT\";width=10;fixed_width=true;}}"
    1 point
  3. Ok will dig out code 2 parts a Windows command and a lisp to make the Fas files. 2 versionsof the compile lisp, 1st is one at a time. (if (null vlisp-compile) (c:vlide T)) (setq fname (getfiled "Pick lisp to be compiled" "D:\\alan\\lisp" "lsp" 8)) (setq len (strlen fname)) (setq diff (- len (+ 15 3))) (setq fnameout (substr fname 15 diff)) (vlisp-compile 'st fname (strcat "d:\\alan\\compiled\\" fnameout ".fas")) ) (comp) ; must have vlide open to work (vla-sendcommand (vla-get-activedocument (vlax-get-acad-object)) "Vlide ") (setq loads (list "Lisp1" "Lisp2" "Lisp3")) (setq loc1 "F:\\") ;;change dirs to where ever you want them saved (setq loc2 "F:\\Compiled Lisp\\") (foreach lisp loads (vlisp-compile 'st (strcat loc1 lisp ".lsp") (strcat loc2 lisp ".fas")) ) Will look into the make bat part, copy files. Are the files in one directory ? Should be able to do tomorrow.
    1 point
×
×
  • Create New...