tmp_test.m
上传用户:look542
上传日期:2009-06-04
资源大小:784k
文件大小:1k
源码类别:

传真(Fax)编程

开发平台:

Matlab

  1. % mod_type = 3;
  2. % bit_to_mod = [1 1 1 0 0 0 0 1 1];
  3. % bit_to_mod = reshape(bit_to_mod ,mod_type,length(bit_to_mod)/mod_type);
  4. % sym = modu_sym(bit_to_mod );
  5. % %continue;
  6. % %break;
  7. % bit_out = demodu_sym(sym,mod_type);
  8. S = sqrt(13/6) * [0, 0, 1+j, 0, 0, 0, -1-j, 0, 0, 0, 1+j, 0, 0, 0, -1-j, 0, 0, 0, -1-j, 0, 0, 0, 1+j, 0, 0, 0, 0,0, 0, 0, -1-j, 0, 0, 0, -1-j, 0, 0, 0, 1+j, 0, 0, 0, 1+j, 0, 0, 0, 1+j, 0, 0, 0, 1+j, 0,0];
  9. S_tmp = [zeros(1,6) S zeros(1,5)];
  10. S_tmp2 = [S_tmp(33:64) S_tmp(1:32)];
  11. t1 = sqrt(64)*ifft(S_tmp2);
  12. t2 = [t1 t1 t1(1:32) t1(1)];
  13. win_t = [0.5 ones(1,159) 0.5];
  14. t = t2.*win_t;
  15. L = [1, 1, -1, -1, 1, 1, -1, 1, -1, 1, 1, 1, 1, 1, 1, -1, -1, 1, 1, -1, 1, -1, 1, 1, 1, 1, 0, 1, -1, -1, 1, 1, -1, 1, -1, 1, -1, -1, -1, -1, -1, 1, 1, -1, -1, 1, -1, 1, -1, 1, 1, 1, 1];
  16. L_tmp = [L(27:53) zeros(1,11) L(1:26)];
  17. T1 = sqrt(64)*ifft(L_tmp);
  18. T2 = [T1(33:64) T1 T1 T1(1)];
  19. win_T = [0.5 ones(1,159) 0.5];
  20. T = T2.*win_T;
  21. TRAINING = [t zeros(1,160)] + [zeros(1,160) T];