Nguyên văn bởi dinhdainhan (Post 297747)

(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
*******
***
* --------------------------- * --------------------------- *
* Copyright and repair by : ĐinhĐạiNhân_KonTum *
* --------------------layer auto load---------------------- *
* A0,A1,A2,A3,A4 : dat kho giay ban ve *
* -------------------LENH VE LAYER------------------------- *
* 0, 05,1, 15, 2,25, 3, 35,4, 5, 6, 66, 60, 7, cv : *
* Auto change layer *
* LK,KL,FF (88-99): loc, hien, tat - cac layer *
* 8 - 9 : Hide - Show *
* C1->C9 : Thay doi linetype *
* DHT : Dua dim, hatch, text ve dung layer *
* , : Chon layer hien hanh *
* -------------------- LENH VE DIM ------------------------ *
* DE,DN : Edit dim *
* KD : Cat ngan chan dim *
* CD : Chon dim hien hanh *
* BD : Sap cac lop dim deu nhau truc (X-Y) *
* D100 : Tao nhanh dim 100 kien truc *
* DD <-> DZ : Fakedim - Fixfakedim *
* XD <-> YD : Sap dim theo rieng truc X <-> Y *
* D,DA,DC,DB,DR, DG, DCT :lenh xuat dim autolayer *
* -------------------- LENH VE TEXT------------------------ *
* TXT : Chuyen dtext ve mtext *
* TX : Xoay text theo hai diem *
* E1 : Thay doi chieu cao text *
* TF : Tao text-style thong dung *
* TE : Chon text hien hanh *
* TJ : Chon diem dat cho text *
* ST, K : Tao cac kieu text, gach chan text DT *
* XT <-> YT : Can le text theo truc X-Y *
* XK <-> YK : Dan deu k/c text theo phuong X-Y *
* MM <-> TT : Doi text can chon voi 1 text khac *
* --------------- LENH DA TAO SAN DOI TUONG --------------- *
* CC : Ve hinh chu nhat to dac qua 2 diem *
* VT : Ve tuong nhanh *
* 1C , 2C : Cua di kieu 1 Canh va 2 Canh *
* `1,`2, `3 : Danh dau thep (tl 1/25 - 1/50 - 1/100) *
* VC <-> GH : Vet cat co ti le - auto ti le *
* BT <-> BTM : Bac cau thang thuong va co mui cong *
* T`, T1, T2 : Rai thep pick 2 diem tl(1/25, 1/50,1/100) *
* HCD : Huong duong DX : Truc doi xung *
* MAY : Dam may TON : Lat cat ton *
* TS : Thep san moc TM : Thep san mu *
* --------LENH HATCH VAT LIEU (H-Acad) -- (G-Acadiso) ----- *
* HT : hatch tuong HN : hatch ngoi *
* HS : hatch Solid HVS : hatch ve sinh *
* HC : hatch cat H40 : hatch luoi B40 *
* HG : hatch gach HDH : hatch da hoc *
* HBT : hatch be tong HGV : hatch bt lot *
* HTO : hatch mai ton HDC : hatch da che *
* CH , MH , SS , XH : *
* Copy, Move, Scale, Rotate - HATCH *
* JH : Noi cac hatch lai voi nhau *
* -----LENH NHANH (thay doi lenh co ban cua Autocad)------- *
* CO : Copy tang dan *
* BK : Thay doi ban kinh hinh tron *
* OP : Offset co diem dat *
* N, J: Noi cac duong Line thanh Pline *
* BF : Break line va pline *
* DBL : Thay doi diem dat cho Block *
* C : Copy Ci: Circle *
* XSC : Scale the mot chieu BC: Doi mau block *
* CA : Aray pick nhanh BB: Doi ten block *
* CR : Copy va Rotate MR: Move va Rotate *
* MI : Mirror giu doi tuong cu F : Fillet voi R=0 *
* MJ : Mirror xoa doi tuong cu FR: Fillet voi R=? *
* --------------- LENH DIEU CHINH UCS --------------------- *
* UB _ UU: Quay he toa do 2D theo line_tra lai he truc *
* UV _ QT: Quay huong ve theo duong line _tra lai he truc *
* VB,BV - VV : xem che do 3d - tra lai che do 2d *
* OI, OU, OL : Chon cac che do bat diem Osnap *
* ------------------ LENH TINH TOAN ----------------------- *
* % : Tinh % do doc *
* DOC : Ve mai voi do doc % cho truoc *
* TCD : Tinh tong chieu dai duong bat ky *
* TDT : Tinh tong dien tich *
* DW : Dem Block chon F2 de xem ket qua *
* + : Phep tinh cong *
* DTX : Dem so lan text xuat hien *
* CDM : Cong Dim *
* M150, M200, M250, M300 : *
* Tinh khoi luong vat lieu be tong PC40 theo Mac *
* -------- LENH THONG KE THEP (su dung cho file mau) ------ *
* OF : Xoa gia tri 0 *
* II : Xoa thuoc tinh *
* SD : Nhap so lieu can sua *
* SF : Nhap so luong cau kien *
* TH : Tong hop thep *
* --------------------------------------------------------- *
(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
***
«´¨`•..¤ ************ * © * 0808 * dinhdainhan0808@gmail.com ¤..•´¨`»
(¸.•'´¤*¤`'•.¸)

khi tạo text tự động chuyển qua layer text
cũng như dim - hatch cũng vậy.
- hay chỉ cần 1 lệnh là có thể đưa tất cả dim - hatch - text về đúng layer.
- Đây là quá trình tổng hợp và sưu tập từ nhiều trang web cả trong nước và các trang web nươc ngoài, trong những năm thiết kế.
- Hồi mới đi làm người ta giấu nghề quá, nên khá cực. Nếu giữ bí kip chắc Việt Nam khó phát triển quá.
- Tất cả công việc bạn làm là ý tưởng chứ không phụ thuộc vào lệnh vẽ. Lênh cũng dễ hiểu và logic. Sau vài ngày áp dụng là bạn có thể thuộc.
- Sau khi load các bạn chỉ cần nhấn phím F2. sẽ xuất hiện bảng lệnh như trên.
- Mong lisp này sẽ giúp phần nào các bạn trong lĩnh vực thiết kế xây dựng. Nhất là những bạn mới ra trường mà trong hoàn cảnh khó khăn thế này.
- Nếu thấy có lỗi gì chỉ cần load lại lisp. hoặc cm cho mình để sửa lỗi.
---- Mình đã test được trên cad 2013 ko vấn đề gì. Yêu cầu cad các phiên bản có cài express là ok ! ---------

Nó là đây: http://www.mediafire.com/?98cet176g133x8x

Nguyên văn bởi tvquang (Post 298384)

Để thao tác thành thục các lệnh tắt như trên thì cần 1 thời gian nhất định. Sau một thời gian dài thử qua các cách thì rút ra một số cách thao tác nhanh - có lẻ là phù hợp với mình:
+ Chỉ có tay trái bấm lệnh --> nên yêu cầu phím bấm phải gần nhau, lúc bấm không cần nhìn bàn phím. Tôi chọn chỉ 6 phím 1,2,3,q,w,e để gán cho các lệch, tùy theo chuyên ngành bạn chọn mà bạn gán lệnh cho phù hợp với mình. Với 6 phím mình sé có ít nhất "tổ hợp chập 2 của 6 phần tử = 6!(2! x (6-2)!)=720/(2x24)=15 lệnh của tổ hợp hai phím. Có thể dùng tổ hợp 3 phím để gán cho lệnh.
+ Tay phải chỉ dùng chuột để thao tác trên màn hình.
+ Với kiểu đánh telex, chọn Unikey sang kiểu định nghĩa phím bấm để chữ w không hiểu nhầm sang ư, ee không ra ê...
+ Tất cả các lệnh mình gán sẽ không xung đột với các lệnh mặc định của AutoCAD và có thể là khi mình dùng máy người khác.
+ Còn Lisp thì thích Lisp nào thì load lisp đó xài.
+ Có thể Phím Esc có thể định nghĩa lại bàn phím để chuyển về phím Tab cũng là một lựa chọn cho những ai chuyên CAD.

Các bạn chép các dòng bến dưới vào cuối file acad.pgp. Để mở file này trong AutoCAD2007 thì vào menu Option\Customize\Edit Progame Parameter (acad.pgp). Thoát CAD rồi vào lại CAD để những lệnh này có hiệu lực (hoặc dùng lệnh reinit, tích vào mục acad.pgp). Chúc các ACE vẽ siêu nhanh.

1, *LAYON
2, *LAYOFF
3, *LAYISO
33, *LAYMCUR
4, *LAYUNISO

11, *QSAVE
12, *OPEN
13, *CLOSE
1Q, *CLOSEALL
1W, *QUIT
1E, *U

21, *
22, *
23, *
2Q, *DTEXT
2W, *MTEXT
2E, *TXT2MTXT

31, *
32, *
33, *
3Q, *DIMLINEAR
3W, *DIMALIGNED
3E, *QLEADER
3ww,*dimcontinue

Q, *PLINE
Q1, *RECTANGLE
Q2, *CIRCLE
Q3, *OFFSET
QQ, *MATCHPROP
QW, *HATCH
QE, *PEDIT
QQQ,*SPLINE

W, *COPY
W1, *COPYCLIP
W2, *PASTECLIP
W3, *pasteorig
WQ, *align
WW, *MOVE
WE, *ROTATE
WWW,*MIRROR

E, ;ERASE
E1, *TRIM
E2, *EXTEND
E3, *STRETCH
EQ, *FILLET
EW, *CHAMFER
EE, *SCALE
EEE,*PURGE

A, *AP

Nguyên văn bởi toannguyen89 (Post 302948)

mình cũng có 1 số lisp cad mà ko biết build làm sao cho nó tiện cứ mỗi lần dùng là phải load cái lisp ấy. a đinhainhan chỉ e buid giống như cái của a ấy
thank

Nguyên văn bởi dinhdainhan (Post 323472)

kHÔNG BIẾT SAO MEDIAFIRE LƯỢT DOWN NHIỀU THÌ LAI KHÔNG CHO NỮA
DÙNG ACC KHÁC .
ĐỊA CHỈ TẢI NÀY VẬY:
http://upfile.vn/qvSL

CHỊU RỒI AI KHÔNG TẢI ĐƯỢC THÌ ĐỂ LẠI MAIL..

Nguyên văn bởi tvquang (Post 306362)

Tự động load tất cả file lisp chỉ một lần:


Đây nè bạn,
bạn thao tác giống hình, rồi tắt Cad, mở lại Cad thì những lần sau tự nó load lisp đã chọn cho mình.

http://i1311.photobucket.com/albums/...ps16d898f4.jpg

http://i1311.photobucket.com/albums/...ps5ae857ba.jpg

http://i1311.photobucket.com/albums/...ps1027ea48.jpg

http://i1311.photobucket.com/albums/...psb0f03deb.jpg

http://i1311.photobucket.com/albums/...ps80147dce.jpg

(hình số 4 click close)

Nguyên văn bởi tvquang (Post 298384)

Để thao tác thành thục các lệnh tắt như trên thì cần 1 thời gian nhất định. Sau một thời gian dài thử qua các cách thì rút ra một số cách thao tác nhanh - có lẻ là phù hợp với mình:
+ Chỉ có tay trái bấm lệnh --> nên yêu cầu phím bấm phải gần nhau, lúc bấm không cần nhìn bàn phím. Tôi chọn chỉ 6 phím 1,2,3,q,w,e để gán cho các lệch, tùy theo chuyên ngành bạn chọn mà bạn gán lệnh cho phù hợp với mình. Với 6 phím mình sé có ít nhất "tổ hợp chập 2 của 6 phần tử = 6!(2! x (6-2)!)=720/(2x24)=15 lệnh của tổ hợp hai phím. Có thể dùng tổ hợp 3 phím để gán cho lệnh.
+ Tay phải chỉ dùng chuột để thao tác trên màn hình.
+ Với kiểu đánh telex, chọn Unikey sang kiểu định nghĩa phím bấm để chữ w không hiểu nhầm sang ư, ee không ra ê...
+ Tất cả các lệnh mình gán sẽ không xung đột với các lệnh mặc định của AutoCAD và có thể là khi mình dùng máy người khác.
+ Còn Lisp thì thích Lisp nào thì load lisp đó xài.
+ Có thể Phím Esc có thể định nghĩa lại bàn phím để chuyển về phím Tab cũng là một lựa chọn cho những ai chuyên CAD.

Các bạn chép các dòng bến dưới vào cuối file acad.pgp. Để mở file này trong AutoCAD2007 thì vào menu Option\Customize\Edit Progame Parameter (acad.pgp). Thoát CAD rồi vào lại CAD để những lệnh này có hiệu lực (hoặc dùng lệnh reinit, tích vào mục acad.pgp). Chúc các ACE vẽ siêu nhanh.

1, *LAYON
2, *LAYOFF
3, *LAYISO
33, *LAYMCUR
4, *LAYUNISO

11, *QSAVE
12, *OPEN
13, *CLOSE
1Q, *CLOSEALL
1W, *QUIT
1E, *U

21, *
22, *
23, *
2Q, *DTEXT
2W, *MTEXT
2E, *TXT2MTXT

31, *
32, *
33, *
3Q, *DIMLINEAR
3W, *DIMALIGNED
3E, *QLEADER
3ww,*dimcontinue

Q, *PLINE
Q1, *RECTANGLE
Q2, *CIRCLE
Q3, *OFFSET
QQ, *MATCHPROP
QW, *HATCH
QE, *PEDIT
QQQ,*SPLINE

W, *COPY
W1, *COPYCLIP
W2, *PASTECLIP
W3, *pasteorig
WQ, *align
WW, *MOVE
WE, *ROTATE
WWW,*MIRROR

E, ;ERASE
E1, *TRIM
E2, *EXTEND
E3, *STRETCH
EQ, *FILLET
EW, *CHAMFER
EE, *SCALE
EEE,*PURGE

A, *AP

Nguyên văn bởi ahome (Post 301980)

nếu đặt lệnh tắt như bạn chắc phải thay bàn phím sớm kekekekeke

Nguyên văn bởi dinhdainhan (Post 297747)

(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
*******
***
* --------------------------- * --------------------------- *
* Copyright and repair by : ĐinhĐạiNhân_KonTum *
* --------------------layer auto load---------------------- *
* A0,A1,A2,A3,A4 : dat kho giay ban ve *
* -------------------LENH VE LAYER------------------------- *
* 0, 05,1, 15, 2,25, 3, 35,4, 5, 6, 66, 60, 7, cv : *
* Auto change layer *
* LK,KL,FF (88-99): loc, hien, tat - cac layer *
* 8 - 9 : Hide - Show *
* C1->C9 : Thay doi linetype *
* DHT : Dua dim, hatch, text ve dung layer *
* , : Chon layer hien hanh *
* -------------------- LENH VE DIM ------------------------ *
* DE,DN : Edit dim *
* KD : Cat ngan chan dim *
* CD : Chon dim hien hanh *
* BD : Sap cac lop dim deu nhau truc (X-Y) *
* D100 : Tao nhanh dim 100 kien truc *
* DD <-> DZ : Fakedim - Fixfakedim *
* XD <-> YD : Sap dim theo rieng truc X <-> Y *
* D,DA,DC,DB,DR, DG, DCT :lenh xuat dim autolayer *
* -------------------- LENH VE TEXT------------------------ *
* TXT : Chuyen dtext ve mtext *
* TX : Xoay text theo hai diem *
* E1 : Thay doi chieu cao text *
* TF : Tao text-style thong dung *
* TE : Chon text hien hanh *
* TJ : Chon diem dat cho text *
* ST, K : Tao cac kieu text, gach chan text DT *
* XT <-> YT : Can le text theo truc X-Y *
* XK <-> YK : Dan deu k/c text theo phuong X-Y *
* MM <-> TT : Doi text can chon voi 1 text khac *
* --------------- LENH DA TAO SAN DOI TUONG --------------- *
* CC : Ve hinh chu nhat to dac qua 2 diem *
* VT : Ve tuong nhanh *
* 1C , 2C : Cua di kieu 1 Canh va 2 Canh *
* `1,`2, `3 : Danh dau thep (tl 1/25 - 1/50 - 1/100) *
* VC <-> GH : Vet cat co ti le - auto ti le *
* BT <-> BTM : Bac cau thang thuong va co mui cong *
* T`, T1, T2 : Rai thep pick 2 diem tl(1/25, 1/50,1/100) *
* HCD : Huong duong DX : Truc doi xung *
* MAY : Dam may TON : Lat cat ton *
* TS : Thep san moc TM : Thep san mu *
* --------LENH HATCH VAT LIEU (H-Acad) -- (G-Acadiso) ----- *
* HT : hatch tuong HN : hatch ngoi *
* HS : hatch Solid HVS : hatch ve sinh *
* HC : hatch cat H40 : hatch luoi B40 *
* HG : hatch gach HDH : hatch da hoc *
* HBT : hatch be tong HGV : hatch bt lot *
* HTO : hatch mai ton HDC : hatch da che *
* CH , MH , SS , XH : *
* Copy, Move, Scale, Rotate - HATCH *
* JH : Noi cac hatch lai voi nhau *
* -----LENH NHANH (thay doi lenh co ban cua Autocad)------- *
* CO : Copy tang dan *
* BK : Thay doi ban kinh hinh tron *
* OP : Offset co diem dat *
* N, J: Noi cac duong Line thanh Pline *
* BF : Break line va pline *
* DBL : Thay doi diem dat cho Block *
* C : Copy Ci: Circle *
* XSC : Scale the mot chieu BC: Doi mau block *
* CA : Aray pick nhanh BB: Doi ten block *
* CR : Copy va Rotate MR: Move va Rotate *
* MI : Mirror giu doi tuong cu F : Fillet voi R=0 *
* MJ : Mirror xoa doi tuong cu FR: Fillet voi R=? *
* --------------- LENH DIEU CHINH UCS --------------------- *
* UB _ UU: Quay he toa do 2D theo line_tra lai he truc *
* UV _ QT: Quay huong ve theo duong line _tra lai he truc *
* VB,BV - VV : xem che do 3d - tra lai che do 2d *
* OI, OU, OL : Chon cac che do bat diem Osnap *
* ------------------ LENH TINH TOAN ----------------------- *
* % : Tinh % do doc *
* DOC : Ve mai voi do doc % cho truoc *
* TCD : Tinh tong chieu dai duong bat ky *
* TDT : Tinh tong dien tich *
* DW : Dem Block chon F2 de xem ket qua *
* + : Phep tinh cong *
* DTX : Dem so lan text xuat hien *
* CDM : Cong Dim *
* M150, M200, M250, M300 : *
* Tinh khoi luong vat lieu be tong PC40 theo Mac *
* -------- LENH THONG KE THEP (su dung cho file mau) ------ *
* OF : Xoa gia tri 0 *
* II : Xoa thuoc tinh *
* SD : Nhap so lieu can sua *
* SF : Nhap so luong cau kien *
* TH : Tong hop thep *
* --------------------------------------------------------- *
(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
***
«´¨`•..¤ ************ * © * 0808 * dinhdainhan0808@gmail.com ¤..•´¨`»
(¸.•'´¤*¤`'•.¸)

khi tạo text tự động chuyển qua layer text
cũng như dim - hatch cũng vậy.
- hay chỉ cần 1 lệnh là có thể đưa tất cả dim - hatch - text về đúng layer.
- Đây là quá trình tổng hợp và sưu tập từ nhiều trang web cả trong nước và các trang web nươc ngoài, trong những năm thiết kế.
- Hồi mới đi làm người ta giấu nghề quá, nên khá cực. Nếu giữ bí kip chắc Việt Nam khó phát triển quá.
- Tất cả công việc bạn làm là ý tưởng chứ không phụ thuộc vào lệnh vẽ. Lênh cũng dễ hiểu và logic. Sau vài ngày áp dụng là bạn có thể thuộc.
- Sau khi load các bạn chỉ cần nhấn phím F2. sẽ xuất hiện bảng lệnh như trên.
- Mong lisp này sẽ giúp phần nào các bạn trong lĩnh vực thiết kế xây dựng. Nhất là những bạn mới ra trường mà trong hoàn cảnh khó khăn thế này.
- Nếu thấy có lỗi gì chỉ cần load lại lisp. hoặc cm cho mình để sửa lỗi.
---- Mình đã test được trên cad 2013 ko vấn đề gì. Yêu cầu cad các phiên bản có cài express là ok ! ---------

Nó là đây: https://app.box.com/s/cjh6d3jh9tmn1h9509xr
(bản MỚI 30-10-2013)

Nếu bạn nào thích để lại họ tên đầy đủ:
Minh sẽ gửi bản có đoạn text ma ban muốn ghi trong taskbar của cad...
hoăc mail cho mình.. vẽ cad cho zui zui...

NẾU CÁC BẠN ĐÃ SỬ DỤNG LISP NÀY RỒI.THÌ NÊN THƯỜNG XUYÊN CẬP NHẬT TẠI BOX NÀY . BỞI VÌ KHI THAO TÁC THẤY LỖI MÌNH SỄ FIX LẠI, VÀ CÓ THỂ THÊM LỆNH MỚI ..

AI KHÔNG TẢI ĐƯỢC THÌ MAIL ĐẾN ĐỊA CHỈ NÀY : dinhdainhan0808@gmail.com

FIX LINK TẢI (thằng upfile nó mới nâng cấp bị j ko biết) nhiều bạn gửi mail ko tải được
UPDATE (bản MỚI 30-10-2013)
Bản này mặc định layer ngầm chạy khi thực thi lệnh, Bổ sung thêm một số bảng tra tiện dụng trong thiết kế hoặc làm thuyết minh, đang trong quá trình kiểm tra lỗi..HIỆN TẠI VẪN CHƯA THẤY J .....
Ai thấy lỗi j thì mail để fix.

HERE : https://app.box.com/s/cjh6d3jh9tmn1h9509xr

Nguyên văn bởi dinhdainhan (Post 297747)

(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
*******
***
* --------------------------- * --------------------------- *
* Copyright and repair by : ĐinhĐạiNhân_KonTum *
* --------------------layer auto load---------------------- *
* A0,A1,A2,A3,A4 : dat kho giay ban ve *
* -------------------LENH VE LAYER------------------------- *
* 0, 05,1, 15, 2,25, 3, 35,4, 5, 6, 66, 60, 7, cv : *
* Auto change layer *
* LK,KL,FF (88-99): loc, hien, tat - cac layer *
* 8 - 9 : Hide - Show *
* C1->C9 : Thay doi linetype *
* DHT : Dua dim, hatch, text ve dung layer *
* , : Chon layer hien hanh *
* -------------------- LENH VE DIM ------------------------ *
* DE,DN : Edit dim *
* KD : Cat ngan chan dim *
* CD : Chon dim hien hanh *
* BD : Sap cac lop dim deu nhau truc (X-Y) *
* D100 : Tao nhanh dim 100 kien truc *
* DD <-> DZ : Fakedim - Fixfakedim *
* XD <-> YD : Sap dim theo rieng truc X <-> Y *
* D,DA,DC,DB,DR, DG, DCT :lenh xuat dim autolayer *
* -------------------- LENH VE TEXT------------------------ *
* TXT : Chuyen dtext ve mtext *
* TX : Xoay text theo hai diem *
* E1 : Thay doi chieu cao text *
* TF : Tao text-style thong dung *
* TE : Chon text hien hanh *
* TJ : Chon diem dat cho text *
* ST, K : Tao cac kieu text, gach chan text DT *
* XT <-> YT : Can le text theo truc X-Y *
* XK <-> YK : Dan deu k/c text theo phuong X-Y *
* MM <-> TT : Doi text can chon voi 1 text khac *
* --------------- LENH DA TAO SAN DOI TUONG --------------- *
* CC : Ve hinh chu nhat to dac qua 2 diem *
* VT : Ve tuong nhanh *
* 1C , 2C : Cua di kieu 1 Canh va 2 Canh *
* `1,`2, `3 : Danh dau thep (tl 1/25 - 1/50 - 1/100) *
* VC <-> GH : Vet cat co ti le - auto ti le *
* BT <-> BTM : Bac cau thang thuong va co mui cong *
* T`, T1, T2 : Rai thep pick 2 diem tl(1/25, 1/50,1/100) *
* HCD : Huong duong DX : Truc doi xung *
* MAY : Dam may TON : Lat cat ton *
* TS : Thep san moc TM : Thep san mu *
* --------LENH HATCH VAT LIEU (H-Acad) -- (G-Acadiso) ----- *
* HT : hatch tuong HN : hatch ngoi *
* HS : hatch Solid HVS : hatch ve sinh *
* HC : hatch cat H40 : hatch luoi B40 *
* HG : hatch gach HDH : hatch da hoc *
* HBT : hatch be tong HGV : hatch bt lot *
* HTO : hatch mai ton HDC : hatch da che *
* CH , MH , SS , XH : *
* Copy, Move, Scale, Rotate - HATCH *
* JH : Noi cac hatch lai voi nhau *
* -----LENH NHANH (thay doi lenh co ban cua Autocad)------- *
* CO : Copy tang dan *
* BK : Thay doi ban kinh hinh tron *
* OP : Offset co diem dat *
* N, J: Noi cac duong Line thanh Pline *
* BF : Break line va pline *
* DBL : Thay doi diem dat cho Block *
* C : Copy Ci: Circle *
* XSC : Scale the mot chieu BC: Doi mau block *
* CA : Aray pick nhanh BB: Doi ten block *
* CR : Copy va Rotate MR: Move va Rotate *
* MI : Mirror giu doi tuong cu F : Fillet voi R=0 *
* MJ : Mirror xoa doi tuong cu FR: Fillet voi R=? *
* --------------- LENH DIEU CHINH UCS --------------------- *
* UB _ UU: Quay he toa do 2D theo line_tra lai he truc *
* UV _ QT: Quay huong ve theo duong line _tra lai he truc *
* VB,BV - VV : xem che do 3d - tra lai che do 2d *
* OI, OU, OL : Chon cac che do bat diem Osnap *
* ------------------ LENH TINH TOAN ----------------------- *
* % : Tinh % do doc *
* DOC : Ve mai voi do doc % cho truoc *
* TCD : Tinh tong chieu dai duong bat ky *
* TDT : Tinh tong dien tich *
* DW : Dem Block chon F2 de xem ket qua *
* + : Phep tinh cong *
* DTX : Dem so lan text xuat hien *
* CDM : Cong Dim *
* M150, M200, M250, M300 : *
* Tinh khoi luong vat lieu be tong PC40 theo Mac *
* -------- LENH THONG KE THEP (su dung cho file mau) ------ *
* OF : Xoa gia tri 0 *
* II : Xoa thuoc tinh *
* SD : Nhap so lieu can sua *
* SF : Nhap so luong cau kien *
* TH : Tong hop thep *
* --------------------------------------------------------- *
(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
***
«´¨`•..¤ ************ * © * 0808 * dinhdainhan0808@gmail.com ¤..•´¨`»
(¸.•'´¤*¤`'•.¸)

khi tạo text tự động chuyển qua layer text
cũng như dim - hatch cũng vậy.
- hay chỉ cần 1 lệnh là có thể đưa tất cả dim - hatch - text về đúng layer.
- Đây là quá trình tổng hợp và sưu tập từ nhiều trang web cả trong nước và các trang web nươc ngoài, trong những năm thiết kế.
- Hồi mới đi làm người ta giấu nghề quá, nên khá cực. Nếu giữ bí kip chắc Việt Nam khó phát triển quá.
- Tất cả công việc bạn làm là ý tưởng chứ không phụ thuộc vào lệnh vẽ. Lênh cũng dễ hiểu và logic. Sau vài ngày áp dụng là bạn có thể thuộc.
- Sau khi load các bạn chỉ cần nhấn phím F2. sẽ xuất hiện bảng lệnh như trên.
- Mong lisp này sẽ giúp phần nào các bạn trong lĩnh vực thiết kế xây dựng. Nhất là những bạn mới ra trường mà trong hoàn cảnh khó khăn thế này.
- Nếu thấy có lỗi gì chỉ cần load lại lisp. hoặc cm cho mình để sửa lỗi.
---- Mình đã test được trên cad 2013 ko vấn đề gì. Yêu cầu cad các phiên bản có cài express là ok ! ---------

Nó là đây: https://app.box.com/s/cjh6d3jh9tmn1h9509xr
(bản MỚI 30-10-2013)

Nếu bạn nào thích để lại họ tên đầy đủ:
Minh sẽ gửi bản có đoạn text ma ban muốn ghi trong taskbar của cad...
hoăc mail cho mình.. vẽ cad cho zui zui...

NẾU CÁC BẠN ĐÃ SỬ DỤNG LISP NÀY RỒI.THÌ NÊN THƯỜNG XUYÊN CẬP NHẬT TẠI BOX NÀY . BỞI VÌ KHI THAO TÁC THẤY LỖI MÌNH SỄ FIX LẠI, VÀ CÓ THỂ THÊM LỆNH MỚI ..

AI KHÔNG TẢI ĐƯỢC THÌ MAIL ĐẾN ĐỊA CHỈ NÀY : dinhdainhan0808@gmail.com

FIX LINK TẢI (thằng upfile nó mới nâng cấp bị j ko biết) nhiều bạn gửi mail ko tải được
UPDATE (bản MỚI 30-10-2013)
Bản này mặc định layer ngầm chạy khi thực thi lệnh, Bổ sung thêm một số bảng tra tiện dụng trong thiết kế hoặc làm thuyết minh, đang trong quá trình kiểm tra lỗi..HIỆN TẠI VẪN CHƯA THẤY J .....
Ai thấy lỗi j thì mail để fix.

HERE : https://app.box.com/s/cjh6d3jh9tmn1h9509xr

Nguyên văn bởi dinhdainhan (Post 297747)

(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
*******
***
* --------------------------- * --------------------------- *
* Copyright and repair by : ĐinhĐạiNhân_KonTum *
* --------------------layer auto load---------------------- *
* A0,A1,A2,A3,A4 : dat kho giay ban ve *
* -------------------LENH VE LAYER------------------------- *
* 0, 05,1, 15, 2,25, 3, 35,4, 5, 6, 66, 60, 7, cv : *
* Auto change layer *
* LK,KL,FF (88-99): loc, hien, tat - cac layer *
* 8 - 9 : Hide - Show *
* C1->C9 : Thay doi linetype *
* DHT : Dua dim, hatch, text ve dung layer *
* , : Chon layer hien hanh *
* -------------------- LENH VE DIM ------------------------ *
* DE,DN : Edit dim *
* KD : Cat ngan chan dim *
* CD : Chon dim hien hanh *
* BD : Sap cac lop dim deu nhau truc (X-Y) *
* D100 : Tao nhanh dim 100 kien truc *
* DD <-> DZ : Fakedim - Fixfakedim *
* XD <-> YD : Sap dim theo rieng truc X <-> Y *
* D,DA,DC,DB,DR, DG, DCT :lenh xuat dim autolayer *
* -------------------- LENH VE TEXT------------------------ *
* TXT : Chuyen dtext ve mtext *
* TX : Xoay text theo hai diem *
* E1 : Thay doi chieu cao text *
* TF : Tao text-style thong dung *
* TE : Chon text hien hanh *
* TJ : Chon diem dat cho text *
* ST, K : Tao cac kieu text, gach chan text DT *
* XT <-> YT : Can le text theo truc X-Y *
* XK <-> YK : Dan deu k/c text theo phuong X-Y *
* MM <-> TT : Doi text can chon voi 1 text khac *
* --------------- LENH DA TAO SAN DOI TUONG --------------- *
* CC : Ve hinh chu nhat to dac qua 2 diem *
* VT : Ve tuong nhanh *
* 1C , 2C : Cua di kieu 1 Canh va 2 Canh *
* `1,`2, `3 : Danh dau thep (tl 1/25 - 1/50 - 1/100) *
* VC <-> GH : Vet cat co ti le - auto ti le *
* BT <-> BTM : Bac cau thang thuong va co mui cong *
* T`, T1, T2 : Rai thep pick 2 diem tl(1/25, 1/50,1/100) *
* HCD : Huong duong DX : Truc doi xung *
* MAY : Dam may TON : Lat cat ton *
* TS : Thep san moc TM : Thep san mu *
* --------LENH HATCH VAT LIEU (H-Acad) -- (G-Acadiso) ----- *
* HT : hatch tuong HN : hatch ngoi *
* HS : hatch Solid HVS : hatch ve sinh *
* HC : hatch cat H40 : hatch luoi B40 *
* HG : hatch gach HDH : hatch da hoc *
* HBT : hatch be tong HGV : hatch bt lot *
* HTO : hatch mai ton HDC : hatch da che *
* CH , MH , SS , XH : *
* Copy, Move, Scale, Rotate - HATCH *
* JH : Noi cac hatch lai voi nhau *
* -----LENH NHANH (thay doi lenh co ban cua Autocad)------- *
* CO : Copy tang dan *
* BK : Thay doi ban kinh hinh tron *
* OP : Offset co diem dat *
* N, J: Noi cac duong Line thanh Pline *
* BF : Break line va pline *
* DBL : Thay doi diem dat cho Block *
* C : Copy Ci: Circle *
* XSC : Scale the mot chieu BC: Doi mau block *
* CA : Aray pick nhanh BB: Doi ten block *
* CR : Copy va Rotate MR: Move va Rotate *
* MI : Mirror giu doi tuong cu F : Fillet voi R=0 *
* MJ : Mirror xoa doi tuong cu FR: Fillet voi R=? *
* --------------- LENH DIEU CHINH UCS --------------------- *
* UB _ UU: Quay he toa do 2D theo line_tra lai he truc *
* UV _ QT: Quay huong ve theo duong line _tra lai he truc *
* VB,BV - VV : xem che do 3d - tra lai che do 2d *
* OI, OU, OL : Chon cac che do bat diem Osnap *
* ------------------ LENH TINH TOAN ----------------------- *
* % : Tinh % do doc *
* DOC : Ve mai voi do doc % cho truoc *
* TCD : Tinh tong chieu dai duong bat ky *
* TDT : Tinh tong dien tich *
* DW : Dem Block chon F2 de xem ket qua *
* + : Phep tinh cong *
* DTX : Dem so lan text xuat hien *
* CDM : Cong Dim *
* M150, M200, M250, M300 : *
* Tinh khoi luong vat lieu be tong PC40 theo Mac *
* -------- LENH THONG KE THEP (su dung cho file mau) ------ *
* OF : Xoa gia tri 0 *
* II : Xoa thuoc tinh *
* SD : Nhap so lieu can sua *
* SF : Nhap so luong cau kien *
* TH : Tong hop thep *
* --------------------------------------------------------- *
(`'•.¸(`'•.¸¤*¤¸.-'´)¸.•'´)
«´¨`•..¤: $ :¤..•´¨`»
(¸.•'´(¸.•'´¤*¤`'•.¸)`'•.¸)
***
«´¨`•..¤ ************ * © * 0808 * dinhdainhan0808@gmail.com ¤..•´¨`»
(¸.•'´¤*¤`'•.¸)

khi tạo text tự động chuyển qua layer text
cũng như dim - hatch cũng vậy.
- hay chỉ cần 1 lệnh là có thể đưa tất cả dim - hatch - text về đúng layer.
- Đây là quá trình tổng hợp và sưu tập từ nhiều trang web cả trong nước và các trang web nươc ngoài, trong những năm thiết kế.
- Hồi mới đi làm người ta giấu nghề quá, nên khá cực. Nếu giữ bí kip chắc Việt Nam khó phát triển quá.
- Tất cả công việc bạn làm là ý tưởng chứ không phụ thuộc vào lệnh vẽ. Lênh cũng dễ hiểu và logic. Sau vài ngày áp dụng là bạn có thể thuộc.
- Sau khi load các bạn chỉ cần nhấn phím F2. sẽ xuất hiện bảng lệnh như trên.
- Mong lisp này sẽ giúp phần nào các bạn trong lĩnh vực thiết kế xây dựng. Nhất là những bạn mới ra trường mà trong hoàn cảnh khó khăn thế này.
- Nếu thấy có lỗi gì chỉ cần load lại lisp. hoặc cm cho mình để sửa lỗi.
---- Mình đã test được trên cad 2013 ko vấn đề gì. Yêu cầu cad các phiên bản có cài express là ok ! ---------

Nó là đây: https://app.box.com/s/cjh6d3jh9tmn1h9509xr
(bản MỚI 30-10-2013)

Nếu bạn nào thích để lại họ tên đầy đủ:
Minh sẽ gửi bản có đoạn text ma ban muốn ghi trong taskbar của cad...
hoăc mail cho mình.. vẽ cad cho zui zui...

NẾU CÁC BẠN ĐÃ SỬ DỤNG LISP NÀY RỒI.THÌ NÊN THƯỜNG XUYÊN CẬP NHẬT TẠI BOX NÀY . BỞI VÌ KHI THAO TÁC THẤY LỖI MÌNH SỄ FIX LẠI, VÀ CÓ THỂ THÊM LỆNH MỚI ..

AI KHÔNG TẢI ĐƯỢC THÌ MAIL ĐẾN ĐỊA CHỈ NÀY : dinhdainhan0808@gmail.com

FIX LINK TẢI (thằng upfile nó mới nâng cấp bị j ko biết) nhiều bạn gửi mail ko tải được
UPDATE (bản MỚI 30-10-2013)
Bản này mặc định layer ngầm chạy khi thực thi lệnh, Bổ sung thêm một số bảng tra tiện dụng trong thiết kế hoặc làm thuyết minh, đang trong quá trình kiểm tra lỗi..HIỆN TẠI VẪN CHƯA THẤY J .....
Ai thấy lỗi j thì mail để fix.

HERE : https://app.box.com/s/cjh6d3jh9tmn1h9509xr