$txt['colorize_color'] = 'Color';$txt['HPlocation'] = 'Project Honey Pot (all regions)'; // MOD Quick PM $txt['quick_pm'] = 'Quick PM'; $txt['change_quick_pm'] = 'Change to Quick PM'; $txt['change_quick_reply'] = 'Change to Quick Reply'; $txt['send_message'] = 'Send message'; $txt['quick_pm_desc'] = 'With Quick-PM you can write a personal message when viewing a topic without loading a new page. You can still use bulletin board code and smileys as you would in a normal personal message.'; $txt['display_quick_pm'] = 'Enable Quick PM (requires enable Quick Reply)'; // MOD Auto Merge Double Post $txt['permissionname_doublePost'] = 'Allow to do Double Post'; $txt['permissionhelp_doublePost'] = 'By Enabling this will allow them to double post.'; $txt['AutoMergePost_div'] = 'Add text when merging the post'; $txt['AutoMergePost_div_sub'] = 'You can use BBC and $date variable'; $txt['AutoMergePost_time'] = 'Time after which it will allow the bump the topic'; $txt['AutoMergePost_time_sub'] = 'Time 0 to disable the MOD and 9999 for never allow bump'; // Aeva Media extra strings $txt['aeva_gallery'] = isset($txt['aeva_gallery']) ? $txt['aeva_gallery'] : 'Media'; $txt['aeva_home'] = 'Home'; $txt['aeva_unseen'] = 'Unseen'; $txt['aeva_profile_sum'] = 'Summary'; $txt['aeva_view_items'] = 'View items'; $txt['aeva_view_coms'] = 'View comments'; $txt['aeva_view_votes'] = 'View votes'; $txt['aeva_gotolink'] = 'Details'; $txt['aeva_zoom'] = 'Zoom'; $txt['permissiongroup_aeva'] = 'Aeva Media'; $txt['permissiongroup_simple_aeva'] = 'Aeva Media'; $txt['permissionname_aeva_access'] = 'Access Gallery'; $txt['permissionname_aeva_moderate'] = 'Moderate Gallery'; $txt['permissionname_aeva_manage'] = 'Administrate Gallery'; $txt['permissionname_aeva_access_unseen'] = 'Access unseen area'; $txt['permissionname_aeva_search'] = 'Search in Gallery'; $txt['permissionname_aeva_add_user_album'] = 'Add Albums'; $txt['permissionname_aeva_add_playlists'] = 'Add User Playlists'; $txt['permissionname_aeva_auto_approve_albums'] = 'Auto-approve Albums'; $txt['permissionname_aeva_moderate_own_albums'] = 'Moderate own Albums'; $txt['permissionname_aeva_viewprofile'] = 'View anyone\'s Gallery profile'; $txt['cannot_aeva_viewprofile'] = 'You cannot view Gallery profiles'; // End Aeva Media strings $txt['display_facebook_like'] = 'Display Facebook Like icon?'; $txt['display_facebook_like_desc'] = 'Enabling this will Display the Facebook Like Icon within posts.'; $txt['display_facebook_like_all'] = 'Display Facebook Like icon in all posts?'; $txt['display_facebook_like_all_desc'] = 'Enabling this will Display the Facebook Like Icon within all posts. Note Display Facebook Like Icon has to be enabled'; Chia sẻ Bộ Lisp rất hay: ”Kho báu của Minh”
Ashui.com/Forum ashui
22/11/2019, 05:27  
27073 bài viết trong 10627 chủ đề bởi 205210 thành viên
Xem các bài viết mới trên diễn đàn.
Xin chào ! Bạn là khách. Vui lòng đăng nhập hoặc đăng ký.

Đăng nhập với tên truy cập, mật khẩu và thời gian tự động thoát
VNArchitects.com
Chủ đề quan tâm: Để đăng kư thành viên, xin vui ḷng liên hệ: admin@ashui.com
 
   Trang chủ   Lịch sự kiện Thành viên Tìm kiếm Trợ giúp Đăng nhập Đăng ký  
Trang: [1]   Chuyển xuống
  In ấn  
Tác giả Chủ đề: Chia sẻ Bộ Lisp rất hay: ”Kho báu của Minh”  (Đọc 42423 lần)
0 thành viên và 1 khách đang xem chủ đề này.
dauquangminh
Ashui-I


