(Share) - Lisp in nhiều bản vẽ QDV - (In cả LayOut - Folder)

[Doan Nguyen Van 492]

 

Do công việc phải tiếp xúc với in ấn nhiều nên mình có viết 1 Lisp in nhanh nhiều bản vẽ, giúp tiết kiệm thời gian. 

Mình thấy trên diễn đàn cũng có khá nhiều Lisp in nhanh rồi nhưng có nhiều công năng sử dụng khác nhau nên cứ share lên đây, bác nào thấy phù hợp với công việc thì tải về sử dụng.

Giới thiệu sơ qua về Lisp: 

 

 

1. Có 5 tùy chọn in cơ bản 

- In Model: https://youtu.be/vxOpZaK2n-U

- In Layout: https://youtu.be/vpJKN8X0Muw

 

- In cả Model và Layout: https://youtu.be/AMHWJxQUzyI

- In theo View Manager  ( view ở Model hay Layout sẽ in được tất cả ): https://www.youtube.com/watch?v=SKPJKr_i80k

- In theo Folder (theo các khung bản vẽ đã lựa chọn sẵn):  https://www.youtube.com/watch?v=O9efKBTzk6c

- Đang update tính năng Combine PDF sau khi in: https://www.youtube.com/watch?v=isAlOBPP-wk

 

Liên hệ: nvdoangt@gmail.com 

-Link download (05/11/2019): https://drive.google.com/file/d/1K2A0LVeNTF88VFBsBUODS-AICDBVNPzZ/view?usp=sharing

                                                     Huong dan su dung-QDV-V7.pdf

 

Review: 

 

 

 

 

 

 

[Han Tinh 7]

Nhìn qua video thì thấy ok. Tuy nhiên nếu bạn phát triển nó ở không gian layout nữa thì tuyệt vời. 

[Doan Nguyen Van 492]

Vào lúc 24/2/2019 tại 09:05, Han Tinh đã nói:

Nhìn qua video thì thấy ok. Tuy nhiên nếu bạn phát triển nó ở không gian layout nữa thì tuyệt vời. 

Do mình không in Layout bao giờ nên k có bản vẽ mẫu để test bác ạ

[Han Tinh 7]

Bây giờ người ta dùng bản vẽ bên layout nhiều lắm, vì nó rất tiện lợi. 

[Bee 154]

12 giờ trước, Doan Nguyen Van đã nói:

Do em không in Layout bao giờ nên k có bản vẽ mẫu để test bác ạ

In model thì dùng cho biến đổi kiểu VN quy mô nhóm nhỏ sài cái Lsp thế này là được rồi. 

 

In Layout sẽ kết hợp với XREF ...... hệ thống quy mô lớn khoảng vài chục đến vài trăm nhân lực cùng chạy 1 dự án. Mà cái này thì có Publish rồi nên cũng không cần viết thêm làm gì cho mất công. :)

 

 

[Han Tinh 7]

Vào lúc 24/2/2019 tại 23:39, Bee đã nói:

In model thì dùng cho biến đổi kiểu VN quy mô nhóm nhỏ sài cái Lsp thế này là được rồi. 

 

In Layout sẽ kết hợp với XREF ...... hệ thống quy mô lớn khoảng vài chục đến vài trăm nhân lực cùng chạy 1 dự án. Mà cái này thì có Publish rồi nên cũng không cần viết thêm làm gì cho mất công. :)

 

 

Một layout có nhiều bản vẽ thì làm gì dùng được Publish chứ?

[kienxd04 7]

đúng vậy, bạn phát triển in bên layout nữa là chuẩn cơm mẹ nấu. Mình cung đang kiếm lisp in bên layout mà chưa ra.

[Doan Nguyen Van 492]

1 giờ} trướ}c, kienxd04 đã nói:

đúng vậy, bạn phát triển in bên layout nữa là chuẩn cơm mẹ nấu. Mình cung đang kiếm lisp in bên layout mà chưa ra.

Bạn có thể gửi cho mình file có các layout theo yêu cầu mình thử xem, mình nghĩ có thể làm được

[Bee 154]

14 giờ trước, Han Tinh đã nói:

Một layout có nhiều bản vẽ thì làm gì dùng được Publish chứ?

Uh nhỉ !

Mà vẽ thế thì khác gì vẽ hết bên model cho nhẹ ? Sang layout làm vài chục cái khung view mở file chờ dài cổ !

[Han Tinh 7]

17 giờ trước, Doan Nguyen Van đã nói:

