local mfs=dofile "/lib/mfs.lua"
local res={}

function res.pack(filename,pf)
	if not pf then
		pf=filename
		filename=""
	end
	local res2=""
	if mfs.type(pf.."/"..filename)=="directory" then
		res2=res2.."if not fs.exists('"..filename.."') then fs.makeDir('"..filename.."') end " 
		local l=fs.list(pf.."/"..filename)
		for i,v in ipairs(l) do
			res2=res2..res.pack(filename.."/"..v,pf)
		end
	else
		res2=res2.."f=fs.open('"..filename.."','w') f.write("..("%q"):format(mfs.read(pf.."/"..filename))..") f.close() "
	end
	return res2
end

return res