Gián tuyến Gián tuyến

Bài: 2


Xem hồ sơ E-mail
« vào: 17/08/2011, 10:38 »

Sau một thời gian dài, cuối cùng Minh cũng sưu tầm xong bộ lisp của ḿnh ^_^ . Bộ lisp này rất hữu ích cho những ai sử dụng acad, nó làm cho công việc trở nên nhanh chóng một cách lạ thường (đặc biệt là dân thiết kế giao thông, v́ Minh là dân giao thông mà, nhưng những ngành khác cũng xài bộ lisp này được đấy)

Cảm ơn các anh chị em trong diễn đàn đă giúp đỡ lẫn nhau rất nhiệt t́nh
Cảm ơn bác nào đă sáng lập ra diễn đàn rất hữu ích này

Download: http://www.mediafire.com/?x6xq01snfsgh63c/
Cách load bộ lisp :

- Load thư mục "Tong bo Lisp": trong acad bạn gơ "op" -> chọn thẻ Files -> click đúp vào Support File Search Path -> bấm nút Add -> Browse -> chọn đường dẫn đến thư mục "Tong bo Lisp" -> ok
Qua bên thẻ System -> click vào mục Load acad.lsp with every drawing trong mục General Options -> tắt acad và bật lên lại là xong
- Load những thứ c̣n lại: trong acad gơ lệnh "ap" -> click nút Contents trong mục Startup suite (có kư hiệu h́nh chiếc cặp) -> Add tất cả những lisp c̣n lại vào -> close

Lưu ư: một số lệnh sau bị trùng lệnh, các bạn sửa lại lệnh bằng cách: trong acad chọn menu Tools -> Customize -> Edit Program Parameters (acad.pgp) rồi chỉnh lại các lệnh tắt của acad -> tắt acad và bật lại
các lệnh trùng:
lệnh trim lúc này là "t" nên bạn phải sửa lại lệnh viết text "t" -> ví dụ "t1"
"b" tạo block -> sửa lại ví dụ "bl"
"h" tạo hatch -> sửa lại ví dụ "bh" hay "h1"...

Danh sách các lisp trong bộ lisp này (khá dài):
1. Bộ lisp phục vụ cho công tác giải phóng mặt bằng:
 Chèn cọc GPMB và MLG : CG-chen block theo giao diem.Lsp
 Xoay cọc GPMB và MLG theo hướng tuyến: LISP QUAY HOGA THEO HUONG DUONG CONG HOAC THANG.lsp
 Điền tên cọc GPMB và MLG (layer TEXT GPMB): mabl.lsp
 Vẽ đường ranh GPMB và MLG: mabl.lsp
 Xuất tọa độ các cọc GPMB và MLG ra bảng (tạo layer riêng để sau này xóa số của lisp): vc.lsp
 Chỉnh sửa bảng tọa độ: themtext-bottext.lsp
