Chuyển đến nội dung
Diễn đàn CADViet
  • Thông báo

    • Nguyen Hoanh

      CADViet đã hoàn tất nâng cấp   14/09/2017

      Chào các bạn, CADViet đã hoàn tất việc nâng cấp lên phiên bản mới. Tất cả các chức năng đã hoạt động theo kỳ vọng của ban quản trị. Nếu có vấn đề gì cần phản hồi, các bản post ở đây nhé: Trân trọng, Nguyễn Hoành.
Đăng nhập để thực hiện theo  
interwar1283

Ks Điện -Nước

Các bài được khuyến nghị

thaiha175    5

pác nào có cái thư viện về điện nước gửi cho em phat vẽ tay đến khổ ,bác nào có cái lisp nào về điện nước cũng share cho anh em cái ,chưa kiếm được cái lisp nào cho ngành nước cả bùn quá

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
thaiha175    5

em xin mạn phép mượn tóp píc này xin hỏi các bác về tỉ lệ bản vẽ ,các vấn đề tỉ lệ bản vẽ em vẫn còn ù ờ lắm .nào là khổ giấy các thứ .và làm thế nào để biết tỉ lệ bản vẽ,em biết là khi in ra các khổ giấy khác nhau thì tỉ lệ khác nhau nhưng khi có một cái bản đồ quy hoạch mà làm thế nào để kiểm tra xem đó đúng là tỉ lệ đúng của bản vẽ ,mời các pác cùng thảo luận cũng là chỉ bảo em để cho em đỡ bí lú cái phần này

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
interwar1283    211
em xin mạn phép mượn tóp píc này xin hỏi các bác về tỉ lệ bản vẽ ,các vấn đề tỉ lệ bản vẽ em vẫn còn ù ờ lắm .nào là khổ giấy các thứ .và làm thế nào để biết tỉ lệ bản vẽ,em biết là khi in ra các khổ giấy khác nhau thì tỉ lệ khác nhau nhưng khi có một cái bản đồ quy hoạch mà làm thế nào để kiểm tra xem đó đúng là tỉ lệ đúng của bản vẽ ,mời các pác cùng thảo luận cũng là chỉ bảo em để cho em đỡ bí lú cái phần này

Về tỉ lệ bản vẽ: ví dụ bản vẽ tỉ lệ 1:500 thì 1cm trên bản đồ (bản vẽ in ra giấy) = 500cm = 5m trên thực địa.

Làm việc với layout thì vấn đề này rất đơn giản, các vấn đề khác về tỉ lệ bản vẽ có thể tìm hiểu thêm qua các topic:

http://www.cadviet.com/forum/index.php?sho...9&hl=layout

http://www.cadviet.com/forum/index.php?sho...7&hl=layout

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
vanduong    536
Các anh em Điện- Nước tham gia vào cùng đóng góp cho đỡ lép vế đi

-------------

có tui - nhưng tui chỉ điện không có nước ???

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
MANHHUNGXDA    458
Các anh em Điện- Nước tham gia vào cùng đóng góp cho đỡ lép vế đi

Tôi nghe nói có 1 lisp thiết kế điện rất hay. Công dụng như sau:

-Đường dây(ống nứơc) được chạy theo píck chuột, đến đâu, pich chuột thì điền chiều dài đến đó, chỗ nào có bảng điện(cút nối ) thì cũng tự điện trên bản vẽ....

-Cuối cùng, thống kê số vật tư đã dùgn.........

bác nào có không, cho chiêm ngưỡng tý

 

MANHHUNGXDA@GMAIL.COM

THANKSSSSSSSSSSSSSSSS!

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
duchungbk95    1
Tôi nghe nói có 1 lisp thiết kế điện rất hay. Công dụng như sau:

-Đường dây(ống nứơc) được chạy theo píck chuột, đến đâu, pich chuột thì điền chiều dài đến đó, chỗ nào có bảng điện(cút nối ) thì cũng tự điện trên bản vẽ....

-Cuối cùng, thống kê số vật tư đã dùgn.........

bác nào có không, cho chiêm ngưỡng tý

 

MANHHUNGXDA@GMAIL.COM

THANKSSSSSSSSSSSSSSSS!

Mình cũng là dân M&E nhưng nghe lạ quá chừng luôn nếu mà có được thì tính dự toán điện hay nước rất hay.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
quangagf    0

mình cũng là dân điện mới vào ngề, các bạn làm ơn chỉ dùm mình có lisp nào thống kê vật tư điện trên bản vẽ cad khg. giúp minh với, mình cần gấp lắm

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
vanduong    536
mình cũng là dân điện mới vào ngề, các bạn làm ơn chỉ dùm mình có lisp nào thống kê vật tư điện trên bản vẽ cad khg. giúp minh với, mình cần gấp lắm

