No BSD License  

Highlights from
BPSK Simulator for Low Rate Transmisions

image thumbnail

BPSK Simulator for Low Rate Transmisions

by

 

01 Jun 2004 (Updated )

BPSK Simulator for didactical purposes. Systemic coding style.

pruebaDiv.m
clear all, close all, clc
fs = 2^16;
fi = 3500;
Rb = 2^11;
L  = floor(fs/Rb);
cDIV    = 5;
trama(1:2:100) = ones(1,50);
BOD          = [1 1 0 0 1 1 0 0];
%trama = [trama 0 BOD];
%trama = [trama 1 0 0 1 1 1 0 1 0 0 0 0 0 0 1 1 0 1 0 1 0];
%pepe  = trama;
%trama2 = 2*trama - ones(1,length(trama));
%PAM1 = 5.*generaPAM(trama, L);
%Linea = cosenoAlzado(PAM1,  fs, Rb, 0.5);

%in = Linea.*(sin(2*pi*fi*t)+cos(2*pi*fi*t));
%out = [];
RELOJ        = 8;   % Fila a leer en la memoria
contMUESTRA  = 1;   % Contador de Muestras
contFLANCOS  = 2;   % Contador de Flancos
MUESTRAS_BIT = 3;   % N muestras/bit
muestraANT   = 4;   % Muestra Anterior
ESTADO       = 5;   % Banera: 0 = recuperacin sincronismo; 1 = recepcin trama
valorUNO     = 6;   % Voltaje que se le asigna al "1" lgico
valorMUESTRA = 7;   % Suma de los voltajes de las muestras en 1 smbolo
contCAB      = 8;   % N que especificael nmero de bits de la cabecera BOF rx.
posCAB       = 9;   % Donde comenzamos a guardar la 1 cabecera  BOF
trama        = [];
CAB_SYNCRO   = 100; % Longitud de la cabecera de sincronismo
ruta = 'D:\Estudios\UPM Superior\4Teleco\2Cuatrimestre\Lab. Trat. Dig. Seal\BPSK\Cdigo\Ficheros\';

%signal = cargar(ruta,'outPLL.rx',1, inf, 2);
out = [];
nTramas = 10;
memoria = sin(2*pi*fi*t(1)); % valor inicial de la memoria
tini = 0;
for k=1:nTramas   
   t = tini:(1/fs):tini+(256-1)*(1/fs);
   tini = tini+256*(1/fs);
   aux  = sin(2*pi*fi*t);
   %posi = min(find(aux==memoria)); 
   %memoria = aux(length(aux));
   %aux  = aux(posi:length(aux));
   out  = [out aux];
end;

plot(out)

Contact us