//---------------------------------------------------------------------------------------- public static int Capturas(cPosicion pos, cMov[] mlist, int mPos, type Type) { color us = pos.ColorMueve(); bitbrd target = Type==cMovType.CAPTURES ? pos.PiezasColor(cTypes.Contrario(us)) : Type==cMovType.QUIETS ? ~pos.Piezas() : Type==cMovType.NON_EVASIONS ? ~pos.PiezasColor(us) : 0; return us==cColor.BLANCO ? ToDO(pos, mlist, mPos, target, cColor.BLANCO, Type, null) : ToDO(pos, mlist, mPos, target, cColor.NEGRO, Type, null); }
//----------------------------------------------------------------------------------------------- public val KRKP(cPosicion pos) { val result = 0; sq nCasillaReyBlanco = cTypes.CasillaProxima(m_cFuerte, pos.GetRey(m_cFuerte)); sq nCasillaReyNegro = cTypes.CasillaProxima(m_cFuerte, pos.GetRey(m_cDebil)); sq nCasillaTorre = cTypes.CasillaProxima(m_cFuerte, pos.GetList(m_cFuerte, cPieza.TORRE)[0]); sq nCasillaPeon = cTypes.CasillaProxima(m_cFuerte, pos.GetList(m_cDebil, cPieza.PEON)[0]); sq nCasillaCoronacion = cTypes.CreaCasilla(cTypes.Columna(nCasillaPeon), FILA.F1); if (nCasillaReyBlanco < nCasillaPeon && cTypes.Columna(nCasillaReyBlanco) == cTypes.Columna(nCasillaPeon)) result = cValoresJuego.TORRE_FINAL - (cBitBoard.Distancia(nCasillaReyBlanco, nCasillaPeon)); else if (cBitBoard.Distancia(nCasillaReyNegro, nCasillaPeon) >= 3 + ((pos.ColorMueve() == m_cDebil) ? 1 : 0) && cBitBoard.Distancia(nCasillaReyNegro, nCasillaTorre) >= 3) result = cValoresJuego.TORRE_FINAL - (cBitBoard.Distancia(nCasillaReyBlanco, nCasillaPeon)); else if (cTypes.Fila(nCasillaReyNegro) <= FILA.F3 && cBitBoard.Distancia(nCasillaReyNegro, nCasillaPeon) == 1 && cTypes.Fila(nCasillaReyBlanco) >= FILA.F4 && cBitBoard.Distancia(nCasillaReyBlanco, nCasillaPeon) > 2 + ((pos.ColorMueve() == m_cFuerte) ? 1 : 0)) result = 80 - 8 * cBitBoard.Distancia(nCasillaReyBlanco, nCasillaPeon); else result = (val)(200) - 8 * (cBitBoard.Distancia(nCasillaReyBlanco, nCasillaPeon + cCasilla.SUR) - cBitBoard.Distancia(nCasillaReyNegro, nCasillaPeon + cCasilla.SUR) - cBitBoard.Distancia(nCasillaPeon, nCasillaCoronacion)); return m_cFuerte == pos.ColorMueve() ? result : -result; }
//----------------------------------------------------------------------------------------------- public val KRKN(cPosicion pos) { sq nCasillaReyNegro = pos.GetRey(m_cDebil); sq nCasillaCaballo = pos.GetList(m_cDebil, cPieza.CABALLO)[0]; val result = (m_lstValorBorde[nCasillaReyNegro] + m_lstValorLejania[cBitBoard.Distancia(nCasillaReyNegro, nCasillaCaballo)]); return m_cFuerte == pos.ColorMueve() ? result : -result; }
//----------------------------------------------------------------------------------------------- public val KRKB(cPosicion pos) { color colr = m_cFuerte==pos.ColorMueve() ? cColor.BLANCO : cColor.NEGRO; val result = cValoresJuego.TABLAS; if(SetConjuntoPiezasPosicion(pos)) { ProbeResultType pr = cTablaFinales.Probe(whitePieceSquares, blackPieceSquares, whiteTypesSquares, blackTypesSquares, colr, enPassantSquare); if(pr.found) { if(pr.stm==MateResult.MATE_NEGRAS||pr.stm==MateResult.MATE_BLANCAS) { if(m_cFuerte==pos.ColorMueve()) result=(cValoresJuego.MATE-pr.ply); else result=-cValoresJuego.MATE+pr.ply; } } } return result; //val result = (m_lstValorBorde[pos.GetRey(m_cDebil)]); //return m_cFuerte == pos.ColorMueve() ? result : -result; }
//----------------------------------------------------------------------------------------------- public val KQKR(cPosicion pos) { color colr = m_cFuerte==pos.ColorMueve() ? cColor.BLANCO : cColor.NEGRO; val result = cValoresJuego.TABLAS; if(SetConjuntoPiezasPosicion(pos)) { ProbeResultType pr = cTablaFinales.Probe(whitePieceSquares, blackPieceSquares, whiteTypesSquares, blackTypesSquares, colr, enPassantSquare); if(pr.found) { if(pr.stm==MateResult.MATE_NEGRAS||pr.stm==MateResult.MATE_BLANCAS) { if (m_cFuerte==pos.ColorMueve()) result=(cValoresJuego.MATE-pr.ply); else result=-cValoresJuego.MATE+pr.ply; } } } return result; /*sq winnerKSq = pos.GetRey(m_cFuerte); sq loserKSq = pos.GetRey(m_cDebil); val result = cValoresJuego.DAMA_FINAL - cValoresJuego.TORRE_FINAL + m_lstValorBorde[loserKSq] + m_lstValorCerrado[cBitBoard.Distancia(winnerKSq, loserKSq)]; return m_cFuerte == pos.ColorMueve() ? result : -result;*/ }
//---------------------------------------------------------------------------------------- public static int Jaques(cPosicion pos, cMov[] mlist, int mPos) { color us = pos.ColorMueve(); cInfoJaque ci = new cInfoJaque(pos); bitbrd dc = ci.m_Candidatas; while(dc!=0) { sq from = cBitBoard.GetLSB(ref dc); type pt = cTypes.TipoPieza(pos.GetPieza(from)); if(pt==cPieza.PEON) continue; bitbrd b = pos.AtaquesDePieza((pieza)pt, from)&~pos.Piezas(); if(pt==cPieza.REY) b&=~cBitBoard.m_PseudoAtaques[cPieza.DAMA][ci.m_SqRey]; while(b!=0) mlist[mPos++].m=cTypes.CreaMov(from, cBitBoard.GetLSB(ref b)); } return us==cColor.BLANCO ? ToDO(pos, mlist, mPos, ~pos.Piezas(), cColor.BLANCO, cMovType.QUIET_CHECKS, ci) : ToDO(pos, mlist, mPos, ~pos.Piezas(), cColor.NEGRO, cMovType.QUIET_CHECKS, ci); }
public static val search(cPosicion pos, cStackMov[] ss, int ssPos, val alpha, val beta, ply depth, bool cutNode, NodeType NT, bool SpNode) { bool RootNode = (NT == cTipoNodo.RAIZ); bool PvNode = (NT == cTipoNodo.PV || NT == cTipoNodo.RAIZ); mov[] quietsSearched = new mov[64]; cPosInfo st = new cPosInfo(); cTablaHashStruct tte; cSplitPoint splitPoint = null; hash posKey = 0; mov ttMove, move, excludedMove, bestMove; ply ext, newDepth, predictedDepth; val bestValue, value, ttValue, eval, nullValue, futilityValue; bool inCheck, givesCheck, pvMove, singularExtensionNode, improving; bool captureOrPromotion, dangerous, doFullDepthSearch; int moveCount = 0, quietCount = 0; cThread thisThread = pos.ThreadActive(); inCheck = pos.Jaques() != 0; if (SpNode) { splitPoint = ss[ssPos].splitPoint; bestMove = splitPoint.bestMove; bestValue = splitPoint.bestValue; tte = null; ttMove = excludedMove = cMovType.MOV_NAN; ttValue = cValoresJuego.NAN; goto moves_loop; } moveCount = quietCount = 0; bestValue = -cValoresJuego.INFINITO; ss[ssPos].currentMove = ss[ssPos].ttMove = ss[ssPos + 1].excludedMove = bestMove = cMovType.MOV_NAN; ss[ssPos].ply = ss[ssPos - 1].ply + 1; ss[ssPos + 1].skipNullMove = 0; ss[ssPos + 1].reduction = cPly.DEPTH_ZERO; ss[ssPos + 2].killers0 = ss[ssPos + 2].killers1 = cMovType.MOV_NAN; if (PvNode && thisThread.m_nMaxPly < ss[ssPos].ply) thisThread.m_nMaxPly = ss[ssPos].ply; if (!RootNode) { if (Signals.STOP || pos.IsTablas() || ss[ssPos].ply > cSearch.MAX_PLY) return ss[ssPos].ply > cSearch.MAX_PLY && !inCheck ? cEval.Eval(pos) : DrawValue[pos.ColorMueve()]; alpha = Math.Max(cTypes.MateEnVs(ss[ssPos].ply), alpha); beta = Math.Min(cTypes.MateEn(ss[ssPos].ply + 1), beta); if (alpha >= beta) return alpha; } excludedMove = ss[ssPos].excludedMove; posKey = excludedMove != 0 ? pos.GetClaveHashExclusion() : pos.ClaveHash(); tte = cMotor.m_TablaHash.Buscar(posKey); ss[ssPos].ttMove = ttMove = RootNode ? RootMoves[PVIdx].m_PV[0] : tte != null ? tte.GetMove() : cMovType.MOV_NAN; ttValue = (tte != null) ? value_from_tt(tte.GetValue(), ss[ssPos].ply) : cValoresJuego.NAN; if (!RootNode && tte != null && tte.GetDepth() >= depth && ttValue != cValoresJuego.NAN && (PvNode ? tte.GetBound() == cBordes.BOUND_EXACT : ttValue >= beta ? (tte.GetBound() & cBordes.BOUND_LOWER) != 0 : (tte.GetBound() & cBordes.BOUND_UPPER) != 0)) { ss[ssPos].currentMove = ttMove; if (ttValue >= beta && ttMove != 0 && !pos.IsCapturaOrPromocion(ttMove) && !inCheck) update_stats(pos, ss, ssPos, ttMove, depth, null, 0); return ttValue; } if (inCheck) { ss[ssPos].staticEval = eval = cValoresJuego.NAN; goto moves_loop; } else if (tte != null) { if ((ss[ssPos].staticEval = eval = tte.GetValueEval()) == cValoresJuego.NAN) eval = ss[ssPos].staticEval = cEval.Eval(pos); if (ttValue != cValoresJuego.NAN) if ((tte.GetBound() & (ttValue > eval ? cBordes.BOUND_LOWER : cBordes.BOUND_UPPER)) != 0) eval = ttValue; } else { eval = ss[ssPos].staticEval = cEval.Eval(pos); cMotor.m_TablaHash.Save(posKey, cValoresJuego.NAN, cBordes.BOUND_NONE, cPly.DEPTH_NONE, cMovType.MOV_NAN, ss[ssPos].staticEval); } if (0 == pos.GetTipoPiezaCapturada() && ss[ssPos].staticEval != cValoresJuego.NAN && ss[ssPos - 1].staticEval != cValoresJuego.NAN && (move = ss[ssPos - 1].currentMove) != cMovType.MOV_NULO && cTypes.TipoMovimiento(move) == cMovType.NORMAL) { sq to = cTypes.GetToCasilla(move); Gains.Fill(pos.GetPieza(to), to, -ss[ssPos - 1].staticEval - ss[ssPos].staticEval); } if (!PvNode && depth < 4 * cPly.ONE_PLY && eval + razor_margin(depth) <= beta && ttMove == cMovType.MOV_NAN && Math.Abs(beta) < cValoresJuego.MATE_MAXIMO && !pos.IsPeonOn7(pos.ColorMueve()) ) { if (depth <= cPly.ONE_PLY && eval + razor_margin(3 * cPly.ONE_PLY) <= alpha) return qsearch(pos, ss, ssPos, alpha, beta, cPly.DEPTH_ZERO, cTipoNodo.NO_PV, false); val ralpha = alpha - razor_margin(depth); val v = qsearch(pos, ss, ssPos, ralpha, ralpha + 1, cPly.DEPTH_ZERO, cTipoNodo.NO_PV, false); if (v <= ralpha) return v; } if (!PvNode && 0 == ss[ssPos].skipNullMove && depth < 7 * cPly.ONE_PLY && eval - futility_margin(depth) >= beta && Math.Abs(beta) < cValoresJuego.MATE_MAXIMO && Math.Abs(eval) < cValoresJuego.GANA && pos.MaterialPieza(pos.ColorMueve()) != 0) return eval - futility_margin(depth); if (!PvNode && 0 == ss[ssPos].skipNullMove && depth >= 2 * cPly.ONE_PLY && eval >= beta && Math.Abs(beta) < cValoresJuego.MATE_MAXIMO && pos.MaterialPieza(pos.ColorMueve()) != 0) { ss[ssPos].currentMove = cMovType.MOV_NULO; ply R = 3 * cPly.ONE_PLY + depth / 4 + (eval - beta) / cValoresJuego.PEON_MJ * cPly.ONE_PLY; pos.DoNullMov(st); ss[ssPos + 1].skipNullMove = 1; nullValue = depth - R < cPly.ONE_PLY ? -qsearch(pos, ss, ssPos + 1, -beta, -beta + 1, cPly.DEPTH_ZERO, cTipoNodo.NO_PV, false) : -search(pos, ss, ssPos + 1, -beta, -beta + 1, depth - R, !cutNode, cTipoNodo.NO_PV, false); ss[ssPos + 1].skipNullMove = 0; pos.undo_null_move(); if (nullValue >= beta) { if (nullValue >= cValoresJuego.MATE_MAXIMO) nullValue = beta; if (depth < 12 * cPly.ONE_PLY) return nullValue; ss[ssPos].skipNullMove = 1; val v = depth - R < cPly.ONE_PLY ? qsearch(pos, ss, ssPos, beta - 1, beta, cPly.DEPTH_ZERO, cTipoNodo.NO_PV, false) : search(pos, ss, ssPos, beta - 1, beta, depth - R, false, cTipoNodo.NO_PV, false); ss[ssPos].skipNullMove = 0; if (v >= beta) return nullValue; } } if (!PvNode && depth >= 5 * cPly.ONE_PLY && 0 == ss[ssPos].skipNullMove && Math.Abs(beta) < cValoresJuego.MATE_MAXIMO) { val rbeta = Math.Min(beta + 200, cValoresJuego.INFINITO); ply rdepth = depth - 4 * cPly.ONE_PLY; cMovOrder mp2 = new cMovOrder(pos, ttMove, History, pos.GetTipoPiezaCapturada()); cInfoJaque ci2 = new cInfoJaque(pos); while ((move = mp2.SiguienteMovimientoEnFalso()) != cMovType.MOV_NAN) if (pos.IsLegalMov(move, ci2.m_Clavadas)) { ss[ssPos].currentMove = move; pos.DoMov(move, st, ci2, pos.IsJaque(move, ci2)); value = -search(pos, ss, ssPos + 1, -rbeta, -rbeta + 1, rdepth, !cutNode, cTipoNodo.NO_PV, false); pos.DesMov(move); if (value >= rbeta) return value; } } if (depth >= (PvNode ? 5 * cPly.ONE_PLY : 8 * cPly.ONE_PLY) && 0 == ttMove && (PvNode || (ss[ssPos].staticEval + 256 >= beta))) { ply d = depth - 2 * cPly.ONE_PLY - (PvNode ? cPly.DEPTH_ZERO : depth / 4); ss[ssPos].skipNullMove = 1; search(pos, ss, ssPos, alpha, beta, d, true, PvNode ? cTipoNodo.PV : cTipoNodo.NO_PV, false); ss[ssPos].skipNullMove = 0; tte = cMotor.m_TablaHash.Buscar(posKey); ttMove = (tte != null) ? tte.GetMove() : cMovType.MOV_NAN; } moves_loop: sq prevMoveSq = cTypes.GetToCasilla(ss[ssPos - 1].currentMove); mov[] countermoves = { Countermoves[pos.GetPieza(prevMoveSq)][prevMoveSq].m_Key1, Countermoves[pos.GetPieza(prevMoveSq)][prevMoveSq].m_Key2 }; sq prevOwnMoveSq = cTypes.GetToCasilla(ss[ssPos - 2].currentMove); mov[] followupmoves = {Followupmoves[pos.GetPieza(prevOwnMoveSq)][prevOwnMoveSq].m_Key1, Followupmoves[pos.GetPieza(prevOwnMoveSq)][prevOwnMoveSq].m_Key2 }; cMovOrder mp = new cMovOrder(pos, ttMove, depth, History, countermoves, followupmoves, ss[ssPos]); cInfoJaque ci = new cInfoJaque(pos); value = bestValue; improving = ss[ssPos].staticEval >= ss[ssPos - 2].staticEval || ss[ssPos].staticEval == cValoresJuego.NAN || ss[ssPos - 2].staticEval == cValoresJuego.NAN; singularExtensionNode = !RootNode && !SpNode && depth >= 8 * cPly.ONE_PLY && ttMove != cMovType.MOV_NAN && 0 == excludedMove && (tte.GetBound() & cBordes.BOUND_LOWER) != 0 && tte.GetDepth() >= depth - 3 * cPly.ONE_PLY; while ((move = (SpNode ? mp.SiguienteMovimiento() : mp.SiguienteMovimientoEnFalso())) != cMovType.MOV_NAN) { if (move == excludedMove) continue; if (RootNode && (Buscar(RootMoves, PVIdx, RootMoves.Count, move) == -1)) continue; if (SpNode) { if (!pos.IsLegalMov(move, ci.m_Clavadas)) continue; moveCount = ++splitPoint.moveCount; splitPoint.mutex.Liberar(); } else ++moveCount; if (RootNode) { Signals.FIRST_MOVE = (moveCount == 1); } ext = cPly.DEPTH_ZERO; captureOrPromotion = pos.IsCapturaOrPromocion(move); givesCheck = cTypes.TipoMovimiento(move) == cMovType.NORMAL && 0 == ci.m_Candidatas ? (ci.m_Jaque[cTypes.TipoPieza(pos.GetPieza(cTypes.GetFromCasilla(move)))] & cBitBoard.m_nCasillas[cTypes.GetToCasilla(move)]) != 0 : pos.IsJaque(move, ci); dangerous = givesCheck || cTypes.TipoMovimiento(move) != cMovType.NORMAL || pos.IsPeonAvanzado(move); if (givesCheck && pos.SEEReducido(move) >= cValoresJuego.CERO) ext = cPly.ONE_PLY; if (singularExtensionNode && move == ttMove && 0 == ext && pos.IsLegalMov(move, ci.m_Clavadas) && Math.Abs(ttValue) < cValoresJuego.GANA) { val rBeta = ttValue - depth; ss[ssPos].excludedMove = move; ss[ssPos].skipNullMove = 1; value = search(pos, ss, ssPos, rBeta - 1, rBeta, depth / 2, cutNode, cTipoNodo.NO_PV, false); ss[ssPos].skipNullMove = 0; ss[ssPos].excludedMove = cMovType.MOV_NAN; if (value < rBeta) ext = cPly.ONE_PLY; } newDepth = depth - cPly.ONE_PLY + ext; if (!PvNode && !captureOrPromotion && !inCheck && !dangerous && bestValue > cValoresJuego.MATE_MAXIMO_VS) { if (depth < 16 * cPly.ONE_PLY && moveCount >= FutilityMoveCounts[improving ? 1 : 0][depth]) { if (SpNode) splitPoint.mutex.Bloquear(); continue; } predictedDepth = newDepth - reduction(improving ? 1 : 0, depth, moveCount, PvNode ? 1 : 0); if (predictedDepth < 7 * cPly.ONE_PLY) { futilityValue = ss[ssPos].staticEval + futility_margin(predictedDepth) + 128 + Gains[pos.GetPiezaMovida(move)][cTypes.GetToCasilla(move)]; if (futilityValue <= alpha) { bestValue = Math.Max(bestValue, futilityValue); if (SpNode) { splitPoint.mutex.Bloquear(); if (bestValue > splitPoint.bestValue) splitPoint.bestValue = bestValue; } continue; } } if (predictedDepth < 4 * cPly.ONE_PLY && pos.SEEReducido(move) < cValoresJuego.CERO) { if (SpNode) splitPoint.mutex.Bloquear(); continue; } } if (!RootNode && !SpNode && !pos.IsLegalMov(move, ci.m_Clavadas)) { moveCount--; continue; } pvMove = PvNode && moveCount == 1; ss[ssPos].currentMove = move; if (!SpNode && !captureOrPromotion && quietCount < 64) quietsSearched[quietCount++] = move; pos.DoMov(move, st, ci, givesCheck); if (depth >= 3 * cPly.ONE_PLY && !pvMove && !captureOrPromotion && move != ttMove && move != ss[ssPos].killers0 && move != ss[ssPos].killers1) { ss[ssPos].reduction = reduction(improving ? 1 : 0, depth, moveCount, PvNode ? 1 : 0); if (!PvNode && cutNode) ss[ssPos].reduction += cPly.ONE_PLY; else if (History[pos.GetPieza(cTypes.GetToCasilla(move))][cTypes.GetToCasilla(move)] < 0) ss[ssPos].reduction += cPly.ONE_PLY / 2; if (move == countermoves[0] || move == countermoves[1]) ss[ssPos].reduction = Math.Max(cPly.DEPTH_ZERO, ss[ssPos].reduction - cPly.ONE_PLY); ply d = Math.Max(newDepth - ss[ssPos].reduction, cPly.ONE_PLY); if (SpNode) alpha = splitPoint.alpha; value = -search(pos, ss, ssPos + 1, -(alpha + 1), -alpha, d, true, cTipoNodo.NO_PV, false); if (value > alpha && ss[ssPos].reduction >= 4 * cPly.ONE_PLY) { ply d2 = Math.Max(newDepth - 2 * cPly.ONE_PLY, cPly.ONE_PLY); value = -search(pos, ss, ssPos + 1, -(alpha + 1), -alpha, d2, true, cTipoNodo.NO_PV, false); } doFullDepthSearch = (value > alpha && ss[ssPos].reduction != cPly.DEPTH_ZERO); ss[ssPos].reduction = cPly.DEPTH_ZERO; } else doFullDepthSearch = !pvMove; if (doFullDepthSearch) { if (SpNode) alpha = splitPoint.alpha; value = newDepth < cPly.ONE_PLY ? givesCheck ? -qsearch(pos, ss, ssPos + 1, -(alpha + 1), -alpha, cPly.DEPTH_ZERO, cTipoNodo.NO_PV, true) : -qsearch(pos, ss, ssPos + 1, -(alpha + 1), -alpha, cPly.DEPTH_ZERO, cTipoNodo.NO_PV, false) : -search(pos, ss, ssPos + 1, -(alpha + 1), -alpha, newDepth, !cutNode, cTipoNodo.NO_PV, false); } if (PvNode && (pvMove || (value > alpha && (RootNode || value < beta)))) value = newDepth < cPly.ONE_PLY ? givesCheck ? -qsearch(pos, ss, ssPos + 1, -beta, -alpha, cPly.DEPTH_ZERO, cTipoNodo.PV, true) : -qsearch(pos, ss, ssPos + 1, -beta, -alpha, cPly.DEPTH_ZERO, cTipoNodo.PV, false) : -search(pos, ss, ssPos + 1, -beta, -alpha, newDepth, false, cTipoNodo.PV, false); pos.DesMov(move); if (SpNode) { splitPoint.mutex.Bloquear(); bestValue = splitPoint.bestValue; alpha = splitPoint.alpha; } if (Signals.STOP || thisThread.IsCorte()) return cValoresJuego.CERO; if (RootNode) { int rmPos = Buscar(RootMoves, 0, RootMoves.Count, move); cRaizMov rm = RootMoves[rmPos]; if (pvMove || value > alpha) { rm.m_nVal = value; rm.extract_pv_from_tt(pos); if (!pvMove) ++BestMoveChanges; } else rm.m_nVal = -cValoresJuego.INFINITO; } if (value > bestValue) { bestValue = SpNode ? splitPoint.bestValue = value : value; if (value > alpha) { bestMove = SpNode ? splitPoint.bestMove = move : move; if (PvNode && value < beta) alpha = SpNode ? splitPoint.alpha = value : value; else { if (SpNode) splitPoint.m_bCorte = true; break; } } } if (!SpNode && cMotor.m_Threads.Count >= 2 && depth >= cMotor.m_Threads.minimumSplitDepth && (null == thisThread.m_SplitPointActivo || !thisThread.m_SplitPointActivo.allSlavesSearching) && thisThread.m_nSplitPointSize < cThreadBase.MAX_SPLITPOINTS_PER_THREAD) { thisThread.Split(pos, ss, ssPos, alpha, beta, ref bestValue, ref bestMove, depth, moveCount, mp, NT, cutNode); if (Signals.STOP || thisThread.IsCorte()) return cValoresJuego.CERO; if (bestValue >= beta) break; } } if (SpNode) return bestValue; if (0 == moveCount) bestValue = excludedMove != 0 ? alpha : inCheck ? cTypes.MateEnVs(ss[ssPos].ply) : DrawValue[pos.ColorMueve()]; else if (bestValue >= beta && !pos.IsCapturaOrPromocion(bestMove) && !inCheck) update_stats(pos, ss, ssPos, bestMove, depth, quietsSearched, quietCount - 1); cMotor.m_TablaHash.Save(posKey, value_to_tt(bestValue, ss[ssPos].ply), bestValue >= beta ? cBordes.BOUND_LOWER : PvNode && bestMove != 0 ? cBordes.BOUND_EXACT : cBordes.BOUND_UPPER, depth, bestMove, ss[ssPos].staticEval); return bestValue; }
public void extract_pv_from_tt(cPosicion pos) { cPosInfo[] estate = new cPosInfo[cSearch.MAX_PLY_PLUS_6]; for (int i = 0; i < cSearch.MAX_PLY_PLUS_6; i++) estate[i] = new cPosInfo(); cTablaHashStruct tte; int st = 0; int ply = 1; mov m = m_PV[0]; val expectedScore = m_nVal; m_PV.Clear(); do { m_PV.Add(m); pos.DoMov(m_PV[ply++ - 1], estate[st++]); tte = cMotor.m_TablaHash.Buscar(pos.ClaveHash()); expectedScore = -expectedScore; } while (tte != null && expectedScore == cSearch.value_from_tt(tte.GetValue(), ply) && pos.IsPseudoLegalMov(m = tte.GetMove()) && pos.IsLegalMov(m, pos.pinned_pieces(pos.ColorMueve())) && ply < cSearch.MAX_PLY && (!pos.IsTablas() || ply <= 2)); m_PV.Add(cMovType.MOV_NAN); while (--ply != 0) pos.DesMov(m_PV[ply - 1]); }
//----------------------------------------------------------------------------------------------- public val KBNK(cPosicion pos) { color colr = m_cFuerte==pos.ColorMueve() ? cColor.BLANCO : cColor.NEGRO; val result = cValoresJuego.TABLAS; if(SetConjuntoPiezasPosicion(pos)) { ProbeResultType pr = cTablaFinales.Probe(whitePieceSquares, blackPieceSquares, whiteTypesSquares, blackTypesSquares, colr, enPassantSquare); if(pr.found) { if(pr.stm==MateResult.MATE_NEGRAS||pr.stm==MateResult.MATE_BLANCAS) { if(m_cFuerte==pos.ColorMueve()) result=(cValoresJuego.MATE-pr.ply); else result=-cValoresJuego.MATE+pr.ply; } } } return result; /*sq posReyGanador = pos.GetRey(m_cFuerte); sq posReyPerdedor = pos.GetRey(m_cDebil); sq posAlfil = pos.GetList(m_cFuerte, cPieza.ALFIL)[0]; if (cTypes.IsColorContrario(posAlfil, cCasilla.A1)) { posReyGanador = cTypes.CasillaVS(posReyGanador); posReyPerdedor = cTypes.CasillaVS(posReyPerdedor); } val result = cValoresJuego.GANA + m_lstValorCerrado[cBitBoard.Distancia(posReyGanador, posReyPerdedor)] + m_lstValorEsquinas[posReyPerdedor]; return m_cFuerte == pos.ColorMueve() ? result : -result;*/ }
//----------------------------------------------------------------------------------------------- public static bool SetConjuntoPiezasPosicion(cPosicion pos) { whitePieceSquares.Clear(); whiteTypesSquares.Clear(); blackPieceSquares.Clear(); blackTypesSquares.Clear(); for(type pt = cPieza.PEON; pt<=cPieza.REY; ++pt) { for(int i = 0; i<pos.GetNum(cColor.BLANCO, pt); i++) { whitePieceSquares.Add(pos.GetList(cColor.BLANCO, pt)[i]); whiteTypesSquares.Add(pt); } for(int i = 0; i<pos.GetNum(cColor.NEGRO, pt); i++) { blackPieceSquares.Add(pos.GetList(cColor.NEGRO, pt)[i]); blackTypesSquares.Add(pt); } } enPassantSquare=pos.CasillaEnPaso(); whosTurn=pos.ColorMueve(); return true; }
//---------------------------------------------------------------------------------------------------------- public static pnt EvalRey(cPosicion pos, cEvalInfo ei, color colr) { color colorVS = (colr == cColor.BLANCO ? cColor.NEGRO : cColor.BLANCO); bitbrd indefenso, b, b1, b2, safe; int attackUnits; sq nCasillaRey = pos.GetRey(colr); pnt score = 0; if (ei.m_AtaquesAlRey[colorVS] != 0) { indefenso = ei.m_Ataques[colorVS][cPieza.NAN] & ei.m_Ataques[colr][cPieza.REY] & ~(ei.m_Ataques[colr][cPieza.PEON] | ei.m_Ataques[colr][cPieza.CABALLO] | ei.m_Ataques[colr][cPieza.ALFIL] | ei.m_Ataques[colr][cPieza.TORRE] | ei.m_Ataques[colr][cPieza.DAMA]); attackUnits = Math.Min(20, (ei.m_AtaquesAlRey[colorVS] * ei.m_PesoAtaquesAlRey[colorVS]) / 2) + 3 * (ei.m_ZonaDelRey[colorVS] + cBitBoard.CountMax15(indefenso)) + 2 * (ei.m_Clavadas[colr] != 0 ? 1 : 0) - cTypes.GetMedioJuego(score) / 32; b = indefenso & ei.m_Ataques[colorVS][cPieza.DAMA] & ~pos.PiezasColor(colorVS); if (b != 0) { b &= (ei.m_Ataques[colorVS][cPieza.PEON] | ei.m_Ataques[colorVS][cPieza.CABALLO] | ei.m_Ataques[colorVS][cPieza.ALFIL] | ei.m_Ataques[colorVS][cPieza.TORRE]); if (b != 0) attackUnits += QueenContactCheck * cBitBoard.CountMax15(b) * (colorVS == pos.ColorMueve() ? 2 : 1); } b = indefenso & ei.m_Ataques[colorVS][cPieza.TORRE] & ~pos.PiezasColor(colorVS); b &= cBitBoard.m_PseudoAtaques[cPieza.TORRE][nCasillaRey]; if (b != 0) { b &= (ei.m_Ataques[colorVS][cPieza.PEON] | ei.m_Ataques[colorVS][cPieza.CABALLO] | ei.m_Ataques[colorVS][cPieza.ALFIL] | ei.m_Ataques[colorVS][cPieza.DAMA]); if (b != 0) attackUnits += RookContactCheck * cBitBoard.CountMax15(b) * (colorVS == pos.ColorMueve() ? 2 : 1); } safe = ~(pos.PiezasColor(colorVS) | ei.m_Ataques[colr][cPieza.NAN]); b1 = pos.attacks_from_square_piecetype(nCasillaRey, cPieza.TORRE) & safe; b2 = pos.attacks_from_square_piecetype(nCasillaRey, cPieza.ALFIL) & safe; b = (b1 | b2) & ei.m_Ataques[colorVS][cPieza.DAMA]; if (b != 0) attackUnits += QueenCheck * cBitBoard.CountMax15(b); b = b1 & ei.m_Ataques[colorVS][cPieza.TORRE]; if (b != 0) attackUnits += RookCheck * cBitBoard.CountMax15(b); b = b2 & ei.m_Ataques[colorVS][cPieza.ALFIL]; if (b != 0) attackUnits += BishopCheck * cBitBoard.CountMax15(b); b = pos.attacks_from_square_piecetype(nCasillaRey, cPieza.CABALLO) & ei.m_Ataques[colorVS][cPieza.CABALLO] & safe; if (b != 0) attackUnits += KnightCheck * cBitBoard.CountMax15(b); attackUnits = Math.Min(99, Math.Max(0, attackUnits)); score -= m_ReyAmenazado[colr == cSearch.RootColor ? 1 : 0][attackUnits]; } return score; }
//----------------------------------------------------------------------------------------------------------------------------------- public static pnt EvalAmenazas(cPosicion pos, cEvalInfo evalInfo, color colr) { color colorVS = (colr == cColor.BLANCO ? cColor.NEGRO : cColor.BLANCO); bitbrd b, weakEnemies; pnt nPuntos = 0; weakEnemies = pos.PiezasColor(colorVS) & ~evalInfo.m_Ataques[colorVS][cPieza.PEON] & evalInfo.m_Ataques[colr][cPieza.NAN]; if (weakEnemies != 0) { b = weakEnemies & (evalInfo.m_Ataques[colr][cPieza.PEON] | evalInfo.m_Ataques[colr][cPieza.CABALLO] | evalInfo.m_Ataques[colr][cPieza.ALFIL]); if (b != 0) nPuntos += m_Amenazado[0][cTypes.TipoPieza(pos.GetPieza(cBitBoard.LSB(b)))]; b = weakEnemies & (evalInfo.m_Ataques[colr][cPieza.TORRE] | evalInfo.m_Ataques[colr][cPieza.DAMA]); if (b != 0) nPuntos += m_Amenazado[1][cTypes.TipoPieza(pos.GetPieza(cBitBoard.LSB(b)))]; b = weakEnemies & ~evalInfo.m_Ataques[colorVS][cPieza.NAN]; if (b != 0) nPuntos += cBitBoard.MayorQue(b) ? Hanging[colr != pos.ColorMueve() ? 1 : 0] * cBitBoard.CountMax15(b) : Hanging[colr == pos.ColorMueve() ? 1 : 0]; } return nPuntos; }
//----------------------------------------------------------------------------------------------------------------------------------- public static val Eval(cPosicion pos) { cEvalInfo eval = new cEvalInfo(); pnt nPuntos; pnt[] movilidad = new pnt[] { 0, 0 }; cThread thread = pos.ThreadActive(); nPuntos = pos.GetPuntosPeon() + (pos.ColorMueve() == cColor.BLANCO ? m_Tempo : -m_Tempo); eval.m_Material = cMaterial.Buscar(pos, thread.m_Material, thread.m_Finales); nPuntos += eval.m_Material.Valor(); if (eval.m_Material.FuncionEvaluacion()) return eval.m_Material.Eval(pos); eval.m_Peones = cBonusPeones.Buscar(pos, thread.m_TablaPeones); Init(pos, eval, cColor.BLANCO); Init(pos, eval, cColor.NEGRO); nPuntos += SetPesos(eval.m_Peones.GetValue(), m_Pesos[cEvalPesos.ESTRUCTURA_PEONES]); eval.m_Ataques[cColor.BLANCO][cPieza.NAN] |= eval.m_Ataques[cColor.BLANCO][cPieza.REY]; eval.m_Ataques[cColor.NEGRO][cPieza.NAN] |= eval.m_Ataques[cColor.NEGRO][cPieza.REY]; bitbrd[] areaMovilidad = new bitbrd[]{ ~(eval.m_Ataques[cColor.NEGRO][cPieza.PEON] | pos.PiezasColor(cColor.BLANCO, cPieza.PEON, cPieza.REY)), ~(eval.m_Ataques[cColor.BLANCO][cPieza.PEON] | pos.PiezasColor(cColor.NEGRO, cPieza.PEON, cPieza.REY)) }; nPuntos += EvalPiezas(pos, eval, movilidad, areaMovilidad, cPieza.CABALLO, cColor.BLANCO); nPuntos += cEval.SetPesos(movilidad[cColor.BLANCO] - movilidad[cColor.NEGRO], m_Pesos[cEvalPesos.MOVILIDAD]); nPuntos += EvalRey(pos, eval, cColor.BLANCO) - EvalRey(pos, eval, cColor.NEGRO); nPuntos += EvalAmenazas(pos, eval, cColor.BLANCO) - EvalAmenazas(pos, eval, cColor.NEGRO); nPuntos += EvalPeonesPasados(pos, eval, cColor.BLANCO) - EvalPeonesPasados(pos, eval, cColor.NEGRO); if (0 == pos.MaterialPieza(cColor.BLANCO) || 0 == pos.MaterialPieza(cColor.NEGRO)) nPuntos += EvalPeonImparable(pos, cColor.BLANCO, eval) - EvalPeonImparable(pos, cColor.NEGRO, eval); if (eval.m_Material.Peso() != 0) { int s = EvalEspacio(pos, eval, cColor.BLANCO) - EvalEspacio(pos, eval, cColor.NEGRO); nPuntos += cEval.SetPesos(s * eval.m_Material.Peso(), m_Pesos[cEvalPesos.ESPACIO]); } factor sf = cTypes.GetFinalJuego(nPuntos) > cValoresJuego.TABLAS ? eval.m_Material.FactorDeEscala(pos, cColor.BLANCO) : eval.m_Material.FactorDeEscala(pos, cColor.NEGRO); if (eval.m_Material.Fase() < cFaseJuego.MEDIO_JUEGO && pos.AlfilesOpuestos() && (sf == cFactorEscala.NORMAL || sf == cFactorEscala.PEON)) { if (pos.MaterialPieza(cColor.BLANCO) == cValoresJuego.ALFIL_MJ && pos.MaterialPieza(cColor.NEGRO) == cValoresJuego.ALFIL_MJ) { bool one_pawn = (pos.GetNum(cColor.BLANCO, cPieza.PEON) + pos.GetNum(cColor.NEGRO, cPieza.PEON) == 1); sf = one_pawn ? (8) : (32); } else sf = (50 * sf / cFactorEscala.NORMAL); } val v = cTypes.GetMedioJuego(nPuntos) * (eval.m_Material.Fase()) + cTypes.GetFinalJuego(nPuntos) * (cFaseJuego.MEDIO_JUEGO - eval.m_Material.Fase()) * sf / cFactorEscala.NORMAL; v /= (cFaseJuego.MEDIO_JUEGO); return pos.ColorMueve() == cColor.BLANCO ? v : -v; }
//---------------------------------------------------------------------------------------- public static int JugadasLegales(cPosicion pos, cMov[] mlist, int mPos) { int end, cur = mPos; bitbrd pinned = pos.pinned_pieces(pos.ColorMueve()); sq ksq = pos.GetRey(pos.ColorMueve()); end=pos.Jaques()!=0 ? Evasiones(pos, mlist, mPos) : Generar(pos, mlist, mPos, cMovType.NON_EVASIONS); while(cur!=end) if((pinned!=0||cTypes.GetFromCasilla(mlist[cur].m)==ksq||cTypes.TipoMovimiento(mlist[cur].m)==cMovType.ENPASO) &&!pos.IsLegalMov(mlist[cur].m, pinned)) mlist[cur].m=mlist[--end].m; else ++cur; return end; }
//----------------------------------------------------------------------------------------------- public factor KRPKR(cPosicion pos) { sq nCasillaReyBlanco = Normalizar(pos, m_cFuerte, pos.GetRey(m_cFuerte)); sq nCasillaReyNegro = Normalizar(pos, m_cFuerte, pos.GetRey(m_cDebil)); sq wnCasillaTorre = Normalizar(pos, m_cFuerte, pos.GetList(m_cFuerte, cPieza.TORRE)[0]); sq wnCasillaPeon = Normalizar(pos, m_cFuerte, pos.GetList(m_cFuerte, cPieza.PEON)[0]); sq bnCasillaTorre = Normalizar(pos, m_cFuerte, pos.GetList(m_cDebil, cPieza.TORRE)[0]); colum f = cTypes.Columna(wnCasillaPeon); fila r = cTypes.Fila(wnCasillaPeon); sq queeningSq = cTypes.CreaCasilla(f, FILA.F8); int tempo = (pos.ColorMueve() == m_cFuerte ? 1 : 0); if (r <= FILA.F5 && cBitBoard.Distancia(nCasillaReyNegro, queeningSq) <= 1 && nCasillaReyBlanco <= cCasilla.H5 && (cTypes.Fila(bnCasillaTorre) == FILA.F6 || (r <= FILA.F3 && cTypes.Fila(wnCasillaTorre) != FILA.F6))) return cFactorEscala.TABLAS; if (r == FILA.F6 && cBitBoard.Distancia(nCasillaReyNegro, queeningSq) <= 1 && cTypes.Fila(nCasillaReyBlanco) + tempo <= FILA.F6 && (cTypes.Fila(bnCasillaTorre) == FILA.F1 || (0 == tempo && Math.Abs(cTypes.Columna(bnCasillaTorre) - f) >= 3))) return cFactorEscala.TABLAS; if (r >= FILA.F6 && nCasillaReyNegro == queeningSq && cTypes.Fila(bnCasillaTorre) == FILA.F1 && (0 == tempo || cBitBoard.Distancia(nCasillaReyBlanco, wnCasillaPeon) >= 2)) return cFactorEscala.TABLAS; if (wnCasillaPeon == cCasilla.A7 && wnCasillaTorre == cCasilla.A8 && (nCasillaReyNegro == cCasilla.H7 || nCasillaReyNegro == cCasilla.G7) && cTypes.Columna(bnCasillaTorre) == COLUMNA.A && (cTypes.Fila(bnCasillaTorre) <= FILA.F3 || cTypes.Columna(nCasillaReyBlanco) >= COLUMNA.D || cTypes.Fila(nCasillaReyBlanco) <= FILA.F5)) return cFactorEscala.TABLAS; if (r <= FILA.F5 && nCasillaReyNegro == wnCasillaPeon + cCasilla.NORTE && cBitBoard.Distancia(nCasillaReyBlanco, wnCasillaPeon) - tempo >= 2 && cBitBoard.Distancia(nCasillaReyBlanco, bnCasillaTorre) - tempo >= 2) return cFactorEscala.TABLAS; if (r == FILA.F7 && f != COLUMNA.A && cTypes.Columna(wnCasillaTorre) == f && wnCasillaTorre != queeningSq && (cBitBoard.Distancia(nCasillaReyBlanco, queeningSq) < cBitBoard.Distancia(nCasillaReyNegro, queeningSq) - 2 + tempo) && (cBitBoard.Distancia(nCasillaReyBlanco, queeningSq) < cBitBoard.Distancia(nCasillaReyNegro, wnCasillaTorre) + tempo)) return (factor)(cFactorEscala.MAXIMO - 2 * cBitBoard.Distancia(nCasillaReyBlanco, queeningSq)); if (f != COLUMNA.A && cTypes.Columna(wnCasillaTorre) == f && wnCasillaTorre < wnCasillaPeon && (cBitBoard.Distancia(nCasillaReyBlanco, queeningSq) < cBitBoard.Distancia(nCasillaReyNegro, queeningSq) - 2 + tempo) && (cBitBoard.Distancia(nCasillaReyBlanco, wnCasillaPeon + cCasilla.NORTE) < cBitBoard.Distancia(nCasillaReyNegro, wnCasillaPeon + cCasilla.NORTE) - 2 + tempo) && (cBitBoard.Distancia(nCasillaReyNegro, wnCasillaTorre) + tempo >= 3 || (cBitBoard.Distancia(nCasillaReyBlanco, queeningSq) < cBitBoard.Distancia(nCasillaReyNegro, wnCasillaTorre) + tempo && (cBitBoard.Distancia(nCasillaReyBlanco, wnCasillaPeon + cCasilla.NORTE) < cBitBoard.Distancia(nCasillaReyNegro, wnCasillaTorre) + tempo)))) return (factor)(cFactorEscala.MAXIMO - 8 * cBitBoard.Distancia(wnCasillaPeon, queeningSq) - 2 * cBitBoard.Distancia(nCasillaReyBlanco, queeningSq)); if (r <= FILA.F4 && nCasillaReyNegro > wnCasillaPeon) { if (cTypes.Columna(nCasillaReyNegro) == cTypes.Columna(wnCasillaPeon)) return 10; if (Math.Abs(cTypes.Columna(nCasillaReyNegro) - cTypes.Columna(wnCasillaPeon)) == 1 && cBitBoard.Distancia(nCasillaReyBlanco, nCasillaReyNegro) > 2) return (24 - 2 * cBitBoard.Distancia(nCasillaReyBlanco, nCasillaReyNegro)); } return cFactorEscala.NAN; }
//----------------------------------------------------------------------------------------------- public val KPK(cPosicion pos) { //sq posReyBlanco = Normalizar(posicion, m_cFuerte, posicion.GetRey(m_cFuerte)); //sq posReyNegro = Normalizar(posicion, m_cFuerte, posicion.GetRey(m_cDebil));*/ //sq casillaFromPos = Normalizar(posicion, m_cFuerte, posicion.GetList(m_cFuerte, cPieza.PEON)[0]); //color colr = m_cFuerte == posicion.ColorMueve() ? cColor.BLANCO : cColor.NEGRO; //if (!cBitbaseKPK.Buscar(posReyBlanco, casillaFromPos, posReyNegro, colr)) // return cValoresJuego.TABLAS; //val result = cValoresJuego.GANA + cValoresJuego.PEON_FINAL + cTypes.Fila(casillaFromPos); //return m_cFuerte == posicion.ColorMueve() ? result : -result;*/ color colr = m_cFuerte==pos.ColorMueve() ? cColor.BLANCO : cColor.NEGRO; val result = cValoresJuego.TABLAS; if(SetConjuntoPiezasPosicion(pos)) { ProbeResultType pr = cTablaFinales.Probe(whitePieceSquares, blackPieceSquares, whiteTypesSquares, blackTypesSquares, colr, enPassantSquare); if(pr.found) { if(pr.stm==MateResult.MATE_NEGRAS||pr.stm==MateResult.MATE_BLANCAS) { if(m_cFuerte==pos.ColorMueve()) result=(cValoresJuego.MATE-pr.ply); else result=-cValoresJuego.MATE+pr.ply; } } } return result; }
//----------------------------------------------------------------------------------------------- public val KXK(cPosicion pos) { if (pos.ColorMueve() == m_cDebil && 0 == (new cReglas(pos, cMovType.LEGAL)).Size()) return cValoresJuego.TABLAS; sq posReyGanador = pos.GetRey(m_cFuerte); sq posReyPerdedor = pos.GetRey(m_cDebil); val result = pos.MaterialPieza(m_cFuerte) + pos.GetNum(m_cFuerte, cPieza.PEON) * cValoresJuego.PEON_FINAL + m_lstValorBorde[posReyPerdedor] + m_lstValorCerrado[cBitBoard.Distancia(posReyGanador, posReyPerdedor)]; if (pos.GetNum(m_cFuerte, cPieza.DAMA) != 0 || pos.GetNum(m_cFuerte, cPieza.TORRE) != 0 || (pos.GetNum(m_cFuerte, cPieza.ALFIL) != 0 && pos.GetNum(m_cFuerte, cPieza.CABALLO) != 0) || pos.IsAlfilPar(m_cFuerte)) { result += cValoresJuego.GANA; } return m_cFuerte == pos.ColorMueve() ? result : -result; }
//----------------------------------------------------------------------------------------------- public factor KPKP(cPosicion pos) { color colr = m_cFuerte==pos.ColorMueve() ? cColor.BLANCO : cColor.NEGRO; val result = cFactorEscala.TABLAS; if(SetConjuntoPiezasPosicion(pos)) { ProbeResultType pr = cTablaFinales.Probe(whitePieceSquares, blackPieceSquares, whiteTypesSquares, blackTypesSquares, colr, enPassantSquare); if(pr.found) { if(pr.stm==MateResult.MATE_NEGRAS||pr.stm==MateResult.MATE_BLANCAS) result=cFactorEscala.NAN; } } return result; /*sq nCasillaReyBlanco = Normalizar(pos, m_cFuerte, pos.GetRey(m_cFuerte)); sq nCasillaReyNegro = Normalizar(pos, m_cFuerte, pos.GetRey(m_cDebil)); sq nCasillaPeon = Normalizar(pos, m_cFuerte, pos.GetList(m_cFuerte, cPieza.PEON)[0]); color us = m_cFuerte == pos.ColorMueve() ? cColor.BLANCO : cColor.NEGRO; if (cTypes.Fila(nCasillaPeon) >= FILA.F5 && cTypes.Columna(nCasillaPeon) != COLUMNA.A) return cFactorEscala.NAN; return cBitbaseKPK.Buscar(nCasillaReyBlanco, nCasillaPeon, nCasillaReyNegro, us) ? cFactorEscala.NAN : cFactorEscala.TABLAS;*/ }
public static val qsearch(cPosicion pos, cStackMov[] ss, int ssPos, val alpha, val beta, ply depth, NodeType NT, bool InCheck) { bool PvNode = (NT == cTipoNodo.PV); cPosInfo st = null; cTablaHashStruct tte; hash posKey; mov ttMove, move, bestMove; val bestValue, value, ttValue, futilityValue, futilityBase, oldAlpha = 0; bool givesCheck, evasionPrunable; ply ttDepth; if (PvNode) oldAlpha = alpha; ss[ssPos].currentMove = bestMove = cMovType.MOV_NAN; ss[ssPos].ply = ss[ssPos - 1].ply + 1; if (pos.IsTablas() || ss[ssPos].ply > cSearch.MAX_PLY) return ss[ssPos].ply > cSearch.MAX_PLY && !InCheck ? cEval.Eval(pos) : DrawValue[pos.ColorMueve()]; ttDepth = ((InCheck || depth >= cPly.DEPTH_QS_CHECKS) ? cPly.DEPTH_QS_CHECKS : cPly.DEPTH_QS_NO_CHECKS); posKey = pos.ClaveHash(); tte = cMotor.m_TablaHash.Buscar(posKey); ttMove = (tte != null ? tte.GetMove() : cMovType.MOV_NAN); ttValue = tte != null ? value_from_tt(tte.GetValue(), ss[ssPos].ply) : cValoresJuego.NAN; if (tte != null && tte.GetDepth() >= ttDepth && ttValue != cValoresJuego.NAN && (PvNode ? tte.GetBound() == cBordes.BOUND_EXACT : (ttValue >= beta) ? (tte.GetBound() & cBordes.BOUND_LOWER) != 0 : (tte.GetBound() & cBordes.BOUND_UPPER) != 0)) { ss[ssPos].currentMove = ttMove; return ttValue; } if (InCheck) { ss[ssPos].staticEval = cValoresJuego.NAN; bestValue = futilityBase = -cValoresJuego.INFINITO; } else { if (tte != null) { if ((ss[ssPos].staticEval = bestValue = tte.GetValueEval()) == cValoresJuego.NAN) ss[ssPos].staticEval = bestValue = cEval.Eval(pos); if (ttValue != cValoresJuego.NAN) if ((tte.GetBound() & (ttValue > bestValue ? cBordes.BOUND_LOWER : cBordes.BOUND_UPPER)) != 0) bestValue = ttValue; } else ss[ssPos].staticEval = bestValue = cEval.Eval(pos); if (bestValue >= beta) { if (tte == null) cMotor.m_TablaHash.Save(pos.ClaveHash(), value_to_tt(bestValue, ss[ssPos].ply), cBordes.BOUND_LOWER, cPly.DEPTH_NONE, cMovType.MOV_NAN, ss[ssPos].staticEval); return bestValue; } if (PvNode && bestValue > alpha) alpha = bestValue; futilityBase = bestValue + 128; } cMovOrder mp = new cMovOrder(pos, ttMove, depth, History, cTypes.GetToCasilla(ss[ssPos - 1].currentMove)); cInfoJaque ci = new cInfoJaque(pos); st = new cPosInfo(); while ((move = mp.SiguienteMovimientoEnFalso()) != cMovType.MOV_NAN) { givesCheck = cTypes.TipoMovimiento(move) == cMovType.NORMAL && 0 == ci.m_Candidatas ? (ci.m_Jaque[cTypes.TipoPieza(pos.GetPieza(cTypes.GetFromCasilla(move)))] & cBitBoard.m_nCasillas[cTypes.GetToCasilla(move)]) != 0 : pos.IsJaque(move, ci); if (!PvNode && !InCheck && !givesCheck && move != ttMove && futilityBase > -cValoresJuego.GANA && !pos.IsPeonAvanzado(move)) { futilityValue = futilityBase + cPosicion.m_nValPieza[cFaseJuego.FASE_FINAL][pos.GetPieza(cTypes.GetToCasilla(move))]; if (futilityValue < beta) { bestValue = Math.Max(bestValue, futilityValue); continue; } if (futilityBase < beta && pos.SEE(move) <= cValoresJuego.CERO) { bestValue = Math.Max(bestValue, futilityBase); continue; } } evasionPrunable = InCheck && bestValue > cValoresJuego.MATE_MAXIMO_VS && !pos.IsCaptura(move) && 0 == pos.CanEnroque(pos.ColorMueve()); if (!PvNode && (!InCheck || evasionPrunable) && move != ttMove && cTypes.TipoMovimiento(move) != cMovType.PROMOCION && pos.SEEReducido(move) < cValoresJuego.CERO) continue; if (!pos.IsLegalMov(move, ci.m_Clavadas)) continue; ss[ssPos].currentMove = move; pos.DoMov(move, st, ci, givesCheck); value = givesCheck ? -qsearch(pos, ss, ssPos + 1, -beta, -alpha, depth - cPly.ONE_PLY, NT, true) : -qsearch(pos, ss, ssPos + 1, -beta, -alpha, depth - cPly.ONE_PLY, NT, false); pos.DesMov(move); if (value > bestValue) { bestValue = value; if (value > alpha) { if (PvNode && value < beta) { alpha = value; bestMove = move; } else { cMotor.m_TablaHash.Save(posKey, value_to_tt(value, ss[ssPos].ply), cBordes.BOUND_LOWER, ttDepth, move, ss[ssPos].staticEval); return value; } } } } if (InCheck && bestValue == -cValoresJuego.INFINITO) return cTypes.MateEnVs(ss[ssPos].ply); cMotor.m_TablaHash.Save(posKey, value_to_tt(bestValue, ss[ssPos].ply), PvNode && bestValue > oldAlpha ? cBordes.BOUND_EXACT : cBordes.BOUND_UPPER, ttDepth, bestMove, ss[ssPos].staticEval); return bestValue; }
//----------------------------------------------------------------------------------------------- public val KQKP(cPosicion pos) { sq nCasillaReyGanador = pos.GetRey(m_cFuerte); sq nCasillaReyPerdedor = pos.GetRey(m_cDebil); sq nCasillaPeon = pos.GetList(m_cDebil, cPieza.PEON)[0]; val result = (m_lstValorCerrado[cBitBoard.Distancia(nCasillaReyGanador, nCasillaReyPerdedor)]); if (cTypes.FilaProxima(m_cDebil, nCasillaPeon) != FILA.F7 || cBitBoard.Distancia(nCasillaReyPerdedor, nCasillaPeon) != 1 || 0 == ((cBitBoard.A | cBitBoard.C | cBitBoard.F | cBitBoard.H) & cBitBoard.m_nCasillas[nCasillaPeon])) result += cValoresJuego.DAMA_FINAL - cValoresJuego.PEON_FINAL; return m_cFuerte == pos.ColorMueve() ? result : -result; }
//------------------------------------------------------------------------------------ public static hash PolyglotKey(cPosicion posicion) { hash key = 0; bitbrd bitBoard = posicion.Piezas(); while (bitBoard != 0) { sq s = cBitBoard.GetLSB(ref bitBoard); pieza pc = posicion.GetPieza(s); int pieceOfs = 2 * (cTypes.TipoPieza(pc) - 1) + ((cTypes.GetColor(pc) == cColor.BLANCO) ? 1 : 0); key ^= PG[nCasillaPeon + (64 * pieceOfs + s)]; } bitBoard = (ulong)posicion.PosibleEnrocar(cEnroque.CUALQUIER_ENROQUE); while (bitBoard != 0) key ^= PG[m_nEnroque + cBitBoard.GetLSB(ref bitBoard)]; if (posicion.CasillaEnPaso() != cCasilla.NONE) key ^= PG[m_nEnPaso + cTypes.Columna(posicion.CasillaEnPaso())]; if (posicion.ColorMueve() == cColor.BLANCO) key ^= PG[m_nTurno + 0]; return key; }
//---------------------------------------------------------------------------------------- public static int Evasiones(cPosicion pos, cMov[] mlist, int mPos) { color us = pos.ColorMueve(); sq ksq = pos.GetRey(us); bitbrd sliderAttacks = 0; bitbrd sliders = pos.Jaques()&~pos.GetNumPiezas(cPieza.CABALLO, cPieza.PEON); while(sliders!=0) { sq checksq = cBitBoard.GetLSB(ref sliders); sliderAttacks|=cBitBoard.m_EnLinea[checksq][ksq]^cBitBoard.m_nCasillas[checksq]; } bitbrd b = pos.attacks_from_square_piecetype(ksq, cPieza.REY)&~pos.PiezasColor(us)&~sliderAttacks; while(b!=0) mlist[mPos++].m=cTypes.CreaMov(ksq, cBitBoard.GetLSB(ref b)); if(cBitBoard.MayorQue(pos.Jaques())) return mPos; sq checksq2 = cBitBoard.LSB(pos.Jaques()); bitbrd target = cBitBoard.Entre(checksq2, ksq)|cBitBoard.m_nCasillas[checksq2]; return us==cColor.BLANCO ? ToDO(pos, mlist, mPos, target, cColor.BLANCO, cMovType.EVASIONS, null) : ToDO(pos, mlist, mPos, target, cColor.NEGRO, cMovType.EVASIONS, null); }