Đến nội dung


Hình ảnh

dùng lệnh battman chữ bi đảo ngược


  • Please log in to reply
6 replies to this topic

#1 minhtit

minhtit

    Chưa sử dụng CAD

  • Members
  • Pip
  • 4 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 22 December 2010 - 05:28 PM

chào các!
Số là, em sử dụng file cad của các bác thiết kế để làm việc. Khi copy block của các bác í đi và sử dụng lệnh battman để sửa chiều cao text nhưng khi nhấn nút sync thi chữ nghĩa bị đảo ngược hết.
Mong các bác chỉnh sư giúp. Em tìm mỏi mắt để sửa nó nhưng không được!
e không upload được chuyển cái nay vậy http://www.mediafire...6r5fn20we5wt41a
Thank các bác nhiều!

  • 0

#2 phamthanhbinh

phamthanhbinh

    biết lệnh adcenter

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

Đã gửi 22 December 2010 - 08:34 PM

chào các!
Số là, em sử dụng file cad của các bác thiết kế để làm việc. Khi copy block của các bác í đi và sử dụng lệnh battman để sửa chiều cao text nhưng khi nhấn nút sync thi chữ nghĩa bị đảo ngược hết.
Mong các bác chỉnh sư giúp. Em tìm mỏi mắt để sửa nó nhưng không được!
e không upload được chuyển cái nay vậy http://www.mediafire...6r5fn20we5wt41a
Thank các bác nhiều!

Hề hề hề
Vụ này là hoặc do bạn nhầm lẫn kich vào cái backward hoặc do các bác ấy cố tình đặt vậy khi tạo block thuộc tính rồi. Cái block này có tên là "*U3810" hoặc "*U1" .
Để đổi lại text cho đúng chiều bạn cần phải truy cập vào thông tin của thuộc tính và đổi mã dxf 71 của nó. Làm vậy khá mất công.
Cách tốt nhất là bạn hỏi lại các bác cho bạn cái bản vẽ để các bác ấy mách nước cho cách sửa bạn ạ.
Nếu bạn không gấp thì có thể chờ vài bữa, khi rảnh mình sẽ thử viết cái lisp xem sao. Tất nhiên đây là hạ sách bạn ạ. Hề hề hề...
  • 0
Chúc các quý Anh trên diễn đàn luôn khỏe, đẻ thêm được nhiều thứ để mót.

#3 minhtit

minhtit

    Chưa sử dụng CAD

  • Members
  • Pip
  • 4 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 23 December 2010 - 10:37 AM

em đang cần gấp bác ah`!
gặp mấy bác thiết kế chắc là không được rùi
Cảm ơn bác đã xem qua! Nếu bác giúp được em thì tốt quá!
Thank bác nhiều!
  • 0

#4 phamthanhbinh

phamthanhbinh

    biết lệnh adcenter

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

Đã gửi 23 December 2010 - 01:36 PM

em đang cần gấp bác ah`!
gặp mấy bác thiết kế chắc là không được rùi
Cảm ơn bác đã xem qua! Nếu bác giúp được em thì tốt quá!
Thank bác nhiều!

Chào bạn minhtit,
Bạn dùng thử cái này coi sao nhé.

(defun c:backtxt ()
(setq ss (ssget (list (cons 0 "insert") ))
n (sslength ss)
i 0
)
(while (< i n)
(setq en (ssname ss i))
(setq els (entget en))
;;;;(if (or (wcmatch (cdr (assoc 2 els)) "*U3810") (wcmatch (cdr (assoc 2 els)) "*U1"))
;;;;(progn
(setq en (entnext en))
(setq els (entget en))
(while (/= (cdr (assoc 0 els)) "SEQEND")
(setq els (subst (cons 71 2) (assoc 71 els) els))
(entmod els)
(setq en (entnext en))
(setq els (entget en))
)
;;;:leluoi:
;;;:undecided:
(setq i (1+ i))
)
(command "regen")
)


Do trên bản vẽ của bạn có những block cùng tên nhưng không bị ngược nên mình không thể dùng bài chơi một phát được. Bạn cần lưu ý khi chọn đối tượng nhé, chỉ chọn các đối tượng block có text bị ngược thôi kẻo lợn lành chữa thành lợn toi đó. Nên sử dụng phương pháp pick chọn cho nó khỏi bị nhầm. Phóng to hình lên để nhìn cho rõ và có thể dùng lệnh pan để di chuyển màn hình trong lúc chọn cho nó dễ bạn ạ.
Do bản vẽ của bạn khá nặng nên mỗi lần chạy lisp phải chờ nó regen lại bản vẽ khá lâu đó. Bạn có thể copy thành các file nhỏ hơn cho dễ sửa rồi sau đó ghép lại cũng được

Chúc bạn vui.
À mà do đây là các block động nên ở mỗi bản vẽ nó lại có một tên khác đó bạn nhé. (cái tên "*U3810" chỉ đúng với bản vẽ bạn đã post lên, khi copy sang bản vẽ khác là nó lại mang tên khác ngay, bạn chớ có ngạc nhiên)
  • 1
Chúc các quý Anh trên diễn đàn luôn khỏe, đẻ thêm được nhiều thứ để mót.

#5 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 23 December 2010 - 02:29 PM

Vấn đề text ngược trong block đã có1 topic bó tay r,hok biết ở topic này bác Bình có làm "dạng ranh" đội ngủ nhiệt huyết cadviet hay hok ^^
  • 0

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


#6 minhtit

minhtit

    Chưa sử dụng CAD

  • Members
  • Pip
  • 4 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 29 December 2010 - 09:50 PM

thank bác Bình!
e down về dùng xem the nào.
làm nhiều biết nhiều
không làm làm sao biết! :D
  • 0

#7 thanhtranle

thanhtranle

    biết vẽ ellipse

  • Members
  • PipPip
  • 54 Bài viết
Điểm đánh giá: 7 (bình thường)

Đã gửi 31 October 2011 - 11:12 AM

các pác sửa dc chưa ah?
  • 0