Lỗi LISP trong CAD 2010

[hdg2318 31]

các bạn choi hỏi, lisp này bị sao mà không dùng được trong CAD2010, trong khi trong CAD2008 vẫn dung bình thường

(defun c:fr()
 (graphscr)
 (setvar "Cmdecho" 0)
 (Princ "FILLET\n")
 (command "_.Fillet" "_mUltiple" "_Radius")
 (setvar "Cmdecho" 1)
 (princ)
 )

 

CAD08 :

gõ lệnh fr --> nhập bán kính --> chọn 2 đối tượng là line giao nhau cần bo tròn góc

 

CAD10:

gõ lệnh fr--> nhập bán kính --> thoát lệnh.

 

vậy là sao hả mọi người. Xin được chỉ giáo.

[thiep 365]

các bạn choi hỏi, lisp này bị sao mà không dùng được trong CAD2010, trong khi trong CAD2008 vẫn dung bình thường

(defun c:fr()
 (graphscr)
 (setvar "Cmdecho" 0)
 (Princ "FILLET\n")
 (command "_.Fillet" "_mUltiple" "_Radius")
 (setvar "Cmdecho" 1)
 (princ)
 )

 

CAD08 :

gõ lệnh fr --> nhập bán kính --> chọn 2 đối tượng là line giao nhau cần bo tròn góc

 

CAD10:

gõ lệnh fr--> nhập bán kính --> thoát lệnh.

 

vậy là sao hả mọi người. Xin được chỉ giáo.

Sau hàng (Princ "FILLET\n")

Bạn sửa lại như sau:

(setvar "filletrad" (getreal "\nRadius: "))

(command "_.Fillet" "_mUltiple" pause pause)

[hdg2318 31]

OK men, đã giải quyết xong vấn đề, thanks bạn nha.

[hdg2318 31]

OK men, đã giải quyết xong vấn đề, thanks bạn nha.