Bạn có thể gửi cho mình file có các layout theo yêu cầu mình thử xem, mình nghĩ có thể làm được

Gởi bạn bản vẽ mẫu này bạn nghiên cứu thử nha (bản vẽ bên layout)!

BAN VE MAU.dwg

[Doan Nguyen Van 492]

Vào lúc 1/3/2019 tại 13:30, Han Tinh đã nói:

Gởi bạn bản vẽ mẫu này bạn nghiên cứu thử nha (bản vẽ bên layout)!

BAN VE MAU.dwg

 

Cảm ơn bạn, hiện tại mình đang test 

[Doan Nguyen Van 492]

Bổ sung tính năng IN LAYOUT

Cụ thể: - Có thể In chọn theo Layout

             - Có thể in nhiều Layout hoặc tất cả LayOut

- Bên Layout có bao nhiêu bản vẽ cũng in được hết

- Có thể chọn khung theo RecTang hoặc Khung theo Block (Kể cả Block Dynamic) .

Các bác xem qua thấy đã ổn chưa ạ?

Đang còn 1 số lỗi nhỏ.

Nếu hay các bác cho em 1 like lấy động lực với a

[Han Tinh 7]

1 giờ} trướ}c, Doan Nguyen Van đã nói:

Bổ sung tính năng IN LAYOUT

Cụ thể: - Có thể In chọn theo Layout

             - Có thể in nhiều Layout hoặc tất cả LayOut

- Bên Layout có bao nhiêu bản vẽ cũng in được hết

- Có thể chọn khung theo RecTang hoặc Khung theo Block (Kể cả Block Dynamic) .

Các bác xem qua thấy đã ổn chưa ạ?

Đang còn 1 số lỗi nhỏ.

Nếu hay các bác cho em 1 like lấy động lực với ạ

 

Thật tuyệt! 

[Luu Nguyen 4]

Bạn có thể gởi lisp lên để mọi người test thử (lisp có phần in bên layout).

[Doan Nguyen Van 492]

Vào lúc 3/3/2019 tại 20:38, Luu Nguyen đã nói:

Bạn có thể gởi lisp lên để mọi người test thử (lisp có phần in bên layout).

 

Vào lúc 1/3/2019 tại 17:32, Han Tinh đã nói:

Thật tuyệt! 

Đã Update Link Lisp cho các bác quan tâm: 

Bổ sung 2 tùy chọn

1. Chế độ In LAYOUT

- Có thể in theo chọn Layout

