Chuyển đến nội dung
Diễn đàn CADViet
quocmanh04tt

Lisp In Nhiều Bản Vẽ (Kể Cả Layout)

Bởi quocmanh04tt , trong AutoLisp

Các bài được khuyến nghị

Nad SK    8

Nad SK
Đã đăng

MAKE CADVIET GREAT AGAIN! trang này nếu có đủ 3 điều kiện sau

- 50.000 view

- 100 trang

- https://docs.google...._YTpJdiY4E/edit có 100 serial

 

Sẽ có hướng dẫn tìm key.

-----------------------------------------------------------------------------

Edit 1: 4/12/2016: 

- 3 điều kiện trên trước ngày 9 tháng 4 năm 2017 (1 năm ngày QPL trình làng).

 

 

Có lẽ để cho thằng anh nó chẵn năm cái đã!

Cập nhật tình hình còn 1 tháng nữa là tới hạn cuối rồi:

- Truy cập: 32.000/50.000 (64%)

- Số trang: 23/100 (23%)

- Anh em 7/100 (7%)

Quẩy lên nào anh em. He he

  • Vote giảm 1

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nad SK    8

Nad SK
Đã đăng

Vì nó là máy ảo, nhưng cũng có thể có nhiều máy ảo chức năng tương tự, mà phân biệt máy ảo và máy thật thì chưa biết cách. Nên máy nào mà QPL không nhận biết được thì cứ cho về DWG To PDF.pc3.

Thế thì bác nên đặt Plot to File mặc định là un check, in xong cũng quay về mặc định luôn.

  • Vote tăng 1
  • Vote giảm 1

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

quocmanh04tt    635

quocmanh04tt
Đã đăng (Đă chỉnh sửa)

Hy vọng đc test thử sản phẩm của bác Quốc Mạnh :)  :)  :)

Bạn Test trước nhé! (Yêu cầu phải có USB cắm vào máy - USB của bạn, hoặc của người khác thì tùy. Nhưng sau này USB đó chính là cái khóa, cắm vào máy nào thì máy đó chạy).

1. Bạn vào Command prompt của Windows.

2. Paste vào dòng này: wmic diskdrive get name,size,model,SerialNumber

3. Gửi thông tin nhận được trên màn hình cho mình (có thể chụp hình - Và copy dòng thông tin về USB).

Ví dụ, đây là máy của mình:

141736_my_com_1.jpg

Chỉnh sửa theo quocmanh04tt
  • Vote tăng 1

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

quocmanh04tt    635

quocmanh04tt
Đã đăng

Bác Mạnh cho em text với nhé :D

 

1969_key.jpg

 

Thanks!

 

Uh, chỉ chụp hình thì hơi bất tiện đối với mình. Sr...

Bạn copy dòng thông tin về USB và paste lên, không thì mình ngồi đọc và gõ lại thì đuối lắm! he...he...

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nad SK    8

Nad SK
Đã đăng

Uh, chỉ chụp hình thì hơi bất tiện đối với mình. Sr...

Bạn copy dòng thông tin về USB và paste lên, không thì mình ngồi đọc và gõ lại thì đuối lắm! he...he...

- Dòng lệnh wmic diskdrive get name,size,model,SerialNumber

Windows 7: Invalid XML content

Windows 10: OK.

- Và cũng chỉ có Windows 10 mới có thể copy dòng thông tin của USB ra được thôi.

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nad SK    8

Nad SK
Đã đăng

Bác Quốc Mạnh cần Serial của USB thì sau đây là cách lấy SerialNumber. Áp dụng cho Win7 và 10 (các phiên bản khác chưa thử) -  Cách này copy thoải mái được SerialNumber:

- Chuột phải vào USB, chọn Properties -> Chọn tiếp Hardware -> Tiếp tục chọn Properties -> Chọn Details -> Chọn tiếp Property -> Chọn Device Instance Path.

Trong ô Value sẽ hiện thông số chứ Serial của USB

Ví dụ của mình là:
USBSTOR\DISK&VEN_USB2.0&PROD_FLASH_DISK&REV_2.10\2008021703522498&0
 
Thì 2008021703522498 sẽ là SerialNumber của USB.
 
Bác Quốc Mạnh cho em test phát nào.
  • Vote giảm 1

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

quocmanh04tt    635

quocmanh04tt
Đã đăng

- Dòng lệnh wmic diskdrive get name,size,model,SerialNumber

Windows 7: Invalid XML content

