尊敬的先生:
Thx用于建议
(我用lisp写得很差)
我开始写代码
-
- (setq s1 (menucmd "M=$(edtime, $(getvar,date),DDDD)")
- TM (menucmd "M=$(edtime, $(getvar,date),hh:mm:ss)")
- DAY (menucmd "M=$(edtime, $(getvar,date),DD)")
- MO (menucmd "M=$(edtime, $(getvar,date),MOnth)")
- YR (menucmd "M=$(edtime, $(getvar,date),yyyy)")
- DN (STRCAT (getvar "dwgprefix") (getvar "dwgname"))
- DATE (strcat S1 ", " MO " " DAY ", " YR " " TM " - " DN))
|