Chuyển đến nội dung
Diễn đàn CADViet

Bee

Thành viên
 Xem Hồ Sơ  Xem hoạt động của họ

  • Số lượng nội dung

    553

  • Đã tham gia

  • Lần ghé thăm cuối

  • Ngày trúng

    37

Bài đăng được đăng bởi Bee

  1. Đã đăng · Trả lời báo cáo

    Ồ không phải vậy.

    Trong AutoCad thì load *.fas và *.vlx là OK nên chuyển qua *.fas hoặc *.vlx là OK rồi.

    Nhưng trong ProgeCad thì không load được file *.fas và *.vlx mà chỉ load được *.lsp

    Tôi cần convert lsp tường minh sang lsp mã hóa, nghe nói bằng phần mềm protected.exe gì đó, nghĩa là nó vẫn *.lsp nhưng bị mã hóa. 

    Cái này search là ra mà bác. Dùng trên x32 thôi. Bác sài thử nhé, chứ em ko dùng ^_^

     

    https://drive.google.com/file/d/0B-3fZ45DSr_XNTc3aDJGSU5iNWc/view?usp=sharing

  2. Đã đăng · Trả lời báo cáo

    Ai có phần mềm chuyển lisp sang protected lisp và ngược lại, cho xin với.

    Trên topic này down bị lỗi. Các web khác cũng rắc rối.

    Lý do xin: tôi đang test lisp trên ProgeCad, mà progecad thì không load được file *.fas và *.vlx, nên cần file *.lsp (được bảo vệ)

    Theo em được biết thì chưa phá được fas hoặc vlx to lisp. Có vài phần mềm convert nhưng chỉ để xem khoảng 50% và không có định dạng lisp còn lại thì ....^_^

    Lisp to fas, vlx thì combine trong visualisp editor thôi bác. 

  4. Đã đăng · Trả lời báo cáo

    http://www.cadviet.com/upfiles/7/4301_tudien.lsp

    http://www.cadviet.com/upfiles/7/4301_tmp.txt

    http://www.cadviet.com/upfiles/7/4301_abc.txt

    Bạn lưu các file này vào d:\tudien

    - file tudien.lsp có các lệnh 

    THAYTV dùng để thi hành lệnh chính

    lệnh này dùng phù hợp với font unicode, nếu dung TCVN3 có thể không hiển thị đúng nội dung 

    GHINOIDUNG dùng để lấy các dòng nội dung ra file tmp.txt

    - file abc.txt có cấu trúc nguồn - đích với nguồn "tab" đích (cách nhau = phím tab), hết dòng cuối cùng chỉ có 1 dòng enter

    - file tmp.txt để lấy nội dung dán vào abc.txt nếu bạn muốn thêm nội dung vào từ điển

    Thanks,

    nhưng file txt này mà làm từ điển thì hơi mệt. Bạn chuyển qua file từ điển excel thì bổ sung từ điển thuận tiện hơn được không ! 

  7. Đã đăng · Trả lời báo cáo

    Xa rời () cũng hơn 10 năm rồi. Giờ đầu óc toàn bỉm sữa tã thôi bác ạ. Giờ đụng chuyện mới cần triển khai Lisp cho nó nhanh.

    Chậc chậc đối xử lisp thế là ko đc rồi. Bth thì bỏ rơi nó, đến lúc cần mới chạy long sòng sọc. Heizz. Kiểu này khi làm tướng là đối xử với quân ko công bằng roài. Thi thoảng vào free vài cái lisp cho bọn trẻ con dùng để nhớ nó tí.

    Dầu sao cũng quick tí đỡ bùn vậy

    (defun c:test ()
  (if (setq ss (ssget '((0 . "TEXT"))))
    (progn
      (setq n 0)
      (repeat (sslength ss)
	(setq value (cdr (assoc 1 (entget (ssname ss n)))))
	(setq char (substr value 1 2))
	(cond
	  ((or (= char "L=") (= char "l="))
	   (entmod (subst (cons 8 "Length") (assoc 8 (entget (ssname ss n)))))
	   )
	  ((or (= char "Q=") (= char "q="))
	   (entmod (subst (cons 8 "Flow") (assoc 8 (entget (ssname ss n)))))
	   )
	  ((or (= char "H=") (= char "h="))
	   (entmod (subst (cons 8 "Elevation") (assoc 8 (entget (ssname ss n)))))
	   )
	  );cond
	(setq n (1+ n))
	);repeat
      )
    )
  (princ)
  )

    ^_^

    • Vote tăng 1

  8. Đã đăng · Trả lời báo cáo

    Lọc Text chứ không phải Test nhé bà con:

    Em đang triển khai WaterGEMS. Xuất file qua AutoCAD thì kết quả có nhiều thứ giống nhau nhưng lại nằm cùng trên 1 layer:

    L=1000m; L=200m;... Q=20l/s; Q=30l/s;... h=10m; h=20m những cái này đều nằm trên một layer.

    Em muốn tách các text này ra các layer khác nhau L, Q, h cho tiện quản lý.

    File bản vẽ đã tạo sẵn các layer: Length, Flow, Elevation ...

    Cần lisp lọc các đối tượng L=* rồi đưa vào layer Length; Q=* đưa vào layer Flow; h=* đưa vào layer Elevation.

    Em đã dùng lệnh FI thần thánh rồi nhưng nhiều file giống nhau nên muốn làm nhanh.

    Cái này dễ mà, tưởng Nad SK không phải hỏi Lisp chứ nhỉ ^_^

    • Vote tăng 1

  9. Đã đăng · Trả lời báo cáo

    chắc không phải do máy yếu đâu anh ơi, vì máy cty em dùng làm đồ họa nên cấu hình cũng tương đối ok,

     

    em cũng từng thao tác với những bản xref khác có dung lượng còn lớn hơn như thế này.

     

    nhưng chưa gặp tình trạng nhưng trong file ở trên.

     

    mong anh nghiên cứu giùm xem còn nguyên nhân nào khác không.

    Mình thử trên mấy máy cùi cùi I5 ko vga card chạy vẫn phà phà không giật lác chút nào. Bạn thử khởi động lại máy tính và chỉ mở file này thôi xem thế nào.

  18. Đã đăng · Trả lời báo cáo

    Dạ đúng là có nhiều nhưng mà với kiểu file mà mình đính kèm trên mediafire thì không áp dụng được ạ. Bác xem có hướng giải quyết không ạ.?

    Bạn nên post trước và sau khi thực hiện lệnh. Nói chung chung thế mn vẫn chưa hiểu đâu. Mà chưa hiểu thì cũng ko tham gia được.

  19. Đã đăng · Trả lời báo cáo

    Nên thông cảm nhau bởi ai cũng quá rành nguyên lý. Xui mà chủ thớt rên: Tại sao em nhập string là "Tổng chiều dài 3 đoạn là 150.5m" mà kết quả lại là 3.

    Những câu hỏi kiểu này trả lời chán lắm.

    Hì bác Hạ toàn mớm ! Vì hỏi chung chung nên trả lời cũng chung chung như bác là chuẩn rồi. ^_^ Em chỉ lấy 1 ví dụ tham khảo mà chủ thớt like rồi nên thiết nghĩ finish thôi :D

    • Vote tăng 2

  25. Đã đăng · Trả lời báo cáo

    Chào các bạn!

    Mình là dân thi công các công trình hạ tầng kỹ thuật. Từ trước tới giờ toàn làm B', nay được lên làm B vui mừng quá mà cũng vất vả quá. Để giảm tải sự vất vả nay mình lên diễn đàn nhờ các bạn một chút. Đó là cho mình xin các bản vẽ lán trại mà các bạn có bằng autocad. Lán trại làm bằng tôn, làm bằng gạch xây, làm bằng container hay bất cứ lán nào mà các bạn đã thể thiện trên autocad. Tất nhiên là không cần diện tích lớn hơn 100m2 đâu vì mình làm công trình bé lắm.

    Chân thành cảm ơn các bạn nhé!

    Mình là Nam 32 tuổi (già rồi).

    Thi công điện, điện chiêu sáng, xây nhà, làm đường, trồng cây. :D

    Sđt: 0984.750.751

    Mail: nguyenvannam1503@gmail.com

    Xin file chắc là trá hình thôi ^_^ Search file là ra mà. 32 vẫn chưa già ! mình vẫn gọi e đc. ^_^

     

    Dù có hay chưa thì cũng có 1 cái search ra ngay đầu nên share, 

    https://drive.google.com/open?id=0ByeIZA9K1JEORk9nNWdmUjRIbW8

     

    Đóng góp tí về tinh thần chung sau khi hoàn thành nghĩa vụ 8/3. 

×