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

traigtmientay

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

    47
  • Đã tham gia

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

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


  1. thực ra em muốn chọn phương để khống chế sai số phát sinh khối lượng . nếu ko chọn phương thì mình phải bắt điểm chính xác , khối lượng thao tác tương đương nhau . chon phương nó chắc cú hơn về khối lượng , nhưng cái ko chọn phương chỉ chọn điểm trên bản vẽ bằng cách bắt điểm nó rèn luyện kỹ năng và trách nhiệm công việc . chắc e chọn hướng đi chỉ cần bắt điểm ko cần chọn phương . chỉ cần 2 vị trí trên bản vẽ là ok . các anh có thể phát triển cho text và mtext luôn cũng dc . trong 1 lisp mà làm dc trọn gói . mọi người có thể dùng lisp đa năng

    còn cái đường màu trắng là để minh họa thôi anh à.


  2. em đang làm mấy công tác liên quan đến đo khoảng cách ,

    vì làm thủ công lâu nên e đã nghĩ ra làm cái block động có thể vận dụng mọi thứ .

    nhưng cái khoảng cách ko khắc phục dc nên em viết yêu cầu này nhờ các anh .

    lisp có thể đo theo 3 phương X Y đường chéo

    thực thi lệnh thì líp hỏi đo theo phương nào

    nếu theo phương cũ có thể bỏ qua bằng dấu cách .

    đo xong hỏi chọn block cần điền , chọn att cần điền ( có thể có nhiều att )

    kết thúc .

    các anh hãy viết trường hợp chung nhất cho tất cả anh em dc dùng .

    cảm ơn các anhhttp://www.cadviet.com/upfiles/3/113313_drawing1_1.dwg113313_1.png


  3. e có làm như bác rồi chắc e thiếu dấu ngoặc hay thừ nên ko dc, như thế này đã ok chưa bác nhỉ :

    (defun c:TaoC1()
    (command "style" "VnArial NarrowH" ".VnArial NarrowH" "" "" "" "" "")
    (princ))
    (defun c:TaoC2()
    (command "style" "VNTMIEH-SHX" "vntmeh.shx" "" "" "" "" "") ;sua dong nay
    (princ))
    (defun c:TaoC3()
    (command "style" "VNTIMEH" ".VNTMEH" "" "" "" "" "") ;sua dong nay
    (princ))
    


  4. thôi thì e tìm anh BINLADEN cũng dc . keke . thanh các bác .

    tiện đây cho e hỏi tí e có cái lisp tạo style mới nhưng e sửa bằng cách copy 1 lần nữa xuống dưới để tạo mấy font cùng lúc nhưng ko dc . bác chỉ hộ e cách sửa cái .

    thêm bớt đoạn code nào vào để tạo liên tục bằng lệnh : TAOC1 , TAOC2 ..... bác nhỉ . thank

    ;; free lisp from cadviet.com
    ;;; this lisp was downloaded from http://www.cadviet.com/forum/index.php?showtopic=143
    (defun c:TaoC()
     (command "style" "VnArial NarrowH" ".VnArial NarrowH" "" "" "" "" "")
     (princ)
    )
    
    

×