Add Viewport

[limfx 21]

Em đang tạo các khung in Viewport bên layout từ các khung hình chữ nhật bên model:

(vla-AddPViewport paperSpace center width height)

Nhưng đối với các khung chữ nhật bị xoay theo hướng tuyến 1 góc thì chưa biết cách xử lý tự động xoay bên layout.

Các anh có cách nào hay hơn cách này:

(setq ang (getangle "\nPick direction points or enter angle:"))

(setq ang (rtos (-(* 180.0 (/ ang pi))) 2 2))
(command "_.Dview" "" "Twist" ang "")

Thanks!

[amateurday 15]

Tớ cũng đang tìm bản free của cái này mà không có.

Hic, bác nào có cái này, giá hữu nghị cho anh em không ạ?

 

Tình hình tài chính nó thế này:

Tiền thì em không thiếu, nhiều thì em không có!!!

[cuongtk2 342]

@limfx Nếu em dùng block hình chữ nhật, có thể dễ dàng lấy góc xoay, position, scale x,y mà không cần tính góc của cạnh dài hình chữ nhật. 

[conghoa 123]

Trên diễn đàn có bản Free mà nhỉ.

https://www.cadviet.com/forum/index.php?app=forums&module=forums&controller=topic&id=68723

[amateurday 15]

52 phút trước, conghoa đã nói:

Trên diễn đàn có bản Free mà nhỉ.

https://www.cadviet.com/forum/index.php?app=forums&module=forums&controller=topic&id=68723

Tớ đã thử hết 6 trang trong đó, thử cháy cả máy.

Tình hình là có lisp xuất mỗi polyline thành 1 layout là ổn định nhất, do đó, tớ sẽ xuất từng polyline và sang từng layout rồi cắt nó xếp vào 1 layout đã có khung tên thẳng hàng.

Như thế cũng bớt được kha khá thời gian rồi.

Các lisp khác thì hình như xung đột lệnh giữa các đời cad nên không chạy được (lisp 2013, cad 2022).

VD xuất được 1 VP, khung thứ 2 nằm bên cạnh thì zoom vào vùng khác và tỷ lệ cũng không giống VP trước.

Xin cảm ơn bạn nhé!!!

 

(Lưu ý: Polyline bên Model nằm trong UCS No Name chứ không phải World).

 

PS: thực ra cuối trang có 2 bài là có phí, 1 bài của bạn SAM là rẻ như trà đá, nhưng hỏi mấy ly trà đá thì không thấy trả lời.

Dường như trà đá mà tớ hay uống là loại khác với trà đá lisp nên bạn ấy ngại. Khó xử gê, hề hề!!!

 

[sam8xd 47]

Các bác tham khảo cách tạo Viewport này

 

[tannguyen291 135]

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

Các bác tham khảo cách tạo Viewport này

 

Ông anh câu view câu like vừa vừa thôi. tương tác thì ít hút trà sữa là nhiều.

Ông em @limfx là người biết code muốn hỏi thuật toán chứ muốn mua về dùng đâu. 

chả lẽ lại thấy bác ở đâu vote giảm ở đấy.

[Doan Van Ha 3.191]

18 phút trước, tannguyen291 đã nói:

Ông anh câu view câu like vừa vừa thôi. tương tác thì ít hút trà sữa là nhiều.

Ông em @limfx là người biết code muốn hỏi thuật toán chứ muốn mua về dùng đâu. 

chả lẽ lại thấy bác ở đâu vote giảm ở đấy.

Chủ trương của forum là "làm việc thiện": giúp viết code cho các user để g/q công việc được nhanh hơn.
Tuy nhiên, 2 trường hợp sau đây cần hạn chế:
1. Chỉ lên forum quảng cáo câu like, câu view, câu... money, mà không hề "thiện nguyện code" hoặc giúp đỡ giải đáp thắc mắc cho user.
2. Lợi dụng "lòng tốt" của forum một cách quá đáng, chẳng hạn như công việc đó nếu làm thủ công thì mất 10 phút (và chỉ mang tính đặc thù cá nhân), nhưng viết code phải mất 10 giờ. Và cả trường hợp ngày nào cũng đặt y/c viết code như kiểu forum sinh ra là để phục vụ cho cá nhân.

Cám ơn @tannguyen291 đã nói giùm forum!

[limfx 21]

Em đã làm được đối với khung rectangle và pline. Còn một số lỗi đang khắc phục a!

[FLASH]

[/FLASH]

[amateurday 15]

8 giờ trước, limfx đã nói:

Em đã làm được đối với khung rectangle và pline. Còn một số lỗi đang khắc phục a!

[FLASH]

[/FLASH]

Nhìn hấp dẫn quá, hợp lý gê!!!

[NTHAHT 83]

Mình cũng có 1 bản dùng thử.

- Lệnh ATK: gán dữ liệu để nhận biết đối tượng (khỏi quét nhầm) - Đối tượng là Rectangle hoặc Block.

- Lệnh CVP: Add viewport sang Laytout.

- Link

[amateurday 15]

10 giờ trước, NTHAHT đã nói:

Mình cũng có 1 bản dùng thử.

- Lệnh ATK: gán dữ liệu để nhận biết đối tượng (khỏi quét nhầm) - Đối tượng là Rectangle hoặc Block.

- Lệnh CVP: Add viewport sang Laytout.

