Đến nội dung


Hình ảnh
* * * * - 3 Bình chọn

Tăng tốc (làm nhẹ) AutoCAD


  • Please log in to reply
78 replies to this topic

#21 Nguyen Hoanh

Nguyen Hoanh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 4105 Bài viết
Điểm đánh giá: 4495 (đỉnh cao)

Đã gửi 28 March 2015 - 06:47 AM

Các bạn lưu ý:
1. Lisp chỉ làm nhẹ thao tác vẽ của cad, không rút ngắn thời gian khởi động.
2. Lisp chỉ có tác dụng với cad đời mới, cad 2008 trở xuống không có tác dụng.
  • 2

#22 hoquangvinh

hoquangvinh

    biết lệnh mirror

  • Members
  • PipPipPip
  • 154 Bài viết
Điểm đánh giá: 5 (bình thường)

Đã gửi 28 March 2015 - 02:41 PM

cảm ơn bác hoành đã giải đáp kịp thời


  • 0

#23 proconeng86

proconeng86

    biết lệnh break

  • Members
  • PipPipPipPip
  • 221 Bài viết
Điểm đánh giá: -9 (bình thường)

Đã gửi 21 April 2015 - 08:48 PM

Đã fix, bạn thử lại xem được chưa nhé.

 

Ok, li sp dùng ngon với cad 2010 rồi. thanks bác Nguyen Hoanh nhé


  • 0

#24 Co_gi_dau

Co_gi_dau

    Chưa sử dụng CAD

  • Members
  • Pip
  • 3 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 23 April 2015 - 02:41 PM

 error: no function definition: VLAX-PRODUCT-KEY bị như thế này bác ak.. cad 2012


  • 0

#25 toai

toai

    biết vẽ ellipse

  • Members
  • PipPip
  • 59 Bài viết
Điểm đánh giá: 1 (bình thường)

Đã gửi 16 May 2015 - 11:20 AM

Nhiều người sử dụng AutoCAD phiên bản mới trên các máy có cấu hình không cao. Hệ quả là máy sẽ giật và chậm.

Trong bài viết ACAD đời mới chạy trên máy đời cũ
Đã hướng dẫn cách làm nhẹ phần mềm AutoCAD, tuy nhiên, mỗi lần làm lại phải rà soát nhiều tên biến.

Lisp dưới đây với mục đích làm nhẹ AutoCAD bằng cách thay đổi các biến hệ thống, và thực hiện các lệnh để giảm bớt một số tính năng về hiển thị và quản lý trong AutoCAD nhưng về cơ bản không hạn chế các tính năng liên quan đến công việc của AutoCAD.

Tên lệnh là SPA (Speed uP Autocad), tuy nhiên chỉ cần appload file lisp 1 lần duy nhất mà không cần gọi lệnh.


(defun c:spa ( / svl cml rgl old x)
(setq
svl '(
("DYNMODE" . 0)
("QPMODE" . 0)
("DRAWORDERCTL" . 0)
("HPDLGMODE" . 1)
("UCSDETECT" . 0)
("LAYERDLGMODE" . 0)
("ROLLOVERTIPS" . 0)
("SELECTIONCYCLING" . 0)
("LAYERDLGMODE" . 0)
("HPQUICKPREVIEW" . 0)
("NAVVCUBEDISPLAY" . 0)
("NAVBARDISPLAY" . 0)
("INDEXCTL" . 3)
("GRIPOBJLIMIT" . 0)
("SIGWARN" . 0)
("SELECTIONAREA" . 0)
("MAXACTVP" . 5)
("VTENABLE" . 0)
)

cml '(
(".IMAGEQUALITY" "DRAFT")
(".VIEWRES" "Y" "20")
)

rgl '(
("InfoCenter" "InfoCenterOn" 0)
)
)

