OutputPort1 = InputPort1;
Data_Rate=12;
R=1/2;
Nbpsc=2;
Ncbps=96;
Ndbps=48;
Nfft=64;
Ts=50*10^-9;
modulation_scheme='QPSK';
preamble=form_preamble;	
cs = length(InputPort1.Sequence);

 if( cs > 0 )
Z=InputPort1.Sequence;
if(Z(cs)>= 4)
    rec_dec(cs)=Z(cs)/7;
else
    rec_dec(cs)=-1.*Z(cs)/7;
end
OutputPort1.Sequence=rec_dec;
 end