save_fixed.m

TigerSharc TS201 32-bit floating point FFT routine

function [id] = save_fixed(name_file, N, inputs)

   for k=1:N


        if inputs(k)==1
            in(k)=2^15-1;
        elseif inputs(k)>=0
            in(k)=fix(2^15*inputs(k));
        else
            in(k)=fix(2^16+2^15*inputs(k));
        end;
   end;

       fin = fopen(name_file, 'wt');
           for k=1:2:N-3
               fprintf(fin, '0x%04x%04x,\n', in(k), in(k+1));
           end;
           fprintf(fin, '0x%04x%04x\n', in(N-1), in(N));
       fclose(fin);