(setq old (getvar "cmdecho"))
(setvar "cmdecho" 0)
(foreach x svl (if (getvar (car x)) (setvar (car x) (cdr x))))
(foreach x cml (mapcar 'command x))
(foreach x rgl (vl-registry-write (strcat "HKEY_CURRENT_USER" (chr 92) (if vlax-user-product-key (vlax-user-product-key) (vlax-product-key)) (chr 92) (nth 0 x)) (nth 1 x) (nth 2 x)))
(setvar "cmdecho" old)
(alert "\u+0110\u+00E3 ho\u+00E0n t\u+1EA5t thi\u+1EBFt l\u+1EADp \u+0111\u+1EC3 AutoCAD nh\u+1EB9 h\u+01A1n\nB\u+1EA1n \u+0111\u+00E3 c\u+00F3 th\u+1EC3 s\u+1EED d\u+1EE5ng AutoCAD nh\u+1EB9 h\u+01A1n m\u+00E0 kh\u+00F4ng c\u+1EA7n l\u+00E0m th\u+00EAm g\u+00EC n\u+1EEFa.")
(princ)
)
(c:spa)


--------------------
Lịch sử các cập nhật:
2015-02-23:
- Phiên bản đầu
2015-02-27:
- Fix lỗi vlax-user-productkey
- Tự động chạy luôn mà không cần phải gọi SPA
2015-03-02:
- Fix lỗi chưa có biến hệ thống trên các phiên bản ACAD đời cũ

2015-03-23:

- Gỡ LWDISPLAY, PALETTEOPAQUE ra khỏi danh sách biến hệ thống

Mình dùng cad 2010 64bit vẫn bị lỗi, bác Hoành kiểm tra giúp nhé. Thank!

http://www.cadviet.c...pfiles/4/21668_


  • 0
Mưu sự tại nhân, thành sự tại thiên.

#26 Nguyen Hoanh

Nguyen Hoanh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 4105 Bài viết
Điểm đánh giá: 4495 (đỉnh cao)

Đã gửi 16 May 2015 - 07:20 PM

Bạn up lại, file vừa rồi bị lỗi.
  • 0

#27 toai

toai

    biết vẽ ellipse

  • Members
  • PipPip
  • 59 Bài viết
Điểm đánh giá: 1 (bình thường)

Đã gửi 18 May 2015 - 01:54 PM

21668_loi_lisp_spa_trong_cad_2010_64bit.Bạn up lại, file vừa rồi bị lỗi.

Đây là file cad bác ạ: http://www.cadviet.c...m2500__atgt.dwg


  • 0
Mưu sự tại nhân, thành sự tại thiên.

#28 yeuvietnam

yeuvietnam

    biết vẽ circle

  • Members
  • PipPip
  • 36 Bài viết
Điểm đánh giá: -3 (bình thường)

Đã gửi 18 May 2015 - 08:23 PM

Quá good
  • -1

#29 hoangtuyen_xd

hoangtuyen_xd

    biết zoom

  • Members
  • Pip
  • 14 Bài viết
Điểm đánh giá: 2 (bình thường)

Đã gửi 24 June 2015 - 04:36 PM

mỗi lần bật cad thì nó lại hiện " Đã thiết lập....". Ko bỏ được dòng đấy ak bác,


  • 0

#30 nhatminhrd

nhatminhrd

    biết vẽ circle

  • Members
  • PipPip
  • 35 Bài viết
Điểm đánh giá: 3 (bình thường)

Đã gửi 25 June 2015 - 09:57 AM

Đã dùng :) với CAD2014/Win8.1

thật là hay.

 

Thank chủ thớt.


  • 0

#31 tongbinh

tongbinh

    Chưa sử dụng CAD

  • Members
  • Pip
  • 4 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 29 June 2015 - 08:20 AM

Anh ơi, sau khi dùng lisp này xong, khi em gõ lệnh hatch nó không hiện ra cái bảng hatch trên thanh ripbon nữa, có cách nào chỉnh lại cái đó ko, để khi gõ “H” nó hiện luôn ra cái bảng hatch trên ripbon như cũ ạ ( em dùng cad 2016) 


  • 0

