HELP! I Want to install Visual Lisp editor.

[Lindsay-CAD]

I want to download and install Visual Lisp Editor for AutoCAD 2021 and 2024. I followed the instructions when I tried to run the VLISP or VLIDE command in AutoCAD. I end up in the same location and nothing happens when I try to download.  What am I missing?  

[pendean · Accepted solution]

Download? they are built into AutoCAD (not LT) 2021 and 2024, although some users do observe a slow start to VLIDE/VLISP command when started.

Look here in the MANAGE tab in the Ribbon in AutoCAD (not LT)

[Lindsay-CAD · Accepted solution]

Thank you for the reply.
I discovered it after I posted the request.

[paullimapa]

You may want to try Visual Studio Code

https://help.autodesk.com/view/OARX/2023/ENU/?guid=GUID-7BE00235-5D40-4789-9E34-D57685E83875

[rkmcswain]

Not in my 2024 @pendean - that button (as well as the command VLIDE) just presents this:

[TomBeauford]

The LISPSYS system variable controls which editor is used and while ASCII used by the VLIDE is no longer the standard some older lisp code related to ASCII characters may no longer work if saved in Visual Studio Code. https://help.autodesk.com/view/ACD/2024/ENU/?guid=GUID-1853092D-6E6D-4A06-8956-AD2C3DF203A3

[rkmcswain]

You know that, and I know that, but Joe Lisp Newbie would never figure this out from the dialog presented to them.

☹️

[Sea-Haven]

Looks like Autodesk is forcing us dummy's to use Visual Studio. My VS install failed so gave up trying to use it. It's like they don't want bottom level programmers. Don't forget the VBA saga.

[vyth0410]

(defun c:Ve_KetCau_BTCT ()
(command "layer" "make" "BE_TONG" "color" "7" "" ) ;; Lớp bê tông
(command "layer" "make" "COT_THEP" "color" "1" "" ) ;; Lớp cốt thép

;; Kích thước các cấu kiện
(setq x0 0 y0 0) ;; Gốc tọa độ
(setq L_san 6915) ;; Nhịp dài của sàn (mm)
(setq W_san 2842) ;; Nhịp ngắn của sàn (mm)
(setq h_san 110) ;; Chiều dày sàn (mm)

(setq L_dp 6915) ;; Nhịp dầm phụ (mm)
(setq W_dp 200) ;; Chiều rộng dầm phụ (mm)
(setq H_dp 300) ;; Chiều cao dầm phụ (mm)

(setq L_dc 6915) ;; Nhịp dầm chính (mm)
(setq W_dc 300) ;; Chiều rộng dầm chính (mm)
(setq H_dc 600) ;; Chiều cao dầm chính (mm)

;; Vẽ bản sàn
(command "rectang" (list x0 y0) (list (+ x0 L_san) (+ y0 W_san)))

;; Vẽ dầm phụ
(setq x_dp (+ x0 (/ W_san 2)))
(command "rectang" (list x_dp y0) (list (+ x_dp W_dp) (+ y0 L_dp)))

;; Vẽ dầm chính
(setq y_dc (+ y0 W_san))
(command "rectang" (list x0 y_dc) (list (+ x0 L_dc) (+ y_dc H_dc)))

;; Vẽ cốt thép bản sàn
(command "layer" "set" "COT_THEP" "")
(setq n_thep 18) ;; Số lượng thanh thép D6 bố trí
(setq s_thep (/ L_san n_thep))
(setq i 0)
(while (< i n_thep)
(command "line" (list (+ x0 (* i s_thep)) y0) (list (+ x0 (* i s_thep)) (+ y0 W_san)))
(setq i (+ i 1))
)

;; Vẽ cốt thép dầm phụ
(setq n_thep_dp 7)
(setq s_thep_dp (/ L_dp n_thep_dp))
(setq i 0)
(while (< i n_thep_dp)
(command "line" (list (+ x_dp (* i s_thep_dp)) y0) (list (+ x_dp (* i s_thep_dp)) (+ y0 W_dp)))
(setq i (+ i 1))
)

;; Vẽ cốt thép dầm chính
(setq n_thep_dc 8)
(setq s_thep_dc (/ L_dc n_thep_dc))
(setq i 0)
(while (< i n_thep_dc)
(command "line" (list (+ x0 (* i s_thep_dc)) y_dc) (list (+ x0 (* i s_thep_dc)) (+ y_dc H_dc)))
(setq i (+ i 1))
)

(princ "\nBản vẽ kết cấu đã được tạo! Sử dụng AutoCAD để kiểm tra.")
)