how can i code bpsk to qpsk in mmse equalization AWGN

Eb_NOvalues = [0:10]; %SNR values
Nbits = 1000000; % no.of bits 
ts =2 ;% no. of Transmitter 
for rs = 2:6;%no. of Receivers
for a = 1:numel(Eb_NOvalues)
    % designing of Transmitter
    strm = rand(1,Nbits)>0.5;% Generating digital data(0,1)
    s = 2*strm-1; %BPSK modlation where 1-> 1 & 0 -> -1
    grp = kron(s,ones(rs,1));  
    grp1 = reshape(grp,[rs,ts,Nbits/ts]); % grouping and reshaping of data
    rchnl = 1/sqrt(2)*[randn(rs,ts,Nbits/ts) + j*randn(rs,ts,Nbits/ts)];