Chuyển đến nội dung
Diễn đàn CADViet
Học AutoCAD Online cùng CADViet

Tất cả hoạt động

Luồng cập nhật tự động luồng này     

  1. Hôm qua
  2. KHO KHỔNG LỒ- Chi tiết hoạ tiết kiến trúc nước ngoài.

    cảm ơn a đã chia sẻ nhiều thư viện hay quá. e vào mấy trang của TQ a đăng nhiều thư viện đẹp quá mà ko đăng ký để tải về được.
  3. KHO KHỔNG LỒ- Chi tiết hoạ tiết kiến trúc nước ngoài.

    Đây nữa bà con nhé: http://www.3dmodel777.com/CAD-Download/#.U3rxSijPHcs
  4. KHO KHỔNG LỒ- Chi tiết hoạ tiết kiến trúc nước ngoài.

    Hôm nay tranh thủ gửi lại đường link download thư viện cho mọi người. Một số anh, em có gửi email cho tôi xin thư viện một phần vì bận mặt khác tôi gửi cho một số bạn nhưng khi nhận được file "lặn luôn" không một lời cảm ơn. Bạn nào cần chịu khó tìm theo đường link sau http://www.hereisfree.com/3d_cad/Interior-designing-AutoCAD-Blocks/1.html
  5. Thanh lý máy chiếu Optoma S341 mới 100% chưa sử dụng Chào cả nhà, hiện nay chúng tôi cần thanh lý 01 máy chiếu Optoma S341 mới 100%, chưa sử dụng. Còn bảo hành: 20 tháng cho thân máy, 6 tháng hoặc 600 giờ cho bóng đèn/ máy mới nguyên hộp, đầy đủ phụ kiện như máy chiếu còn đủ bảo hành Giá thanh lý: 7.000.000 vnđ Giá máy mới: 8.500.000 vnđ Bạn có thể dùng máy chiếu Optoma S341 cho: lớp học, phòng họp, kinh doanh giải trí như: karaoke, caffe bóng đá,... Hãy gọi: 0913 44 22 95 Lưu ý: chúng tôi chỉ có 01 con máy chiếu cần thanh lý Máy chiếu Optoma S341 - giá tốt Cường độ sáng: 3500 lumens Phân giải: 800x600(SVGA) Tương phản: 22.000:1 Tuổi thọ bóng đèn 10,000 giờ( ECO) Cổng kết nối: HDMI, VGA, Video, Audio Bảo hảnh: 24 tháng cho thân máy, 12 tháng hoặc 1000 giờ cho bóng đèn Ngoài ra, bạn muốn mua máy chiếu mới, đủ bảo hành, chúng tôi cũng có giá rất tốt + KM nữa bạn nhé Hãy gọi: 0913 44 22 95 Để được tư vấn tốt nhất ========================== Công ty TNHH Điện máy Venus Trụ sở: Số 104, ngõ 192 Lê Trọng Tấn, Hoàng Mai, Hà Nội VPGD: Số 104, ngõ 192 Lê Trọng Tấn, Hoàng Mai, Hà Nội Điện thoại/ fax: 02435. 66 86 25 Hotline: 0913 44 22 95 Email: kinhdoanh@dienmayvenus.com Website: dienmayvenus.com - maychieu.us
  6. Cảm ơn bác. Đúng cái em cần. Chúc bác một ngày vui vẻ, nhiều may mắn. !
  7. Thử xem nhé! (defun c:dtt (/ ans ins lst blkName tagName ent ss str) ;Block Order ;; By : Gia_Bach, www.CadViet.com ;; (vl-load-com) (while (not (and (setq ent (car (nentsel "\nChon thuoc tinh can danh so: "))) (if ent (eq (cdr (assoc 0 (entget ent))) "ATTRIB")))) (princ "\n Ban chon nham roi! ")) (setq blkName (cdr (assoc 2 (entget (cdr (assoc 330 (entget ent)))))) tagName (cdr (assoc 2 (entget ent)))) (or gtmtxt (setq gtmtxt "1")) ;;; (initget 6) (setq ans (getstring (strcat "\nNhap so bat dau <" gtmtxt "> :"))) (if (/= ans "") (setq gtmtxt ans)) (setq str (strcase gtmtxt)) ;;; Nhap so gia (or (and #sogia# (eq (type #sogia#) 'INT)) (setq #sogia# 1)) (setq #sogia# (cond ((getint (strcat "\nNhap so gia <" (itoa #sogia#) ">: "))) (#sogia#))) (princ "\nChon Khung ten can danh so thu tu :") (if (setq ss (ssget (list (cons 0 "INSERT") (cons 66 1) (cons 2 blkName)))) (progn (vlax-for e (vla-get-ActiveSelectionSet (vla-get-ActiveDocument (vlax-get-Acad-Object))) (setq ins (vlax-safearray->list (variant-value (vla-get-InsertionPoint e))) lst (cons (list e ins) lst))) (setq lst (vl-sort lst '(lambda (x y) (or (< (car (cadr x)) (car (cadr y))) (and (> (cadr (cadr x)) (cadr (cadr y))) (= (car (cadr x)) (car (cadr y)))))))) (foreach e (append (mapcar 'car lst)) (foreach Att (vlax-invoke e 'GetAttributes) (if (= (vla-get-TagString att) tagName) (vla-put-TextString att str))) (setq gtmtxt (tang1 gtmtxt)) (setq str gtmtxt)))) (princ)) (defun tang1 (te / chuoite1 sosaucung) (setq chuoite1 (vl-string-right-trim "- 0 1 2 3 4 5 6 7 8 9" te) sosaucung (vl-string-subst "" chuoite1 te)) (if (/= chuoite1 "") (setq te (strcase (incC1 te))) (setq te (itoa (+ (atoi te) #sogia#))))) (defun incC1 (c / i c1 c2) ;;;Increase character c (if (= sosaucung "") (setq i (strlen c) c1 (substr c 1 (- i 1)) c2 (chr (+ (ascii (substr c i 1)) #sogia#))) (setq c1 chuoite1 c2 (itoa (+ (atoi sosaucung) #sogia#)))) (if (or (= c2 "{") (= c2 "[")) (progn (entdel (entlast)) (alert "Over character!") (exit)) (strcat c1 c2)))
  8. ý bác ấy là tăng dần hay giảm dần. mình cho thêm 1 biến bước nhảy vào là ok nhất. bước nhảy -1, +1, +2 -2 j đều được...
  9. Lỗi Autocad bị đè các dòng chữ lên nhau!

    Không được bác bạn ơi ! Mình đang set display tất cả mọi thứ đều theo "recommended". Có ai bị giống mình không vậy? Khi nhìn tổng quát thì bình thường mà click vào để chọn thì nó còn 1 nửa dòng như vậy hixxx!!!
  10. Bỏ dấu trừ đằng trước: => (vl-string-right-trim "- 0 1 2 3 4 5 6 7 8 9" te) NHập 2 cái cho linh động là sao???
  11. Em làm theo không nó cứ thêm dấu trừ đằng trước. Bác có thể nhập 2 cái lại cho nó linh động được không ạ? Cháu cảm ơn
  12. Cần giúp đỡ về màu ở cad

    Hi.Mình xin lỗi! Từ hồi cấp 2 mình viết văn cũng toàn bị cô giáo phê là dẫu đi đâu hết rồi
  13. Trong lisp có chỗ nào: + 1 hoặc 1+ Bạn đổi thành 1- Là được (nhớ là đổi tất cả, có 2 loại đó).
  14. Cần giúp đỡ về màu ở cad

    Bạn nên đọc bài này: Rồi viết lại cho thật rõ ràng + kèm hình ảnh lỗi. Chứ đọc bài chán thế này, chẳng ai thèm giúp mất ! https://www.cadviet.com/forum/topic/5888-viết-yêu-cầu-request-và-trả-lời-response-như-thế-nào/
  15. Giúp lỗi Cad bị giật khi dùng lệnh

    Bác xem hộ thử có biết được bệnh lí em nó không. Do bị giật quá nên mình coppy phần mún làm qua 1 file khác để làm thì ok Hoan cong Ket cau.rar
  16. Cần giúp đỡ về màu ở cad

    Minh xin lỗi mình sưa rôi ah.bạn hiêu ý minh ko ah
  17. Em đã có mấy block att rồi. Em muốn đánh giống lệnh tcount đối với text đó.
  18. Cần giúp đỡ về màu ở cad

    Bạn nên gởi một ít chữ HOA, một ít dấu phẩy, một ít dấu huyền sắc nặng hỏi ngã để "xử" câu thần chú trên cho rõ nghĩa, rồi may ra mới hiểu để tính tiếp được.
  19. Bạn chỉ cần cho cái bước nhảy =-1 là nó giảm, không rõ bạn làm kiểu gì mà không được.
  20. chào ngày mới tốt lành nhé cả nhà. hè sắp đến rồi, sắm máy hút bụi dọn vệ sinh cho đỡ nhọc cả nhà ạ, nhất là nhà xưởng, công trình
  21. Cần giúp đỡ về màu ở cad

    Công ty mình có 1 phần mền phát triển dựa trên autocad.chỉ cần nhấp dữ liệu vào là nó ra hình luôn để chỉnh sửa.Như mọi lần thì khi mình tải dữ lịêu vào thi màu trắng của bản vẽ mình nhập vào đều ra màu trắng đục để phân biệt với màu nền mình in ra và mình vẽ màu trắng nó cũng sẽ ra màu trắng đục vậy.Nhưng từ khi up bản mới dữ lịêu màu trắng nó lại hiển thị đúng màu trắng như hình nền.Khi in ra mình không phân biệt được vì nó giống hình nền.Có bạn nào biết cài đặt mình vẽ màu trăng nó thành màu trắng đục ko
  22. Tuần trước.
  23. Không được, mình đã thử rùi không được bạn à. Lisp trên mình rất thích mà ko có giảm dần!!!
  24. Tổng hợp lỗi trong quá trình sử dụng Cad

    Có thể bạn đang chạy ngầm phần mềm BetterCAD hoặc BetterWmf chăng? Kiểm tra bằng cách di chuột vào system tray ở góc dưới bên phải phải của thanh taskbar.
  25. Tham khảo Lisp này của đại ca Lee Mac. Quất được hết thì phải. http://www.lee-mac.com/numinc.html
  26. Tài liệu học lập Phay + Tiện CNC

    Với 2 tài liệu dạy học lập trình cnc hướng dẫn tất cả những mã lệnh sử dụng để xây dựng mã code CNC để tự viết bằng tay các chương trình phay hoặc tiện. Ngoài ra tài liệu còn hướng dẫn quy trình công nghệ gia công cơ khí, cách vận hành trên máy CNC thông qua phần mềm SSCNC, tất cả nhưng chu trình gia công đều được giơi thiệu đầy đủ. Kiến thứ sẽ bao quát toàn bộ, quá trình đứng máy thực tế cũng sẽ dựa hoàn toàn vào cơ sở lý thuyết được dạy Link tải tài liệu: http://technicalvnplus.com/article/tai-lieu-lap-trinh-cnc-phay-tien Xem thêm sách tự học CNC fanuc, okuma, mazak,.....: Tại đây
  1. Tải thêm hoạt động
×