CAD LISP插入块

(setq lst (list (cons 0 "insert")
   (cons 2 "aaa");block name
   (cons 8 "0");layer
   (cons 10 (list 0 0));insert point
   (cons 41 1);x ratio
   (cons 42 1);y ratio
   (cons 43 1);z ratio
   (cons 50 0);rotate degree
   (cons 70 0);basic block
 ))
 (entmakex lst)