posledni s 12 a OK legal_moves

import chess
from typing import Iterator, Optional, Dict, Tuple
from chess import Move, BB_ALL, Bitboard, PieceType, Color
import time
from collections import deque
import threading

# Definice nových figur
AMAZON = 7
CYRIL = 8
EVE = 9

# Rozšíření seznamu PIECE_SYMBOLS
chess.PIECE_SYMBOLS.append('a')
chess.PIECE_SYMBOLS.append('c')
chess.PIECE_SYMBOLS.append('e')

class CustomBoard(chess.Board):
    def __init__(self, fen=None):
        self.amazons_white = chess.BB_EMPTY
        self.amazons_black = chess.BB_EMPTY
        self.cyrils_white = chess.BB_EMPTY
        self.cyrils_black = chess.BB_EMPTY
        self.eves_white = chess.BB_EMPTY
        self.eves_black = chess.BB_EMPTY
        super().__init__(None)
        if fen:
            self.set_custom_fen(fen)
        print("Šachovnice inicializována")
        self.debug_amazons()
        self.debug_cyrils()
        self.debug_eves()

    def clear_square(self, square):
        super()._remove_piece_at(square)
        self.amazons_white &= ~chess.BB_SQUARES[square]
        self.amazons_black &= ~chess.BB_SQUARES[square]
        self.cyrils_white &= ~chess.BB_SQUARES[square]
        self.cyrils_black &= ~chess.BB_SQUARES[square]
        self.eves_white &= ~chess.BB_SQUARES[square]
        self.eves_black &= ~chess.BB_SQUARES[square]

    def set_custom_fen(self, fen):
        parts = fen.split()
        board_part = parts[0]

        self.clear()
        self.amazons_white = chess.BB_EMPTY
        self.amazons_black = chess.BB_EMPTY
        self.cyrils_white = chess.BB_EMPTY
        self.cyrils_black = chess.BB_EMPTY
        self.eves_white = chess.BB_EMPTY
        self.eves_black = chess.BB_EMPTY

        square = 56
        for c in board_part:
            if c == '/':
                square -= 16
            elif c.isdigit():
                square += int(c)
            else:
                color = chess.WHITE if c.isupper() else chess.BLACK
                if c.upper() == 'A':
                    if color == chess.WHITE:
                        self.amazons_white |= chess.BB_SQUARES[square]
                    else:
                        self.amazons_black |= chess.BB_SQUARES[square]
                    piece_type = AMAZON
                elif c.upper() == 'C':
                    if color == chess.WHITE:
                        self.cyrils_white |= chess.BB_SQUARES[square]
                    else:
                        self.cyrils_black |= chess.BB_SQUARES[square]
                    piece_type = CYRIL
                elif c.upper() == 'E':
                    if color == chess.WHITE:
                        self.eves_white |= chess.BB_SQUARES[square]
                    else:
                        self.eves_black |= chess.BB_SQUARES[square]
                    piece_type = EVE
                else:
                    piece_type = chess.PIECE_SYMBOLS.index(c.lower())
                self._set_piece_at(square, piece_type, color)
                square += 1

        self.turn = chess.WHITE if parts[1] == 'w' else chess.BLACK
        self.castling_rights = chess.BB_EMPTY
        if '-' not in parts[2]:
            if 'K' in parts[2]: self.castling_rights |= chess.BB_H1
            if 'Q' in parts[2]: self.castling_rights |= chess.BB_A1
            if 'k' in parts[2]: self.castling_rights |= chess.BB_H8
            if 'q' in parts[2]: self.castling_rights |= chess.BB_A8
        self.ep_square = chess.parse_square(parts[3]) if parts[3] != '-' else None

    def _set_piece_at(self, square: chess.Square, piece_type: PieceType, color: Color) -> None:
        self.clear_square(square)
        super()._set_piece_at(square, piece_type, color)
        if piece_type == AMAZON:
            if color == chess.WHITE:
                self.amazons_white |= chess.BB_SQUARES[square]
            else:
                self.amazons_black |= chess.BB_SQUARES[square]
        elif piece_type == CYRIL:
            if color == chess.WHITE:
                self.cyrils_white |= chess.BB_SQUARES[square]
            else:
                self.cyrils_black |= chess.BB_SQUARES[square]
        elif piece_type == EVE:
            if color == chess.WHITE:
                self.eves_white |= chess.BB_SQUARES[square]
            else:
                self.eves_black |= chess.BB_SQUARES[square]

    def piece_at(self, square: chess.Square) -> Optional[chess.Piece]:
        if self.amazons_white & chess.BB_SQUARES[square]:
            return chess.Piece(AMAZON, chess.WHITE)
        elif self.amazons_black & chess.BB_SQUARES[square]:
            return chess.Piece(AMAZON, chess.BLACK)
        elif self.cyrils_white & chess.BB_SQUARES[square]:
            return chess.Piece(CYRIL, chess.WHITE)
        elif self.cyrils_black & chess.BB_SQUARES[square]:
            return chess.Piece(CYRIL, chess.BLACK)
        elif self.eves_white & chess.BB_SQUARES[square]:
            return chess.Piece(EVE, chess.WHITE)
        elif self.eves_black & chess.BB_SQUARES[square]:
            return chess.Piece(EVE, chess.BLACK)
        return super().piece_at(square)

    def generate_pseudo_legal_moves(self, from_mask: Bitboard = BB_ALL, to_mask: Bitboard = BB_ALL) -> Iterator[Move]:
        our_pieces = self.occupied_co[self.turn]
        if self.turn == chess.WHITE:
            our_amazons = self.amazons_white
            our_cyrils = self.cyrils_white
            our_eves = self.eves_white
        else:
            our_amazons = self.amazons_black
            our_cyrils = self.cyrils_black
            our_eves = self.eves_black

        # Generování tahů pro amazonky
        for from_square in chess.scan_forward(our_amazons & from_mask):
            attacks = self.amazon_attacks(from_square)
            valid_moves = attacks & ~our_pieces & to_mask
            for to_square in chess.scan_forward(valid_moves):
                yield Move(from_square, to_square)

        # Generování tahů pro Cyrily
        for from_square in chess.scan_forward(our_cyrils & from_mask):
            attacks = self.cyril_attacks(from_square)
            valid_moves = attacks & ~our_pieces & to_mask
            for to_square in chess.scan_forward(valid_moves):
                yield Move(from_square, to_square)

        # Generování tahů pro Evy
        for from_square in chess.scan_forward(our_eves & from_mask):
            attacks = self.eve_attacks(from_square)
            valid_moves = attacks & ~our_pieces & to_mask
            for to_square in chess.scan_forward(valid_moves):
                yield Move(from_square, to_square)

        # Generování tahů pro standardní figury
        for move in super().generate_pseudo_legal_moves(from_mask, to_mask):
            piece = self.piece_at(move.from_square)
            if piece and piece.piece_type not in [AMAZON, CYRIL, EVE]:
                yield move

    def queen_attacks(self, square):
        return self.bishop_attacks(square) | self.rook_attacks(square)

    def bishop_attacks(self, square):
        return chess.BB_DIAG_ATTACKS[square][self.occupied & chess.BB_DIAG_MASKS[square]]

    def rook_attacks(self, square):
        return (chess.BB_RANK_ATTACKS[square][self.occupied & chess.BB_RANK_MASKS[square]] |
                chess.BB_FILE_ATTACKS[square][self.occupied & chess.BB_FILE_MASKS[square]])

    def amazon_attacks(self, square):
        return self.queen_attacks(square) | chess.BB_KNIGHT_ATTACKS[square]

    def cyril_attacks(self, square):
        return self.rook_attacks(square) | chess.BB_KNIGHT_ATTACKS(square)

    def eve_attacks(self, square):
        return self.bishop_attacks(square) | chess.BB_KNIGHT_ATTACKS(square)

    def is_pseudo_legal(self, move):
        from_square = move.from_square
        to_square = move.to_square
        piece = self.piece_at(from_square)

        if not piece or piece.color != self.turn:
            return False

        if self.occupied_co[self.turn] & chess.BB_SQUARES[to_square]:
            return False

        if self.is_castling(move):
            return True

        if piece.piece_type == AMAZON:
            return bool(self.amazon_attacks(from_square) & chess.BB_SQUARES[to_square])
        elif piece.piece_type == CYRIL:
            return bool(self.cyril_attacks(from_square) & chess.BB_SQUARES[to_square])
        elif piece.piece_type == EVE:
            return bool(self.eve_attacks(from_square) & chess.BB_SQUARES[to_square])
        else:
            return super().is_pseudo_legal(move)

    def is_legal(self, move):
        if not self.is_pseudo_legal(move):
            return False

        from_square = move.from_square
        to_square = move.to_square
        piece = self.piece_at(from_square)
        captured_piece = self.piece_at(to_square)

        self.clear_square(from_square)
        self.clear_square(to_square)
        self._set_piece_at(to_square, piece.piece_type, piece.color)

        king_square = to_square if piece.piece_type == chess.KING else self.king(self.turn)
        is_check = self._is_attacked_by(not self.turn, king_square)

        self.clear_square(to_square)
        self._set_piece_at(from_square, piece.piece_type, piece.color)
        if captured_piece:
            self._set_piece_at(to_square, captured_piece.piece_type, captured_piece.color)

        if is_check:
            attackers = self.attackers(not self.turn, king_square)
