viết text theo đường cong

[sumi 55]

mình đang use cad 2007,hôm trước mình có dùng lệnh viết text theo 1 đường cong,nhưng sao jờ lại ko viềt được,cad báo unknown,bó tay lun,

ai bit why thì làm ơn júp mình với

thanks

:)

[interwar1283 216]

mình đang use cad 2007,hôm trước mình có dùng lệnh viết text theo 1 đường cong,nhưng sao jờ lại ko viềt được,cad báo unknown,bó tay lun,

ai bit why thì làm ơn júp mình với

thanks

:)

unknown gì ? bạn ấn F2 xem nó báo những gì?

[pikeman286 244]

mình đang use cad 2007,hôm trước mình có dùng lệnh viết text theo 1 đường cong,nhưng sao jờ lại ko viềt được,cad báo unknown,bó tay lun,

ai bit why thì làm ơn júp mình với

thanks

:)

Lệnh bạn đang dùng là lệnh gì?Nói rõ hơn được không?

[sumi 55]

cad báo :Unknown command "LL". Press F1 for help.

mình sử dụng lệnh "arctext" ,ko bit có phải minh gỏ sai lệnh ko,nhưmh lúc mới install cad mình vẫn use dc

[interwar1283 216]

cad báo :Unknown command "LL". Press F1 for help.

mình sử dụng lệnh "arctext" ,ko bit có phải minh gỏ sai lệnh ko,nhưmh lúc mới install cad mình vẫn use dc

Bạn dùng lệnh tắt là LL cho lệnh arctext ah. bạn có dùng Lisp gì không, hay sửa lệnh sai ?

[thoclep 143]

mình đang use cad 2007,hôm trước mình có dùng lệnh viết text theo 1 đường cong,nhưng sao jờ lại ko viềt được,cad báo unknown,bó tay lun,

ai bit why thì làm ơn júp mình với

thanks

:)

Bạn những bước sau:

- Bạn vào aliasedit kiểm tra xem lệnh ll bạn đặt còn không?Không còn => đặt lại. Còn, cad của bạn bị lỗi.Bạn tắt cad đi, khởi động lại rồi vào open mở file bv của bạn=>sử dụng lệnh trên=>Vẫn lỗi. Cad của bạn bị lỗi, nên cài lại. OK

Mình dùng cad5, hay bị như bạn (nguyên nhân do máy bị nhiểm virus) rồi cũng làm như trên và đều ok. Chúc bạn thành công!

[sumi 55]

Bạn dùng lệnh tắt là LL cho lệnh arctext ah. bạn có dùng Lisp gì không, hay sửa lệnh sai ?

mình đã bỏ lệnh tắt rùi và dùng lệnh ARCTEXT nhưng vẫn ko dc,bó tay lun,chắc là nó bị lỗi như bạn THOCLEP nói rùi,

cảm ơn các bạn đã chia sẻ,mình đang cần lệnh này thì nó lai bị lỗi,bó tay lun

ko bit mình có thể sử dụng lisp ko nhỉ

[minh2453 42]

Cái này là do em sưu tập đc, chứ ko viết đc đâu.Thử xem thế nào

(defun C:CT(/ str cen rd len cnt angl deltal deltat deltax tx)
(setvar "cmdecho" 0)
(setq str(getstring T "\n \n \nString: ")
      cen(getpoint "\nCenter of Circle: ")
rd(getdist cen "\nRadius of Circle: ")
      len(strlen str)
      cnt 1
      angl(* pi (/ (-(+ 90.0 (* 10.0 (/ len 2.0))) 5.0)180.0))
)
(setq deltal 10.0 deltat (/ pi 2.0) deltax 0)
(initget 1 "T t B b")
(setq tb(strcase(getkword "\nText at Top or Bottom of Circle? T/B: ")))
(if(= tb "B")
 (setq deltal -10.0
deltat(- deltat(- deltat deltat))
  angl(+ angl(/ pi 2.0))
  angl(+ angl(* pi (/ 10.0 180.0)))
deltax pi
 )
)
(repeat len
 (progn
  (setq tx(substr str cnt 1))
  (command "text" "J" "MC" (polar cen angl rd) "" (angtos(+ deltax(- angl deltat))1 4) tx)
  (setq angl(- angl(* pi (/ deltal 180.0))) cnt(+ cnt 1))
 )
)
(setvar "cmdecho" 1)
(princ)
)