说明：  CAD的LISP语言,有源码,目的是在CAD中新建一个图层，并把它设为当前，在图中写出当前日期与名字
(CAD of the LISP language, have the source and purpose is to create a new layer in the CAD, and it set the current in the chart to write the current date and the name of)