#            print(f"[DEBUG] King at {chess.SQUARE_NAMES[king_square]} is attacked by pieces at: {[chess.SQUARE_NAMES[sq] for sq in chess.scan_forward(attackers)]}")

        return not is_check

    def _is_attacked_by(self, color, square):
        attackers = self.attackers(color, square)
        return bool(attackers)

    def attackers(self, color, square):
        attackers = chess.BB_EMPTY

        knights = self.knights & self.occupied_co[color]
        attackers |= knights & chess.BB_KNIGHT_ATTACKS[square]

        king = self.kings & self.occupied_co[color]
        attackers |= king & chess.BB_KING_ATTACKS[square]

        pawns = self.pawns & self.occupied_co[color]
        if color == chess.WHITE:
            attackers |= pawns & chess.BB_PAWN_ATTACKS[chess.BLACK][square]
        else:
            attackers |= pawns & chess.BB_PAWN_ATTACKS[chess.WHITE][square]

        queens = self.queens & self.occupied_co[color]
        bishops = (self.bishops | queens) & self.occupied_co[color]
        rooks = (self.rooks | queens) & self.occupied_co[color]

        attackers |= chess.BB_DIAG_ATTACKS[square][self.occupied & chess.BB_DIAG_MASKS[square]] & bishops
        attackers |= (chess.BB_RANK_ATTACKS[square][self.occupied & chess.BB_RANK_MASKS[square]] |
                      chess.BB_FILE_ATTACKS[square][self.occupied & chess.BB_FILE_MASKS[square]]) & rooks

        amazons = self.amazons_white if color == chess.WHITE else self.amazons_black
        for amazon_square in chess.scan_forward(amazons):
            if self.amazon_attacks(amazon_square) & chess.BB_SQUARES[square]:
                attackers |= chess.BB_SQUARES[amazon_square]

        cyrils = self.cyrils_white if color == chess.WHITE else self.cyrils_black
        for cyril_square in chess.scan_forward(cyrils):
            if self.cyril_attacks(cyril_square) & chess.BB_SQUARES[square]:
                attackers |= chess.BB_SQUARES[cyril_square]

        eves = self.eves_white if color == chess.WHITE else self.eves_black
        for eve_square in chess.scan_forward(eves):
            if self.eve_attacks(eve_square) & chess.BB_SQUARES[square]:
                attackers |= chess.BB_SQUARES[eve_square]

        return attackers

    def push(self, move):
        if not self.is_legal(move):
            raise ValueError(f"Move {move} is not legal in position {self.fen()}")

        piece = self.piece_at(move.from_square)
        captured_piece = self.piece_at(move.to_square)

        self.clear_square(move.from_square)
        self.clear_square(move.to_square)
        self._set_piece_at(move.to_square, piece.piece_type, piece.color)

        self.turn = not self.turn

        self.move_stack.append((move, captured_piece))

    def pop(self):
        if not self.move_stack:
            return None

        move, captured_piece = self.move_stack.pop()

        piece = self.piece_at(move.to_square)

        self.clear_square(move.from_square)
        self.clear_square(move.to_square)

        self._set_piece_at(move.from_square, piece.piece_type, piece.color)

        if captured_piece:
            self._set_piece_at(move.to_square, captured_piece.piece_type, captured_piece.color)

        self.turn = not self.turn

        return move

    def is_check(self):
        king_square = self.king(self.turn)
        if king_square is None:
            return False
        is_check = self._is_attacked_by(not self.turn, king_square)
  #      print(f"[DEBUG] Checking if position is check: FEN: {self.fen()}, King at {chess.SQUARE_NAMES[king_square]}, is_check: {is_check}")
        return is_check

    def is_checkmate(self):
        if not self.is_check():
 #           print(f"[DEBUG] Position is not check, hence not checkmate: FEN: {self.fen()}")
            return False
        legal_moves = list(self.generate_legal_moves())
 #       print(f"[DEBUG] Checking if position is checkmate: FEN: {self.fen()}, Legal moves: {legal_moves}")
        return len(legal_moves) == 0

    def is_game_over(self):
        return self.is_checkmate() or self.is_stalemate() or self.is_insufficient_material()

    def is_stalemate(self):
        if self.is_check():
            return False
        legal_moves = list(self.generate_legal_moves())
  #      print(f"[DEBUG] Checking if position is stalemate: FEN: {self.fen()}, Legal moves: {legal_moves}")
        return len(legal_moves) == 0

    def is_insufficient_material(self):
        return (self.pawns | self.rooks | self.queens | self.amazons_white | self.amazons_black |
                self.cyrils_white | self.cyrils_black | self.eves_white | self.eves_black) == 0 and (
            chess.popcount(self.occupied) <= 3
        )

    def generate_legal_moves(self, from_mask=chess.BB_ALL, to_mask=chess.BB_ALL):
        for move in self.generate_pseudo_legal_moves(from_mask, to_mask):
            if self.is_legal(move):
          #      print(f"[DEBUG] Legal move: {move}")
                yield move
           # else:
            #    print(f"[DEBUG] Illegal move: {move}")

    def debug_amazons(self):
        print(f"Bitboard bílých amazonek: {format(self.amazons_white, '064b')}")
        print(f"Bitboard černých amazonek: {format(self.amazons_black, '064b')}")
        for square in chess.SQUARES:
            if self.amazons_white & chess.BB_SQUARES[square]:
                print(f"Bílá amazonka na {chess.SQUARE_NAMES[square]}")
            if self.amazons_black & chess.BB_SQUARES[square]:
                print(f"Černá amazonka na {chess.SQUARE_NAMES[square]}")

    def debug_cyrils(self):
        print(f"Bitboard bílých Cyrils: {format(self.cyrils_white, '064b')}")
        print(f"Bitboard černých Cyrils: {format(self.cyrils_black, '064b')}")
        for square in chess.SQUARES:
            if self.cyrils_white & chess.BB_SQUARES[square]:
                print(f"Bílý Cyril na {chess.SQUARE_NAMES[square]}")
            if self.cyrils_black & chess.BB_SQUARES[square]:
                print(f"Černý Cyril na {chess.SQUARE_NAMES[square]}")

    def debug_eves(self):
        print(f"Bitboard bílých Eves: {format(self.eves_white, '064b')}")
        print(f"Bitboard černých Eves: {format(self.eves_black, '064b')}")
        for square in chess.SQUARES:
            if self.eves_white & chess.BB_SQUARES[square]:
                print(f"Bílá Eve na {chess.SQUARE_NAMES[square]}")
            if self.eves_black & chess.BB_SQUARES[square]:
                print(f"Černá Eve na {chess.SQUARE_NAMES[square]}")

    def piece_symbol(self, piece):
        if piece is None:
            return '.'
        if piece.piece_type == AMAZON:
            return 'A' if piece.color == chess.WHITE else 'a'
        if piece.piece_type == CYRIL:
            return 'C' if piece.color == chess.WHITE else 'c'
        if piece.piece_type == EVE:
            return 'E' if piece.color == chess.WHITE else 'e'
        return piece.symbol()

    def piece_type_at(self, square):
        if (self.amazons_white | self.amazons_black) & chess.BB_SQUARES[square]:
            return AMAZON
        if (self.cyrils_white | self.cyrils_black) & chess.BB_SQUARES[square]:
            return CYRIL
        if (self.eves_white | self.eves_black) & chess.BB_SQUARES[square]:
            return EVE
        return super().piece_type_at(square)

    def color_at(self, square):
        if self.amazons_white & chess.BB_SQUARES[square]:
            return chess.WHITE
        if self.amazons_black & chess.BB_SQUARES[square]:
            return chess.BLACK
        if self.cyrils_white & chess.BB_SQUARES[square]:
            return chess.WHITE
        if self.cyrils_black & chess.BB_SQUARES[square]:
            return chess.BLACK
        if self.eves_white & chess.BB_SQUARES[square]:
            return chess.WHITE
        if self.eves_black & chess.BB_SQUARES[square]:
            return chess.BLACK
        return super().color_at(square)

    @property
    def legal_moves(self):
        return list(self.generate_legal_moves())

    def __str__(self):
        builder = []
        for square in chess.SQUARES_180:
            piece = self.piece_at(square)
            symbol = self.piece_symbol(piece) if piece else '.'
            builder.append(symbol)
            if chess.square_file(square) == 7:
                if square != chess.H1:
                    builder.append('\n')
        return ''.join(builder)

    def print_all_possible_moves(self):
        pass
 #       print(f"[DEBUG] All possible moves for FEN: {self.fen()}")
  #      for move in self.generate_pseudo_legal_moves():
   #         print(f"Move: {move}, Is legal: {self.is_legal(move)}")

