Lisp di động.

Sau thời gian giới thiệu bộ lisp tổng hợp TLKT và được sự quan tâm sử dụng của các bạn. Bản thân mình và chắc cả các bạn nửa sẽ thấy bất tiện khi thay đổi nơi làm việc nhất là khi làm việc tạm thời tại máy nào đó thì không thể cài cái TLKT vào.
Từ nhu cầu thực tế mình đã có giải pháp là tạo ra bộ lisp di động có khả năng chạy trên cả USB và CDROM. Thực chất đây là nguyên bản của bộ TLKT và mình liên tục chỉnh sửa, cập nhật nên các tiện ích mà TLKT có thì hắn cũng có và có thêm vài cái mới các bạn dùng và tự khám phá thêm trong phần giới thiệu của mình. Mình đặt tên hắn là TIENICH.
Cách dùng như sau:
-Bạn load về và giải nén thành thư mục TIENICH và copy vào USB, CDROM hoặc bất kỳ chổ nào trong máy theo nguyên tắc: tất cả tên các thư mục dẩn đến TIENICH điều không được chứa khoảng trắng.
-Khi dùng gỏ lệnh AP, chọn đến ……tienich\run\chay\chay.lsp và load nó lên, xuất hiện bảng như này yêu cầu bạn chọn file duy.ico mục đích để cad biết cái TIENICH hắn nằm ở đâu.

-Bạn chọn đến ……tienich\duy.ico và chọn open.
-Xong rồi ế bạn lúc này xuất hiện bảng giới thiệu như này (màu mè quảng cáo tí)

-Đây là bảng lệnh chính từ đây bạn có thể đi đến tất cả các chức năng có trong bộ lisp này.

-Lưu ý:
+Khi load bằng cách này thì lisp chỉ chạy trong phiên làm việc này thôi lần khác hoặc mở bản vẽ khác thò phải load lại.
+Line và hatch sẽ không tự động cập nhật, nếu muốn cập nhật line và hatch thì bạn gỏ lệnh HETHONG và nhập pass là 00 (hai số không).
Chào thân ái và quyết thắng!

Tải về

Tiện ích lisp cho khảo sát địa hình.

Theo yêu cầu của người bạn có nic khaosat2009 bên tailieukythuat.com Mình tạo bộ tiện ích lisp cho bên khảo sát gồm:
-Hatch các ký hiệu hiện trạng.
-Chèn các ký hiệu hiện trạng.
-Vẽ các kiểu tuyến điện, dây thông tin, các đường bao bờ hồ.
-Chuyễn các đối tượng có sẳn trên bản vẽ về linetype mong muốn.
-Scale linetypescale của tất cả các đối tượng theo một giá trị nhất định.

*Tất cả cơ sở dữ liệu block, hatch. line do bạn khaosat2009 cung cấp.


Cách dùng
-Load về giải nén ra thư mục: khkhaosat
-Copy nó vào ổ c
-Khởi động cad. Load file c:\khkhaosat\data\goilenhkhaosat.lsp
-Lần đầu tiên thì bạn gỏ lệnh capnhat dể cập nhật line và hatch cho cad.
*Vậy là có menu và các lệnh để dùng.
-Mình đã đưa các block ký hiệu về cad14 bạn có thể dùng cho các đời cad khác 1 cách thuận tiện.
-Bạn muốn tiện ích luôn khởi động khi mở cad thì add cái file c:\khkhaosat\goilenhkhaosat.lsp cho khởi động cùng cad.

Theo đề nghị của bạn khaosat2009 mình chỉnh lại bộ KSVN thành lisp di động.
*Có chỉnh sửa 1 chút. Bạn cập nhật lại toàn bộ thư mục khkhaosat.
-Để chạy trên ổ đĩa bất kỳ:
+Gỏ lệnh ap chọn ...khkhaosat\run\didong.lsp. load lên.
+Chọn đến ...khkhaosat\duy.ico.
+Ok dùng như cũ.
-Để chạy trên ổ c.
+Gỏ lệnh ap chọn ...khkhaosat\run\codinh.lsp. load lên.
+Ok dùng như cũ.
*Muốn cập nhật hatch và line thì gỏ lệnh capnhat.

*Cách thêm lệnh lisp vào khkhaosat.
-Copy file *.lsp vào thư mục ...khkhaosat\data.
-Mở file ...khkhaosat/run/goilenhkhaosat.lsp
Nội dung nó có đoạn
(load(strcat odiachay "/khkhaosat/data/thuvien"))
(load(strcat odiachay "/khkhaosat/data/vecackieuduong"))
(load(strcat odiachay "/khkhaosat/data/hatchdh"))
Viết thêm liên tiếp bên dưới
(load(strcat odiachay "/khkhaosat/data/tenfilelisp"))
Lưu ý tenfilelisp là tên file lisp bạn thêm vào (không có .lsp nhé)

*Đã viết thêm lisp vẽ nhà theo yêu cầu của bạn khaosat2009.
-Tên lệnh: VENHA
-Xuất hiện bảng như sau:

-Chọn 1 trong 9 kiểu nhà vần vẽ và nhấn nút vẽ.
*Cập nhật lại thư mục data và run vào khkhaosat là được.

*Lệnh venha sau khi cập nhật theo yêu cầu.
-Tên lệnh: VENHA
-Xuất hiện bảng như sau:

-Chọn 1 trong 13 kiểu nhà vần vẽ và nhấn nút vẽ.
*Đây là link bộ đầy đủ đã cập nhật lệnh venha vào menu và bảng lệnh chính và tất nhiên bộ này là lisp di động.

Tiện ích Autolisp tổng hợp

*Giới thiệu bộ công cụ tiện ích hổ trợ trên tất cả các đời cad. Đây là tổng hợp các lisp mình sưu tầm và viết mới phục vụ nhu cầu công việc bản thân.
-Bạn load về giải nén ra thư mục TLKT. Copy vào ổ C.
-Trong thư mục tlkt\run có 2 file: cai.lsp và chạy.lsp
+Để chạy thử : khởi động cad gỏ lệnh AP chọn đến file chay.lsp load lên. Cad của bạn có thêm menu TLKT bạn vào đó có đầy đủ các thứ bạn cứ xem thấy thích và phù hợp công việc thì cài.
+Để cài : khởi động cad gỏ lệnh AP chọn đến file cai.lsp load lên. Xuất hiện bảng hường dẩn bảo bạn gỏ lệnh TLKT. Bạn tắt bảng này đi rồi gỏ lệnh TLKT. Bây giờ luôn luôn khi khởi động cad sẽ có bảng giới thiệu chương trình.



@Lưu ý chương trình thật ra không phải được cài đặt nên không có phần gở bỏ muốn gở bỏ phải làm thủ công.
*Khi dùng tienich của tôi có 3 điều khó chịu sau bạn chấp nhận thì hãy dùng:
-Nó chép đè các mẫu hatch lên máy của bạn.
-Có 1 dòng chử hiển thị thông tin về tác giả góctrái dưới màn hình.
-Xuất hiện bảng giới thiệu tác giả khi khởi động.

Tải về máy!