먼저 fas빠르다는 이야기는 들은 적이 있는것 같은데...
확실하지 않아서 한번 테스트를 해보았습니다.
먼저 테스트 하기 위해서 리습구문을 만들었습니다.
퍼지를 실행하고 리젠을 실행하는 구문을 100번을 반복시켜 보았습니다.
(defun c:test (/ AcDoc sTime eTime Time)
(setq AcDoc (vla-get-activedocument (vlax-get-acad-object))) (setq sTime (rtos (getvar "cdate") 2 8)) (repeat 100 (vla-purgeall AcDoc)(vla-regen AcDoc acallviewports)) (setq eTime (rtos (getvar "cdate") 2 8)) (setq Time (- (atof eTime)(atof sTime))) (princ (strcat "시작시간 : " sTime "종료시간 : " eTime "소요시간 : "(rtos Time 2 8))) (princ) ) |
다음에는 fas 파일과 VLX 파일을 제작하였습니다.
그리고 fas파일 로딩하여 명령어 실행하고 결과를 보고 VLX 파일을 로딩하여 명령어를 실행하고
이것을 번갈아 가면서 3번을 반복하였습니다.
그 결과는
Command: ap
APPLOAD TTTT.fas successfully loaded.
Command: test
Command: 시작시간 : 20100825.20241935종료시간 : 20100825.20245138소요시간 : 0.00003203
Command: ap
APPLOAD TTTT.VLX successfully loaded.
Command: test
Command: 시작시간 : 20100825.20263352종료시간 : 20100825.20270572소요시간 : 0.00007220
Command: ap
APPLOAD TTTT.fas successfully loaded.
Command: test
Command: 시작시간 : 20100825.20323432종료시간 : 20100825.20330689소요시간 : 0.00007257
Command: ap
APPLOAD TTTT.VLX successfully loaded.
Command: test
Command: 시작시간 : 20100825.20344582종료시간 : 20100825.20352007소요시간 : 0.00007425
Command: ap
APPLOAD TTTT.fas successfully loaded.
Command: test
Command: 시작시간 : 20100825.20363646종료시간 : 20100825.20370788소요시간 : 0.00007142
Command: ap
APPLOAD TTTT.VLX successfully loaded.
Command: test
Command: 시작시간 : 20100825.20382265종료시간 : 20100825.20385557소요시간 : 0.00003292
무엇이 빠른지 판단하여 보세요^^
'AutoCAD > AutoLisp' 카테고리의 다른 글
[XREF] Xref파일 Bind후에 Xref에서 off된 레이어 삭제 (0) | 2011.05.15 |
---|---|
[LSP] 캐드바이러스(acad.lsp, acaddoc.lsp...) 삭제구문 (0) | 2011.05.12 |
[PLOT] vla-GetLocaleMediaName 메써드를 이용한 용지이름 가져오기 (0) | 2011.05.12 |
[LISP] vla-AddPolyline 함수 사용에서 VerticesList에 대해서 ... (0) | 2011.05.12 |
Auto Lisp으로 자동으로 FAS 컴파일하기 (0) | 2011.05.12 |