- Link

Hic, khó dùng quá bạn ơi. Không biết cách điền thông số cho ATK nữa.

Và dùng thử thì giới hạn thế nào bạn nhỉ?

[NTHAHT 83]

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

Hic, khó dùng quá bạn ơi. Không biết cách điền thông số cho ATK nữa.

Và dùng thử thì giới hạn thế nào bạn nhỉ? Full chức năng, nhưng sau 1 khoảng thời gian nào đó thì không dùng được nữa. hehehe...

[amateurday 15]

10 phút trước, NTHAHT đã nói:

 

Hề hề, gần được. Có điều Model UCS quay chứ không World. Sang layout nó nằm ngang mất rồi.

 

Với lại, cài đặt ATK khó dùng quá bạn ơi, cho cái hộp thoại rồi in cái Bảng giá lên xem mấy ly trà đá nào?

 

 

[NTHAHT 83]

- Nếu test, thì bạn cứ dùng như lisp khác:

Từ các HCN có sẵn (bạn đã sắp sếp đúng vị trí theo nhu cầu), dùng ATK với tùy chọn Create  -> quét chọn các HCN, Enter là xong.

- Bạn cho mình 1 file cad mẫu (về UCS), và yêu cầu đầu ra nào!

[amateurday 15]

30 phút trước, NTHAHT đã nói:

- Nếu test, thì bạn cứ dùng như lisp khác:

Từ các HCN có sẵn (bạn đã sắp sếp đúng vị trí theo nhu cầu), dùng ATK với tùy chọn Create  -> quét chọn các HCN, Enter là xong.

- Bạn cho mình 1 file cad mẫu (về UCS), và yêu cầu đầu ra nào!

Bạn có thời gian thì thử nhé. Tớ muốn các hình chữ nhật Polyline thành VP thẳng rẹt rẹt. Còn sắp xếp vào khung thì chắc phải move thôi, chứ code bố trí VP tổng quát sẽ hợp người này, đá người kia.

Khung tên thì cách làm của tớ sẽ luôn là 1:1. VD A3 thì khung tên luôn là 420,297. Nhiều người làm khung A3 chuẩn, nhưng copy qua lại nó (scale n lần) to oành hoặc nhỏ tí.

 

Nói chung bớt ít thao tác là được. Trà đá nên không cần ra phát 100% làm gì. Hề hề!!!

 

 

Polyline 2 VP.dwg

[NTHAHT 83]

- Đúng là lisp của mình không đáp ứng nhu cầu của bạn được.
- Lisp của mình viết theo nhu cầu cá nhân, cũng đã qua nhiều lần bổ sung chỉnh sửa nên nó lắm lựa chọn như vậy.
- Không phải vấn đề UCS, vì mình đã xử lý rồi.
- Hiện tại lisp chỉ xử lý khi HCN nằm nghiêng thì nó đưa về nằm ngang (cạnh dài nằm ngang), không phụ thuộc vào Pline như mẫu của bạn.
- Nhu cầu của bạn: là đưa về nằm ngang hoặc dọc phụ thuộc Pline.

[amateurday 15]

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

- Đúng là lisp của mình không đáp ứng nhu cầu của bạn được.
- Lisp của mình viết theo nhu cầu cá nhân, cũng đã qua nhiều lần bổ sung chỉnh sửa nên nó lắm lựa chọn như vậy.
- Không phải vấn đề UCS, vì mình đã xử lý rồi.
- Hiện tại lisp chỉ xử lý khi HCN nằm nghiêng thì nó đưa về nằm ngang (cạnh dài nằm ngang), không phụ thuộc vào Pline như mẫu của bạn.
- Nhu cầu của bạn: là đưa về nằm ngang hoặc dọc phụ thuộc Pline.

Không sao, thi thoảng tớ mới làm bản vẽ kiểu kéo dài này.

Mà nhiều tùy chọn thì tớ nghĩ hộp thoại hay hơn chứ, nó còn lưu thông số, gõ lệnh, enter là nhanh.

[NTHAHT 83]

23 giờ trước, amateurday đã nói:

Không sao, thi thoảng tớ mới làm bản vẽ kiểu kéo dài này.

Mà nhiều tùy chọn thì tớ nghĩ hộp thoại hay hơn chứ, nó còn lưu thông số, gõ lệnh, enter là nhanh.

- Mình nghĩ hộp thoại không cần thiết, tuy là nhiều tùy chọn nhưng cơ bản là "Hoặc" không phải "Và", có nghĩa là dùng cái này khỏi cái kia.

- Các tùy chọn đều có lưu thông số.

- Nếu 1 lần quét chọn để xuất sang layout, các viewport có scale khác nhau (nghĩa là VP này scale là a, VP kia scale là b ...) thì cần quan tâm tùy chọn "Vport scale" (đây là "Và").

[mourison1993 1]

Vào lúc 11/4/2024 tại 12:15, limfx đã nói:

Em đã làm được đối với khung rectangle và pline. Còn một số lỗi đang khắc phục a!

[FLASH]

[/FLASH]

Có share được không bác, lisp hay quá!

[amateurday 15]

Hề hề, xịn xò đấy, khó nha.

 

À mà bạn limfx nè, cấu hình máy thế nào mà trơn tru thế nhỉ? Máy tớ mở file 5mb mà ram lên full 16gb, treo luôn.