Chuyển đến nội dung
Diễn đàn CADViet
  • Thông báo

    • Nguyen Hoanh

      CADViet đã hoàn tất nâng cấp   14/09/2017

      Chào các bạn, CADViet đã hoàn tất việc nâng cấp lên phiên bản mới. Tất cả các chức năng đã hoạt động theo kỳ vọng của ban quản trị. Nếu có vấn đề gì cần phản hồi, các bản post ở đây nhé: Trân trọng, Nguyễn Hoành.
Đăng nhập để thực hiện theo  
anonmyous

Ngày giờ trong LISP

Các bài được khuyến nghị

Em muốn lấy ngày giờ hiện tại trong LISP, pác nào giúp em với

bạn lấy ngày giờ thông qua biến cdate.

 

Cách dùng biến này, hãy search từ cdate trên diễn đàn.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Dùng cdate sẽ nhận được một chuỗi số, sau đó phải xử lý thêm mới có được thời gian và ngày tháng theo ý muốn. Bạn có thể dùng cái này:

 

(menucmd "M=$(edtime,$(getvar,date),HH:MM:SS - DD/MO/YYYY)")

 

Kết quả return là một string dạng:

"11:17:20 - 15/08/2008"

 

Không cần cái nào thì bỏ bớt cái đó. Ngoài ra, bạn có thể định dạng kết quả giống như điều chỉnh Date/Time trong Control Panel của Windows vậy. Ví dụ:

(menucmd "M=$(edtime,$(getvar,date),DD-MON-YY)")

Return: "15-Aug-08"

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
Em muốn lấy ngày giờ hiện tại trong LISP, pác nào giúp em với

Đây là Lisp mình sưu tập được. Hy vọng đúng ý của bạn. Khi sử dụng lệnh sẽ cho kết quả là: Thứ-ngày/tháng/năm-Giờ/phút/giây. Chúc bạn thành công

Lệnh dùng là: TGV

http://www.cadviet.com/upfiles/tgv.vlx

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Đây là Lisp mình sưu tập được. Hy vọng đúng ý của bạn. Khi sử dụng lệnh sẽ cho kết quả là: Thứ-ngày/tháng/năm-Giờ/phút/giây. Chúc bạn thành công

Lệnh dùng là: TGV

http://www.cadviet.com/upfiles/tgv.vlx

Rất hay, tuy nhiên sao nó cứ dựng ngược lên nhỉ, hơi khó đọc, chỉnh năm ngang được thì tốt, chủ nhân vlx có lòng share file lsp không nhỉ?

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Rất hay, tuy nhiên sao nó cứ dựng ngược lên nhỉ, hơi khó đọc, chỉnh năm ngang được thì tốt, chủ nhân vlx có lòng share file lsp không nhỉ?

Bạn dùng kèm Lisp này với tgv.vlx là được


(defun c:tgve() (c:tgv) (vla-rotate (vlax-ename->vla-object (entlast))
(vlax-3d-point (cdr(assoc 10 (entget(entlast))))) (/ pi -2.0)))

Chủ Nhân tgv.vlx chưa xuất hiện trong topic này ^_^

Hồi xưa có lần mình nhớ có lần đọc cuốn lịch có chỉ ra công thức

Cho ngày tháng năm -> tính ra được ngày đó là thứ mấy trong tuần mà quên mất :blush:

Các bác có ai biết xin chỉ giúp ạ!

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Để làm j ạ bác ^^ Cái này bác sang bên các box VB thì nhiều lắm. CÒn lấy thứ của hôm nay thì bác sử dụng công thức Diesel bên trên với format "DDDD"

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Để làm j ạ bác ^^ Cái này bác sang bên các box VB thì nhiều lắm. CÒn lấy thứ của hôm nay thì bác sử dụng công thức Diesel bên trên với format "DDDD"

Làm xong cũng chẳng biết mình đang làm gì nữa, đầu óc mình dạo này có vấn đề hay sao ấy. :lol:

Mình muốn lấy thứ mấy trong tuần từ dữ liệu đầu vào là ngày, tháng, năm. Đọc các bài viết trên thì chỉ thấy là mới cho ra là ngày, tháng và năm, chưa có thứ ^ ^

Để mình hỏi bác GG. Cảm ơn bạn nhé.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Từ "TGV.VLX" cũng suy ra được thứ mấy trong tuần, bằng cách vặn đồng hồ lại đúng cái ngày đáng nhớ (mà bị quên thứ) ấy.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Từ "TGV.VLX" cũng suy ra được thứ mấy trong tuần, bằng cách vặn đồng hồ lại đúng cái ngày đáng nhớ (mà bị quên thứ) ấy.

He he ... Từ "TGV.VLX" ... thì nói làm gì bác..... :D

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay

Đăng nhập để thực hiện theo  

×