// MasterMind-komputer <-> człowiek
// Data: 13.08.2008
// (C)2020 mgr Jerzy Wałaszek
//-----------------------------

program prg;

var
  skoder, slamacz, sklucz, sk : string;
  i, j, runda : integer;

begin

  // generujemy kod kodera
  randomize;
  skoder := '';
  for i := 1 to 4 do
    skoder := skoder+chr(65+random(6));

  // rozpoczynamy rozgrywkę
  for runda := 1 to 6 do
  begin

  // odczytujemy kod łamacza
    write ('Runda ', runda, ' : ');
    readln(slamacz);

  // normalizujemy kod łamacza
    while length(slamacz) < 4 do
      slamacz := slamacz+'$';

  // generujemy kod klucza
    sk := skoder; // kopia robocza kodu kodera
    sklucz := '';
    for i := 1 to 4 do
      if sk[i] = slamacz[i] then
      begin
        sklucz := sklucz+'x';
        sk[i] := '#';      // wartownik w1
        slamacz[i] := '$'; // wartownik w2
      end;
    for i := 1 to 4 do
      if sk[i] <> '#' then
        for j := 1 to 4 do
          if sk[i] = slamacz[j] then
          begin
            sklucz := sklucz+'o';
            slamacz[j] := '$'; // wartownik w2
            break;
          end;

  // wyświetlamy kod klucza
    writeln('               : ', sklucz);

  // jeśli odgadnięto kod kodera, kończymy
    if sklucz = 'xxxx' then break;
  end;
  writeln('KOD     : ', skoder);
  writeln;
end.

// MasterMind-komputer <-> człowiek
// Data: 13.08.2008
// (C)2020 mgr Jerzy Wałaszek
//-----------------------------

#include <iostream>
#include <string>
#include <cstdlib>
#include <ctime>

using namespace std;

int main()
{
  string skoder, slamacz, sklucz, sk;
  int i, j, runda;

  // generujemy kod kodera
  srand(time(NULL));
  skoder = "";
  for(i = 0; i < 4; i++)
    skoder += char(65+rand()%6);

  // rozpoczynamy rozgrywkę
  for(runda = 1; runda <= 6; runda++)
  {

    // odczytujemy kod łamacza
    cout << "Runda " << runda << ": ";
    cin >> slamacz;

    // normalizujemy kod łamacza
    while(slamacz.length() < 4)
      slamacz += '$';

    // generujemy kod klucza
    sk = skoder; // kopia robocza kodu kodera
    sklucz = "";
    for(i = 0; i < 4; i++)
      if(sk[i] == slamacz[i])
      {
        sklucz += 'x';
        sk[i] = '#';      // wartownik w1
        slamacz[i] = '$'; // wartownik w2
      }
    for(i = 0; i < 4; i++)
      if(sk[i] != '#')
        for(j = 0; j < 4; j++)
          if(sk[i] == slamacz[j])
          {
            sklucz += 'o';
            slamacz[j] = '$'; // wartownik w2
            break;
          }

    // wyświetlamy kod klucza
    cout << "               : "
         << sklucz << endl;

  // jeśli odgadnięto kod kodera, kończymy
    if(sklucz == "xxxx") break;
  }
  cout << "KOD     : "
       << skoder
       << endl << endl;
  return 0;
}

' MasterMind-komputer <-> człowiek
' Data: 13.08.2008
' (C)2020 mgr Jerzy Wałaszek
'---------------------------------

Dim As String skoder, slamacz, sklucz, sk
Dim As Integer i, j, runda

' generujemy kod kodera
Randomize
skoder = ""
For i = 1 To 4
  skoder += Chr(65+Cint(Rnd*5))
Next

' rozpoczynamy rozgrywkę
For runda = 1 To 6

  ' odczytujemy kod łamacza
  Print "Runda";runda;": ";
  Line Input slamacz

  ' normalizujemy kod łamacza
  While Len(slamacz) < 4
    slamacz += "$"
  Wend

  ' generujemy kod klucza
  sk = skoder ' kopia robocza kodu kodera
  sklucz = ""
  For i = 1 To 4
    If Mid(sk, i, 1) = Mid(slamacz, i, 1) Then
      sklucz += "x"
      Mid(sk, i, 1)      = "#" ' wartownik w1
      Mid(slamacz, i, 1) = "$" ' wartownik w2
    End If
  Next
  For i = 1 To 4
    If Mid(sk, i, 1) <> "#" Then
      For j = 1 To 4
        If Mid(sk, i, 1) = Mid(slamacz, j, 1) Then
          sklucz += "o"
          Mid(slamacz, j, 1) = "$" ' wartownik w2
          Exit For
        End If
      Next 
    End If
  Next

  ' wyświetlamy kod klucza
  Print "               : ";sklucz

  ' jeśli odgadnięto kod kodera, kończymy
  If sklucz = "xxxx" Then Exit For
Next
Print "KOD     : ";skoder
Print

End

# MasterMind-komputer <-> człowiek
# Data: 23.03.2024
# (C)2024 mgr Jerzy Wałaszek
#---------------------------------

import random

# generujemy kod kodera
skoder = ""
for i in range(4):
    skoder += chr(random.randrange(65, 70))
# rozpoczynamy rozgrywkę
for runda in range(1, 7):
    # odczytujemy kod łamacza
    print("Runda", runda, ": ", end="")
    slamacz = input()
    # normalizujemy kod łamacza
    while len(slamacz) < 4:
        slamacz += "$"
    # generujemy kod klucza
    sk = skoder[:] # kopia robocza kodu kodera
    sklucz = ""
    for i in range(4):
        if sk[i] == slamacz[i]:
            sklucz += "x"
            sk = sk[:i]+"#"+sk[i+1:]
            slamacz = slamacz[:i]+"$"+slamacz[i+1:]
    for i in range(4):
        if sk[i] != "#":
            for j in range(4):
                if sk[i] == slamacz[j]:
                    sklucz += 'o'
                    slamacz = slamacz[:j]+"$"+slamacz[j+1:]
                    break
    # wyświetlamy kod klucza
    print("               :", sklucz)
    # jeśli odgadnięto kod kodera, kończymy
    if sklucz == "xxxx":
        break
print("KOD     :", skoder)
print()