원하는 경로에 읽어들인 data를 file로 저장하는 방법을 구합니다.

lisp을 이제 배우기 시작했는데
파일명까지는 원하는 이름으로 지정했는데
경로까지 원하는곳에 지정을 해주고 싶은데 아시는분 답변을 해주시면 감사하겠습니다.

(DEFUN FSAVE ()
(setq f_name (getstring “n 파일명을 입력하세요 : “))
(setq fdata (open (strcat “d:/data/” f_name “.txt”) “a”)) <=== 이곳처럼 항상 이곳에 저장을 안하고 내가 지정한 곳에 저장을 하고 싶거든요.
(setq shell_data (strcat (rtos id)”,” (rtos sl)”,” (rtos st)”,” (rtos th)”,” (rtos tp1)))
(princ (strcat “Item No : ” f_name) fdata)
(princ “nShell Data :” fdata)
(write-line shell_data fdata)
(close fdata)
(princ)
)