- Có thể chọn nhiều Layout cùng lúc hoặc chọn ALL Layout để in tất cả LAYOUT (Lưu ý: Phải chọn được khung Block hoặc Layer trước khi In

2. Bổ sung chế độ Sắp xếp bản vẽ với 3 tùy chọn cơ bản

- Normal: Không sắp xếp, bản vẽ nào chọn trước thì in trước, chọn sau in sau.

- Trái-Phải: In theo thứ tự từ Trái Qua Phải

- Trên - Dưới: In từ trên xuống dưới

 

 

[sg0nline 5]

cho mình xin 1 key test thử

C:\Users\Admin>wmic diskdrive get name,size,model,SerialNumber
Model                                 Name                SerialNumber     Size
Kingston DataTraveler 3.0 USB Device  \\.\PHYSICALDRIVE2  0                15471751680
HGST HTS725050A7E630                  \\.\PHYSICALDRIVE1  TF655AWH1NWATL   500105249280
Samsung SSD 850 PRO 128GB

[Doan Nguyen Van 492]

14 phút trước, sg0nline đã nói:

cho mình xin 1 key test thử

C:\Users\Admin>wmic diskdrive get name,size,model,SerialNumber
Model                                 Name                SerialNumber     Size
Kingston DataTraveler 3.0 USB Device  \\.\PHYSICALDRIVE2  0                15471751680
HGST HTS725050A7E630                  \\.\PHYSICALDRIVE1  TF655AWH1NWATL   500105249280
Samsung SSD 850 PRO 128GB

Bạn gửi cho mình dòng có Serial Number thôi. Nếu Serial là: TF655AWH1NWATL thì Key của bạn đây: 1011197441121021210127102112101125

[Han Tinh 7]

2 giờ trước, Doan Nguyen Van đã nói:

 

Đã Update Link Lisp cho các bác quan tâm: 

Bổ sung 2 tùy chọn

1. Chế độ In LAYOUT

- Có thể in theo chọn Layout

- Có thể chọn nhiều Layout cùng lúc hoặc chọn ALL Layout để in tất cả LAYOUT (Lưu ý: Phải chọn được khung Block hoặc Layer trước khi In

2. Bổ sung chế độ Sắp xếp bản vẽ với 3 tùy chọn cơ bản

- Normal: Không sắp xếp, bản vẽ nào chọn trước thì in trước, chọn sau in sau.

- Trái-Phải: In theo thứ tự từ Trái Qua Phải

- Trên - Dưới: In từ trên xuống dưới

(Lisp cần có khóa để sử dụng, chủ yếu là do bản V1 em Up không thấy nhiều phản hồi từ mọi người nên thêm Khóa để thăm dò xem có nhiều người cần đến hay không!

Nếu nhiều người quan tâm em sẽ bỏ key và để Publish)

Bác nào có nhu cầu thì cứ Comment Serial ở dưới bài viết này, em sẽ gửi Key cho các bác.

(À Key cũng đểu thôi nên không qua mặt được các bác cao thủ :D )

Cách lấy SerialNumber:

-Mở Command CMD (Window + r ) -> CMD 

- Pass dòng này để lấy SerialNumber

wmic diskdrive get name,size,SerialNumber

-Nếu không mở được CMD thì tải lisp này để lấy Serial:

Get HDD Serial- HDD.rar Lệnh HDD

Link Lisp: QDV.rar

Tưởng dùng được Publish thì còn quan tâm, chứ cần Serial thì trên diễn đàn này có nhiều rồi, 

[Doan Nguyen Van 492]

24 phút trước, Han Tinh đã nói:

Tưởng dùng được Publish thì còn quan tâm, chứ cần Serial thì trên diễn đàn này có nhiều rồi, 

Như đã nói ở trên, để Key để thăm dò xem có nhiều người cần đến nó hay không, nếu nhiều thì e sẽ Publish chứ không giữ làm của riêng, bác thử bỏ công sức viết ra 1 Lisp như vậy đi để rồi khi chia sẻ lên, mọi người tải về và sử dụng, sau đó không đả động 1 lời dù là cảm ơn hay gì đó, bác có thấy hụt hẫng hay không. (dù bản nâng cấp e không hề cần đến, nhu cầu chỉ dừng lại ở bản V1 là đã đủ).

 

[Anhtrangloivang 0]

Cám ơn Bạn!  Cho Minh sin 1 Key.

"Command: dhh
Unknown command "DHH".  Press F1 for help.

Command: hdd
3
nil*

[Anhtrangloivang 0]

Cám ơn Bạn!  Cho Minh sin 1 Key.

"Command: dhh

 

L3

=======

Minh dung Win SP3- 32 GZ. 

Cad 2007!

 

[jangboko 10]

1 giờ} trướ}c, Doan Nguyen Van đã nói:

Như đã nói ở trên, để Key để thăm dò xem có nhiều người cần đến nó hay không, nếu nhiều thì e sẽ Publish chứ không giữ làm của riêng, bác thử bỏ công sức viết ra 1 Lisp như vậy đi để rồi khi chia sẻ lên, mọi người tải về và sử dụng, sau đó không đả động 1 lời dù là cảm ơn hay gì đó, bác có thấy hụt hẫng hay không. (dù bản nâng cấp e không hề cần đến, nhu cầu chỉ dừng lại ở bản V1 là đã đủ).

 

Mình cũng rất quan tâm tới cái lisp của bạn. Do mình dùng máy tính của công ty với 1 máy tính của nhà nên rất ngại xin key. Mong bạn sớm chia sẻ cho anh em.

[vomanhhungdhxd 3]

Xin key để test bác ơi : Z9AJ0VAA

[Doan Nguyen Van 492]

1 giờ trước, Anhtrangloivang đã nói:

Cám ơn Bạn!  Cho Minh sin 1 Key.

"Command: dhh

 

L3

=======

Minh dung Win SP3- 32 GZ. 

Cad 2007!

 

Win XP hình như không lấy được Serial, bác inbox em gửi File không log nhé

[Doan Nguyen Van 492]

1 giờ trước, jangboko đã nói:

Mình cũng rất quan tâm tới cái lisp của bạn. Do mình dùng máy tính của công ty với 1 máy tính của nhà nên rất ngại xin key. Mong bạn sớm chia sẻ cho anh em.

Cảm ơn bác, bác test thử xem, nếu dùng được e gửi file không log cho bác