function savecode(filename,code)
fid=fopen(filename,'wt')
temp=size(code);
raw=temp(1);
column=temp(2);
for i=1:raw
    for j=1:column
        fprintf(fid,'%d\n',code(i,j));
%    fprintf(fid,'\n');
    end
end
status=fclose(fid)