پروژه های متلب، فورترن، متمتیکا و ...

clc;

board = char('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P');
player = 'X';
round = 1;
scorePlayer = 0;
scoreComputer = 0;

while true
    disp(' ');
    disp('Current board:');
    disp(reshape(board, 4, 4)');

    if mod(round, 2) == 1
        disp('Player''s turn (X):');
        choice = input('Choose a letter between A-P: ', 's');

        if ~ismember(choice, {'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P'})
            disp('Invalid input! Please choose a letter between A-P.');
            continue;
        end
    else
        disp('Computer''s turn (O):');
        choice = char(randi([65, 80]));
        disp(['Computer chose: ' choice]);
    end

    index = find(board == choice);
    if isempty(index)
        disp('Invalid input! Please choose a letter between A-P.');
        continue;
    end

    if board(index) == 'X' || board(index) == 'O'
        disp('This cell is already taken! Choose another letter.');
        continue;
    end

    board(index) = player;

    boardMatrix = reshape(board, 4, 4);

    % Check for win condition
    for i = 1:4
        if all(boardMatrix(i,:) == player) || all(boardMatrix(:,i) == player)
            disp([player ' wins!']);
            if player == 'X'
                scorePlayer = scorePlayer + 1;
            else
                scoreComputer = scoreComputer + 1;
            end
            board = char('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P');
            round = 1;
            break;
        end
    end
    
    if all(diag(boardMatrix)' == player) || all(diag(fliplr(boardMatrix))' == player)
        disp([player ' wins!']);
        if player == 'X'
            scorePlayer = scorePlayer + 1;
        else
            scoreComputer = scoreComputer + 1;
        end
        board = char('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P');
        round = 1;
    end

    if round == 16
        disp('It''s a tie!');
        board = char('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P');
        round = 1;
    end

    round = round + 1;
    if player == 'X'
        player = 'O';
    else
        player = 'X';
    end
end