void CAIThread::RespawnTwo()
{
m_bmCurrent.Clear();
m_bmCurrent.SetAttack( Yes );
m_bmCurrent.SetJump( Yes );
SelectMove();
}
void CAIThread::NewInventoryMove()
{
CWeaponSpec* pBest = SelectBestWeapon();
if ( pBest != NULL )
{
UseItem( pBest->GetInventoryIndex() );
}
SelectMove();
}
void CAIThread::ComputeMove()
{
if ( m_pDoMove == NULL )
{
SelectMove();
}
if ( PrepareMove() )
{
( this->*m_pDoMove )();
SendMove();
}
}
void CAIThread::OnBotRespawned()
{
WORD nDeaths;
ASSERT( m_pBotDoc != NULL );
nDeaths = m_pBotDoc->GetBot()->GetDeaths();
m_pBotDoc->ConsoleCommand( CString((LPCSTR)IDS_CMD_INVEN) );
if ( nDeaths == 0 )
{
CString strChat;
strChat.Format("%s %s %s",
CString((LPCSTR)IDS_CHAT_GREETING1),
CString((LPCSTR)IDS_CHAT_GREETING2),
CString((LPCSTR)IDS_WEB_PANDORA));
m_pBotDoc->Say( strChat );
}
SelectMove();
}
InputCommand()
/*
Process the users command. If easy mode is OFF (the computer is
thinking on opponents time) and the program is out of book, then make
the 'hint' move on the board and call SelectMove() to find a response.
The user terminates the search by entering ^C (quit siqnal) before
entering a command. If the opponent does not make the hint move, then
set Sdepth to zero.
*/
{
int i;
short ok,tmp;
long cnt,rate,t1,t2;
unsigned short mv;
char s[80];
ok = quit = false;
player = opponent;
ft = 0;
if (hint > 0 && !easy && Book == NULL)
{
fflush(stdout);
time0 = time((long *)0);
algbr(hint>>8,hint & 0xFF,false);
strcpy(s,mvstr1);
tmp = epsquare;
if (VerifyMove(s,1,&mv))
{
SelectMove(computer,2);
VerifyMove(mvstr1,2,&mv);
if (Sdepth > 0) Sdepth--;
}
ft = time((long *)0) - time0;
epsquare = tmp;
}
/* computer move */
static PyObject *
engine_cmove(PyObject *self, PyObject *args)
{
if (verbose)
{
printf("gshogi builtin engine settings\n");
printf(" - computer player (side to move) is: %d", computer);
if (computer == white)
{
printf(" (white)\n");
}
else
{
printf(" (black)\n");
}
printf(" - depth=%i\n",MaxSearchDepth);
printf(" - nodes=%ld",NodeCntLimit);
if (NodeCntLimit > 0)
{
printf("\n");
}
else
{
printf(" (no limit)\n");
}
printf(" - tournament (classical) TC (true/false): %d\n", TCflag);
printf(" - tournament TC minutes: %d\n", TCminutes);
printf(" - tournament TC seconds: %d\n", TCseconds);
printf(" - max response time if not using tournament TC (centiseconds): %ld\n", MaxResponseTime);
}
winner = 0;
compptr = (compptr + 1) % MINGAMEIN;
if (!(flag.quit || flag.mate || flag.force))
{
#ifdef INTERRUPT_TEST
printf("starting search...\n");
#endif
Py_BEGIN_ALLOW_THREADS
SelectMove(computer, FOREGROUND_MODE);
Py_END_ALLOW_THREADS
if (computer == white)
{
if (flag.gamein)
{
TimeCalc();
}
else if (TimeControl.moves[computer] == 0)
{
if (XC)
{
if (XCmore < XC)
{
TCmoves = XCmoves[XCmore];
TCminutes = XCminutes[XCmore];
TCseconds = XCseconds[XCmore];
XCmore++;
}
}
SetTimeControl();
}
}
}
void CAIThread::RandomMove()
{
MoveRandomly( MOVE_DISTANCE*2 );
SelectMove();
}
int
main (int argc, char **argv)
{
/*
* Process command-line arguments.
*/
/* Get rid of the program name. */
argc--;
argv++;
/* CHECKME: get rid of the '+' syntax? */
while ((argc > 0) && ((argv[0][0] == '-') || (argv[0][0] == '+')))
{
switch (argv[0][1])
{
case 'a':
/* Need the "+" syntax here... */
ahead = ((argv[0][0] == '-') ? false : true);
break;
case 'b':
argc--;
argv++;
if (argc > 0)
{
bookfile = argv[0];
#ifdef BINBOOK
binbookfile = NULL;
#endif
}
break;
#ifdef BINBOOK
case 'B':
argc--;
argv++;
if (argc > 0)
binbookfile = argv[0];
break;
#endif
case 'C':
/* Curses interface. */
display_type = DISPLAY_CURSES;
break;
case 'h':
/* Need the "+" syntax here... */
hash = ((argv[0][0] == '-') ? false : true);
break;
case 'l':
argc--;
argv++;
if (argc > 0)
Lang = argv[0];
break;
case 'L':
argc--;
argv++;
if (argc > 0)
strcpy(listfile, argv[0]);
break;
case 's':
argc--;
argv++;
if (argc > 0)
strcpy(savefile, argv[0]);
break;
case 'P':
argc--;
argv++;
if (argc > 0)
bookmaxply = atoi(argv[0]);
break;
case 'R':
/* Raw text interface. */
display_type = DISPLAY_RAW;
break;
case 'S':
argc--;
argv++;
if (argc > 0)
booksize = atoi(argv[0]);
break;
#if ttblsz
case 'r':
argc--;
argv++;
if (argc > 0)
rehash = atoi(argv[0]);
if (rehash > MAXrehash)
rehash = MAXrehash;
break;
case 'T':
argc--;
argv++;
if (argc > 0)
ttblsize = atoi(argv[0]);
if ((ttblsize <= MINTTABLE))
ttblsize = (MINTTABLE) + 1;
break;
#ifdef HASHFILE
case 'c': /* Create or test persistent transposition table. */
argc--;
argv++;
if (argc > 0)
filesz = atoi(argv[0]);
else
filesz = vfilesz;
if ((filesz > 0) && (filesz < 24))
filesz = (1 << filesz) - 1 + MAXrehash;
else
filesz = filesz + MAXrehash;
if ((hashfile = fopen(HASHFILE, RWA_ACC)) == NULL)
hashfile = fopen(HASHFILE, WA_ACC);
if (hashfile != NULL)
{
long j;
struct fileentry n;
printf(CP[66]);
n.f = n.t = 0;
n.flags = 0;
n.depth = 0;
n.sh = n.sl = 0;
for (j = 0; j < filesz + 1; j++)
fwrite(&n, sizeof(struct fileentry), 1, hashfile);
fclose(hashfile);
}
else
{
printf(CP[50], HASHFILE);
}
return 0;
case 't': /* Create or test persistent transposition table. */
hashfile = fopen(HASHFILE, RWA_ACC);
if (hashfile)
{
fseek(hashfile, 0L, SEEK_END);
filesz = (ftell(hashfile) / (sizeof(struct fileentry))) - 1;
}
if (hashfile != NULL)
{
long i, j;
int nr[MAXDEPTH];
struct fileentry n;
printf(CP[49]);
for (i = 0; i < MAXDEPTH; i++)
nr[i] = 0;
fseek(hashfile, 0L, SEEK_END);
i = ftell(hashfile) / (sizeof(struct fileentry));
fseek(hashfile, 0L, SEEK_SET);
for (j = 0; j < i + 1; j++)
{
fread(&n, sizeof(struct fileentry), 1, hashfile);
if (n.depth > MAXDEPTH)
{
printf("ERROR\n");
exit(1);
}
if (n.depth)
{
nr[n.depth]++;
nr[0]++;
}
}
printf(CP[109], nr[0], i);
for (j = 1; j < MAXDEPTH; j++)
printf("%d ", nr[j]);
printf("\n");
}
return 0;
#endif /* HASHFILE */
#endif /* ttblsz */
case 'v':
fprintf(stderr, CP[102], version, patchlevel);
exit(1);
case 'X':
/* X interface. */
display_type = DISPLAY_X;
break;
case 'x':
argc--;
argv++;
if (argc > 0)
xwin = argv[0];
break;
default:
fprintf(stderr, CP[113]);
exit(1);
}
argc--;
argv++;
}
if (argc == 2)
{
char *p;
MaxResponseTime = 100L * strtol(argv[1], &p, 10);
if (*p == ':')
{
MaxResponseTime = 60L * MaxResponseTime +
100L * strtol(++p, (char **) NULL, 10);
}
TCflag = false;
TCmoves = 0;
TCminutes = 0;
TCseconds = 0;
}
if (argc >= 3)
{
char *p;
if (argc > 9)
{
printf("%s\n", CP[220]);
exit(1);
}
TCmoves = atoi(argv[1]);
TCminutes = (short)strtol(argv[2], &p, 10);
if (*p == ':')
TCseconds = (short)strtol(p + 1, (char **) NULL, 10);
else
TCseconds = 0;
TCflag = true;
argc -= 3;
argv += 3;
while (argc > 1)
{
XCmoves[XC] = atoi(argv[0]);
XCminutes[XC] = (short)strtol(argv[1], &p, 10);
if (*p == ':')
XCseconds[XC] = (short)strtol(p + 1, (char **) NULL, 10);
else
XCseconds[XC] = 0;
if (XCmoves[XC] && (XCminutes[XC] || XCseconds[XC]))
XC++;
else
{
printf("%s\n", CP[220]);
exit(1);
}
argc -= 2;
argv += 2;
}
if (argc)
{
/*
* If we got here, there are unknown arguments, so issue
* an error message and quit.
*/
printf("%s\n", CP[233]);
print_arglist(argc, argv);
exit(1);
}
}
if (InitMain() != 0)
exit(1);
while (!flag.quit)
{
oppptr = (oppptr + 1) % MINGAMEIN;
if (flag.bothsides && !flag.mate)
SelectMove(opponent, FOREGROUND_MODE);
else
InputCommand(NULL);
if (opponent == white)
{
if (flag.gamein || TCadd)
{
TimeCalc();
}
else if (TimeControl.moves[opponent] == 0)
{
if (XC)
{
if (XCmore < XC)
{
TCmoves = XCmoves[XCmore];
TCminutes = XCminutes[XCmore];
TCseconds = XCseconds[XCmore];
XCmore++;
}
}
SetTimeControl();
}
}
compptr = (compptr + 1) % MINGAMEIN;
if (!(flag.quit || flag.mate || flag.force))
{
#ifdef INTERRUPT_TEST
printf("starting search...\n");
#endif
SelectMove(computer, FOREGROUND_MODE);
if (computer == white)
{
if (flag.gamein)
{
TimeCalc();
}
else if (TimeControl.moves[computer] == 0)
{
if (XC)
{
if (XCmore < XC)
{
TCmoves = XCmoves[XCmore];
TCminutes = XCminutes[XCmore];
TCseconds = XCseconds[XCmore];
XCmore++;
}
}
SetTimeControl();
}
}
}
}
ExitMain();
return 0;
}
