auotcad lisp 自動歸類圖層

(CClay "DIM標註" 3 "DIMENSION")　;; 這句表示:將DIMENSION標注 物件歸類到 3 綠色 ，圖層 DIM
(CClay "Text" 1 "Text");; 這句表示:將 Text單行文字 物件歸類到 1 紅色 ， 圖層 Text
(CClay "MText" 1 "Mtext");; 這句表示:將 MText多行文字 物件歸類到 1 紅色 ， 圖層 MText
(CClay "Dim標註" 3 "Leader");; 這句表示:將 Leader引線 物件歸類到 3 綠色 ， 圖層 Dim
(CClay "Hatch填充線" 55 "Hatch");; 這句表示:將 Hatch填充線 物件歸類到 55 褐色 ， 圖層 Hatch填充線(Auotcad LISP automatically classifies layers
(CClay, "DIM", "3", "DIMENSION"); the phrase "DIMENSION callout objects are categorized into 3 green", "layer DIM"
(CClay, "Text", "1", "Text"); this means: "Text single line text objects are categorized into 1 red, layer Text."
(CClay, "MText", "1", "Mtext"); the phrase "MText multiline text objects are categorized into 1 red", "layer MText"
(CClay, "Dim", "3", "Leader"); the phrase "Leader lead objects" are classified into 3 "green" and "layer Dim"
(CClay, "Hatch", "filling line", "55", "Hatch"); the phrase "Hatch fill line objects" is classified into 55 "Brown", "layer", "Hatch" filling lines)