static void showstep(board_t board) {
int turn, fc, tc, eatten;
char *dir;
turn = CHE_O(board[chc_from.r][chc_from.c]);
fc = (turn == (chc_my ^ 1) ? chc_from.c + 1 : 9 - chc_from.c);
tc = (turn == (chc_my ^ 1) ? chc_to.c + 1 : 9 - chc_to.c);
if(chc_from.r == chc_to.r)
dir = "平";
else {
if(chc_from.c == chc_to.c)
tc = chc_from.r - chc_to.r;
if(tc < 0) tc = -tc;
if((turn == (chc_my ^ 1) && chc_to.r > chc_from.r) ||
(turn == chc_my && chc_to.r < chc_from.r))
dir = "進";
else
dir = "退";
}
prints("%s%s%s%s%s",
turn == 0 ? BLACK_COLOR : RED_COLOR,
chess_str[turn][CHE_P(board[chc_from.r][chc_from.c])],
num_str[fc], dir, num_str[tc]);
eatten = board[chc_to.r][chc_to.c];
if(eatten)
prints("： %s%s",
CHE_O(eatten) == 0 ? BLACK_COLOR : RED_COLOR,
chess_str[CHE_O(eatten)][CHE_P(eatten)]);
prints("\033[m");
}
int chc_ischeck(board_t board, int turn) {
rc_t from, to;
findking(board, turn, &to);
for(from.r = 0;from.r < BRD_ROW; from.r++)
for(from.c = 0; from.c < BRD_COL; from.c++)
if(board[from.r][from.c] &&
CHE_O(board[from.r][from.c]) != turn)
if(chc_canmove(board, from, to))
return 1;
return 0;
}
static void findking(board_t board, int turn, rc_t *buf) {
int i, r, c;
r = (turn == (chc_my ^ 1)) ? 0 : 7;
for(i = 0; i < 3; r++, i++)
for(c = 3; c < 6; c++)
if(CHE_P(board[r][c]) == 1 &&
CHE_O(board[r][c]) == turn) {
buf->r = r, buf->c = c;
return ;
}
}
static int myplay(int s, board_t board, board_t tmpbrd) {
int ch, start_time;
int endgame = 0, endturn = 0;
chc_ipass = 0, chc_selected = 0;
start_time = time(NULL);
chc_lefttime = CHC_TIMEOUT - (time(NULL) - start_time);
bell();
while(!endturn) {
chc_drawline(board, TIME_ROW);
chc_movecur(chc_cursor.r, chc_cursor.c);
oflush();
ch = igetkey();
chc_lefttime = CHC_TIMEOUT - (time(NULL) - start_time);
if(chc_lefttime < 0)
ch = 'q';
switch(ch) {
case I_OTHERDATA:
if(chc_recvmove(s)) { /* disconnect */
endgame = 1;
endturn = 1;
} else if(chc_from.r == -1 && chc_ipass) {
endgame = 3;
endturn = 1;
}
break;
case KEY_UP:
chc_cursor.r--;
if(chc_cursor.r < 0)
chc_cursor.r = BRD_ROW - 1;
break;
case KEY_DOWN:
chc_cursor.r++;
if(chc_cursor.r >= BRD_ROW)
chc_cursor.r = 0;
break;
case KEY_LEFT:
chc_cursor.c--;
if(chc_cursor.c < 0)
chc_cursor.c = BRD_COL - 1;
break;
case KEY_RIGHT:
chc_cursor.c++;
if(chc_cursor.c >= BRD_COL)
chc_cursor.c = 0;
break;
case 'q':
endgame = 2;
endturn = 1;
break;
case 'p':
chc_ipass = 1;
chc_from.r = -1;
chc_sendmove(s);
strcpy(chc_warnmsg, "\033[1;33m要求和棋!\033[m");
chc_drawline(board, WARN_ROW);
bell();
break;
case '\r':
case '\n':
case ' ':
if(chc_selected) {
if(chc_cursor.r == chc_select.r &&
chc_cursor.c == chc_select.c) {
chc_selected = 0;
chc_drawline(board, LTR(chc_cursor.r));
} else if(chc_canmove(board, chc_select, chc_cursor)) {
if(CHE_P(board[chc_cursor.r][chc_cursor.c]) == 1)
endgame = 1;
chc_from = chc_select;
chc_to = chc_cursor;
if(!endgame) {
memcpy(tmpbrd, board, sizeof(board_t));
chc_movechess(tmpbrd);
}
if(endgame || !chc_iskfk(tmpbrd)) {
chc_drawline(board, STEP_ROW);
chc_movechess(board);
chc_sendmove(s);
chc_selected = 0;
chc_drawline(board, LTR(chc_from.r));
chc_drawline(board, LTR(chc_to.r));
endturn = 1;
} else {
strcpy(chc_warnmsg, "\033[1;33m不可以王見王\033[m");
bell();
chc_drawline(board, WARN_ROW);
}
}
} else if(board[chc_cursor.r][chc_cursor.c] &&
CHE_O(board[chc_cursor.r][chc_cursor.c]) == chc_turn) {
chc_selected = 1;
chc_select = chc_cursor;
chc_drawline(board, LTR(chc_cursor.r));
}
break;
}
}
return endgame;
}
void chc_drawline(board_t board, int line) {
int i, j;
move(line, 0);
clrtoeol();
if(line == 0) {
prints("\033[1;46m 象棋對奕 \033[45m%30s VS %-30s\033[m",
cuser.userid, uin->userid);
} else if(line >= 3 && line <= 21) {
outs(" ");
for(i = 0; i < 9; i++) {
j = board[RTL(line)][i];
if((line & 1) == 1 && j) {
if(chc_selected &&
chc_select.r == RTL(line) && chc_select.c == i)
prints("%s%s\033[m",
CHE_O(j) == 0 ? BLACK_REVERSE : RED_REVERSE,
chess_str[CHE_O(j)][CHE_P(j)]);
else
prints("%s%s\033[m",
CHE_O(j) == 0 ? BLACK_COLOR : RED_COLOR,
chess_str[CHE_O(j)][CHE_P(j)]);
} else
prints("%c%c", chess_brd[line - 3][i * 4],
chess_brd[line - 3][i * 4 + 1]);
if(i != 8)
prints("%c%c", chess_brd[line - 3][i * 4 + 2],
chess_brd[line - 3][i * 4 + 3]);
}
outs(" ");
if(line >= 3 && line < 3 + dim(hint_str)) {
outs(hint_str[line - 3]);
} else if(line == SIDE_ROW) {
prints("\033[1m你是%s%s\033[m",
chc_my == 0 ? BLACK_COLOR : RED_COLOR,
turn_str[chc_my]);
} else if(line == TURN_ROW) {
prints("%s%s\033[m",
TURN_COLOR,
chc_my == chc_turn ? "輪到你下棋了" : "等待對方下棋");
} else if(line == STEP_ROW && !chc_firststep) {
showstep(board);
} else if(line == TIME_ROW) {
prints("剩餘時間 %d:%02d", chc_lefttime / 60, chc_lefttime %60);
} else if(line == WARN_ROW) {
outs(chc_warnmsg);
} else if(line == MYWIN_ROW) {
prints("\033[1;33m%12.12s "
"\033[1;31m%2d\033[37m勝 "
"\033[34m%2d\033[37m敗 "
"\033[36m%2d\033[37m和\033[m",
cuser.userid,
my.chc_win, my.chc_lose , my.chc_tie);
} else if(line == HISWIN_ROW) {
prints("\033[1;33m%12.12s "
"\033[1;31m%2d\033[37m勝 "
"\033[34m%2d\033[37m敗 "
"\033[36m%2d\033[37m和\033[m",
uin->userid,
chc_hiswin, chc_hislose , chc_histie);
}
} else if(line == 2 || line == 22) {
outs(" ");
if(line == 2)
for(i = 1; i <= 9; i++)
prints("%s ", num_str[i]);
else
for(i = 9; i >= 1; i--)
prints("%s ", num_str[i]);
}
}
int chc_canmove(board_t board, rc_t from, rc_t to) {
int i;
int rd, cd, turn;
rd = dist(from, to, 0);
cd = dist(from, to, 1);
turn = CHE_O(board[from.r][from.c]);
/* general check */
if(board[to.r][to.c] && CHE_O(board[to.r][to.c]) == turn)
return 0;
/* individual check */
switch(CHE_P(board[from.r][from.c])) {
case 1: /* 將 帥 */
if(!(rd == 1 && cd == 0) &&
!(rd == 0 && cd == 1))
return 0;
if((turn == (chc_my ^ 1) && to.r > 2) ||
(turn == chc_my && to.r < 7) ||
to.c < 3 || to.c > 5)
return 0;
break;
case 2: /* 士 仕 */
if(!(rd == 1 && cd == 1))
return 0;
if((turn == (chc_my ^ 1) && to.r > 2) ||
(turn == chc_my && to.r < 7) ||
to.c < 3 || to.c > 5)
return 0;
break;
case 3: /* 象 相 */
if(!(rd == 2 && cd == 2))
return 0;
if((turn == (chc_my ^ 1) && to.r > 4) ||
(turn == chc_my && to.r < 5))
return 0;
/* 拐象腿 */
if(board[CENTER(from.r, to.r)][CENTER(from.c, to.c)])
return 0;
break;
case 4: /* 車 */
if(!(rd > 0 && cd == 0) &&
!(rd == 0 && cd > 0))
return 0;
if(between(board, from, to, rd == 0))
return 0;
break;
case 5: /* 馬 傌 */
if(!(rd == 2 && cd == 1) &&
!(rd == 1 && cd == 2))
return 0;
/* 拐馬腳 */
if(rd == 2) {
if(board[CENTER(from.r, to.r)][from.c])
return 0;
} else {
if(board[from.r][CENTER(from.c, to.c)])
return 0;
}
break;
case 6: /* 包 炮 */
if(!(rd > 0 && cd == 0) &&
!(rd == 0 && cd > 0))
return 0;
i = between(board, from, to, rd == 0);
if((i > 1) ||
(i == 1 && !board[to.r][to.c]) ||
(i == 0 && board[to.r][to.c]))
return 0;
break;
case 7: /* 卒 兵 */
if(!(rd == 1 && cd == 0) &&
!(rd == 0 && cd == 1))
return 0;
if(((turn == (chc_my ^ 1) && to.r < 5) ||
(turn == chc_my && to.r > 4)) &&
cd != 0)
return 0;
if((turn == (chc_my ^ 1) && to.r < from.r) ||
(turn == chc_my && to.r > from.r))
return 0;
break;
}
return 1;
}
