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

AGX10

Thành viên
  • Số lượng nội dung

    12
  • Đã tham gia

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

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


  1. Mình đang cần nối 2 đường polyline lại thành 1 đường nhưng mà 2 đường polyline này lại có 1 đoạn trùng lên nhau nên mình không thể dùng lệnh lisp nối là: nn và pj trên diển đàn được. Mình mong các bác cao thủ giúp mình với. Thank.

    Thử lệnh overkill nếu 2 pline đó cùng 1 layer và có 1 phần trùng nhau (không phải cắt nhau nhá).


  2. hi everybody!

    cho mình hỏi có lisp nào tương tự như lệnh trim và extend để dùng cho cad 2004 nhưng có thể chọn môt lúc nhiều đối tượng để trim hoặc extend ko. Vì máy nhà mình hơi íu nên chỉ chạy nỗi cad 2004 thiu. Thanks nhìu

    Thử cái này coi sao

    ;;; ----------------------- TRIM NHIEU DOI TUONG -------------------------
    (Defun C:TR ()  (Setq CVAR (Getvar "CMDECHO"))  (Setvar "CMDECHO" 0)
     (Prompt "Select cutting edges :")  (Setq CUTEDG (Ssget))
     (Prompt "Select objects to trim :")  (Setq SS (SSget))
     (Setq LEN (SSlength SS))  (Setq I -1)
     (Setq SIDE (getpoint"pick side to trim"))  (Command "TRIM" CUTEDG "")
     (Repeat LEN
      (Setq I (1+ I))
      (Command (List(SSname SS I) SIDE))  )  (Command "")
     (Setvar "CMDECHO" CVAR)  (Princ "\nTrim complete.")  (Princ) )
    ;;;====================== EXTEND NHIEU DOI TUONG ===========================
    (Defun C:EET ()
     (Setq CVAR (Getvar "CMDECHO"))  (Setvar "CMDECHO" 0)
     (Prompt "Chon doi tuong dich cua EXTEND :")  (Setq CUTEDG (Ssget))
     (Prompt "Chon doi tuong de Extend :")  (Setq SS (SSget))  (Setq LEN (SSlength SS))
     (Setq I -1)
     (Setq SIDE (getpoint"Chon phia de EXTEND"))  (Command "EXTEND" CUTEDG "")
     (Repeat LEN
      (Setq I (1+ I))
      (Command (List(SSname SS I) SIDE))  )  (Command "")
     (Setvar "CMDECHO" CVAR)  (Princ "Da Extend xong moi ban lam tiep")  (Princ) )


  3. Mình có cái khung tên làm bằng Block thuộc tính, giờ muốn di chuyển vị trí các text thuộc tính trong block đó(khi lập block lỡ để chế độ khóa nên không di chuyển chúng được) bây giờ mình muốn di chuyển vị trí các text đó mà không muốn là thủ công cho từng khung tên thì phải làm sao? Mong mọi người giúp đỡ. Cảm ơn!!!


  4. Câu đố: Chở hàng

    1.Hai con la và lừa chở nặng đi bên nhau. Lừa kêu ca vì phải mang nặng. La thấy vậy bèn nói : "Cậu kêu ca gì, nếu tớ mang hộ cậu một bao thi hàng tớ nặng gấp đôi cậu. Còn nếu cậu mang hộ tớ một bao thì hai đứa mình mới mang nặng bằng nhau". Hỏi mỗi con la và lừa chở nặng bao nhiêu ?

    2.Mẹ gai góc,con trọc đầu.là cây gì?

    3.Sinh ra con gái má hồng,gả đi lấy chồng đất nước người ta,bao giờ tuổi tác đã già,thì em lại cứ quê cha trở về.

    4.Con gì lạ lạ, kì kì

     

    Không đầu không mũi bò thì rất nhanh

     

    Khi sống thân nó màu xanh

     

    Đến khi chết biến thành da cam

     

    5.Một đàn cừu bon bon ca hát.Hổ nhảy đến vồ lấy một con.

    5 còn lại hai con chứ sao nữa .

     

    Vì bon ca là ba con bị hô? vồ 1 con còn lại 2 con


  5. Lợi ích do Vợ đem lại

    1.Vợ dạy ta tính phục thiện(sẵn sàng nhận lỗi tuy mình không làm gì sai cả)

     

    2.Vợ dạy ta tính kiên nhẫn,chờ đợi không biết mệt mỏi(để vợ sửa soạn đi dự tiệc hay đi mua sắm)

     

    3.Vợ cho ta sức khoẻ(không hút thuốc lá,uống bia,bù khú với mấy thằng bạn)

     

    4.Vợ dạy ta sự tế nhị(không bao giờ chê bai dù cơm khét ,canh mặn)

     

    5.Vợ dạy ta sự lễ phép(đi thưa,về trình)

     

    6.Vợ dạy ta sự rộng lượng(kiếm được bao nhiêu tiền đều tặng vợ hết)

     

    7.Vợ là huấn luyện viên thể dục tại gia(làm vườn ,cắt cỏ,đổ rác,giặt quần áo,lau dọn nhà cửa,mang vác khi theo nàng ra phố)

     

    8.Vợ dạy ta tính gọn gàng,trật tự(chỉ được bày biện của riêng trong một góc tủ vợ cho)

     

    9.Vợ dạy ta sự công chính(ra đường cứ thẳng một đàng mà đi,không nhìn ngang liếc dọc,nhất là ở chỗ có nhiều phụ nữ)

     

    10.Vợ giúp ta trở thành người cha gương mẫu(thay tã,tắm rửa,cho con bú,ru con ngủ...)

     

    11.Vợ dạy cho ta biết giá trị của hai chữ tự do(nay không còn nữa)

     

     

    Tội gì phải lấy vợ sớm các pác nhể! Metttttttttttttttttttttttttt lắm, nhưng mà sướng.......................cũng đựơc


  6. Tặng "trị" hay "con" COLONBAY bài thơ này vậy:

     

    Xin một ngày

    Thế giới sẽ ngủ yên

    Chỉ có Anh và Em là còn thức

    Chỉ hai ta đón bình minh sáng rực

    Và cùng nhau lặng ngắm ánh trăng về

    Xin một ngày

    Chẳng có những u mê

    Không tham vọng khiến đời thêm chật chội

    Không hờn ghen nhấn người vào vũng tối

    Chỉ tình yêu là tồn tại muôn đời

    Xin một ngày

    Ai nấy cũng thành đôi

    Không cô độc với nỗi đau lặng lẽ

    Sẽ yêu nhau

    Và sẵn sàng chia sẻ

    Những buồn vui. hạnh phúc ở trong đời

    Xin một ngày

    Người yêu người

    Thế thôi!!!

    Vào topic này thấy bác Theghost post nhiều thơ ghê, em xin bác làm 1 bài thơ về cadviet để anh em biết thêm về trình độ thẩm thấu thơ của bác :)

×