리습에서 레이어를 자동생성하는 방법입니다.

[예제]
레이어명 = "2"
color  = "yellow"
line type = "hidden" 일때
   (if (tblsearch "layer" "1")(prompt "도면층이 이미 존재함");->red,center
       (command "layer" "n" "2" "c" "yeiiow" "2" "lt" "hidden" "2" "") )
tblsearch함수는 데이터베이스 내에서 다음에오는 항목을 검색해서 최초 항목을 나타 냅니다.
즉, 위에 내용 (tblsearch "layer" "1")은 "layer"중에 "1"이 (숫자 1 이 아니라 레이어 명 입니다) 
검색 해서 없으면 (존재하지 않으면) nil을 답하고 이미 존재하면 T를 답합니다.
그러므로 이미 존재하면 IF문에 참값인  "도면층이 이미 존재함"이라는 문구를 나타 냅니다.
그러나 존재 하지 않으면 다음 내용을 실행 합니다.
       (command "layer" "n" "2" "c" "yeiiow" "2" "lt" "hidden" "2" "")
이것은 단순히 명령어의 순서를 나열한것입니다.
 "Layer"명령어 실행해서 "New" 실행하고...등등
 위의 명령을 실행시키면 아래와 같습니다.
 Command: (command "layer" "n" "2" "c" "yellow" "2" "lt" "hidden" "2" "")
를 실행하시면
 
layer
Current layer:  "0"
Enter an option
[?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/Unlock/stAte]: n  
Enter name list for new layer(s): 2
Layer "2" already exists.
Enter an option
[?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/Unlock/stAte]: c
New color [Truecolor/COlorbook] <7 (white)>: yellow
Enter name list of layer(s) for color 2 (yellow) <0>: 2 Enter an option
[?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/Unlock/stAte]: lt
Enter loaded linetype name or [?] <Continuous>: hidden
Enter name list of layer(s) for linetype "hidden" <0>: 2 Enter an option
[?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/Unlock/stAte]:
Command: nil
 
그러면 Command: 상에서 "layer" 명령어를 치면 대화상자가나오는데 어떻게
명령어 순서를 알수있냐고 하신다면
다음고 같이 하시면 됩니다.
command : (command "layer") 그리고 [Enter]....
추신 : 다른사람이 작성한도면이 같은 레이어 가 있다면 레이어가 중복되서 엉뚱하게 나올수 있습니다.
           그래서 저는 new보다는 make를 선호하는편....
           같은 레이어에 라인타입이나 색이 다를경우 다시레이어를 수정하는것도 괜찮겠죠.