Đến nội dung


Hình ảnh

Lisp Tạo Text


  • Please log in to reply
62 replies to this topic

#21 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 02:19 PM

@Kieu Tan,conghoa

https://drive.google...iew?usp=sharing

Hướng dẫn:

1. Lệnh CRT

2. Các nút điều khiển trên hộp thoại có thể xem ở Clip ở trên.

3. Sau khi chọn String và OK => trước khi chọn điểm đặt Text, có thể điều chỉnh Text như sau:

    a. Gõ phím S: để thay đổi chiều cao text của dòng đầu tiên, các dòng thứ 2 trở đi giữ nguyên theo giá trị trên hộp thoại.

    b. Nhấn giữ hoặc gõ phím: + , - để thay đổi khoảng cách giữa các dòng.

    c. Nhấn giữ hoặc gõ phím: > , < để thay đổi Width của text.

    d. Nhấn giữ hoặc gõ phím: [ , ] để thay đổi chiều cao text các dòng thứ 2 trở đi.

    e. Nhấn giữ hoặc gõ phím: R, O để xoay text.

P/s: - Khi tạo thư viện String từ nút Get-str: Thì tất cả các string được chuyển sang mã UNICODE.

       - Khi xuất String->Text: Đối với các font .TTF (thuộc các bảng mã: TCVN3, VNI) thì lisp tự chuyển đổi => Có nghĩa: Sau khi chọn các string, dùng TextStyle nào cũng được (Uni, Tcvn, Vni <=> font: *.ttf).

Bác chấp nhận cái request mail zùm nhé.

 

Trân trọng!


  • 0

#22 quocmanh04tt

quocmanh04tt

    biết lệnh imageclip

  • Members
  • PipPipPipPipPipPipPip
  • 665 Bài viết
Điểm đánh giá: 312 (khá)

Đã gửi 01 November 2016 - 02:47 PM

Bác chấp nhận cái request mail zùm nhé.

 

Trân trọng!

Đã mở, lúc nãy đóng là vì phát hiện 1 lỗi nhỏ ở get-str (vẫn chưa fix được) - Có 1 số dòng text chưa phát hiện ra loại font gì.


  • 1

#23 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 02:53 PM

@QuocManh04tt

 

Command: AP
APPLOAD CRT_KT_CH.fas successfully loaded.




Command:
:: Create TEXT from Library | © QuocManh04tt 2016 - www.CadViet.com ::
:: Type "CRT" to Invoke ::
Command:
Command: CRT
Lib-str10


Error: bad argument type: streamp nil

Bị lỗi luôn đó bác, test với cad 2017


  • 0

#24 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 02:58 PM

 

@QuocManh04tt

 

Command: AP
APPLOAD CRT_KT_CH.fas successfully loaded.




Command:
:: Create TEXT from Library | © QuocManh04tt 2016 - www.CadViet.com ::
:: Type "CRT" to Invoke ::
Command:
Command: CRT
Lib-str10


Error: bad argument type: streamp nil

Bị lỗi luôn đó bác, test với cad 2017

 

Bị lỗi luôn đó bác, test với cad 2012, 2017


  • 0

#25 quocmanh04tt

quocmanh04tt

    biết lệnh imageclip

  • Members
  • PipPipPipPipPipPipPip
  • 665 Bài viết
Điểm đánh giá: 312 (khá)

Đã gửi 01 November 2016 - 03:10 PM

Thử down lại xem! Get-str tốt nhất cho UNICODE.


  • 0

#26 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 03:12 PM

Command: ap
APPLOAD CRT_KT_CH.fas successfully loaded.
 
 
Command:
:: Create TEXT from Library | © QuocManh04tt 2016 - www.CadViet.com ::
:: Type "CRT" to Invoke ::
Command:
Command: CRT
Lib-str10
 
Error: bad argument type: streamp nil
Command:
 
 
Bác hôm nay khó ở ah, nó hiện lên cái bảng đó rồi out luôn :|

  • 0

#27 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 03:16 PM

 

Command: ap
APPLOAD CRT_KT_CH.fas successfully loaded.
 
 
Command:
:: Create TEXT from Library | © QuocManh04tt 2016 - www.CadViet.com ::
:: Type "CRT" to Invoke ::
Command:
Command: CRT
Lib-str10
 
Error: bad argument type: streamp nil
Command:
 
 
Bác hôm nay khó ở ah, nó hiện lên cái bảng đó rồi out luôn :|

 

Bác hôm nay khó ở ah, nó hiện lên cái bảng đó rồi out luôn :|

  • 0

#28 quocmanh04tt

quocmanh04tt

    biết lệnh imageclip

  • Members
  • PipPipPipPipPipPipPip
  • 665 Bài viết
Điểm đánh giá: 312 (khá)

Đã gửi 01 November 2016 - 03:18 PM

 

Command: ap
APPLOAD CRT_KT_CH.fas successfully loaded.
 
 
Command:
:: Create TEXT from Library | © QuocManh04tt 2016 - www.CadViet.com ::
:: Type "CRT" to Invoke ::
Command:
Command: CRT
Lib-str10
 
Error: bad argument type: streamp nil
Command:
 
 
Bác hôm nay khó ở ah, nó hiện lên cái bảng đó rồi out luôn :|

 

Sr... Hề hề nhầm tý! Tải lại xem...


  • 0

#29 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 03:34 PM

@ Quocmanh Mình thử chọn text trong bảng rồi ấn OK thì nó thoát chương trình luôn 


  • 0