def simplify_fen_string(fen):
    parts = fen.split(' ')
    return ' '.join(parts[:4])  # Zachováváme pouze informace o pozici, barvě na tahu, rošádách a en passant

def format_time(seconds):
    hours, remainder = divmod(seconds, 3600)
    minutes, seconds = divmod(remainder, 60)
    return f"{int(hours):02d}h {int(minutes):02d}m {int(seconds):02d}s"

def print_elapsed_time(stop_event):
    start_time = time.time()
    while not stop_event.is_set():
        elapsed_time = time.time() - start_time
        formatted_time = time.strftime("%H:%M:%S", time.gmtime(elapsed_time))
        print(f"Uplynulý čas: {formatted_time}", end='\r')
        time.sleep(1)

def calculate_optimal_moves(start_fen: str) -> Dict[str, int]:
    board = CustomBoard(start_fen)
    AR = {simplify_fen_string(start_fen): 0}
    queue = deque([(simplify_fen_string(start_fen), 0)])
    visited = set()

    start_time = time.time()
    current_level = 0
    pozice_na_urovni = 0
    level_start_time = start_time

    stop_event = threading.Event()
    timer_thread = threading.Thread(target=print_elapsed_time, args=(stop_event,))
    timer_thread.start()

    try:
        # Fáze 1: Generování všech pozic
        while queue:
            fen, hloubka = queue.popleft()

            if hloubka > current_level:
                level_time = time.time() - level_start_time
                print(f"\nHloubka {current_level + 1}: {pozice_na_urovni} pozic, Čas: {format_time(level_time)}")
                current_level = hloubka
                pozice_na_urovni = 0
                level_start_time = time.time()

            if fen in visited:
                continue

            visited.add(fen)
            pozice_na_urovni += 1
            board.set_custom_fen(fen)

            if board.is_checkmate():
                AR[fen] = -1000 if board.turn == chess.WHITE else 1000
            elif board.is_stalemate() or board.is_insufficient_material():
                AR[fen] = 0
            else:
                legal_moves = list(board.legal_moves)
             #   if not legal_moves:
                    # print(f"Warning: No legal moves for position ({pozice_na_urovni}):")
                    # print(f"FEN: {fen}")
                    # print(f"Is game over: {board.is_game_over()}")
                    # print(f"Is checkmate: {board.is_checkmate()}")
                    # print(f"Is stalemate: {board.is_stalemate()}")
                    # print(f"Is insufficient material: {board.is_insufficient_material()}")
                    # print(f"King square: {board.king(board.turn)}")
                    # print(f"Pieces: {board.piece_map()}")
                    # board.print_all_possible_moves()
                for move in legal_moves:
                    board.push(move)
                    new_fen = simplify_fen_string(board.fen())
                    if new_fen not in AR:
                        AR[new_fen] = 0
                        queue.append((new_fen, hloubka + 1))
                    board.pop()

        print(f"\nCelkový počet pozic: {len(AR)}")

        # Fáze 2: Aktualizace hodnot
        print("\nZačíná aktualizace hodnot...")
        POZ = {1: start_fen}
        AR = {simplify_fen_string(start_fen): {'used': 0, 'to_end': None}}
        N = 1
        M = 0

        while M < N:
            M += 1
            current_fen = POZ[M]
            board = CustomBoard(current_fen)
            simplified_current_fen = current_fen

            if AR[simplified_current_fen]['used'] == 0:
                AR[simplified_current_fen]['used'] = 1
                for move in board.legal_moves:
                    # Check if the move is a promotion
                    if board.is_pseudo_legal(move) and move.promotion:
                        move.promotion = chess.QUEEN  # Set promotion to queen only

                    board.push(move)
                    POZ2 = board.fen()
                    simplified_POZ2 = simplify_fen_string(POZ2)

                    if simplified_POZ2 not in AR:
                        AR[simplified_POZ2] = {'used': None, 'to_end': None}

                    if AR[simplified_POZ2]['used'] is None:
                        N += 1
                        POZ[N] = simplified_POZ2
                        AR[simplified_POZ2] = {'used': 0, 'to_end': None}

                    board.pop()  # Vrátíme tah zpět

        print(f"Počet pozic je {N}")

        # Přidání kontroly pro mat, remízu a výchozí hodnotu
        F = 0
        for i in range(1, N + 1):
            current_fen = POZ[i]
            board = CustomBoard(current_fen)
            simplified_current_fen = simplify_fen_string(current_fen)

            if board.is_checkmate():
                AR[simplified_current_fen]['to_end'] = -1000
                F += 1
            elif board.is_stalemate() or board.is_insufficient_material() or board.is_seventyfive_moves() or board.is_fivefold_repetition():
                AR[simplified_current_fen]['to_end'] = 0
            else:
                AR[simplified_current_fen]['to_end'] = 0

        print(f"Počet pozic v matu je {F}")

        uroven = 0
        while F > 0:
            uroven += 1
            level_start_time = time.time()
            print(f"Výpočet v úrovni {uroven}")

            F = 0
            current_level_positions = 0
            for i in range(1, N + 1):
                current_fen = POZ[i]
                board = CustomBoard(current_fen)
                simplified_current_fen = simplify_fen_string(current_fen)
                if AR[simplified_current_fen]['to_end'] == 0:
                    hod = -2000
                    for move in board.legal_moves:
                        # Check if the move is a promotion
                        if board.is_pseudo_legal(move) and move.promotion:
                            move.promotion = chess.QUEEN  # Set promotion to queen only

                        board.push(move)
                        POZ2 = board.fen()
                        simplified_POZ2 = simplify_fen_string(POZ2)
                        hod2 = -AR[simplified_POZ2]['to_end']
                        if hod2 > hod:
                            hod = hod2
                        board.pop()  # Vrátíme tah zpět
                    if hod == 1001 - uroven:
                        AR[simplified_current_fen]['to_end'] = 1000 - uroven
                        F += 1
                        current_level_positions += 1
                    if hod == -1001 + uroven:
                        AR[simplified_current_fen]['to_end'] = -1000 + uroven
                        F += 1
                        current_level_positions += 1
            level_end_time = time.time()
            total_elapsed_time = level_end_time - start_time
            level_elapsed_time = level_end_time - level_start_time
            print(f"Nalezeno {current_level_positions} pozic v úrovni {uroven}")
            print(f"{format_elapsed_time(total_elapsed_time)} / {format_elapsed_time(level_elapsed_time)}")

        print(f"Nalezeno {F} pozic celkem")

    finally:
        stop_event.set()
        timer_thread.join()

    total_time = time.time() - start_time
    print(f"\nCelkový čas výpočtu: {format_time(total_time)}")

    return AR

if __name__ == "__main__":
    start_fen = "8/3k4/8/8/8/8/A7/6K1 w - - 0 1"
    AR = calculate_optimal_moves(start_fen)
    F = 0

    # Výpis výsledků
    for fen, hodnota in AR.items():
        F = F + 1
        if F < 50 or hodnota != 0:
            print(f"FEN: {fen}")
            print(f"Hodnota: {hodnota}")
            print()