Jump to content
InfoFile
Tác giả: vbtxd06
Bài viết gốc: 154224
Tên lệnh: kk
viết 1 lisp dạng copyarray theo phương định trước !
Xin chào các anh cadviet, em là lính mới.Thấy và đọc bài của bạn leejang nên gửi bài code này không biết đã đúng y cua ban chưa?

Filename: 154224_kk.lsp
Tác giả: phamthanhbinh
Bài viết gốc: 154141
Tên lệnh: dtdt
lisp về DIỆN TÍCH


Hề hề hề,
Mạn phép bạn hochoaihetdot mình sửa cái lisp của bạn theo yêu cầu của bạn thietke nha. Nhắc bạn chút là nếu tỷ lệ bản vẽ là a thì tỷ lệ giữa diện tich thật với diện tích trên bản vẽ sẽ là bình phương của a chứ không phải chỉ là a đâu bạn nhé.
Đây là cái lisp mình đã sửa. Hy vọng bạn thietke hài lòng.

Chúc các bạn vui.

Filename: 154141_dtdt.lsp
Tác giả: phamngoctukts
Bài viết gốc: 154155
Tên lệnh: kk
copyarray theo phương định trước !


copyarray theo phương định trước !


Filename: 154155_kk.lsp
Tác giả: phamthanhbinh
Bài viết gốc: 154189
Tên lệnh: dtdt
Giúp tính diện tích

Hề hề hề,
Bạn xài thử cái lisp mới toe của bác hochoaihetdot xem sao nhé. nếu thấy ưng ý thì thank cho bác ấy một phát. còn chưa ưng thì ngứa chỗ nào, hãy post lên sẽ có bác gãi giùm hỉ????

Hề hế hề,.... chúc bạn vui.

Filename: 154189_dtdt.lsp
Tác giả: phamthanhbinh
Bài viết gốc: 154106
Tên lệnh: kk
viết 1 lisp dạng copyarray theo phương định trước !

Hề hề hề,
Bác Phamngoctukts ơi,
Cái anh bạn leejang này khó tính lắm, hình như bác viết chưa trúng ý của anh ấy rùi.
Mình mạo muội sửa nó thành cái ni, nhưng mà cũng chửa biết có đúng ý của anh bạn ấy hay chưa???
Hề hề hề,...


Filename: 154106_kk.lsp
Tác giả: hochoaivandot
Bài viết gốc: 153989
Tên lệnh: dt2
lisp về DIỆN TÍCH

Chào thietke!
Đây là lisp thực hiện yêu cầu của bạn

P/S: Rất vui vì có thể giúp được bạn...

Filename: 153989_dt2.lsp
Tác giả: gp14
Bài viết gốc: 154005
Tên lệnh: ca
Copy + array đối tượng theo phương định trước






Sau khi pick chọn 2 điểm khống chế A và B thì bạn có thể nhập khoảng cách array hoặc pick chuột để xác định khoảng cách đó.

Filename: 154005_ca.lsp
Tác giả: duy782006
Bài viết gốc: 154009
Tên lệnh: cpm
-Lệnh CPM
-Copy kiểu array (kiểu của SU đấy)

Filename: 154009_cpm.lsp
Tác giả: hugo007
Bài viết gốc: 153963
Tên lệnh: et
Nhờ thêm chức năng cho lisp

Đây là đoạn lisp chuyển text về text style doifont,nhờ các bác thêm chức năng cho chuyển thêm mtext giùm e.Thanks.

E đã có nhờ bện viết lisp theo yêu cầu nhưng đợi hoài không thấy ai giúp.Mong các bác giúp đỡ.

Filename: 153963_et.lsp
Tác giả: Tue_NV
Bài viết gốc: 153965
Tên lệnh: sld
Lisp chỉnh style TEXT trong block thuộc tính

Mạn phép anh gia_bach, Tue_NV xin mượn code của anh trả lời câu hỏi này
Đây là code

Filename: 153965_sld.lsp
Tác giả: Tue_NV
Bài viết gốc: 153947
Tên lệnh: wo
Lisp chỉnh style TEXT trong block thuộc tính

Lisp này có kế thừa và phát huy tác dụng Lisp của anh gia_bach.
Bạn thử xem :

Đánh lệnh Wo
Hỏi : nhập bề rộng Block Att, muốn thay đổi thì nhập vô, không thay đổi thì enter
Hỏi : nhập chiều cao Block Att, muốn thay đổi thì nhập vô, không thay đổi thì enter
Hỏi : nhập Text style Att
Text style này hiện ra 1 danh sách xổ xuống cho bạn chọn, muốn thay đổi thì...
>>

Lisp này có kế thừa và phát huy tác dụng Lisp của anh gia_bach.
Bạn thử xem :

Đánh lệnh Wo
Hỏi : nhập bề rộng Block Att, muốn thay đổi thì nhập vô, không thay đổi thì enter
Hỏi : nhập chiều cao Block Att, muốn thay đổi thì nhập vô, không thay đổi thì enter
Hỏi : nhập Text style Att
Text style này hiện ra 1 danh sách xổ xuống cho bạn chọn, muốn thay đổi thì chọn vô, không thay đổi thì enter
OK.
<<

Filename: 153947_wo.lsp
Tác giả: hochoaivandot
Bài viết gốc: 153934
Tên lệnh: dt
lisp về DIỆN TÍCH


- Chào bạn thietke.
Mình viết giúp bạn lisp này. Bạn dùng thử có đúng ý bạn không?
Bạn lưu ý mấy vấn đề:
1. Yêu cầu nhập bao nhiêu số lẻ trong kết quả thì mình chọn luôn là 2 số lẻ luôn (Vì phổ biến).
2. Khi xuất kết quả có 2 sự lựa chọn cho bạn.
+ Chọn W (write) để viết kết quả ra. Sẽ cho bạn text mới
+ Chọn P (Paste) để dán kết quả...
>>