Liên hệ anh ManhHungXDA, cái này anh có nhiều lắm ?

he hé

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
quangagf    0
Liên hệ anh ManhHungXDA, cái này anh có nhiều lắm ?

he hé

Anh Vanduong co dia chi mail cua Anh ManhHungXDA khg cho e xin với, cám ơn nhiều lắm, nếu có j hay post lên cho ae với, liên lac với e nge nmxquang3283@yahoo.com.vn

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
quangagf    0
Liên hệ anh ManhHungXDA, cái này anh có nhiều lắm ?

he hé

Anh Vanduong co dia chi mail cua Anh ManhHungXDA khg cho e xin với, cám ơn nhiều lắm, nếu có j hay post lên cho ae với, liên lac với e nge nmxquang3283@yahoo.com.vn

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
abc123    1

sưu tâm:

defun c:PE(/ pt1 pt2 hs ang dist half half1 cen)

(graphscr)

(setq pt1 (getpoint "\nEnter first point: "))

(setq pt2 (getpoint pt1 "\nEnter second point: "))

(setq hs (getint "\nEnter hatch scale: "))

(setvar "cmdecho" 0)

(setq ang (angle pt1 pt2))

(setq ang1 (+ ang 1.5708))

(setq dist (distance pt1 pt2))

(setq half (/ dist 2))

(setq half1 (/ dist 8))

(setq half2 (/ dist 4))

(setq cen (polar pt1 ang half))

(setq ellcen (polar pt1 ang half2))

(setq pt3 (polar ellcen ang1 half1))

(setq pt4 (polar pt3 ang half))

(command "arc" cen pt4 pt2)

(command "ellipse" pt1 cen half1 "")

(if (/= hs 0)

(command "hatch" "ansi31" hs ang "l" "")

)

(setvar "highlight" 1)

(setvar "cmdecho" 1)

(prin1)

)

 

sưu tâm:

(defun c:pi()

(setq pt (getpoint "Select center point for riser:\n "))

(setq r (getreal " Enter Pipe Diameter:\n "))

(setq rc (/ r 2))

(initget 1 "Endpoint of Intersection")

(command "circle" pt rc)

(setq ene (entlast))

(setq d (- rc 0.05))

(setq p1 (polar pt (dtr 225) d))

(setq p2 (polar pt (dtr 45) d))

(setq ss (ssget "c" p1 p2) ls (sslength ss) no -1)

(command "Trim" ene "")

(repeat ls

(setq no (1+ no))

(command (list (ssname ss no) p2)))

(command "")

(command "erase" ene "")

(setq sf (/ r 100))

(command "insert" "ris102" pt sf sf "")

)

(defun dtr (a) (* pi (/ a 180)))

 

sưu tâm:

(defun c:po()

(setq pt (getpoint "Select center point for riser:\n "))

(setq r (getreal " Enter Pipe Diameter:\n "))

(setq rc (/ r 2))

(initget 1 "Endpoint of Intersection")

(command "circle" pt rc)

(setq ene (entlast))

(setq d (- rc 0.05))

(setq p1 (polar pt (dtr 225) d))

(setq p2 (polar pt (dtr 45) d))

(setq ss (ssget "c" p1 p2) ls (sslength ss) no -1)

(command "Trim" ene "")

(repeat ls

(setq no (1+ no))

(command (list (ssname ss no) p2)))

(command "")

(command "erase" ene "")

(setq sf (/ r 100))

(command "insert" "ris101" pt sf sf "")

)

(defun dtr (a) (* pi (/ a 180)))

 

sưu tâm đó bà con thử đi

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
anh.tuan    35

Bác nào có thể giúp mình viết lisp vẽ bản vẽ thi công hệ thống thoát nước được không? Ý mình là mình có bản vẽ thiết kế kỹ thuật, có hướng rồi, giờ muốn vẽ ra bản vẽ thi công như sau:

http://www.mediafire.com/?tla74h6sjxa88i6

 

trong đó, các phụ kiện co 90(up, down, side), co 45(up, down, side), tê, y, giảm, bạc chuyển bậc, măng sông, xít xả thông tắc đều được làm block sẵn.

 

Các bước tiến hành vẽ như sau:

 

1- vẽ hướng tuyến ống lại từ bản vẽ thiết kế cho hợp lý.

2- đánh số thứ tự cho tuyến ống theo nguyên tắc từ ống nhánh tới ống chính, đánh theo tuyến, như hình sau:

http://www.mediafire.com/?v9ubas7iz86m7dv

3- lấy tọa độ điểm từ cad xuất qua excel (X,Y).

4-Trong bảng Excel, có các cột,

 

