출력관련 리습입니다.

사각폴리곤을 도면폼에 깔아주면 일괄 출력을 할 수 있도록 만든 리습입니다. MB() 함수명령을 사용하여 폴리곤을 씌우고 PX(),XPLOT()으로 출력하도록 만들었습니다. 실무에 쓰시면 다양한 용도로 활용가능할 겁니다.
사용자환경에 따라 앞의 CTB,PRINTER 등의 코드라인을 수정해줘야 하는데
대화창등을 사용하여 편리하게 선택하는 방법을 찾아보았으나 ARX,VB외에 LISP으로는 해결방법을 잘 모르겠더군요.