thiếu font simple.shx

[duanhuudo 2]

sao tôi tải font simple.shx không được mọi người giúp tôi 

[duyanh1186 0]

Mọi người xem giúp tại sao mình không đọc được

Có phải lỗi tại thiếu font không ạ, cách sửa lỗi như thế nào ạ

Sao mình không up đươc trong khi đã chọn file đính kèm rồi nhỉ mọi người

https://www.mediafire.com/?uaymjuyumfm0u6l

[duyanh1186 0]

XIn hỏi mọi người có cách nào convert cái font vns.shx sang dạng khác để đọc được không ạ, ví dụ Timenewroman chẳng hạn

[duyanh1186 0]

Hic... :mellow:

[pphung183 428]

Thấy bạn quan tâm nó quá thì dùng thử cái này, muốn thay font ji thì tùy bạn, lisp này tôi đang để font VNI-Helve-Condense :)

(defun c:FIXS (/) (c:FIXSTYLE))
(defun c:fixstyle (/ cmd OLD CO ST NEWHT TEMP OLDHT NEWWID)
(command "undo" "be")
(setq cmd (getvar "cmdecho")) (setvar "cmdecho" 0)
(command "_.-STYLE" "VNIHC" "VNI-Helve-Condense" "0" "0.75" "0" "N" "N") ;Neu font shx thi co duoi shx
(setq OLD (ssget '((-4 . "<OR") (0 . "TEXT") (0 . "MTEXT") (-4 . "OR>"))))
(if OLD
(progn
(setq ST (getvar "textstyle"))
(if (tblsearch "style" ST)
(progn (setq NEWHT (assoc 40 (tblsearch "style" ST)))
(if (not (> (cdr NEWHT) 0))
(progn (prompt "\n The style you have chosen has a preset height of 0.")
(prompt "\n The existing height of the text will be maintained.")
)
)
(setq CO 0)
(while (< CO (sslength OLD))
(progn (setq TEMP (entget (ssname OLD CO))
CO (1+ CO)
)
(if (or (= "TEXT" (cdr (assoc 0 TEMP))) (= "MTEXT" (cdr (assoc 0 TEMP))))
(progn (setq OLDHT (assoc 40 TEMP))
(setq NEWWID (assoc 41 (tblsearch "style" ST))
NEWHT (assoc 40 (tblsearch "style" ST))
)
(if (= (cdr NEWHT) 0.0)
(setq NEWHT OLDHT)
)
(setq TEMP (subst (cons 7 ST) (assoc 7 TEMP) TEMP))
(setq TEMP (subst NEWWID (assoc 41 TEMP) TEMP))
(setq TEMP (subst NEWHT (assoc 40 TEMP) TEMP))
(entmod TEMP)
)
)
)
)
)
)
)
(prompt "\n Next time select a text style that exists.")
) (setvar "cmdecho" cmd)
(command "undo" "e")
(princ))

[duyanh1186 0]

 

Thấy bạn quan tâm nó quá thì dùng thử cái này, muốn thay font ji thì tùy bạn, lisp này tôi đang để font VNI-Helve-Condense :)

(defun c:FIXS (/) (c:FIXSTYLE))
(defun c:fixstyle (/ cmd OLD CO ST NEWHT TEMP OLDHT NEWWID)
(command "undo" "be")
(setq cmd (getvar "cmdecho")) (setvar "cmdecho" 0)
(command "_.-STYLE" "VNIHC" "VNI-Helve-Condense" "0" "0.75" "0" "N" "N") ;Neu font shx thi co duoi shx
(setq OLD (ssget '((-4 . "<OR") (0 . "TEXT") (0 . "MTEXT") (-4 . "OR>"))))
(if OLD
(progn
(setq ST (getvar "textstyle"))
(if (tblsearch "style" ST)
(progn (setq NEWHT (assoc 40 (tblsearch "style" ST)))
(if (not (> (cdr NEWHT) 0))
(progn (prompt "\n The style you have chosen has a preset height of 0.")
(prompt "\n The existing height of the text will be maintained.")
)
)
(setq CO 0)
(while (< CO (sslength OLD))
(progn (setq TEMP (entget (ssname OLD CO))
CO (1+ CO)
)
(if (or (= "TEXT" (cdr (assoc 0 TEMP))) (= "MTEXT" (cdr (assoc 0 TEMP))))
(progn (setq OLDHT (assoc 40 TEMP))
(setq NEWWID (assoc 41 (tblsearch "style" ST))
NEWHT (assoc 40 (tblsearch "style" ST))
)
(if (= (cdr NEWHT) 0.0)
(setq NEWHT OLDHT)
)
(setq TEMP (subst (cons 7 ST) (assoc 7 TEMP) TEMP))
(setq TEMP (subst NEWWID (assoc 41 TEMP) TEMP))
(setq TEMP (subst NEWHT (assoc 40 TEMP) TEMP))
(entmod TEMP)
)
)
)
)
)
)
)
(prompt "\n Next time select a text style that exists.")
) (setvar "cmdecho" cmd)
(command "undo" "e")
(princ))

Thanks bác

tuy nhiên tui ap/ load lisp xong rồi mà vẫn không dc.

tui lam như sau st/ trong styles STANDARD, chọn font name VNI-Helve-condense/apply. Nhưng cũng không đọc được

Hay tui hiểu sai ý bác

[pphung183 428]

Dòng (command "_.-STYLE" "VNIHC" "VNI-Helve-Condense" "0" "0.75" "0" "N" "N")  thay bằng

(command "_.-STYLE" "VNIHC" "Times New Roman" "0" "0.75" "0" "N" "N")  là theo ý bạn rồi còn ji :blink:

[duyanh1186 0]

HI all

Vấn đề của tui như này ạ

Tui có bản vẽ ttps://www.mediafir...uaymjuyumfm0u6l, không đọc được, nghi thiếu font

text của nó có styles là vns; vào ST thấy font name ghi vns.shx nhưng phần font style ẩn đi( mờ)

lên down font về copy các kiểu vào win, cad-----> vấn k được :unsure:

 

Lên cầu cứu và đượ 01 em lips

ap cái lisp đó lên, st/ trong styles VNS, chọn font name VNI-Helve-condense/apply. Nhưng cũng không đọc được ----> hông đọc được

 

Lên cầu cứu tiếp

về mở lisp ra, không thấy dòng nào (command "_.-STYLE" "VNIHC" "Times New Roman" "0" "0.75" "0" "N" "N")  là theo ý bạn rồi còn ji  :blink:

 

Liền thay VNI-Helve-condense thành Times New Roman, save vào và AP lại lips, 

sau đó vào ST/ VNS đổi font name thành Times New Roman cũng không được

 

Hị hị, bó tay toàn tập luôn

 

Cao nhân chỉ giáo cho chót chứ tại mỗ bã đậu lắm

[alodutfc 0]

CÁM ƠN NHIỀU NHÉ

[hjcu9x 0]

e copy font vào file hệ thống mà thấy thông báo như này,các bác chí giúp em.

[pphung183 428]

e copy font vào file hệ thống mà thấy thông báo như này,các bác chí giúp em.

Tôi nhớ không nhầm là các font *.shx phải copy vào thư mục Font của phần mềm AutoCad mà bạn cài đặt :)

[hjcu9x 0]

Tôi nhớ không nhầm là các font *.shx phải copy vào thư mục Font của phần mềm AutoCad mà bạn cài đặt :)

cảm ơn pphung183,e nhầm lẫn chỗ này,nhưng sau khi copy vào file font của cad vẫn không được :(( dùng cả cách tool->op->file load vào support cũng thế :((.

[trenmoineoduong 0]

Đây bạn : http://www.cadviet.com/upfiles/VNSIMPLE.shx

sao không thấy đâu nhỉ?

[vansonpz 0]

sao cai font vnsimple minh ko dowload duoc. giup minh voi

[Đình Phương 0]

Mình cũng không hiểu tại sao Font txt.shx không có tác dụng gì cả trong bản vẽ. Có ai biết thì giải thích giùm nhé.

Riêng Font vnsimple.shx và font vntime.shx thì OK.

Bản vẽ của bạn upload vẫn sử dụng được với font vnsimple.shx và font vntime.shx

Font vnsimple.shx đã upload cho bạn ở trên rồi. Còn Font vntime.shx thì đây : http://www.cadviet.com/upfiles/vnsimpleshx_.rar

http://www.cadviet.vn/caddata/?act=download41#http://www.cadviet.com/upfiles/VNSIMPLE.shxanh ơi sao link này em load k được vậy ạ?