Files
imdd_silas/Classes/01_transmit/Pulseformer.m
Silas Oettinghaus b640c013cb WIP büro
2023-05-26 11:06:39 +02:00

111 lines
3.1 KiB
Matlab

classdef Pulseformer
%Pulseformer Summary of this class goes here
% Detailed explanation goes here
properties(Access=public)
fdac
fsym
pulseform
pulselength
rrcalpha
end
methods (Access=public)
function obj = Pulseformer(options)
%NAME Construct an instance of this class
% Detailed explanation goes here
arguments
options.fdac double
options.fsym double
options.pulseform pulseform = pulseform.rrc
options.pulselength double {mustBeInteger} = 32
options.rrcalpha double = 0.05
end
%
fn = fieldnames(options);
for n = 1:numel(fn)
try
obj.(fn{n}) = options.(fn{n});
end
end
% do more stuff
end
function signalclass_out = process(obj,signalclass_in)
% actual processing of the signal (steps 1. - 3.)
signalclass_in.signal = obj.process_(signalclass_in.signal);
% append to logbook
lbdesc = ['Applied Pulseshaping'];
signalclass_in = signalclass_in.logbookentry(lbdesc);
% write to output
signalclass_out = signalclass_in;
end
end
methods (Access=private)
% Cant be seen from outside! So put all your functions here that can/
% shall not be called from outside
function data_out = process_(obj,data_in)
%METHOD1 Summary of this method goes here
% Detailed explanation goes here
arguments(Input)
obj
data_in double
end
arguments(Output)
data_out double
end
if ~rem(obj.fdac,obj.fsym)
%ist ein Vielfaches
sps = obj.fdac / obj.fsym;
up = sps;
dn = 1;
else
%ist kein Vielfaches
up = obj.fdac / gcd(obj.fdac, obj.fsym);
dn = obj.fsym / gcd(obj.fdac, obj.fsym);
sps= up;
end
if obj.pulseform == pulseform.rrc
%Bau das Filter (hier rrc)
racos_len = obj.pulselength ;
alpha = obj.rrcalpha;
h = rcosdesign(alpha,racos_len,sps);
end
%Apply Filter using Matlab build in fctn.
data_out = upfirdn(data_in,h,up,dn);
%cut signal, which is longer due to fir filter
st = round(up/dn*racos_len/2); %we need to cut y_out
en = round(st + (length(data_in)*up/dn) -1);
data_out = data_out(st:en);
%Check output integrity
if round(up/dn * length(data_in)) ~= length(data_out)
warning('Check signal length after pulse shaping');
end
end
end
end