AutoLisp Thiet lap ban ve

[tdv 0]

Mình có một Cái Lisp thiết lập bản vẽ nhưng upload xong no báo lỗi ko chạy được. Có bác nào biết về AutoLisp kiểm tra giúp em với. Hic hic...

http://www.cadviet.com/upfiles/maubanvexaydung.lsp

thank nhìu........... :rolleyes:

[Nộ Thiên 133]

Mình có một Cái Lisp thiết lập bản vẽ nhưng upload xong no báo lỗi ko chạy được. Có bác nào biết về AutoLisp kiểm tra giúp em với. Hic hic...

http://www.cadviet.com/upfiles/maubanvexaydung.lsp

thank nhìu........... :rolleyes:

trời ạ! Một số dòng code "command" nó dài sòong sọc:

tiêu biểu dưới đây chỉ là 1 dòng "command" thôi đó.

	  (command	"Layer" "n" "Net manh" "c" "170" "Net manh" "lt" "continuous"  "Net manh" "lw" "0.15" "Net manh" ""  "Layer" "n" "Net khuat" "c" "6" "Net khuat" "lt" "Hidden" "Net khuat" "lw" "0.2" "Net khuat" ""	"Layer" "n" "Duong truc" "c" "2" "Duong truc" "lt"  "Acad_iso04w100" "Duong truc" "lw" "0.15"   "Duong truc" ""  "Layer" "n" "Kich thuoc" "c" "110" "Kich thuoc" "lt" "continuous"			   	"Kich thuoc"  "lw" "0.2" "Kich thuoc" ""  "Layer" "n" "Van ban" "c" "4" "Van ban" "lt" "continuous"  "Van ban" "lw" "0.25" "Van ban" ""  "Layer" "n" "Mat cat" "c" "3" "Mat cat" "lt" "continuous" "Mat cat" "lw" "0.15" "Mat cat" ""   "layer" "n" "Day dien" "c" "230" "Day dien" "lt"  "continuous" "Day dien" "lw" "0.2"  "Day dien" ""	  "layer" "n" "Ong nuoc" "c" "60" "Ong nuoc" "lt" "continuous" "Ong nuoc" "lw" "0.2"  "Ong nuoc" ""  "layer" "n" "Thep CL" "c" "240" "Thep CL" "lt" "continuous"  "Thep CL" "lw" "0.6"  "Thep CL" ""  "layer" "n" "Thep dai" "c" "30" "Thep dai" "lt" "continuous"  "Thep dai" "lw" "0.35"  "Thep dai" ""  "layer" "n" "Net dam" "c" "1" "Net dam" "lt" "continuous" "Net dam" "lw" "0.4"  "Net dam" ""	  "layer" "s" "Net dam" ""
)

Nói chung là phải tách những dòng code "command" quá dài ra thành nhiều dòng "command" khác nhau

và ngay cả 1 số dòng code "setq" nữa.

[tdv 0]

trời ạ! Một số dòng code "command" nó dài sòong sọc:

tiêu biểu dưới đây chỉ là 1 dòng "command" thôi đó.

	  (command	"Layer" "n" "Net manh" "c" "170" "Net manh" "lt" "continuous"  "Net manh" "lw" "0.15" "Net manh" ""  "Layer" "n" "Net khuat" "c" "6" "Net khuat" "lt" "Hidden" "Net khuat" "lw" "0.2" "Net khuat" ""	"Layer" "n" "Duong truc" "c" "2" "Duong truc" "lt"  "Acad_iso04w100" "Duong truc" "lw" "0.15"   "Duong truc" ""  "Layer" "n" "Kich thuoc" "c" "110" "Kich thuoc" "lt" "continuous"			   	"Kich thuoc"  "lw" "0.2" "Kich thuoc" ""  "Layer" "n" "Van ban" "c" "4" "Van ban" "lt" "continuous"  "Van ban" "lw" "0.25" "Van ban" ""  "Layer" "n" "Mat cat" "c" "3" "Mat cat" "lt" "continuous" "Mat cat" "lw" "0.15" "Mat cat" ""   "layer" "n" "Day dien" "c" "230" "Day dien" "lt"  "continuous" "Day dien" "lw" "0.2"  "Day dien" ""	  "layer" "n" "Ong nuoc" "c" "60" "Ong nuoc" "lt" "continuous" "Ong nuoc" "lw" "0.2"  "Ong nuoc" ""  "layer" "n" "Thep CL" "c" "240" "Thep CL" "lt" "continuous"  "Thep CL" "lw" "0.6"  "Thep CL" ""  "layer" "n" "Thep dai" "c" "30" "Thep dai" "lt" "continuous"  "Thep dai" "lw" "0.35"  "Thep dai" ""  "layer" "n" "Net dam" "c" "1" "Net dam" "lt" "continuous" "Net dam" "lw" "0.4"  "Net dam" ""	  "layer" "s" "Net dam" ""
)

Nói chung là phải tách những dòng code "command" quá dài ra thành nhiều dòng "command" khác nhau

và ngay cả 1 số dòng code "setq" nữa.

 

Em ko thạo cái này lắm, bác có thể tách hộ em và upload lại được ko? Thank Bác nhiều ..........