- Chào bạn thietke.
Mình viết giúp bạn lisp này. Bạn dùng thử có đúng ý bạn không?
Bạn lưu ý mấy vấn đề:
1. Yêu cầu nhập bao nhiêu số lẻ trong kết quả thì mình chọn luôn là 2 số lẻ luôn (Vì phổ biến).
2. Khi xuất kết quả có 2 sự lựa chọn cho bạn.
+ Chọn W (write) để viết kết quả ra. Sẽ cho bạn text mới
+ Chọn P (Paste) để dán kết quả vào text có sẵn (Như yêu cầu của bạn)
3. Lisp này không phải tách lệnh mà bạn sẽ lựa chọn công trừ nhân chia...
4. Mình chưa check đâu nhé. Bạn phải kiểm tra lại

Chúc bạn may mắn!
<<

Filename: 153934_dt.lsp
Tác giả: hochoaivandot
Bài viết gốc: 153934
Tên lệnh: dtdt
lisp về DIỆN TÍCH


- Chào bạn thietke.
Mình viết giúp bạn lisp này. Bạn dùng thử có đúng ý bạn không?
Bạn lưu ý mấy vấn đề:
1. Yêu cầu nhập bao nhiêu số lẻ trong kết quả thì mình chọn luôn là 2 số lẻ luôn (Vì phổ biến).
2. Khi xuất kết quả có 2 sự lựa chọn cho bạn.
+ Chọn W (write) để viết kết quả ra. Sẽ cho bạn text mới
+ Chọn P (Paste) để dán kết quả...
>>


- Chào bạn thietke.
Mình viết giúp bạn lisp này. Bạn dùng thử có đúng ý bạn không?
Bạn lưu ý mấy vấn đề:
1. Yêu cầu nhập bao nhiêu số lẻ trong kết quả thì mình chọn luôn là 2 số lẻ luôn (Vì phổ biến).
2. Khi xuất kết quả có 2 sự lựa chọn cho bạn.
+ Chọn W (write) để viết kết quả ra. Sẽ cho bạn text mới
+ Chọn P (Paste) để dán kết quả vào text có sẵn (Như yêu cầu của bạn)
3. Lisp này không phải tách lệnh mà bạn sẽ lựa chọn công trừ nhân chia...
4. Mình chưa check đâu nhé. Bạn phải kiểm tra lại

Chúc bạn may mắn!
<<

Filename: 153934_dtdt.lsp
Tác giả: Tue_NV
Bài viết gốc: 153922
Tên lệnh: wo
Lisp chỉnh style TEXT trong block thuộc tính

Tranh thủ thời gian mần luôn cái Lisp này cho bạn 790312 luôn

Filename: 153922_wo.lsp
Tác giả: Tue_NV
Bài viết gốc: 153930
Tên lệnh: wo
Lisp chỉnh style TEXT trong block thuộc tính

Do viết vội quá. Sửa lại cho bạn đây :

Filename: 153930_wo.lsp
Tác giả: lemanhhung0302
Bài viết gốc: 131408
Tên lệnh: fff
giúp đổi các lệnh tắt trong topo, nova
Có 2 cách phổ biến mà t hay dùng:
Thứ nhất dùng lisp:
Ví dụ bạn muốn đổi HECP. Các lệnh khác tương tự nhé:



Thứ 2 là đổi file pgp:
Tools => Customize => Edit Custom files => Program Parameter (acad.pgp)
Tìm đến dòng có dạng như:

3A, *3DARRAY
3DO, *3DORBIT
3F, *3DFACE

Thêm vào trước đó một dòng. Các lệnh khác tương...
>>
Có 2 cách phổ biến mà t hay dùng:
Thứ nhất dùng lisp:
Ví dụ bạn muốn đổi HECP. Các lệnh khác tương tự nhé:



Thứ 2 là đổi file pgp:
Tools => Customize => Edit Custom files => Program Parameter (acad.pgp)
Tìm đến dòng có dạng như:

3A, *3DARRAY
3DO, *3DORBIT
3F, *3DFACE

Thêm vào trước đó một dòng. Các lệnh khác tương tự

FFF, *HECP
<<

Filename: 131408_fff.lsp
Tác giả: Tue_NV
Bài viết gốc: 153700
Tên lệnh: wo
Lisp chỉnh style TEXT trong block thuộc tính

Sáng nay, nhân tiện sửa Lisp cho bạn huygo -> tiện thể sửa luôn cho bạn 79032
. Bạn thử cái này :

Filename: 153700_wo.lsp
Tác giả: Tue_NV
Bài viết gốc: 153707
Tên lệnh: ho styb
Lisp chỉnh style TEXT trong block thuộc tính

Tue_NV sửa lại code wo -> đổi bề rộng Block Att. Bạn download Lisp wo ở bài viết trên của Tue_NV nhé.
Còn đây là Lisp đổi chiều cao của Block Att
và Lisp styb đổi Style của Block ATT về Textstyle hiện hành

Filename: 153707_ho_styb.lsp
Tác giả: Tue_NV
Bài viết gốc: 153698
Tên lệnh: xo
Xoay text thuộc tính trong block

Sửa lại theo yêu cầu của bạn 1 tí

Filename: 153698_xo.lsp
Tác giả: phamngoctukts
Bài viết gốc: 153374
Tên lệnh: cs
phôi cửa sổ 3D
Đấy là phôi của 1 cửa sổ 3D. Các bạn có thể phát triển thêm chi tiết tuỳ khả năng.

minh hoạ
http://www.cadviet.com/upfiles/3/cs.jpg

Filename: 153374_cs.lsp

Trang 33/330

33