lisp 字体相关组码

1 红色 2黄色 3绿色 4青色 5蓝色 6洋红色 7 白色
对于mtext，控制文字的对齐格式可以使用以下组码：
(71 . 1) 左对齐-上对齐 这个是默认的对齐方式
(71 . 4) 左对齐-中央对齐
(71 . 7) 左对齐-下对齐
(71 . 2) 居中对齐-上对齐
(71 . 5) 居中对齐-中央对齐
(71 . 8) 居中对齐-下对齐
(71 . 3) 右对齐-上对齐
(71 . 6) 右对齐-中央对齐
(71 . 9) 右对齐-下对齐

(entmake
    (list
      '(0 . "TEXT")
      '(8 . "自然幢编号");图层
      (cons 10 p1);坐标
      (cons 1 bklx);文字内容
      '(40 . 0.3);字体高度
      '(41 . 0.8);字体比例
    '(7 . "HZ");字体颜色
      '(62 . 7);字体颜色1 红色 2黄色 3绿色 4青色 5蓝色 6洋红色 7 白色

'(62 . 4)
    )
  )