Tổng hợp các file lisp thường dùng,
| tnmtpc |
http://www.cadviet.com/upfiles/mylisp10.rar
| hadex |
Qua thời gian sưu tập các lisp trên diễn đàn và một số trang web, ḿnh tổng hợp lại và đóng gói, gửi tặng các bạn sử dụng đỡ tốn công t́m ṭi. Chương tŕnh gồm các lisp hỗ trợ các thao tác thường dùng,có cả một số tṛ chơi Cad cho đầu óc bớt căng thẳng. Cấu trúc menu có thể chưa hợp lư lắm các bạn có thể sửa lại file mnu cho hợp ư người dùng. Nếu có thời gian, ḿnh tiếp tục tổng hợp và hoàn thiện. Hy vọng chương tŕnh giúp ích cho các bạn, nhất là những ai ít biết về lisp như ḿnh
http://www.cadviet.com/upfiles/mylisp10.rar
http://www.cadviet.com/upfiles/mylisp10.rar
nhưng mà ah tnmtpc ơi.cái này dùng thế nào vậy.heeeee chỉ cho e hộ cái. thank
| cadviet244 |
| tnmtpc |
| hadex |
Là những tiện ích về line, polyline. block, text, layer, xuất nhập khẩu điểm vào cad vân vân...gồm vài trăm lệnh lisp. Bạn cài đặt b́nh thường, trong khi cài đặt có một vài hướng dẫn bằng tiếng việt, nói chung là Next->Next và Next là OK
Nhưng mà jờ e lại bị vụ này nữa : sau khi cài xong toàn bộ menu myutility ko hiện được tiếng viêt.chữ cứ lung tung cả lên.help me.
| tnmtpc |
Nhưng mà jờ e lại bị vụ này nữa : sau khi cài xong toàn bộ menu myutility ko hiện được tiếng viêt.chữ cứ lung tung cả lên.help me.
Bạn nhắp phải trên màn h́nh Windows, chọn properties, chọn tab Appearance, nhắp nút advanced-> hộp thoại.Chọn font của các mục (item) là Ms sans serif . OK. Nếu vẫn không hiện tiếng việt th́ bạn phải cài thêm 3 fonts hệ thống (ḿnh có gửi kèm theo, h́nh như vậy). Chương tŕnh ḿnh đă test trên cad 2004, các phiên bản trước có thể có một số lệnh ko áp dụng được
| meohoang |
Qua thời gian sưu tập các lisp trên diễn đàn và một số trang web, ḿnh tổng hợp lại và đóng gói, gửi tặng các bạn sử dụng đỡ tốn công t́m ṭi. Chương tŕnh gồm các lisp hỗ trợ các thao tác thường dùng,có cả một số tṛ chơi Cad cho đầu óc bớt căng thẳng. Cấu trúc menu có thể chưa hợp lư lắm các bạn có thể sửa lại file mnu cho hợp ư người dùng. Nếu có thời gian, ḿnh tiếp tục tổng hợp và hoàn thiện. Hy vọng chương tŕnh giúp ích cho các bạn, nhất là những ai ít biết về lisp như ḿnh
http://www.cadviet.com/upfiles/mylisp10.rar
http://www.cadviet.com/upfiles/mylisp10.rar
Cám ơn bạn; ngó dazỵ chứ làm cái vụ này mất cũng khá nhiều công sức chớ bộ chơi sao
| duong_nguyen411 |
Qua thời gian sưu tập các lisp trên diễn đàn và một số trang web, ḿnh tổng hợp lại và đóng gói, gửi tặng các bạn sử dụng đỡ tốn công t́m ṭi. Chương tŕnh gồm các lisp hỗ trợ các thao tác thường dùng,có cả một số tṛ chơi Cad cho đầu óc bớt căng thẳng. Cấu trúc menu có thể chưa hợp lư lắm các bạn có thể sửa lại file mnu cho hợp ư người dùng. Nếu có thời gian, ḿnh tiếp tục tổng hợp và hoàn thiện. Hy vọng chương tŕnh giúp ích cho các bạn, nhất là những ai ít biết về lisp như ḿnh
http://www.cadviet.com/upfiles/mylisp10.rar
http://www.cadviet.com/upfiles/mylisp10.rar
Cám ơn những con ng nhiệt t́nh như bác!
Hay!!!!
| hoai46ctt |
| duy782006 |
Bạn nhắp phải trên màn h́nh Windows, chọn properties, chọn tab Appearance,
nhắp nút advanced-> hộp thoại.Chọn font của các mục (item) là Ms sans serif . OK. Nếu vẫn không hiện tiếng việt th́ bạn phải cài thêm 3 fonts hệ thống
(ḿnh có gửi kèm theo, h́nh như vậy). Chương tŕnh ḿnh đă test trên cad 2004, các phiên bản trước có thể có một số lệnh ko áp dụng được
nhắp nút advanced-> hộp thoại.Chọn font của các mục (item) là Ms sans serif . OK. Nếu vẫn không hiện tiếng việt th́ bạn phải cài thêm 3 fonts hệ thống
(ḿnh có gửi kèm theo, h́nh như vậy). Chương tŕnh ḿnh đă test trên cad 2004, các phiên bản trước có thể có một số lệnh ko áp dụng được
Theo ḿnh khi có ư định đưa ra dùng rộng rải th́ bạn nên viết menu không dấu tốt hơn.
Nếu muốn viết có dấu nh́n cho ngầu th́ nên dùng font chử thông dụng chút (máy nào cũng có sẳn) việc cài thêm font hệ thống làm mọi người ngại
nhất là khi làm để xem thử 1 chương tŕnh có phù hợp không th́ càng ngại.
-Ḿnh đă từng làm công việc như của bạn và giải pháp cuối cùng là không dấu
thực chất ḿnh vẩn có thể viết 2 menu song song 1 có dấu và 1 không trong đó có phần chuyễn đổi qua lại giử 2 menu này như vậy là ok nhất.
Đây là bài viết về menu bạn tham khảo xem. (nguồn từ tailieukythuat.com)
CODE
-Bạn c̣n có thể gọi 1 menu h́nh ảnh tại ḍng lệnh bằng cách nhập
(menucmd "i=tlkt.THUVIEN")(menucmd "i=*")
-Hoặc lưu đoạn lisp như sau th́ khi gỏ lệnh tv sẽ gọi menu THUVIEN lên.
(Defun c:tv ( )
(menucmd "i=tlkt.THUVIEN")(menucmd "i=*")
(Princ)
)
-Cách điều chỉnh hiển thị của menu bằng ḍng lệnh.
(menucmd "Gtlkt.pop1=-") Tắt menu pop1 thuộc menu tlkt đi.
(menucmd "P15=+tlkt.pop1") Làm xuất hiện menu pop1 thuộc menu tlkt tại vị trí thứ 15 của menu tính từ trái qua phải.
-Cách làm mờ 1 mục của menu: Ví dụ làm mờ ḍng Noi dung dong 4 trong menu tlkt.
+Làm mờ ngay từ khi mới tải lên: Thêm dấu ~ trong ḍng định nghĩa menu.
ID_a4 [~Noi dung dong 4]^C^C_tenlenh-4
+Làm mờ bằng ḍng lệnh sau khi tải lên: dùng ḍng lệnh sau.
(MENUCMD "Gtlkt. ID_a4=~")
-Đánh dấu 1 mục của menu: Ví dụ đánh dấu ḍng Noi dung dong 4 trong menu tlkt trên.
+Đánh dấu ngay từ khi mới tải lên: Thêm dấu ! trong ḍng định nghĩa menu.
ID_a4 [!Noi dung dong 4]^C^C_tenlenh-4
+Đánh dấu bằng ḍng lệnh sau khi tải lên: dùng ḍng lệnh sau.
(MENUCMD "Gtlkt. ID_a4=!")
-Vô hiệu hóa việc đánh dấu, làm mờ 1 mục của menu bằng ḍng lệnh.
(MENUCMD "Gtlkt. ID_a4=")
*Bây giờ ứng dụng các kiến thức trên vào việc cụ thể nhé:
-Đặt vấn đề: khi viết 1 menu nếu là tiếng việt có dấu th́ nh́n có vẻ ngon lành hơn nhưng
vấn đề ḿnh muốn nhiều người dùng cái menu của ḿnh mà việc hiển thị được tiếng việt có dấu
trên thanh menu th́ không phải ai cũng biết cách chỉnh nên nó mà hiển thị không đúng th́ càng khó đọc hơn là không có dầu nửa.
-Giải pháp đưa ra là trong menu của ḿnh viết 2 pop có chức năng y hết nhau 1 cái có dấu và 1 cái không dấu.
Trong đó có 1 mục giúp chuyễn qua lại giữa có dầu và không dấu. Ứng dụng ḍng tắt và làm xuất hiện menu cho việc này.
-Bây giờ ḿnh sửa cái menu bài trước như sau: (ḿnh bỏ đoạn menu h́nh ảnh đi nhé)
***MENUGROUP=tlkt
***POP1
ID_1tieude [TLKT]
ID_1a1 [Noi dung dong 1]^C^C_tenlenh-1
ID_1a2 [Noi dung dong 2]^C^C_tenlenh-2
ID_1a3 [Noi dung dong 3]^C^C_tenlenh-3
ID_1a4 [Noi dung dong 4]^C^C_tenlenh-4
[--]
ID_1b1 [->Xep lop]
ID_1b2 [Noi dung lop 1]^C^C_tenlenh-5
ID_1b3 [Noi dung lop 2]^C^C_tenlenh-6
ID_1b4 [<-Noi dung lop 3]^C^C_tenlenh-7
[--]
ID_c1 [Goi co dau]^C^C(menucmd "Gtlkt.pop1=-") (menucmd "P15=+tlkt.pop2")
***POP2
ID_2tieude [TLKT]
ID_2a1 [Nội dung ḍng 1]^C^C_tenlenh-1
ID_2a2 [Nội dung ḍng 2]^C^C_tenlenh-2
ID_2a3 [Nội dung ḍng 3]^C^C_tenlenh-3
ID_2a4 [Nội dung ḍng 4]^C^C_tenlenh-4
[--]
ID_2b1 [->Xếp lớp]
ID_2b2 [Nội dung lớp 1]^C^C_tenlenh-5
ID_2b3 [Nội dung lớp 2]^C^C_tenlenh-6
ID_2b4 [<-Nội dung lớp 3]^C^C_tenlenh-7
[--]
ID_c1 [Gọi không dấu]^C^C(menucmd "Gtlkt.pop2=-") (menucmd "P15=+tlkt.pop1")
*Rồi bây giờ load menu tlkt lên cho cái pop1 hiển thị bạn sẽ thấy menu là tiếng việt không dấu.
phía dưới cùng có mục Goi co dau khio bạn chọn nó sẽ tắt cáo pop1 đi và gọi cáo pop2 lên là tiếng việt có dấu.
Lúc này ḍng dưới cùng là Gọi không dấu. Bạn chọn vào nó lại chuyễn sang không dấu.
*Một ví dụ như vậy để bạn dể h́nh dung và linh hoạt trong sử dụng các kiến thức về menu ḿnh nêu trên
tùy trường hợp cụ thể bạn ứng dụng các cái c̣n lại nhé.
| tnmtpc |
Cài xong rồi nhưng không biết sử dụng, coi như = 0.
Sao vậy bạn? Cài xong th́ khởi động autocad, sẽ có menu Myutility xuất hiện trên thanh menu, sử dụng b́nh thường như những menu khác. Hay là có trục trặc ǵ bạn nói rơ để anh em họ giúp chớ?
| hoai46ctt |
Sao vậy bạn? Cài xong th́ khởi động autocad, sẽ có menu Myutility xuất hiện trên thanh menu, sử dụng b́nh thường như những menu khác. Hay là có trục trặc ǵ bạn nói rơ để anh em họ giúp chớ?
Ḿnh cài được rồi nhưng không đọc được (đă chuyển sang font Ms sans serif), chắc là thiếu 3 font hệ thống, nhờ các bạn gửi cho ḿnh với.
| tnmtpc |
Ḿnh cài được rồi nhưng không đọc được (đă chuyển sang font Ms sans serif), chắc là thiếu 3 font hệ thống, nhờ các bạn gửi cho ḿnh với.
Ba fonts đă có sẵn trong thư mục C:\mylisp. khởi động DOS để chép đè ba fonts này, OK
| pccc |
Ba fonts đă có sẵn trong thư mục C:\mylisp. khởi động DOS để chép đè ba fonts này, OK
cám ơn bác
| tuan_thietkedien |
Ba fonts đă có sẵn trong thư mục C:\mylisp. khởi động DOS để chép đè ba fonts này, OK
Tớ đă làm như chỉ dẫn rùi, đă cập nhật font, chuyển font hệ thống nhưng vẫn không đọc tiếng việt.
Xin chỉ giáo thêm.
| Trên đây là phiên bản rút gọn, hãy Xem phiên bản đầy đủ của chủ đề trong diễn đàn và cùng đóng góp bài viết cho diễn đàn CADViet.com |