2. Cộng trừ nhân chia số trong text: cong_tru_nhan_chia.lsp
3. Copy nội dung text này dán sang text khác y chang: mat.lsp
4. Đánh số thứ tự bằng tay: num.lsp
5. Đánh số thứ tự tự động: dsbv_1.vlx
6. Diệt virus acad.lsp: gơ “ap” sau đó add lisp cvav_1_04.lsp vào mục content
7. Hiển thị tọa độ có mũi tên: XTD.lsp, td.lsp
8. Rải đối tượng theo đường dẫn: raidtok.lsp
9. In tự động trong chế độ Model và Layout: INTUDONG folder
10. Lấy lại diện tích từ trắc ngang bị lỗi: Lay dien tich tu Trac ngang folder
11. Copy, xóa hay move tất cả đối tượng thuộc 1 layer: xoa,copy,move all doi tg thuoc 1 layer.lsp
12. Tính diện tích và điền số (dùng để sửa khối lượng trắc ngang và tính diện tích GPMB): TINH DIEN TICH VA GHI SO.lsp (lệnh ss)
13. Scale đối tượng theo 1 chiều: Scale 1 chieu.lsp
14. Nối các line rời rạc khép kín thành 1 polyline kín: NOI CAC LINE ROI RAC THANH 1 POLYLINE – NN.lsp
15. Đổi điểm chèn của block: DOI DIEM CHEN BLOCK – DBL.lsp (các block được copy ra cũng thay đổi theo)
16. Tổng cả bộ lisp:
 Đổi chữ hoa, chữ thường: lệnh: ca
 Chọn số chữ số lẻ của kích thước: acc
 Đo kích thước theo phương ngang: h
 Canh vị trí dim ngang: h1
 Canh vị trí đường dóng ngang (cắt dim): h2
 Đo kích thước theo phương đứng: v
 Canh vị trí dim đứng: v1
 Canh vị trí đường dóng đứng (cắt dim): v2
 Đặt tỉ lệ cho dim: tl
 Cập nhật tỉ lệ cho dim: up
 Chuyển các dim về layer 2: d2
 Chuyển các dim về layer tự đặt: dl
 Quay text của dim 180 độ: md
 Quay về như cũ: umd
 Vẽ kư hiệu cắt: cut
 Vẽ cốt thép với số lượng biết trước: st1
 Vẽ cốt thép với khoảng cách giữa 2 thanh cho trước (gần đúng): st
 Vẽ thép móc tṛn: hk
 Copy siêu tốc: cc
 Thêm kư hiệu ± vào trước một số: da
 Quay nhiều text cùng 1 góc: rot
 Sắp xếp text rất pro: arr
 Tính chiều dài các đường thẳng: cl
 Vẽ kư hiệu đầu cờ tim đường: dx
 Dọn rác bản vẽ: pu
 Quay đối tượng kiểu pro: r
 Tách riêng 1 layer: ly
 Tắt 1 layer: lf
 Bật tất cả layer: lo
 Tính độ dốc: dd
 Chạy lại bộ lisp này: acad
 Chuyển font TCVN sang VNI: t2v → ct2 (font phải là vn_vni.shx)
17. Trim linh hoạt: trim dạng fence (hàng rào)
18. Xuất tọa độ hố ga trong acad 2007
19. Copy các block attribute với số thự tự tăng dần (dùng vẽ các hố ga): od_oc_oca.lsp
20. Sửa các block attribute với số thự tự tăng dần (dùng sửa các hố ga): chatt.lsp
21. Làm to các biểu tượng trong cad
22. Lệnh tắt thay thế và t́m kiếm: Alt+e+f
23. Các mẫu hatch siêu đẹp cho cad
24. Các linetype cho cad: LINETYPE.dwg
25. Tạo các linetype cho riêng ḿnh: xem file hướng dẫn
26. Font kỹ thuật theo đúng TCVN 7284: copy 2 font vào C:\windows\fonts\
27. Phần mềm đổi đơn vị
28. Phần mềm nội suy 1 và 2 chiều
29. Phá password excel
30. Khắc phục dim nhảy lung tung: gơ “dimassoc” cho = 2
31. Cách gơ các kư tự đặc biệt trong cad
32. Chỉnh màn h́nh khởi động cad2007 dạng 3d thành 2d classic như cad2005: Options... Chọn thẻ Files, đến mục Template Settings nhấn vào mũi tên màu trắng cho nó xổ xuống, Chọn mục Default Template File Name for QNEW cho nó xổ xuống. Nhấn chọn ḍng này nhấn Remove. Khởi động lại acad.
33. Chuyển bảng tính excel sang đối tượng acad: VBA project 1
34. Chuyển text acad sang đối tượng excel: TEXT ACAD SANG TEXT EXCEL - C2E.lsp
35. Phần mềm thống kê cốt thép: TipSetupUniCode

Hy vọng những công cụ này đem lại hữu ích cho các anh chị em thiết kế.
Chúc các anh chị em thiết kế nhà ta gặt hái được
nhiều thành công trong công việc và hạnh phúc trong gia đ́nh.

Thân chào.
Minh.
Địa chỉ IP đã được lưu lại
Trang: [1]   Chuyển lên
  In ấn  
 
Chuyển tới:  

Liên hệ Ban quản trị diễn đàn: ASEAN TIMES ONLINE
+84 9 8888 7890 | E-mail: admin@ashui.com
URLs: vnarchitects.ashui.com, vnarchitects.com
© 2008 VNArchitects | Ashui® Corporation
Hỗ trợ bởi MySQL Hỗ trợ bởi PHP Valid XHTML 1.0! Valid CSS!
Powered by SMF 1.1.4 | SMF © 2005, Simple Machines LLC