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

alisp

Thành viên
 Xem Hồ Sơ  Xem hoạt động của họ

  • Số lượng nội dung

    204

  • Đã tham gia

  • Lần ghé thăm cuối

  • Ngày trúng

    25

Bài đăng được đăng bởi alisp

  2. Đã đăng · Trả lời báo cáo

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

    Vẩn không đưa được điểm nút đỉnh vào được anh à

    do kthuoc 3_2.dwg

    Cái block của tôi nó đẹp như thế mà bạn nỡ nào dời điểm chèn nó tít tận đâu đâu để làm gì vậy? Nó vẫn chèn đó chứ nhưng do điểm chèn không đúng nên zoom all mới thấy.

    Hay là bạn muốn vẽ cái circle và hatch thay vì block? Nếu vậy chờ người khác viết cho bạn nhé.

    • Like 1

  6. Đã đăng · Trả lời báo cáo

    Vào lúc 27/10/2021 tại 11:38, thiep đã nói:

    @cuongtk2Thiệp đã viết lisp, nhưng không dùng hàm "command" chỉ dùng hàm entmake, và đang rắc rối 1 chút về UCS và WCS, nhưng có thể gỡ lỗi được. 1 ý nữa là chỉ cần pick chọn đường tròn, từ điểm pick, lisp hiểu sẽ tạo 2 dimordinate ở 2 điểm quadrant nào, không nên cứng nhắc chỉ là tạo 2 dimordinate dưới và phải.

    Bác gỡ lỗi xong chưa mà không thấy đưa code lên? Còn pick chọn circle thì nên quét chọn rồi suy ra điểm cần lấy toạ độ thì hay hơn là pick từng circle một. Hy vọng bác làm xong và đưa lên cho mọi người tham khảo.

  8. Đã đăng · Trả lời báo cáo

    16 giờ trước, hung1608 đã nói:

    Minh có một Polyline gấp khúc. Các bạn có thể viết giúp minh 1 lisp tạo Dim đo được luôn tổng chiều dài Polyline được không

    Và khi minh thay đổi chiều dài thì Dim của Polyline cũng sẽ cập nhật chiều dài đó tương ứng

    Cảm ơn

    Xem trong này có gì xài được không, còn vụ cập nhật dài tương ứng thì khó đấy.

     

  10. Đã đăng · Trả lời báo cáo

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

    bạn @alisp  giúp mình thêm một chút nữa đc ko?  chỉnh sửa thành cú pháp " L = ...(m)." Và có cách nào không cần chọn text không để ra kết quả quả. ví dụ sau khi chọn xong các đường thẳng chỉ cần click thêm lần nữa là ra kết quả luôn. cảm ơn bạn đã rất nhiều

    Việc đơn giản là copy 1 text mẫu rồi sửa nội dung bạn lại không muốn, bạn lại muốn tạo text mới thì cũng dễ thôi, nhưng hoặc bạn phải chỉnh font hiện hành, chiều cao chữ hiện hành, canh lề (justify) hiện hành và đủ các thuộc tính hiện hành trước khi chạy lisp, hoặc sau khi chạy lisp thì sửa trong properties. Tôi thì nghĩ cách này phức tạp và tốn nhiều công hơn cách copy nhiều.

    tl.lsp

  12. Đã đăng · Trả lời báo cáo

    38 phút trước, cuongtk2 đã nói:

    Anh cũng không rõ lắm, chắc do mấy cái hàm nó bị lẫn, em thử load từng đoạn vào xem , đếm đủ bằng nhau số ngoặc đơn () cho từng đoạn để load khỏi lỗi. Anh cũng không có máy khác để test.

    Thiếu hàm list_point_pline rồi bác.

  13. Đã đăng · Trả lời báo cáo

    18 giờ trước, SangPham17 đã nói:

    Xin lisp nâng hạ cao độ đường đồng mức trong autocad với ạ ( VD có 10 đường đồng mức có cao độ từ 50 đến 40 giờ em muốn chỉnh tất cả hạ đều xuống 1m là từ 49 đến 39)

    Thấy chẳng ai giúp, chắc tại dễ quá làm không bõ chăng? Thôi giúp bạn làm phước vậy.

    Đường đồng mức phải là LWPOLYLINE.

    TG.lsp

  15. Đã đăng · Trả lời báo cáo

    22 giờ trước, LeeG999999 đã nói:

    Trả là e tìm đc 2 cái lisp xuất tọa độ các đỉnh của pline khá hay nhưng nó chỉ áp dụng cho từng đường pline thôi không thể quét chọn nhiều. E đang cần quét chọn nhiều đường pline song song nhau mà chưa ko biết làm thế nào mong các bác giúp đỡ.

    tabcord.lsp

    COORN.LSP

    Lisp bạn đưa dài quá mà có cả chữ Nga thì chẳng ai giúp được đâu. Dạo này dịch bệnh quá nên cũng chẳng ai có hứng thú sửa cho bạn, nhất là lisp quá dài như vậy.

  16. Đã đăng · Trả lời báo cáo

    6 giờ trước, Dang D Khanh đã nói:

    Lệnh sau là một biến thể khác của b @cuongtk2

    • Đám mây này đang được tính toán cho bản vẽ đưa ra. nếu phức tạp hơn có thể update tiếp.
    • Nếu bạn nào cần thì liên hệ (yêu cầu tối thiểu sử dụng CAD >= 20).
    • nhìn lệnh thì khá đơn giản nhưng nó hiện tại cần phí vì vậy các b có thể xem xét..

    1240194068_GroupTextBD.mp4.gif.1cab2f3fdf7dc755a558a7ca69e1aa06.gif

    Thấy bác biểu diễn hay lắm đấy, nhưng hình như bác dùng google dịch để dịch ra tiếng Việt thì phải. 

  18. Đã đăng · Trả lời báo cáo

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

    Em thử với 2007 và 2010 khả năng cao là không tương thích cad báo To turn this feature off, remove the registry value 
    [HKLM\Software\Microsoft\Fusion!EnableLog].. Liệu có các nào để cad đời thấp dùng được không anh?

    Chỉ có cách nói bác @cuongtk2 viết bằng lisp thôi, chứ C# không tương thích cad đời cũ đâu.

    • Like 1

  19. Đã đăng · Trả lời báo cáo

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

    e muốn khoanh vùng rõ ràng A với A b vs b luôn ấy ạ. Xác định các chi tiết qua số đã được đánh dấu dưới dạnh text

    1.dwg

     

    Cái này khó, thuật toán của LeeMac cũng không giải được, không biết bác cuongtk2 còn thuật toán nào khác không?

  20. Đã đăng · Trả lời báo cáo

    54 phút trước, tuanle97 đã nói:

    e muốn khoanh vùng rõ ràng a với a b vs b luôn ấy ạ 

     

    Bạn lại đi vào vết xe đổ của 1 số người rồi. Đưa yêu cầu mà không đưa file mẫu, bắt tội bác @cuongtk2 phải tự chế ra file  rồi làm không đúng ý bạn.

    Sao bạn không đơn giản cái yêu cầu bằng cách đổi màu text nhỉ, chứ như vầy thì khó cho bác cuongtk2 lắm.

  21. Đã đăng · Trả lời báo cáo

    Vào lúc 27/9/2021 tại 10:37, Vietdvv đã nói:

    Cám ơn bác, e đã sửa lại và được khi chèn text. Nhưng khi chèn block att thì lại báo lỗi. e post lên bác xem giúp e với ạ

     

    DT khong do duoc (2).lsp

    DT khong do duoc block.lsp

    Drawing2.dwg

    Thấy bạn ít nhiều cũng biết về lisp, nhưng không tự sửa được hay sao mà phải nhờ sửa dùm?

    Lần trước nhờ viết text, lần này nhờ insert block att, không có lần sau nhé bác!!

    DT khong do duoc block.lsp

     

  25. Đã đăng · Trả lời báo cáo

    22 phút trước, AutoTay.com đã nói:

    Em cũng nghĩ thế. Nhất là chỉ bán được cho 1 người duy nhất. Nếu viết 1 lisp phổ thông rồi đăng lên các diễn đàn, group... để bán thì lại là chuyện khác.

    Chắc bạn không biết hiện nay đã có app dịch ngược vlx sang lsp? Cho nên nhiều khi chỉ bán được 1 bản rồi mất luôn code của mình. Cái app đó dù vô tình hay cố ý cũng đều nhằm mục đích diệt lispviet hết bạn ơi!

    • Like 1
×