condition3.m

function [Assigned_proj_roll_nos,sorted_txt,stored_index,txt3,sorted_CGPA,message]...
    = condition3(index,sorted_txt,sorted_Roll_nos,txt3,N_students,total_choices,sorted_CGPA,max_proj_checker,Assigned_proj_roll_with_gui)

delproj = @removingproj; % [sorted_txt] = removingproj(same_CGPA_project,sorted_txt,N_students)
assign = @assignment;


k = 2;
for j = 1: length(index)
    choice(j) = sorted_txt(index(j),k);
    choice_max_proj_checker(j) = sorted_txt(index(j),2);
    choice_for_comparing{j} = choice{j}(1:end-1);
    same_CGPA_Roll_nos(j) = sorted_Roll_nos(index(j));
    same_CGPA_project(j) = sorted_txt(index(j),k);
    k = k+1;
end
clear k;

%%%%%%%%%%%%%%%%% We need to also check for the availability of the
% project under that professor since there is a max
% limit on the number of projects assigned to a
% particular project.

if  isequal(choice_for_comparing(1),choice_for_comparing(2)) == 1
    
    proj_max_checker = [Assigned_proj_roll_with_gui; [choice(1) string(same_CGPA_Roll_nos(1))]];
    
    no_of_projs_sent_for_verification = size(choice,2);
    %prev_sorted_txt = sorted_txt;
    BeforeOrAfter = 'Before';
    
    [~,~,~,message_MAX_PROJS2,~] =...
        max_proj_checker_deleter (proj_max_checker,max_proj_checker,N_students,sorted_txt,no_of_projs_sent_for_verification,BeforeOrAfter);
    
end

%message_MAX_PROJS2 = "Only1Left" % Testing purposes only
%
% How_many_left = sscanf(message_MAX_PROJS2,'Only%dLeft');
%
% Deciding_factor = no_of_projs_sent_for_verification - How_many_left;

%%%%%%%%%%%%%% MAX PROJ CHECKING%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
if isequal(choice_for_comparing(1),choice_for_comparing(2)) == 1 ...
        &&  message_MAX_PROJS2 == "Only1Left"
    
    prof_name = choice_max_proj_checker{1}(1:end-5);
    
    Opt.Interpreter = 'tex';
    Opt.WindowStyle = 'modal';
    waitfor(msgbox("\fontsize{14} Prof. " + prof_name + " has only project left according to the \bfMax Project per Professor Criteria\rm",...
        'Warning','warn',Opt));
    
    %create msgbox
    
    
    Opt.Interpreter = 'tex';
    Opt.WindowStyle = 'modal';
    
    answer = questdlg('\fontsize{14}There is a clash in choices and CGPA, How do you like to continue?',...
        'Choices',...
        'Compare GATE Score','Do It Manually',struct('Default','','Interpreter','tex'));
    switch answer
        
        
        %             case 'Compare GATE Score'
        %                 % disp('Here comes the gate score function file')
        %                 %%%%%%%%%%%%%%%%%%%%%%%%%%%GATE%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
        %                 [Assigned_proj_roll_nos,sorted_txt,txt3,sorted_CGPA,message]...
        %                     = gate_allocation (index,sorted_Roll_nos,sorted_txt,txt3,N_students,total_choices,sorted_CGPA);
        %
        %                 stored_index = 0;
        
        case 'Do It Manually'
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% MANUALSELECTION %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
            
            % while true
            
            [Assigned_proj_roll_nos,sorted_txt,txt3,sorted_CGPA] = ...
                manual_selection(index,sorted_Roll_nos,sorted_txt,txt3,N_students,total_choices,sorted_CGPA);
            
            stored_index = 0;
            message='Manual Selection as per Max project criteria';
            
            for i = 1:length(Assigned_proj_roll_nos)
                Assigned_proj_rolls_checking{i,1} = Assigned_proj_roll_nos{i,1}(1:end-1);
            end
            clear i;
            [~,idx]=unique(  strcat(Assigned_proj_rolls_checking(:,1), 'rows'))
            Assigned_proj_rolls_checking_unique=Assigned_proj_rolls_checking(idx,:);
            if size(Assigned_proj_rolls_checking_unique,1) == size(Assigned_proj_rolls_checking,1)
                disp('Assignment done as per the condition (MPpPC)')
            else
                Opt.Interpreter = 'tex';
                Opt.WindowStyle = 'modal';
                
                waitfor(msgbox("\fontsize{12} Prof. " + prof_name +...
                    " has only one project left according to the \bfMPpC\rm. But allotment is done more than one. Try alloting again ",...
                    'Error','error',Opt));
                
                errordlg('Allotment stopped since the Max Project per Professor Criteria did not met')
                error('Allotment stopped since the Max Project per Professor Criteria did not met');
            end
            %  end
    end
    
    
    
    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    
    
    
    
elseif isequal(choice_for_comparing(1),choice_for_comparing(2)) == 1  ...
        %1     % Here we are checking for the professors, If they are same, then we will assign one to first person and second to other person.
    for k = 1: 2
        Assigned_proj_roll_nos(k,:) = string([same_CGPA_project(k) same_CGPA_Roll_nos(k)]);
        sorted_txt = delproj(same_CGPA_project(k),sorted_txt,N_students);
        stored_index = 0;
    end
    txt3 = assign(choice,total_choices,txt3);
    message='Condition3_Direct Allocation'
else                                                                  % Else if the first choice  and second choice are under different professors, then gate or manual selection should do the job.
    
    answer = questdlg('There is a clash in choices and CGPA, How do you like to continue?',...
        'Choices',...
        'Compare GATE Score','Do It Manually','Compare GATE Score');
    switch answer
        case 'Compare GATE Score'
            % disp('Here comes the gate score function file')
            %%%%%%%%%%%%%%%%%%%%%%%%%%%GATE%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
            [Assigned_proj_roll_nos,sorted_txt,txt3,sorted_CGPA,message]...
                = gate_allocation (index,sorted_Roll_nos,sorted_txt,txt3,N_students,total_choices,sorted_CGPA);
            
            stored_index = 0;
            %  message = 'Gate Score Based Allocation'
        case 'Do It Manually'
            %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% MANUALSELECTION %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
            
            [Assigned_proj_roll_nos,sorted_txt,txt3,sorted_CGPA] = ...
                manual_selection(index,sorted_Roll_nos,sorted_txt,txt3,N_students,total_choices,sorted_CGPA);
            
            stored_index = 0;
            message='Manual Allocation';
    end
end