wblock 도면분리용

(defun c:3w()
  (setq 3w_obj (ssget));;end setq
  (command “wblock” “d:\wb\1” “Y” “” “0,0,0” 3w_obj “”)
  (command “oops”)
  (princ “nn >>> Write Blocks complete…”)
);;end defun

wblock 자동 저장이라구해서 어느 분이 올려주신건데..여기
저장할때 d드라이브 wb라는 폴더에 도면이름이 1이라구 해서 저장하게 돼있는데
여기부분에 도면이름을 직접 써주게 할수는 없을까요???

한 도면에 여러게 아이템이 있는데 거기 파일명을 부재 마크에 맞게 써줘야돼가지구..ㅠㅠ

도와주세요…^^

즐거운하루돼세요~~