Worked on main functions, added close-file to frames.lsp