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

NDBNGO

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

  • Số lượng nội dung

    130

  • Đã tham gia

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

  • Ngày trúng

    2

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

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

    Mình đã nói rồi đây là chương trình rất cổ nhưng đã hổ trợ cho mình hàng 100 công trình và hiệu quả hơn người vẽ cad giỏi 10 lần trở nên.Khó có thể tính hiệu quả của nó.Bắn điểm và tính ra tọa độ với mọi dạng số liệu ,với các loại đơn vị đo mà trắc địa và quân đội sử dụng (Từ số liệu thô cũng như số liêu trút từ máy đo các loại,các loại tỷ lệ bản đồ ,tùy biến tỷ lệ theo người dùng yêu cầu,nối vẽ tự động ...)

    1,2,3,4,,,,,5 là số dòng thư tự.Mình mới thử đến 2000 dòng thôi vì không có công trình nào lớn hơn nứa ,các mã trước các số 1,2,3... là các mã gắn cho đối tượng từ đầu đễn cuối ( bát kể là bản vẽ ,dòng text...) nghĩ là có thể gắn được khoảng (32x32)x2 dòng (đói tượng) .Ví dụ aa, ab... za,zb... ngược lại.Mình chưa thử với dạng số.

    Gửi bạn lại các bản vẽ

    http://www.4shared.com/photo/SYNuGMUI/ban2n.html

    http://www.4shared.com/photo/BehRmjKn/MC2.html

    http://www.4shared.com/photo/Vuxo-8mk/CONGGOC.html

    Đang kiểm tra lại file lisp của bạn ,sẽ trả lời sau.

    Xin cảm ơn.

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

    Phương án 1 (để tận dụng chương trình cũ của bạn mình ) làm ra sản phẩm để tồn tại đã.

    mình mới chạy được lisp của duy ,nhưng chương trình chạy ngược dòng từ duwois lên trên.

    - Duy chỉnh cho minh đọc từ dòng dầu đên dòng cuối .

    - Cho lựa chọn cho đường dẫn thư mục.

    Còn 2 chương trình của 2 ban trungngamy.nguyenthanhbinh đều báo lỗi chưa chạy được.

    Xin cảm ơn.

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

    Vậy mà theo mình biết ,nhiều khi muốn đi tham gia và tháo luận (Ví dụ như công nghệ máy móc ) thì ngay tại Hà nội,phải hạn chế mời tối thiểu để duy trì khảng 100-200 người mà thôi .Rất nhiều người bận chứ ,nhưng sao vẫn tranh nhanh đi.Mình có lần đang công tác tại Đà nẵng ,nghe gặp trao đổi tại Hà nội vẫ n mua vé máy bay đi về để kịp dự.mà không chỉ mình ,rất nhiều người như thế. muốn cho ai đi thêm phải hởi ý kiến chán ,mới đi được.

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

    Vậy rất mong lần kỷ niệm 2000 năm Thăng long-Hà nội ,chúng ta sẽ có cách làm cụ thể và bắt đầu giai đoạn chuyên nghiệp.Lúc đó những điều bạn nói sẽ thực hiện được.Hy vọng lần gặp mặt lần này tìm ra giải pháp .Hàng ngàn năm trước ,chú bé Phù Đổng cũng đâu chỉ đợi mẹ nuôi vài chục năm .Khi cần chú đã đi đánh giặc giữ yên đất Việt rồi. Tiêc thay ... bao tuổi rồi ,em còn bé lắm.Thương mại hóa ư,chẳng ai không muốn nhưng đâu dễ được.Mọi bé gái đều muốn là hoa hậu ,nhưng ai đi đến đích.

    Ngay trong diễn đàn này ,bạn có biết bao doanh nhân không .Họ sẽ không thừa thời gian vào để đọc những cái mà không có ích dối với họ.

    Xin cảm ơn.

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

    Được chứ,bạn đã xem đoạn video.Có thể chưa chuyên nghiệp nhưng tạm để dùng đã .Bước 2 là khi có đầy đủ số liệu trên bản vẽ (dạng text) và rất nhiều block. block nào không đè nên text thì ta giữ nguyên block nào đè nên text ta cho nó dịch chuyển theo 1 khoảng nhất định nào đó(thepo yêu cầu nhập vào).

    Các bạn viết cho mình đoạn lisp đó với.

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

    Mình đang nói với 7 vạn thành viên thì ta đã có khoảng 1/7 là người giỏi về cad và lập trình mà cứ nói là 1000 thành viên có 1 ngừơi giỏi thi diễn đàn có gần 1000 chuyên gia vầ cad và lạp trình viên ,vậy mà sau bao năm thành lập ,sản phẩm của chúng ta là cái gì ,đã có bao doanh nghiệp muốn liên kết để nhờ viết (chưa nói về kinh tế).

    Vậy làm sao phát huy được sức mạnh của đội ngũ chuyên gia của chúng ta đây.Chẳng lẽ đánh nhau với cối xay gió mãi sao

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

    Danh sách thành viên off lần 4 - Khu vực Bắc kỳ =))

    1. Mũn Sinh

    2. Gp14 Xâu zai

    3. Ji đẹp trai lừng lẫy giang hồ

    4. ndbngo

    Gần 7 vạn thành viên mà nghe hội tụ được vài mâm mà sao khó thế ( không được 1/1000).Phải chăng nên nghiên cứu và đưa ra các định hướng gắn kết với thực tế nhiều hơn.Chứ cú thế này nghe khó phát triển lắm,luẩn quẩn không có đich đến và phát triển (Ví như gắn kết các doang nghiệp tư vấn thiết kế chẳng hạn). diễn đàn chưa phát huy được sưc mạnh tổng hợp của hàng vạn chuyên gia và các bạn chuyên về cad .

    • Vote tăng 1

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

    Trước tiên để giải quyết từng bước , bước đầu tiên nhờ các bạn viết cho 1 chương trình đọc từng dòng text trên bản vẽ 1 tự động xuát ra thành 1 file có tên lần lượt là ghichu1,ghichu2....n.Tương đương số dòng ta sẽ có n bản vẽ .Các dòng này nằm trên bản vẽ gốc có thể là tọa độ bát kỳ nhưng sang bản vẽ mới có tọa độ là 0,0.

    Cảm ơn.

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

    Đúng vậy thời đó toàn viết bằng lisp trên cad 12 for Dos .Lúc đó công ty Hài hòa cũng đã viết nhiều phần mềm hô trợ cho kiến trúc trên cad12.Thời đó lisp chưa thành 1 ngôn ngữ lập trình như các cad2000 sau này.Cái bạn xem là viết từ trước 1995 đó.Tính chuyên nghiệp của các phần mềm rất cao như bạn đã xem đó.

    Có thể là trong diễn đàn này các lĩnh vực khác mình không dám đánh giá ,nhưng về trắc địa,số anh em có chuyên môn thực sự tham gia ở đây quá ít.mà anh em thì phụ thuộc có vào cũng chỉ cóp nhặt để sử dụng mà thôi. Mình năm nay cũng gần 50 rồi nên học cái mới cũng khó.

    Vì các bạn có chuyên môn cao về nghề và lập trình trắc địa chưa ai tham gia vào đây cả.

    Nhiều tiện ích sơ đẳng trong trắc địa đẫ viết 15-20 năm trước ,thậm chí bẳng Fortran,pascan,fobro qua dạng lisp ,dxf ,scr vẫn vượt rất xa những cái vừa viết xong trong diễn đàn bây giờ rất chắp vá và không hướng gì đến đối tượng cả.

    Vì muốn tìm hiểu các thuật toán và tư duy của các bạn nên mình muốn học nhanh nhất tiến tới tự viết toàn bộ cho mình.

    Cảm ơn về ý kiến của bạn.

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

    Rất cảm ơn bạn đã quan tâm đọc và nghiên cứu 1 vẫn đề mà chúng tôi thường xuyên phải làm ,mà làm thủ công chẳng khác công nhân vẽ cad(dù có thuộc bao nhiêu lệnh đi nữa). Những phần này bạn mình đã viết khoảng 15 năm về trước ,cũng không phải là kỹ sư gì cả chỉ là công nhân 7/7 .Anh ấy đã bị tai nạn và mất đi rồi,các mã nguồn đều thất lạc và mất đi.

    Mình không muốn anh ấy có thể quên lãng trong cuộc đời này .Muốn để cho anh ấy đóng góp như anh ấy vẫn tồn tại.Vì 1 công nhân trong nhà không có vài quyển sách,trình độ thấp ,tiếng anh gần như không có mà đễn giờ rất nhiều tiện ích anh ấy viết ra vẫn nguyên giá trị .Nay mình o muốn anh ấy chỉ đứng nguyên và mất đi ,vậy cố gắng nghiên cứu có thể làm được 1 điều gì đó cho anh em thế hệ sau(Đấy là ham muốn nhưng thực hiện được hay không mình không biết nữa).

    Gửi bạn file số liệu và hình ảnh để bạn dễ hình dung(Vì ngay cả đại bộ phận kỹ sư ra trường đến 5 ,10 năm còn giải thích cho họ hiểu còn khó).

    file số liệu

     

    http://www.4shared.com/file/uaHrr8--/MC_online.html

     

    http://www.4shared.com/file/XSR26oiP/P_online.html

    hÌNH ẢNH :

    http://www.4shared.com/video/ZSUr6-oP/GUI2BAN.html

    rẤT MONG ĐƯỢC BẠN GIÚP .

    Cảm ơn.

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

    Trả lời thay anh Nguyên Hoanh:

    Để sử dụng thông thường thì mọi vession cad đều như nhau,không có cad nào kho học và dễ học hơn.Nếu học mới thì nên cài cad mới nhất 2011 để học.Tốt nhất là bạn tự học,mua sách của T.s Nguyễn Hữu Lọc là dễ dùng nhất .Các công nhân của anh chưa biết máy tính,chưa học quá lớp 9 tự học thì sau 1 tuần đã vẽ tốt rồi.Quan trọng là mình vẽ các gì mà thôi.

    Chúc bạn thành công.

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

    Ý mình như sau:3 bản vẽ riêng

    Chọn bản vẽ có file text:

    Chọn file tọa độ bản vẽ 1: từng dòng text theo tọa độ tự động được insert vào bản vẽ 1 theo tọa độ

    Chọn file tọa độ bản vẽ 2 từng dòng text theo tọa độ tự động được insert vào bản vẽ 2 theo tọa độ

    Nếu từng dòng này là 1barn vẽ thì mình đã viết được.Nhưng mỗi dòng là 1 dòng text thì mình o làm thế nào .nếu 1 dòng là 1 bản vẽ như thế số bản vẽ quá lớn ,thao tác quá lâu thà bằng o dùng chương trinh.

    Vậy mong được sự góp ý của các bạn.

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

    Duy xem lại 2 bản vẽ kèm theo ,làm sao kết xuất theo từng dòng với 2 bản vẽ .Có thể không quan tâm đễn việc kết nối mà có 1 file văn bản trên cad ,kết xuất từng dòng của bản vẽ đến 2 vị trí ở 2 bản vẽ khác nhay có bảng tọa độ cho trước mà.

    Cảm ơn về gợi ý.

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

    Tôi là kỹ sư trắc đia hết bậc,thời gian làm có lẽ bằng tuổi bạn .nhưng theo tôi ,nhất là trong cơ chế thị trường .chũ tín càng quan trọng thì chỉ làm tốt hơn yêu cầu mới tồn tại.Càng ngày thì càng phải làm thật.

    Và tôi làm được trả lương cao và không làm hêt việc là nhờ mình chỉ làm thật,sống thật.

    Mấy lời cùng bạn ,mong bạn thông cảm.

    Ngô Đông Phương Tel 0988529640

    • Vote tăng 1

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

    Trong cadviet đã có rồi.Em phải tự kiếm nhé

     

    defun c:nn (/ tdt ssdt sodt index)

    (defun ObjName (ssdt /)

    (cdr (assoc '0 (entget ssdt)))

    )

    (defun MoPL (ssdt /)

    (= (cdr (assoc '70 (entget ssdt))) 0)

    )

    (defun NoiPL (ssdt /)

    (if (MoPL ssdt)

    (command ".PEDIT" ssdt "J" "All" "" "X")

    )

    )

    (defun NoiLC (ssdt /)

    (command ".PEDIT" ssdt "Y" "J" "All" "" "X")

    )

    (setq

    tdt (ssget)

    sodt (sslength tdt)

    index 0

    )

    (repeat sodt

    (setq

    ssdt (ssname tdt index)

    index (1+ index)

    )

    (if (or (= (Objname ssdt) "LWPOLYLINE")

    (= (Objname ssdt) "POLYLINE")

    )

    (NoiPL ssdt)

    )

    (if (or (= (Objname ssdt) "LINE") (= (Objname ssdt) "ARC"))

    (NoiLC ssdt)

    )

    )

    (princ)

    )

     

    Khi dùng lệnh nn, chỉ cần pick 1 trong các line, arc, pline nào đó là nó tự tìm các đoạn liên kết được để nối.

    • Vote tăng 1
×