modified to work with raw files of real samples
authordrowe67 <drowe67@01035d8c-6547-0410-b346-abe4f91aad63>
Wed, 29 Jun 2016 02:14:30 +0000 (02:14 +0000)
committerdrowe67 <drowe67@01035d8c-6547-0410-b346-abe4f91aad63>
Wed, 29 Jun 2016 02:14:30 +0000 (02:14 +0000)
git-svn-id: https://svn.code.sf.net/p/freetel/code@2834 01035d8c-6547-0410-b346-abe4f91aad63

codec2-dev/octave/nf_from_gr.m

index b3a88173d659b029e97e4c240627c758b05599a0..3f441fc2cf3fe858f86d9c7a58d5f42690b6ed61 100644 (file)
 
 1;
 
-function det_nf(p_filename, n_filename, title, Fs, st, en, Pin_dB)
+function det_nf(p_filename, n_filename, title, Fs, st, en, Pin_dB, real_file=0)
+
+  if real_file
+    % real samples files of 16 bit shorts
+    fs=fopen(p_filename,"rb");
+    p = fread(fs,Inf,"short");
+    fclose(fs);
+    fs=fopen(n_filename,"rb");
+    pn = fread(fs,Inf,"short");
+    fclose(fs);
+  else
+    % GNU radio complex file input
+    p =  load_comp(p_filename);
+    pn = load_comp(n_filename);
+  end
 
-  p =  load_comp(p_filename);
-  pn = load_comp(n_filename);
   P = fft(p(1:Fs));
   N = fft(pn(1:Fs));