#30 quocmanh04tt

quocmanh04tt

    biết lệnh imageclip

  • Members
  • PipPipPipPipPipPipPip
  • 665 Bài viết
Điểm đánh giá: 312 (khá)

Đã gửi 01 November 2016 - 03:42 PM

Ở dưới dòng command nó báo gì không?


  • 0

#31 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 03:45 PM

Command:
CRT
 
Specify point to insert text [R/O/</>/+/-/S]:
:: Create TEXT from Library | © QuocManh04tt-CadViet.com.

  • 0

#32 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 03:48 PM

 

Command:
CRT
 
Specify point to insert text [R/O/</>/+/-/S]:
:: Create TEXT from Library | © QuocManh04tt-CadViet.com.

 

Chỉ thông báo thế thôi rồi out luôn


  • 0

#33 quocmanh04tt

quocmanh04tt

    biết lệnh imageclip

  • Members
  • PipPipPipPipPipPipPip
  • 665 Bài viết
Điểm đánh giá: 312 (khá)

Đã gửi 01 November 2016 - 03:51 PM

 

Command:
CRT
 
Specify point to insert text [R/O/</>/+/-/S]:
:: Create TEXT from Library | © QuocManh04tt-CadViet.com.

 

Uh, thế này thì khó tìm lỗi đây...! (trên máy của mình thì nó chạy ngon hơn cả clip ở trên) :D

Bạn thử làm theo hình dưới xem sao (Allow):

K0GrPz.jpg


  • 2

#34 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 03:57 PM

@QuocManh ... Đã thử theo các trên và vẫn không được!


  • 0

#35 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 04:00 PM

@QuocManh, mình load lại lisp, test lại thì ok, nhưng sau mỗi lần insert thì phải dùng lệnh "Re" thì mới insert đc tiếp.


  • 0

#36 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5678 Bài viết
Điểm đánh giá: 2605 (tuyệt vời)

Đã gửi 01 November 2016 - 04:12 PM

Bản thân ket suy nghĩ mãi chưa ra lý do để sử dụng lisp này, mặc dù bác quocmanh đã rất kỳ công cho nó. Làm hẳn 1 tool pallette cho nó có phải nhàn hơn không :D


  • 1

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#37 quocmanh04tt

quocmanh04tt

    biết lệnh imageclip

  • Members
  • PipPipPipPipPipPipPip
  • 665 Bài viết
Điểm đánh giá: 312 (khá)

Đã gửi 01 November 2016 - 04:18 PM

Bản thân ket suy nghĩ mãi chưa ra lý do để sử dụng lisp này, mặc dù bác quocmanh đã rất kỳ công cho nó. Làm hẳn 1 tool pallette cho nó có phải nhàn hơn không :D

Luyện công thôi Ket! :D 


  • 0

#38 Bee

Bee

    biết lệnh array

  • Members
  • PipPipPip
  • 189 Bài viết
Điểm đánh giá: 64 (tàm tạm)

Đã gửi 01 November 2016 - 04:22 PM

Bản thân ket suy nghĩ mãi chưa ra lý do để sử dụng lisp này, mặc dù bác quocmanh đã rất kỳ công cho nó. Làm hẳn 1 tool pallette cho nó có phải nhàn hơn không :D

Không có ý chê bai lisp, nhưng mình cũng cùng suy nghĩ về lisp này. Giả dụ hệ thống string đồ sộ, cái công sức ngồi chọn loại ra tên string cũng kỳ công ko kém. Chậm hơn là copy text và ngồi gõ. Nhanh hơn chút là đặt tính năng gõ tắt cho unikey với khoảng 10 từ hay gõ nhất. Heizz 


  • 0

#39 conghoa

conghoa

    biết lệnh attdef

  • Members
  • PipPipPipPipPipPip
  • 411 Bài viết
Điểm đánh giá: 88 (tàm tạm)

Đã gửi 01 November 2016 - 04:29 PM

Tặng bác quocmanh cái này để "luyện công"

 

Lisp này thiết tính năng lưu trữ file trực tiếp, cũng như ko hỗ trợ tiếng việt

 

http://www.mediafire.../TextInsert.rar

TextTools98.pngtextinsert9-4.png


  • 1

#40 quocmanh04tt

quocmanh04tt

    biết lệnh imageclip

  • Members
  • PipPipPipPipPipPipPip
  • 665 Bài viết
Điểm đánh giá: 312 (khá)

Đã gửi 01 November 2016 - 04:45 PM

Tặng bác quocmanh cái này để "luyện công"

 

Lisp này thiết tính năng lưu trữ file trực tiếp, cũng như ko hỗ trợ tiếng việt

 

http://www.mediafire.../TextInsert.rar

 

Thanks! Lsp đồ sộ quá!

 

Không có ý chê bai lisp, nhưng mình cũng cùng suy nghĩ về lisp này. Giả dụ hệ thống string đồ sộ, cái công sức ngồi chọn loại ra tên string cũng kỳ công ko kém. Chậm hơn là copy text và ngồi gõ. Nhanh hơn chút là đặt tính năng gõ tắt cho unikey với khoảng 10 từ hay gõ nhất. Heizz 

 

Với mỗi lần chỉ 1 dòng string thì chậm, nếu phân loại thành từng khối text để chèn cả cụm thì có phần nào an ủi. Và có thể phân loại Library... (ngoài ra prop của text được ghi nhớ khi chèn lần tiếp theo). Xây dựng thư viện 1 lần và dùng mãi mãi...

myCbaf.jpg


  • 1