Windows 10: OK.

- Và cũng chỉ có Windows 10 mới có thể copy dòng thông tin của USB ra được thôi.

 

Xem cái này:141736_untitled.png

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

quocmanh04tt    635

quocmanh04tt
Đã đăng

 

Bác Quốc Mạnh cần Serial của USB thì sau đây là cách lấy SerialNumber. Áp dụng cho Win7 và 10 (các phiên bản khác chưa thử) -  Cách này copy thoải mái được SerialNumber:

- Chuột phải vào USB, chọn Properties -> Chọn tiếp Hardware -> Tiếp tục chọn Properties -> Chọn Details -> Chọn tiếp Property -> Chọn Device Instance Path.

Trong ô Value sẽ hiện thông số chứ Serial của USB

Ví dụ của mình là:
USBSTOR\DISK&VEN_USB2.0&PROD_FLASH_DISK&REV_2.10\2008021703522498&0
 
Thì 2008021703522498 sẽ là SerialNumber của USB.
 
Bác Quốc Mạnh cho em test phát nào.

 

Cái đó không đủ thông tin. Serial của nhà sản xuất cơ...!

@conghoa: thông tin đầy đủ giống như hình bạn post. Còn mấy chữ serial đó thì mình cần gì phải nói ở bài trên.

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

conghoa    125

conghoa
Đã đăng

:D, em dân thường nên nghĩ đơn giản :D

 

Thông số USB của em:

Model  : Kingston DataTraveler 2.0 USB Device
Name : \\.\PHYSICALDRIVE1                
SerialNumber:     9B4FD4E08B09  
Size: 7863367680

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nad SK    8

Nad SK
Đã đăng

Cái đó không đủ thông tin. Serial của nhà sản xuất cơ...!

 

Cái đấy là serial của nhà sản xuất đấy bác, em check bằng lệnh của bác trong Win10 nó cũng ra serial đấy mà.

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

conghoa    125

conghoa
Đã đăng

Em có một số góp ý: (thử nghiệm trên cad 2017)

- Nên để mặc định in là Fit, hiện tại đang để custom và khi chỉnh thành Fit để in xong thì nó lại tự động về Custom <--- ko hay lắm.

- Vì đây là lisp in nên người dùng sẽ ít khi vào in bằng Ctrl+P, do đó nên cập nhật thêm tính năng chỉnh sửa nét in trực tiếp trong lisp. Nếu ko có thì người dùng lại phải vào phần in truyền thống để tạo nét in. Nhiều lúc đặt in xong xuôi, chỉ cần chỉnh lại 1,2 nét in mà lại phải tắt lisp đi để đặt lại nét in thì cũng ko tiện

- Nên thêm tính năng chọn việc có đánh dấu bản vẽ đã in xong hoặc ko đánh dấu, vì nét defpoint khi layios để xóa đi thì lại không chọn dc đối tượng để xóa (hay tại em gà)

 

Em sẽ post thêm trong quá trình sử dụng.

 

Thanks bác.

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

quocmanh04tt    635

quocmanh04tt
Đã đăng

- Phần fit thì để bổ sung. (về custom nhưng hiện tại vẫn đúng tỷ lệ như Fit).

- Phần edit nét in phức tạp lắm, chưa chắc lisp đã làm được.

- Xóa đánh dấu thì trong phần sort có remove Marks.

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nad SK    8

Nad SK
Đã đăng

- Nên thêm tính năng chọn việc có đánh dấu bản vẽ đã in xong hoặc ko đánh dấu, vì nét defpoint khi layios để xóa đi thì lại không chọn dc đối tượng để xóa (hay tại em gà)

Dùng lệnh ssx chọn cái nét đánh dấu nhấn enter. gõ tiếp e nhấn p. Thế là xong.

  • Vote tăng 1

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

quocmanh04tt    635

quocmanh04tt
Đã đăng

Ở nhà nên dùng cái USB khác test vậy:

 

(4C532000071227119192 SanDisk Cruzer Switch USB Device 3997486080)

https://drive.google.com/file/d/0B2LetfHDljPGOWVpaDlmRW9oV1k/view?usp=sharing

 

Dùng lệnh ssx chọn cái nét đánh dấu nhấn enter. gõ tiếp e nhấn p. Thế là xong.

Có remove Marks rồi mà, nó tự động xóa tất cả các line đánh dấu.

Chia sẻ bài đăng này

Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay
Về Đầu Trang AutoLisp
×