#32 lamtaclk8

lamtaclk8

    Chưa sử dụng CAD

  • Members
  • Pip
  • 2 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 29 June 2015 - 02:46 PM

 


  • 0

#33 whatcholingon

whatcholingon

    biết lệnh break

  • Members
  • PipPipPipPip
  • 222 Bài viết
Điểm đánh giá: 37 (tàm tạm)

Đã gửi 07 July 2015 - 10:50 AM

mình chạy trên autocad2010 và 2015 thì khi thực hiện lệnh FIND thì thấy chạy lâu hơn bình thường Mr Nguyen Hoanh ah,

bạn thử kiểm tra xem là do máy của mình hay do lsp vậy?

Thanks.


  • 0

#34 Chiron

Chiron

    biết dimradius

  • Members
  • PipPipPipPipPip
  • 310 Bài viết
Điểm đánh giá: 90 (tàm tạm)

Đã gửi 09 July 2015 - 09:16 AM

Các bạn lưu ý:
1. Lisp chỉ làm nhẹ thao tác vẽ của cad, không rút ngắn thời gian khởi động.

Các bạn có thể giảm thời gian khởi động bằng cách thêm '/nologo' vào command trong shortcut của autoCAD (Right click vào icon AutoCAD, chọn Properties).

VD: "C:\Program Files\Autodesk\AutoCAD 2014\acad.exe" /nologo


  • 0

#35 thiep

thiep

    biết dimbaseline

  • Members
  • PipPipPipPipPip
  • 369 Bài viết
Điểm đánh giá: 260 (khá)

Đã gửi 20 July 2015 - 02:50 PM

 Command: spa ; error: no function definition: VLAX-PRODUCT-KEY

 

lỗi của em đó bác Hoành ạ, cad2012

Tuy báo lỗi nhưng vẫn thấy có tác động của lệnh vào pm

Có lẻ nên thêm dòng

(vl-load-com)

ở đầu lisp là OK


  • 0

#36 united

united

    biết vẽ arc

  • Members
  • PipPip
  • 49 Bài viết
Điểm đánh giá: 1 (bình thường)

Đã gửi 18 August 2015 - 10:12 PM

Em nghĩ là nên đặt COMMANDPREVIEW về 0 nữa. Cái này khi dùng lệnh TRIM với EXTEND mà chọn nhiều đối tượng thì cực kỳ giật.


  • 0

#37 eng.dat.204

eng.dat.204

    Edu level: to10

  • Members
  • Pip
  • 14 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 27 August 2015 - 09:26 AM

Em dùng vơi Cad 2012 vẫn báo lỗi (SPA ; error: no function definition: VLAX-PRODUCT-KEY). :(


  • 0

#38 mrdoanha

mrdoanha

    biết pan

  • Members
  • Pip
  • 5 Bài viết
Điểm đánh giá: 1 (bình thường)

Đã gửi 27 August 2015 - 09:43 AM

Nhìn mấy cái bản vẽ thích thật nhỉ


  • 0

#39 Nguyen Hoanh

Nguyen Hoanh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 4105 Bài viết
Điểm đánh giá: 4495 (đỉnh cao)

Đã gửi 27 August 2015 - 10:33 AM

Đã cập nhật thêm điều chỉnh theo góp ý của các bạn.
  • 0

#40 Mũn xinh

Mũn xinh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 1313 Bài viết
Điểm đánh giá: 633 (tốt)

Đã gửi 04 September 2015 - 04:19 PM

Có một vấn đề là khi em dung trên 2016, thì 1 layout chỉ hiển thị được 3 viewport. Em muốn hiển thị nhiều hơn thì phải làm như thế nào :-??
  • 0

...Một chiều ngồi say

Một đời thật nhẹ

Ngày qua...