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

dovananh.xd

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

  • Số lượng nội dung

    185

  • Đã tham gia

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

Bài đăng được đăng bởi dovananh.xd

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

    Nhờ anh Ket chỉnh sửa lại lisp này, nó bị một số lỗi như sau:

    1/ Nếu số lượng khung MV trong một bản vẽ lớn hơn 1 thì bước "chọn text ghi Ký hiệu:" thì khi in ra nó sẽ in số khung MV mà nó đếm được cộng lại. Ví dụ, em cần in 3 bản vẽ, mỗi bản vẽ có 4 khung MV, khi in ra thì số thứ tự bản vẽ sẽ là ...04; ...08;...12.

    2/ Khi pick chọn đường dẫn thì nó đọc cả đối tượng là text cùng layer. Như vậy khi in ra sẽ lỗi. Ví dụ như trong file test của anh nha, các số 1 đến 9 và các khung bao ngoài các số đó cùng layer Defpoint chẳng hạn, khi in ra sẽ bị lỗi.

    Thanks!

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

    -Dovananh. Xd: Bác Haanh ơi, em đọc trên một topic nào đó, thấy bác có biệt danh là Haanh bể phốt, hay quá, không biết từ đâu ra:))

    -Haanh: Hồi sinh viên em đã từng đi buôn gà để kiếm tiền ăn học. “Đại bản doanh" của em là ở khu vực bể phốt, cạnh nhà WC công cộng trong chợ Long Biên- Hà nội. Em là con gái chân yếu tay mềm, may mà được ông nội dạy võ nghệ cho em từ bé, nên bọn trộm cắp vặt không dám bén bảng đến địa bàn hoạt động của em. Bà con buôn bán gia cầm ở đây cũng được em "bảo kê" , họ quý em lắm!

    Ngưỡng mộ bác quá:D

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

    Các Bác cho em hỏi cách tạo 1 layer theo ý muốn và cách sử dụng nó như thế nào ( về kích thuớc,màu,độ đậm nhạt) do em mới học cad nên chưa nắm rõ,khi tạo rồi mà chẳng biết chỉnh sửa gì hết.. Thanks các bác nhé..!!

    Bạn cứ làm rồi từ từ sẽ quen. Ngày xưa mình làm đồ án BTCT1 mình vẽ bằng CAD, chỉ dùng duy nhất một layer 0, một màu duy nhất là màu trắng. Đi in bị con ở quán in nó mắng cho, mình hỏi nó là layer là gì nữa, nó cười bảo: thế mà em cũng vẽ được à?

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

     

    Bởi vì anh ta cho rằng chỉ mới " xè xè (vô) nấm đất bên đường" thì Kiều đã làm cho "rầu rầu ngọn cỏ nửa vàng nửa xanh" rồi. Vậy thì ắt hản trong cơ thể nàng có chứa cái độc tố gì đó ghê gớm như là axit sunfuaric đậm đặc vậy.

    Ái chà chà, Nguy hiểm ra phết chứ đùa hử....

     

    Bác sưu tầm truyện này ở đâu thế, hay bác tự nghĩ ra vậy. Quá hay luôn!

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

    Bạn làm thế nào mà mất được cả dòng Tools thế? đúng là cao thủ, bảo anh em với, mình đang muốn mất hết mà chưa biết cách nhấn ctrl+0 vẫn còn dòng đó và thanh ở dưới cùng.

    Bác này vui tính thiệt đó!

    Bác thử gõ menuload rồi chọn ACAD, EXPRESS...bấm unload thử phát xem:)) không biết có được không nữa!

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

    Mình đoán mò ý bạn chắc là đổi màu của layer chứa đối tượng được chọn chứ gì. Nếu đúng dùng lisp này.

    http://duy782006.blo...tuong-chon.html

    Lưu ý lisp chỉ chuyển màu của layer thôi nếu đối tượng không phải là bylayer mình không chịu trách nhiệm nhé.

     

     

    Tức là đối tượng A đang nằm ở layer "A", ấn 1 -> Chọn đối tượng A -> Layer "A" sẽ mang màu 1 ?

    Nếu vậy thì khái niệm Bylayer trong bài toán bạn đưa ra hơi thừa

    Ví dụ minh họa ý bạn như sau, bạn xem có phải không :

    1 - Không dùng Reactor :

    (defun c:ccl (/ m dt la enLa)
(princ "\nChon mau muon doi :")
(setq
 m (acad_colordlg 3)  
 enLa (entget (tblobjname "LAYER" (cdr (assoc 8 (entget (car (entsel "\nChon doi tuong chua layer can doi mau: ")))))))
)
(entmod (subst (cons 62 m) (assoc 62 enLa) enLa))
(princ)
)

    Hai lisp này là hoàn toàn giống nhau. Thanks các anh!

     

     

    THì Vẫn là "Nếu đổi màu thành ByLayer thì chọn đối tượng rồi chọn màu là Bylayer trên thanh công cụ là được."

     

    Lạm dụng vào Lisp nhiều quá thì không có hay.

    Anh vẫn chưa hiểu ý của em rồi.

    Hì hì, phải nói thế nào để các anh hiểu ý của em nhỉ, hì hì!

    Hì hì, ngại quá! ý tưởng này của em là từ lời "thầy bói" của anh Hà mà!

    Khi em đọc xong lời thầy bói, tiện thể em đang dùng cái lisp DM, thế là em nghĩ ngay tới cái ý tưởng này

    Tuy nhiên dùng một trong hai lisp của anh Ket hoặc của anh Duy là được rồi.

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

    Nếu đổi màu thành ByLayer thì chọn đối tượng rồi chọn màu là Bylayer trên thanh công cụ là được.

    Hihi;))

    Em đưa ra bài toán cụ thể như sau:

    1/ Mở CAD lên --> gõ lệnh LA enter --> New layer --> Đặt tên layer mới là Layer1, Color: Yellow, Linetype: Continuos...

    2/ Apload lisp DM.lsp

    3/ Vẽ line: L enter (Vẽ một đoạn thẳng bất kỳ)

    4/ Gõ 1 enter, select objects: chọn vào đường line vừa vẽ. En tơ.

    Yêu cầu: màu 1 thành màu bylayer của layer1.

    Hy vọng anh hiểu!

    P/s: Một ngày click Like this tối đa bao nhiêu lần các anh nhỉ?

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

    Khả năng của layer là như thế chứ còn lisp láp j nữa đây :D

    HEHE, anh Kẹt xu ơi, em đang dùng một lisp đổi màu đối tượng trên diễn đàn. Ví dụ muốn đối tượng màu 1 thì click vào đối tượng, gõ phím 1, rồi enter cái cạch phát là nó đổi màu. Và tất nhiên màu 1 đấy không phải là màu bylayer của layer vẽ đối tượng đó - Bylayer là màu trắng - (khi tạo mới layer mà chưa đặt màu cho layer thì màu mặc định là màu trắng). Ý của thầy bói là màu 1 thành màu bylayer của layer đó đấy chứ!

    Hihi;)). Đây là lisp đổi màu đối tượng em tìm trên diễn đàn:

    http://www.cadviet.com/upfiles/3/89140_dm.lsp

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

    Thầy bói: bạn ấy đang muốn mỗi lớp có mỗi màu theo bylayer, nghĩa là khi khi thay đổi màu của bylayer thì màu của layer đó cũng thay đổi theo.

    Với lại: khi nào xuất hiện trên truyền hình thì cứ cho hiện tên (màu xanh), chứ đừng hidden chán lắm.

    Thân thương!

    Anh Hà làm cái lisp này đi, ý tưởng hay đó:)

×