Stt, X, Y, Z, i, L, fittings,D

Z được tính toán từ độ dốc i nhập vào.

L tính toán dựa vào tọa độ X, Y, Z

L^2 = (x1-x2)^2 + (y1-y2)^2 + (z1-z2)^2

fittings: là co 90, co 45

up, down, side : hướng lên 45, hướng lên 90, hướng xuống 45, hướng xuống 90, mặt bên, hướng lên xiên 45, hướng xuống xiên 45.

D là đường kính của đoạn ống, do user nhập vào.

 

Sau khi nhập đầy đủ data thì copy ra và luu dưới dạng đuôi txt.

 

Vào cad, ra lệnh vẽ : NTh

 

Click vào màn hình để vẽ, khi vẽ thì có đầy đủ đường ống, fittings (fittings không cần quay đúng hướng, user sẽ quay sau = tay), ghi tên D, i, uPVC (dùng leader),

cao độ tại hai đầu ống (cao độ đáy ống).

 

Xong.

 

Mục đích của ý tưởng này là để giúp user tính toán được chiều dài ống, số lượng fittings một cách tuơng đối nhanh chóng, chính xác. Vì đi thi công ngồi tính khối lượng, vẽ bản vẽ shop drawing khá mất thời gian và công sức.

 

Mình xin cám ơn các bạn trước.

 

đây là block fittings:

http://www.mediafire.com/?wg17jrq1uh537e1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
basyboll    0

Bác nào có thể giúp mình viết lisp vẽ bản vẽ thi công hệ thống thoát nước được không? Ý mình là mình có bản vẽ thiết kế kỹ thuật, có hướng rồi, giờ muốn vẽ ra bản vẽ thi công như sau:

http://www.mediafire.com/?tla74h6sjxa88i6

 

trong đó, các phụ kiện co 90(up, down, side), co 45(up, down, side), tê, y, giảm, bạc chuyển bậc, măng sông, xít xả thông tắc đều được làm block sẵn.

 

Các bước tiến hành vẽ như sau:

 

1- vẽ hướng tuyến ống lại từ bản vẽ thiết kế cho hợp lý.

2- đánh số thứ tự cho tuyến ống theo nguyên tắc từ ống nhánh tới ống chính, đánh theo tuyến, như hình sau:

http://www.mediafire.com/?v9ubas7iz86m7dv

3- lấy tọa độ điểm từ cad xuất qua excel (X,Y).

4-Trong bảng Excel, có các cột,

 

Stt, X, Y, Z, i, L, fittings,D

Z được tính toán từ độ dốc i nhập vào.

L tính toán dựa vào tọa độ X, Y, Z

L^2 = (x1-x2)^2 + (y1-y2)^2 + (z1-z2)^2

fittings: là co 90, co 45

up, down, side : hướng lên 45, hướng lên 90, hướng xuống 45, hướng xuống 90, mặt bên, hướng lên xiên 45, hướng xuống xiên 45.

D là đường kính của đoạn ống, do user nhập vào.

 

Sau khi nhập đầy đủ data thì copy ra và luu dưới dạng đuôi txt.

 

Vào cad, ra lệnh vẽ : NTh

 

Click vào màn hình để vẽ, khi vẽ thì có đầy đủ đường ống, fittings (fittings không cần quay đúng hướng, user sẽ quay sau = tay), ghi tên D, i, uPVC (dùng leader),

cao độ tại hai đầu ống (cao độ đáy ống).

 

Xong.

 

Mục đích của ý tưởng này là để giúp user tính toán được chiều dài ống, số lượng fittings một cách tuơng đối nhanh chóng, chính xác. Vì đi thi công ngồi tính khối lượng, vẽ bản vẽ shop drawing khá mất thời gian và công sức.

 

Mình xin cám ơn các bạn trước.

 

đây là block fittings:

http://www.mediafire.com/?wg17jrq1uh537e1

Ý tưởng hay quá - khi nào có bác cho em xin với nhé. Em ở công ty cấp thoát nước :D

Nhưng theo em nghĩ thì bác thi công nhiều nhìn vào bản vẽ là biết ngay có gì đâu nhỉ. Chỉ có như thoát nước trong nhà thì hơi phức tạp cần dùng là đúng rồi. hi

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
anh.tuan    35

đúng là nhìn là biết, nhưng khi thi công việc gấp, nên ngồi vẽ và bốc khối lượng mất thời gian mà lại không chính xác. Nếu có lisp như mình nêu trên thì công việc thuận lợi hơn.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
anh.tuan    35

lâu rồi mới vào lại mục này. không biết có anh em nào co chút thời gian thì giúp mình viết cái này được không?

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay

Đăng nhập để thực hiện theo  

×