kolibrios/programs/games/checkers/trunk/board.h
CleverMouse fbdccce9a4 * gcc flags: add -march=pentium-mmx -fno-rtti
* menuetlibc: fix printf, sprintf
* menuetlibc: alias clock() to sysfn 26.9.
  Not exactly what is required by POSIX, but better than zero
* autobuild games/checkers

git-svn-id: svn://kolibrios.org@5123 a494cfbc-eb01-0410-851d-a64ba20cac60
2014-09-15 09:42:01 +00:00

1409 lines
42 KiB
C++
Raw Blame History

#ifndef _HEADER_BOARD_H
#define _HEADER_BOARD_H
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <math.h>
#include <limits.h>
#include "position.h"
#include "history.h"
#include "gr-draw.h"
int ssf = 0;
struct TIntPoint
{
TIntPoint() {}
TIntPoint(int x, int y) : x(x), y(y) {}
TIntPoint(const TIntPoint &p) : x(p.x), y(p.y) {}
TIntPoint &operator=(const TIntPoint &p) {x = p.x; y = p.y; return *this;}
int x, y;
};
struct TRealPoint
{
TRealPoint() {}
TRealPoint(double x, double y) : x(x), y(y) {}
TRealPoint(const TRealPoint &p) : x(p.x), y(p.y) {}
TRealPoint(const TIntPoint &p) : x(p.x), y(p.y) {}
TRealPoint &operator=(const TRealPoint &p) {x = p.x; y = p.y; return *this;}
TRealPoint &operator=(const TIntPoint &p) {x = p.x; y = p.y; return *this;}
TIntPoint Round() {return TIntPoint((int)floor(x+0.5), (int)floor(y+0.5));}
double x, y;
};
struct TProjectivePoint
{
TProjectivePoint() {}
TProjectivePoint(const TProjectivePoint &p) : x(p.x), y(p.y), z(p.z) {}
TProjectivePoint(double x, double y, double z = 1) : x(x), y(y), z(z) {}
TProjectivePoint(const TIntPoint &p, double z = 1) : x(p.x), y(p.y), z(z) {}
TProjectivePoint(const TRealPoint &p, double z = 1) : x(p.x), y(p.y), z(z) {}
int IsCorrect() const {return fabs(x) > Eps || fabs(y) > Eps || fabs(z) > Eps;}
int IsFinite() const;
TRealPoint rpnt() const;
int rpnt(TRealPoint &p) const;
TIntPoint pnt() const;
int pnt(TIntPoint &p) const;
TProjectivePoint &operator=(const TProjectivePoint &p);
TProjectivePoint &operator=(const TIntPoint &p) {x = p.x; y = p.y; z = 1; return *this;}
TProjectivePoint &operator=(const TRealPoint &p) {x = p.x; y = p.y; z = 1; return *this;}
TProjectivePoint &operator*=(int n) {x *= n; y *= n; z *= n; return *this;}
friend TProjectivePoint operator*(const TProjectivePoint &p, int n)
{return TProjectivePoint(p.x * n, p.y * n, p.z * n);}
friend TProjectivePoint operator*(int n, const TProjectivePoint &p)
{return TProjectivePoint(n * p.x, n * p.y, n * p.z);}
TProjectivePoint &operator*=(double n) {x *= n; y *= n; z *= n; return *this;}
friend TProjectivePoint operator*(const TProjectivePoint &p, double n)
{return TProjectivePoint(p.x * n, p.y * n, p.z * n);}
friend TProjectivePoint operator*(double n, const TProjectivePoint &p)
{return TProjectivePoint(n * p.x, n * p.y, n * p.z);}
double px() const {return x/z;}
double py() const {return y/z;}
double x, y, z;
static const double Eps, FR;
};
const double TProjectivePoint::Eps = 1e-12;
const double TProjectivePoint::FR = 1e+4;
inline int TProjectivePoint::IsFinite() const
{
double fz = fabs(z);
return fz > Eps && fabs(x) < fz * FR && fabs(y) < fz * FR;
}
TRealPoint TProjectivePoint::rpnt() const
{
if (!IsFinite()) return TRealPoint(0, 0);
else return TRealPoint(x/z, y/z);
}
inline int TProjectivePoint::rpnt(TRealPoint &p) const
{
if (!IsFinite()) {p.x = 0; p.y = 0; return 0;}
else {p.x = x/z; p.y = y/z; return 1;}
}
inline TIntPoint TProjectivePoint::pnt() const
{
if (!IsFinite()) return TIntPoint(INT_MIN, INT_MIN);
else return TIntPoint((int)floor(x/z + 0.5), (int)floor(y/z + 0.5));
}
inline int TProjectivePoint::pnt(TIntPoint &p) const
{
if (!IsFinite()) {p.x = INT_MIN; p.y = INT_MIN; return 0;}
else
{
p.x = (int)floor(x/z + 0.5);
p.y = (int)floor(y/z + 0.5);
return 1;
}
}
TProjectivePoint &TProjectivePoint::operator=(const TProjectivePoint &p)
{
x = p.x; y = p.y; z = p.z;
return *this;
}
class TProjectiveMap
{
public:
TProjectiveMap() {}
TProjectiveMap(int n) {p[0].x = p[1].y = p[2].z = n;
p[0].y = p[0].z = p[1].x = p[1].z = p[2].x = p[2].y = 0;}
TProjectiveMap(const TProjectiveMap &map)
{p[0] = map.p[0]; p[1] = map.p[1]; p[2] = map.p[2];}
TProjectiveMap(const TProjectivePoint pnt[])
{p[0] = pnt[0]; p[1] = pnt[1]; p[2] = pnt[2];}
TProjectiveMap(const TProjectivePoint &p0, const TProjectivePoint &p1,
const TProjectivePoint &p2) {p[0] = p0; p[1] = p1; p[2] = p2;}
TProjectiveMap &operator=(const TProjectiveMap &map)
{p[0] = map.p[0]; p[1] = map.p[1]; p[2] = map.p[2]; return *this;}
TProjectiveMap &operator=(const TProjectivePoint pnt[])
{p[0] = pnt[0]; p[1] = pnt[1]; p[2] = pnt[2]; return *this;}
TProjectiveMap &operator=(int n) {p[0].x = p[1].y = p[2].z = n;
p[0].y = p[0].z = p[1].x = p[1].z = p[2].x = p[2].y = 0; return *this;}
TProjectivePoint operator()(const TProjectivePoint &point) const;
friend TProjectiveMap operator*(const TProjectiveMap &a, const TProjectiveMap &b);
TProjectiveMap &operator*=(const TProjectiveMap &b);
TProjectiveMap &operator*=(int n) {p[0] *= n; p[1] *= n; p[2] *= n; return *this;}
friend TProjectiveMap operator*(const TProjectiveMap &a, int n)
{return TProjectiveMap(a.p[0] * n, a.p[1] * n, a.p[2] * n);}
friend TProjectiveMap operator*(int n, const TProjectiveMap &b)
{return TProjectiveMap(n * b.p[0], n * b.p[1], n * b.p[2]);}
TProjectiveMap Reversed() const;
TProjectiveMap &Reverse() {return (*this) = Reversed();}
friend TProjectiveMap operator/(const TProjectiveMap &a, const TProjectiveMap &b)
{return a * b.Reversed();}
TProjectiveMap &operator/=(const TProjectiveMap &b) {return (*this) *= b.Reversed();}
TProjectiveMap &operator/=(int n) {if (!n) (*this) = 0; return *this;}
TProjectivePoint Reversed(const TProjectivePoint &point) const;
TProjectivePoint operator()(double x, double y, double z = 1) const
{return (*this)(TProjectivePoint(x, y, z));}
TProjectivePoint Reversed(double x, double y, double z = 1) const
{return Reversed(TProjectivePoint(x, y, z));}
TProjectiveMap &Set4(const TProjectivePoint &a0, const TProjectivePoint &a1,
const TProjectivePoint &a2, const TProjectivePoint &a3);
TProjectiveMap &Set4(const TProjectivePoint a[]) {return Set4(a[0], a[1], a[2], a[3]);}
TProjectiveMap &Set4to4(const TProjectivePoint a[], const TProjectivePoint b[])
{return Set4(b) /= TProjectiveMap().Set4(a);}
TProjectiveMap &Set4to4(const TProjectivePoint &a0, const TProjectivePoint &a1,
const TProjectivePoint &a2, const TProjectivePoint &a3,
const TProjectivePoint b[])
{return Set4(b) /= TProjectiveMap().Set4(a0, a1, a2, a3);}
TProjectiveMap &Set4to4(const TProjectivePoint a[],
const TProjectivePoint &b0, const TProjectivePoint &b1,
const TProjectivePoint &b2, const TProjectivePoint &b3)
{return Set4(b0, b1, b2, b2) /= TProjectiveMap().Set4(a);}
TProjectiveMap &Set4to4(const TProjectivePoint &a0, const TProjectivePoint &a1,
const TProjectivePoint &a2, const TProjectivePoint &a3,
const TProjectivePoint &b0, const TProjectivePoint &b1,
const TProjectivePoint &b2, const TProjectivePoint &b3)
{return Set4(b0, b1, b2, b2) /= TProjectiveMap().Set4(a0, a1, a2, a3);}
public:
TProjectivePoint p[3];
};
TProjectivePoint TProjectiveMap::operator()(const TProjectivePoint &point) const
{
return TProjectivePoint(p[0].x * point.x + p[1].x * point.y + p[2].x * point.z,
p[0].y * point.x + p[1].y * point.y + p[2].y * point.z,
p[0].z * point.x + p[1].z * point.y + p[2].z * point.z);
}
TProjectiveMap operator*(const TProjectiveMap &a, const TProjectiveMap &b)
{
return TProjectiveMap(a(b.p[0]), a(b.p[1]), a(b.p[2]));
}
TProjectiveMap &TProjectiveMap::operator*=(const TProjectiveMap &b)
{
TProjectivePoint p0 = (*this)(b.p[0]), p1 = (*this)(b.p[1]), p2 = (*this)(b.p[2]);
p[0] = p0; p[1] = p1; p[2] = p2;
return *this;
}
TProjectiveMap TProjectiveMap::Reversed() const
{
return TProjectiveMap(TProjectivePoint(p[1].y * p[2].z - p[2].y * p[1].z,
p[2].y * p[0].z - p[0].y * p[2].z, p[0].y * p[1].z - p[1].y * p[0].z),
TProjectivePoint(p[1].z * p[2].x - p[2].z * p[1].x,
p[2].z * p[0].x - p[0].z * p[2].x, p[0].z * p[1].x - p[1].z * p[0].x),
TProjectivePoint(p[1].x * p[2].y - p[2].x * p[1].y,
p[2].x * p[0].y - p[0].x * p[2].y, p[0].x * p[1].y - p[1].x * p[0].y));
}
TProjectivePoint TProjectiveMap::Reversed(const TProjectivePoint &point) const
{
return TProjectivePoint((p[1].y * p[2].z - p[2].y * p[1].z) * point.x +
(p[1].z * p[2].x - p[2].z * p[1].x) * point.y +
(p[1].x * p[2].y - p[2].x * p[1].y) * point.z,
(p[2].y * p[0].z - p[0].y * p[2].z) * point.x +
(p[2].z * p[0].x - p[0].z * p[2].x) * point.y +
(p[2].x * p[0].y - p[0].x * p[2].y) * point.z,
(p[0].y * p[1].z - p[1].y * p[0].z) * point.x +
(p[0].z * p[1].x - p[1].z * p[0].x) * point.y +
(p[0].x * p[1].y - p[1].x * p[0].y) * point.z);
}
TProjectiveMap &TProjectiveMap::Set4(const TProjectivePoint &a0,
const TProjectivePoint &a1, const TProjectivePoint &a2, const TProjectivePoint &a3)
{
p[0] = a0; p[1] = a1; p[2] = a2;
TProjectivePoint K = Reversed(a3);
p[0] *= K.x; p[1] *= K.y; p[2] *= K.z;
return *this;
}
TRealPoint r_circle_pnt[13];
TRealPoint r_star_pnt[13];
const double r_star_large = 1.2, r_star_small = 0.8;
const double r_ch_lines[] = {0.8, 0.7, 0.6, 0.5};
void InitBoardData()
{
int i, len;
double a, r;
len = NELEM(r_circle_pnt) - 1;
for (i = 0; i < len; i++)
{
a = 2 * i * M_PI / len;
r_circle_pnt[i].x = cos(a);
r_circle_pnt[i].y = sin(a);
}
r_circle_pnt[len] = r_circle_pnt[0];
len = sizeof(r_star_pnt) / sizeof(r_star_pnt[0]) - 1;
for (i = 0; i < len; i++)
{
a = 2 * i * M_PI / len;
r = (i % 2) ? r_star_small : r_star_large;
r_star_pnt[i].x = cos(a) * r;
r_star_pnt[i].y = sin(a) * r;
}
r_star_pnt[len] = r_star_pnt[0];
}
class TChBoard;
class TSomeDraw
{
public:
TSomeDraw() {}
virtual void Draw(TGraphDraw *drw, int w, int h) = 0;
virtual void DrawB(TGraphDraw *drw, TChBoard &brd);
virtual TIntPoint GetDSize(int w, int h) {return TIntPoint(INT_MIN, INT_MIN);}
};
class TChBoard
{
public:
TChBoard(int id = 0);
TProjectiveMap Get4PMap() const;
int GetW() const {return width;}
int GetH() const {return height;}
void ClearWH() {width = -1; height = -1;}
void Resize(int w, int h);
void Resize(TIntPoint size) {Resize(size.x, size.y);}
TIntPoint PlToWin(double x, double y) const;
TIntPoint PlToWin(TRealPoint rp) const {return PlToWin(rp.x, rp.y);}
TRealPoint WinToPl(int x, int y) const;
TRealPoint WinToPl(TIntPoint p) const {return WinToPl(p.x, p.y);}
void NewGame();
int CanPlayerMove() const {return !IsPlayView && !game_end && !player[MainPos.wmove];}
void Draw(TGraphDraw *drw);
int ResizeDraw(TGraphDraw *drw, int w, int h);
int CheckResize(TGraphDraw *drw);
int HaveCheckResize() const {return check_resize;}
void SetCheckResize(int cr) {check_resize = cr;}
int MouseClick(TGraphDraw *drw, int x, int y);
void UnMove(TGraphDraw *drw);
int CMove(TGraphDraw *drw, int x, int y);
int AutoMove(TGraphDraw *drw, int nmove = 0, int draw_check = 1);
enum PKey {PNull, PEnter, PLeft, PRight, PUp, PDown};
PKey GetKeySide(PKey key);
int PKeyEvent(TGraphDraw *drw, PKey key = PEnter);
protected:
enum TextLineType {TLT_Main, TLT_Move, TLT_Wait, TLT_GameEnd, TLT_WrongMove,
TLT_PlDidntMove, TLT_PlWrongMove, TLT_WrongColor,
TLT_WfCell, TLT_WnfCell, TLT_WMustEat, TLT_WMustEatMore,
TLT_WNoMove, TLT_WChBack, TLT_WNotDm, TLT_WOnlyDiag,
TLT_WEatYour, TLT_WMoreOne, TLT_WNotDmE, TLT_WMustEatMoreD,
TLT_WTurnBack};
void GetTextLine(char str[]) const;
void DrawTextLine(TGraphDraw *drw) const;
void LineB(TGraphDraw *drw, double x1, double y1, double x2, double y2) const;
void DrawCh(TGraphDraw *drw, double x0, double y0, const TRealPoint pnt[], int npnt,
int L = NELEM(r_ch_lines)) const;
void DrawIL(TGraphDraw *drw, double x0, double y0, int L) const;
void MoveErase();
void CurPointClear(TGraphDraw *drw) const;
void RenewMPos() {if (MainPlay.GetPos(MainPos, CurMoveN) < 0) MainPos.Init();}
void PrintLMove();
void SetNoMove(TGraphDraw *drw = 0, int force = 1);
TextLineType GetTLTfromA(int s) const;
void ChangeTLT(TGraphDraw *drw, TextLineType t);
TextLineType GetSimpleTLT() const;
public:
void ResetTextLine(TGraphDraw *drw);
TChPlayer *GetPlayer(int k) const {return player[k];}
void SetPlayer(int k, TChPlayer *pl) {player[k] = pl;}
int GetBottomColor() const {return BottomColor;}
void SetBottomColor(int c) {BottomColor = c & 1;}
public:
enum {textlineh = 14, min_brd = 120, max_delt = 20, min_brdsize = 70};
int GetTextLineY() const;
TSomeDraw *GetSomeDraw() const {return some_draw;}
void SetSomeDraw(TSomeDraw *drw) {some_draw = drw;}
TIntPoint GetMinWSize() const {return min_wsize;}
void SetMinWSize(TIntPoint mws) {min_wsize = mws; Resize(width, height);}
void SetMinWSize(int w, int h) {SetMinWSize(TIntPoint(w, h));}
void DrawTimer(TGraphDraw *drw, double t, int wh = 0) const;
int GetNumMove() const {return MainPlay.GetN() - 1;}
int GetCurMoveN() const {return CurMoveN;}
int SetCurMoveN(int n, TGraphDraw *drw = 0);
int SetPlay(const PlayWrite &play);
PlayWrite GetPlay() const {return MainPlay;}
int GetPViewStatus() const {return IsPlayView;}
void SetPViewStatus(int pv) {IsPlayView = pv;}
void GoToCurMove();
int GetGameEnd() const {return game_end;}
void EraseHistory() {hist_inited = 0;}
int ReinitHistory();
protected:
double dw_delt, dw_cell;
int width, height;
TProjectiveMap PoleMap;
Position MainPos;
int BottomColor;
unsigned char TheMove[NUM_CELL];
unsigned char Eaten[NUM_CELL];
unsigned char BecameD;
TIntPoint CurPoint;
int game_end;
int check_resize;
TIntPoint delta_size;
TextLineType text_line_type;
PlayWrite MainPlay;
TChPlayer *player[2];
TSomeDraw *some_draw;
TIntPoint min_wsize;
int CurMoveN, IsPlayView;
THistory history;
int hist_inited;
};
inline void TSomeDraw::DrawB(TGraphDraw *drw, TChBoard &brd)
{
Draw(drw, brd.GetW(), brd.GetH());
}
void TChBoard::MoveErase()
{
TheMove[0] = 0;
Eaten[0] = 0;
BecameD = 0;
}
TChBoard::TChBoard(int id) : history(id)
{
InitBoardData();
player[0] = player[1] = 0;
dw_delt = 0.3;
dw_cell = 1;
BottomColor = 0;
check_resize = 0;
delta_size.x = 0; delta_size.y = 0;
some_draw = 0;
min_wsize.x = 80; min_wsize.y = 80;
ClearWH();
Resize(400, 400);
NewGame();
}
TProjectiveMap TChBoard::Get4PMap() const
{
return TProjectiveMap().Set4(TRealPoint(-dw_delt, -dw_delt),
TRealPoint(NW_CELL*dw_cell + dw_delt, -dw_delt),
TRealPoint(NW_CELL*dw_cell + dw_delt, NW_CELL*dw_cell + dw_delt),
TRealPoint(-dw_delt, NW_CELL*dw_cell + dw_delt));
}
void TChBoard::Resize(int w, int h)
{
width = w; height = h;
if (width < min_wsize.x) width = min_wsize.x;
if (height < min_wsize.y) height = min_wsize.y;
for (;;)
{
if (some_draw)
{
TIntPoint dsz = some_draw->GetDSize(width, height);
if (dsz.x >= 0 && dsz.y >= 0) delta_size = dsz;
}
int change = 0;
if (width < delta_size.x + min_brdsize)
{
width = delta_size.x + min_brdsize;
change++;
}
if (height < delta_size.y + min_brdsize + textlineh)
{
height = delta_size.y + min_brdsize + textlineh;
change++;
}
if (!some_draw || !change) break;
}
double sx = max_delt, dx = width - 2*sx - delta_size.x;
double sy = max_delt, dy = height - 2*sy - delta_size.y - textlineh;
if (dy < min_brd)
{
double d = (min_brd - dy) / 2;
if (d > sy) d = sy;
sy -= d; dy += 2*d;
}
if (dx < min_brd)
{
double d = (min_brd - dx) / 2;
if (d > sx) d = sx;
sx -= d; dx += 2*d;
}
if (dy > dx) {sy += (dy - dx) / 2; dy = dx;}
double tx = (dx - dy * dy / dx) / 3;
PoleMap.Set4(TRealPoint(sx, sy + dy - 70*ssf), TRealPoint(sx + dx, sy + dy),
TRealPoint(sx + dx - tx, sy), TRealPoint(sx + tx, sy + 40*ssf));
PoleMap /= Get4PMap();
}
TIntPoint TChBoard::PlToWin(double x, double y) const
{
if (BottomColor == 1) y = NW_CELL*dw_cell - y;
else x = NW_CELL*dw_cell - x;
/**/if (ssf) y += 0.6 * sin(x);/**/
return PoleMap(x, y).pnt();
}
TRealPoint TChBoard::WinToPl(int x, int y) const
{
TRealPoint rpnt;
if (PoleMap.Reversed(x, y).rpnt(rpnt))
{
/**/if (ssf) rpnt.y -= 0.6 * sin(rpnt.x);/**/
if (BottomColor == 1) rpnt.y = NW_CELL*dw_cell - rpnt.y;
else rpnt.x = NW_CELL*dw_cell - rpnt.x;
return rpnt;
}
else return TRealPoint(-dw_cell - dw_delt, -dw_cell - dw_delt);
}
void TChBoard::NewGame()
{
int k;
MoveErase();
MainPos.Init();
MainPlay.Clear();
for (k = 0; k < NW_CELL * 3 / 2; k++) MainPos.SH[k] = 1;
for (k = 0; k < NW_CELL * 3 / 2; k++) MainPos.SH[NUM_CELL - k - 1] = 2;
MainPlay.Add(0, MainPos);
CurMoveN = 0;
text_line_type = TLT_Main;
game_end = 0;
CurPoint.x = -1; CurPoint.y = -1;
IsPlayView = 0;
printf("\nCheckers: New game.\n");
EraseHistory();
}
int TChBoard::GetTextLineY() const
{
int y = height - (max_delt + textlineh + delta_size.y);
int i, j;
for (i = 0; i <= 1; i++) for (j = 0; j <= 1; j++)
{
TRealPoint corner;
corner.x = (2*i - 1) * dw_delt + i * NW_CELL * dw_cell;
corner.y = (2*j - 1) * dw_delt + j * NW_CELL * dw_cell;
TIntPoint wcr = PlToWin(corner);
if (wcr.x != INT_MIN && wcr.y != INT_MIN)
{
if (y < wcr.y) y = wcr.y;
}
}
y -= textlineh;
if (y > height - delta_size.y - 2*textlineh)
{
y = height - delta_size.y - 2*textlineh;
}
return (y + height - delta_size.y) / 2;
}
#ifdef LANG_RUS
#define aCheckersGame "<22><><EFBFBD><EFBFBD> <20> <20><>誨."
#define aRedMoves "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E5AEA4>."
#define aBlueMoves "<22><><EFBFBD><EFBFBD><EFBFBD><><E5AEA4>."
#define aWait "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>."
#define aRedWins "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>먣ࠫ<EBA8A3>."
#define aBlueWins "<22><><EFBFBD><EFBFBD><EFBFBD> <20>먣ࠫ<EBA8A3>."
#define aDraw "<22><><EFBFBD><EFBFBD><EFBFBD>."
#define aRed "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "
#define aBlue "<22><><EFBFBD><EFBFBD><EFBFBD> "
#define aMadeWrongMove "ᤥ<><E1A4A5><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E0A0A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 室."
#define aNoMove "<22><><><E1ACAE><EFBFBD><><E1A4A5><EFBFBD><EFBFBD> 室."
#define aEndGame "<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>."
#define aYouWin " (<28><> <20>먣ࠫ<EBA8A3>)"
#define aYouLose " (<28><> <20><EFBFBD><EFBFBD>)"
#define aRedWin " (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>먣ࠫ<EBA8A3>)"
#define aBlueWin " (<28><><EFBFBD><EFBFBD><EFBFBD> <20>먣ࠫ<EBA8A3>)"
#define aWrongMove "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 室."
#define aNotYourChecker "<22><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><>誠."
#define aFreeCell "<22><><EFBFBD> <20><><EFBFBD><20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>."
#define aNotFreeCell "<22><><20><><EFBFBD><EFBFBD><EFBFBD><><E5AEA4><EFBFBD> ⮫쪮 <20><><><E1A2AE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>⪨."
#define aMustEat "<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>."
#define aMustEatMore "<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>."
#define aCheckerNoMove "<22> <20><20><><20><><EFBFBD><><E5AEA4>."
#define aNoBack "<22><><20><><><E5AEA4> <20><><EFBFBD><EFBFBD><EFBFBD>."
#define aNotDamka "<22><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>."
#define aOnlyDiag "<22><>誨 室<><E5AEA4> ⮫쪮 <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>."
#define aEatYour "<22><><20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><><E1A2AE>."
#define aMoreOne "<22><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><20><> ࠧ."
#define aNoTurnBack "<22><><20><> <20><><EFBFBD><EFBFBD><EFBFBD><><E0A0A7><EFBFBD><EFBFBD><EFBFBD><E7A8A2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD>⨨."
#else
#define aCheckersGame "The checkers game."
#define aRedMoves "Red moves."
#define aBlueMoves "Blue moves."
#define aWait "Please wait."
#define aRedWins "Red wins."
#define aBlueWins "Blue wins."
#define aDraw "Draw."
#define aRed "Red "
#define aBlue "Blue "
#define aMadeWrongMove "make a wrong move."
#define aNoMove "could not make a move."
#define aEndGame "End of the game."
#define aYouWin " (You win)"
#define aYouLose " (You lose)"
#define aRedWin " (Red win)"
#define aBlueWin " (Blue win)"
#define aWrongMove "Wrong move."
#define aNotYourChecker "It isn't your checker."
#define aFreeCell "The cell is free."
#define aNotFreeCell "Checkers may be moved only on a free cell."
#define aMustEat "You must eat a checker."
#define aMustEatMore "You must eat more checkers."
#define aCheckerNoMove "The checker have no moves."
#define aNoBack "Checkers may not be moved back."
#define aNotDamka "It is not a damka."
#define aOnlyDiag "Checkers may be moved only along diagonal."
#define aEatYour "You may not eat your checkers."
#define aMoreOne "You may not eat more than one checker at a time."
#define aNoTurnBack "Checkers may not turn back when eating."
#endif
void TChBoard::GetTextLine(char str[]) const
{
str[0] = 0;
int g = (game_end - 1) % 2, h = 0;
switch(text_line_type)
{
case TLT_Main:
strcpy(str, aCheckersGame);
break;
case TLT_Move:
if (MainPos.wmove == 0)
{
strcpy(str, aRedMoves);
}
else strcpy(str, aBlueMoves);
break;
case TLT_Wait:
strcpy(str, aWait);
break;
case TLT_GameEnd:
case TLT_PlDidntMove:
case TLT_PlWrongMove:
if (!game_end) break;
if (text_line_type == TLT_GameEnd)
{
if (game_end == 1) strcpy(str, aRedWins);
else if (game_end == 2) strcpy(str, aBlueWins);
else if (game_end == 5) strcpy(str, aDraw);
}
if (!str[0])
{
if (game_end >= 1 && game_end <= 4)
{
if (g == 0) strcpy(str, aRed);
else strcpy(str, aBlue);
if (text_line_type == TLT_PlWrongMove)
{
strcat(str, aMadeWrongMove);
}
else strcat(str, aNoMove);
h = 1;
}
else strcpy(str, aEndGame);
}
if (game_end >= 1 && game_end <= 4)
{
if (!IsPlayView && player[1-g] && !player[g])
{
strcat(str, aYouWin);
}
else if (!IsPlayView && player[g] && !player[1-g])
{
strcat(str, aYouLose);
}
else if (h && g == 0) strcat(str, aRedWin);
else if (h && g == 1) strcat(str, aBlueWin);
}
break;
case TLT_WrongMove:
strcpy(str, aWrongMove);
break;
case TLT_WrongColor:
strcpy(str, aNotYourChecker);
break;
case TLT_WfCell:
strcpy(str, aFreeCell);
break;
case TLT_WnfCell:
strcpy(str, aNotFreeCell);
break;
case TLT_WMustEat:
strcpy(str, aMustEat);
break;
case TLT_WMustEatMore:
case TLT_WMustEatMoreD:
strcpy(str, aMustEatMore);
break;
case TLT_WNoMove:
strcpy(str, aCheckerNoMove);
break;
case TLT_WChBack:
strcpy(str, aNoBack);
break;
case TLT_WNotDm:
case TLT_WNotDmE:
strcpy(str, aNotDamka);
break;
case TLT_WOnlyDiag:
strcpy(str, aOnlyDiag);
break;
case TLT_WEatYour:
strcpy(str, aEatYour);
break;
case TLT_WMoreOne:
strcpy(str, aMoreOne);
break;
case TLT_WTurnBack:
strcpy(str, aNoTurnBack);
break;
}
}
void TChBoard::DrawTextLine(TGraphDraw *drw) const
{
if (!drw || !drw->IsDraw()) return;
char str[100];
GetTextLine(str);
if (str[0]) drw->DrawText(10, GetTextLineY(), str);
}
void TChBoard::ResetTextLine(TGraphDraw *drw)
{
if (!game_end && text_line_type != TLT_Move) ChangeTLT(drw, TLT_Move);
}
void TChBoard::LineB(TGraphDraw *drw, double x1, double y1, double x2, double y2) const
{
if (!drw || !drw->IsDraw()) return;
TIntPoint p1 = PlToWin(x1, y1), p2 = PlToWin(x2, y2);
if (p1.x != INT_MIN && p1.y != INT_MIN && p2.x != INT_MIN && p2.y != INT_MIN)
{
drw->DrawLine(p1.x, p1.y, p2.x, p2.y);
}
}
void TChBoard::DrawCh(TGraphDraw *drw, double x0, double y0, const TRealPoint pnt[], int npnt, int L) const
{
if (!drw || !drw->IsDraw()) return;
int i, j;
for (j = 0; j < L; j++)
{
for (i = 0; i < npnt - 1; i++)
{
LineB(drw, x0 + pnt[i].x * dw_cell * r_ch_lines[j] / 2,
y0 + pnt[i].y * dw_cell * r_ch_lines[j] / 2,
x0 + pnt[i+1].x * dw_cell * r_ch_lines[j] / 2,
y0 + pnt[i+1].y * dw_cell * r_ch_lines[j] / 2);
}
}
}
void TChBoard::DrawIL(TGraphDraw *drw, double x0, double y0, int L) const
{
if (!drw || !drw->IsDraw()) return;
int i, j;
if (L == 0 || L == 1)
{
const int numDST[2] = {2, 4};
const double DST[2][4] = {{0.96, 0.88}, {0.8, 0.76, 0.72, 0.68}};
const int MULT[4][4] = {{-1, -1, -1, 1}, {-1, 1, 1, 1},
{-1, -1, 1, -1}, {1, -1, 1, 1}};
for (i = 0; i < numDST[L]; i++) for (j = 0; j < 4; j++)
{
LineB(drw, x0 + dw_cell * DST[L][i] * MULT[j][0] / 2,
y0 + dw_cell * DST[L][i] * MULT[j][1] / 2,
x0 + dw_cell * DST[L][i] * MULT[j][2] / 2,
y0 + dw_cell * DST[L][i] * MULT[j][3] / 2);
}
}
else if (L == 2)
{
const double DP[] = {0.85, 0.90, 0.95};
const int numDP = NELEM(DP);
for (i = 0; i < numDP; i++) for (j = -1; j <= 1; j += 2)
{
LineB(drw, x0 - j * dw_cell * DP[i] / 2,
y0 - dw_cell * DP[numDP - i - 1] / 2,
x0 + j * dw_cell * DP[numDP - i - 1] / 2,
y0 + dw_cell * DP[i] / 2);
}
}
}
void TChBoard::Draw(TGraphDraw *drw)
{
if (!drw || !drw->IsDraw()) return;
if (CheckResize(drw)) drw->DrawClear();
int i, j, k, kn;
unsigned long black = drw->GetBlackColor();
unsigned long red = drw->CreateColor(65535u, 0, 0);
unsigned long green = drw->CreateColor(0, 49151u, 0);
unsigned long blue = drw->CreateColor(0, 0, 65535u);
drw->SetColor(black);
for (i = -1; i <= NW_CELL + 1; i++) for (j = -1; j <= NW_CELL; j++)
{
if (i < 0 || i > NW_CELL || j >= 0 && j < NW_CELL)
{
double mval = dw_cell * NW_CELL + dw_delt;
double x, y0, y1;
if (i < 0) x = -dw_delt;
else if (i > NW_CELL) x = mval;
else x = i * dw_cell;
if (j < 0) y0 = -dw_delt;
else if (j > NW_CELL) y0 = mval;
else y0 = j * dw_cell;
if ((j+1) < 0) y1 = -dw_delt;
else if ((j+1) > NW_CELL) y1 = mval;
else y1 = (j+1) * dw_cell;
LineB(drw, x, y0, x, y1);
}
}
for (i = -1; i <= NW_CELL; i++) for (j = -1; j <= NW_CELL + 1; j++)
{
if (j < 0 || j > NW_CELL || i >= 0 && i < NW_CELL)
{
double mval = dw_cell * NW_CELL + dw_delt;
double x0, x1, y;
if (i < 0) x0 = -dw_delt;
else if (i > NW_CELL) x0 = mval;
else x0 = i * dw_cell;
if ((i+1) < 0) x1 = -dw_delt;
else if ((i+1) > NW_CELL) x1 = mval;
else x1 = (i+1) * dw_cell;
if (j < 0) y = -dw_delt;
else if (j > NW_CELL) y = mval;
else y = j * dw_cell;
LineB(drw, x0, y, x1, y);
}
}
for (i = -1; i <= 1; i += 2)
{
drw->SetColor((i < 0) ? red : blue);
for (j = -1; j <= 1; j += 2)
{
double c = dw_cell * NW_CELL / 2;
double d = (dw_cell/2 > dw_delt) ? dw_delt : dw_cell/2;
LineB(drw, c + j * (c + 0.5*d), c + i * (c - 0.5*d),
c + j * (c + 0.5*d), c + i * (c - 3.5*d));
LineB(drw, c + j * (c + 0.5*d), c + i * (c - 3.5*d),
c + j * (c + 0.2*d), c + i * (c - 2.5*d));
LineB(drw, c + j * (c + 0.5*d), c + i * (c - 3.5*d),
c + j * (c + 0.8*d), c + i * (c - 2.5*d));
LineB(drw, c + j * (c + 0.2*d), c + i * (c - 2.5*d),
c + j * (c + 0.8*d), c + i * (c - 2.5*d));
}
}
for (i = 0; i < NW_CELL; i++) for (j = 0; j < NW_CELL; j++)
{
if (!PoleCpos(i, j))
{
drw->SetColor(black);
LineB(drw, (i+0.33) * dw_cell, j * dw_cell, (i+0.33) * dw_cell, (j+1) * dw_cell);
LineB(drw, (i+0.67) * dw_cell, j * dw_cell, (i+0.67) * dw_cell, (j+1) * dw_cell);
LineB(drw, i * dw_cell, (j+0.33) * dw_cell, (i+1) * dw_cell, (j+0.33) * dw_cell);
LineB(drw, i * dw_cell, (j+0.67) * dw_cell, (i+1) * dw_cell, (j+0.67) * dw_cell);
LineB(drw, i * dw_cell, j * dw_cell, (i+1) * dw_cell, (j+1) * dw_cell);
LineB(drw, (i+1) * dw_cell, j * dw_cell, i * dw_cell, (j+1) * dw_cell);
}
else
{
k = PoleToNum(i, j);
kn = MainPos.SH[k];
if (TheMove[0] > 0 && k == TheMove[1])
{
if (kn == 1 || kn == 2) kn = 5;
else if (kn == 3 || kn == 4) kn = 6;
}
if (TheMove[0] > 0 && k == TheMove[TheMove[0]])
{
kn = MainPos.SH[TheMove[1]];
if (kn <= 2 && BecameD) kn += 2;
}
if (kn == 1)
{
drw->SetColor(red);
DrawCh(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell,
r_circle_pnt, NELEM(r_circle_pnt));
}
else if (kn == 2)
{
drw->SetColor(blue);
DrawCh(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell,
r_circle_pnt, NELEM(r_circle_pnt));
}
else if (kn == 3)
{
drw->SetColor(red);
DrawCh(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell,
r_star_pnt, NELEM(r_star_pnt));
}
else if (kn == 4)
{
drw->SetColor(blue);
DrawCh(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell,
r_star_pnt, NELEM(r_star_pnt));
}
else if (kn == 5)
{
drw->SetColor(green);
DrawCh(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell,
r_circle_pnt, NELEM(r_circle_pnt), 2);
}
else if (kn == 6)
{
drw->SetColor(green);
DrawCh(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell,
r_circle_pnt, NELEM(r_circle_pnt), 2);
}
}
}
for (k = 1; k <= Eaten[0]; k++)
{
if (TheMove[0] <= 0 || Eaten[k] != TheMove[TheMove[0]])
{
NumToPole(Eaten[k], i, j);
kn = MainPos.SH[Eaten[k]];
if (kn)
{
if (kn == 1 || kn == 3) drw->SetColor(blue);
else if (kn == 2 || kn == 4) drw->SetColor(red);
DrawIL(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell, 2);
}
}
}
if (TheMove[0] > 0)
{
NumToPole(TheMove[TheMove[0]], i, j);
drw->SetColor(green);
DrawIL(drw, (i+0.5)*dw_cell, (j+0.5)*dw_cell, 1);
}
if (CurPoint.x >= 0 && CurPoint.y >= 0)
{
drw->SetColor(green);
DrawIL(drw, (CurPoint.x+0.5)*dw_cell, (CurPoint.y+0.5)*dw_cell, 0);
}
drw->SetColor(black);
DrawTextLine(drw);
if (some_draw) some_draw->DrawB(drw, *this);
drw->FreeColor(red);
drw->FreeColor(green);
drw->FreeColor(blue);
}
int TChBoard::ResizeDraw(TGraphDraw *drw, int w, int h)
{
int w0 = width, h0 = height;
Resize(w, h);
if (drw && drw->IsDraw() && (width != w0 || height != h0))
{
drw->DrawClear();
Draw(drw);
return 1;
}
else return 0;
}
int TChBoard::CheckResize(TGraphDraw *drw)
{
if (!drw || !check_resize) return 0;
int w, h;
drw->GetSize(w, h);
if (w < 0 || h < 0) return 0;
int w0 = width, h0 = height;
Resize(w, h);
return width != w0 || height != h0;
}
void TChBoard::CurPointClear(TGraphDraw *drw) const
{
if (!drw || !drw->IsDraw()) return;
drw->SetColor(drw->GetWhiteColor());
DrawIL(drw, (CurPoint.x+0.5)*dw_cell, (CurPoint.y+0.5)*dw_cell, 0);
}
int TChBoard::MouseClick(TGraphDraw *drw, int x, int y)
{
TRealPoint rpnt = WinToPl(x, y);
if (rpnt.x < -dw_delt || rpnt.y < -dw_delt ||
rpnt.x > NW_CELL*dw_cell + dw_delt ||
rpnt.y > NW_CELL*dw_cell + dw_delt) return -1;
if (CurPoint.x >= 0 && CurPoint.y >= 0)
{
CurPointClear(drw);
CurPoint.x = -1; CurPoint.y = -1;
Draw(drw);
}
ResetTextLine(drw);
if (AutoMove(drw)) return 3;
if (!CanPlayerMove()) return 0;
int i = (int)floor(rpnt.x / dw_cell), j = (int)floor(rpnt.y / dw_cell);
if (i < 0 || j < 0 || i >= NW_CELL || j >= NW_CELL) return 0;
if (!PoleCpos(i, j)) return 1;
return 2 + CMove(drw, i, j);
}
TChBoard::PKey TChBoard::GetKeySide(PKey key)
{
if (key != PLeft && key != PRight && key != PUp && key != PDown) return key;
TIntPoint a0 = PlToWin(4*dw_cell, 0);
TIntPoint a1 = PlToWin(4*dw_cell, 8*dw_cell);
TIntPoint b0 = PlToWin(0, 4*dw_cell);
TIntPoint b1 = PlToWin(8*dw_cell, 4*dw_cell);
double ax = a0.x - a1.x, ay = a0.y - a1.y;
double bx = b0.x - b1.x, by = b0.y - b1.y;
double t;
if (a0.x == INT_MIN || a0.y == INT_MIN || a1.x == INT_MIN ||
a1.y == INT_MIN || fabs(ax) < 0.5 && fabs(ay) < 0.5)
{
ax = 0, ay = 1;
}
if (b0.x == INT_MIN || b0.y == INT_MIN || b1.x == INT_MIN ||
b1.y == INT_MIN || fabs(bx) < 0.5 && fabs(by) < 0.5)
{
bx = 1, by = 0;
}
t = fabs(ax) + fabs(ay); ax /= t; ay /= t;
t = fabs(bx) + fabs(by); bx /= t; by /= t;
if (fabs(ax) <= fabs(bx))
{
if (key == PLeft) return (bx > 0) ? PRight : PLeft;
if (key == PRight) return (bx > 0) ? PLeft : PRight;
if (key == PUp) return (ay > 0) ? PDown : PUp;
if (key == PDown) return (ay > 0) ? PUp : PDown;
}
else
{
if (key == PLeft) return (ax > 0) ? PDown : PUp;
if (key == PRight) return (ax > 0) ? PUp : PDown;
if (key == PUp) return (by > 0) ? PRight : PLeft;
if (key == PDown) return (by > 0) ? PLeft : PRight;
}
return PNull;
}
int TChBoard::PKeyEvent(TGraphDraw *drw, PKey key)
{
ResetTextLine(drw);
if (AutoMove(drw)) return 3;
if (!CanPlayerMove()) return 0;
key = GetKeySide(key);
if (CurPoint.x < 0 || CurPoint.y < 0 ||
CurPoint.x >= NW_CELL || CurPoint.y >= NW_CELL)
{
CurPoint.x = NW_CELL / 2;
CurPoint.y = NW_CELL / 2;
Draw(drw);
return 1;
}
if (key == PEnter) return 2 + CMove(drw, CurPoint.x, CurPoint.y);
if (drw && drw->IsDraw() && CheckResize(drw))
{
drw->DrawClear();
Draw(drw);
}
if (key == PLeft)
{
if (CurPoint.x == 0) return 0;
CurPointClear(drw);
CurPoint.x--;
Draw(drw);
return 1;
}
else if (key == PRight)
{
if (CurPoint.x == NW_CELL - 1) return 0;
CurPointClear(drw);
CurPoint.x++;
Draw(drw);
return 1;
}
else if (key == PUp)
{
if (CurPoint.y == 0) return 0;
CurPointClear(drw);
CurPoint.y--;
Draw(drw);
return 1;
}
else if (key == PDown)
{
if (CurPoint.y == NW_CELL - 1) return 0;
CurPointClear(drw);
CurPoint.y++;
Draw(drw);
return 1;
}
else return 0;
}
void TChBoard::UnMove(TGraphDraw *drw)
{
MoveErase();
if (drw && drw->IsDraw())
{
drw->DrawClear();
Draw(drw);
}
}
TChBoard::TextLineType TChBoard::GetTLTfromA(int s) const
{
if (s >= 0) return TLT_Main;
switch(s)
{
case Position::AWColor: return TLT_WrongColor;
case Position::AfCell: return TLT_WfCell;
case Position::AnfCell: return TLT_WnfCell;
case Position::AMustEat: return TLT_WMustEat;
case Position::AMustEatMore: return TLT_WMustEatMore;
case Position::AMustEatMoreD: return TLT_WMustEatMoreD;
case Position::ANoMove: return TLT_WNoMove;
case Position::AChBack: return TLT_WChBack;
case Position::ANotDm: return TLT_WNotDm;
case Position::ANotDmE: return TLT_WNotDmE;
case Position::AOnlyDiag: return TLT_WOnlyDiag;
case Position::AEatYour: return TLT_WEatYour;
case Position::AMoreOne: return TLT_WMoreOne;
case Position::ATurnBack: return TLT_WTurnBack;
default: return TLT_WrongMove;
}
}
void TChBoard::ChangeTLT(TGraphDraw *drw, TextLineType t)
{
if (text_line_type == t) return;
if (drw && drw->IsDraw())
{
drw->SetColor(drw->GetWhiteColor());
DrawTextLine(drw);
}
text_line_type = t;
if (drw && drw->IsDraw())
{
drw->SetColor(drw->GetBlackColor());
DrawTextLine(drw);
}
}
TChBoard::TextLineType TChBoard::GetSimpleTLT() const
{
if (game_end && CurMoveN >= MainPlay.GetN() - 1) return TLT_GameEnd;
else return TLT_Move;
}
inline int TChBoard::ReinitHistory()
{
if (history.Play(MainPlay)) {hist_inited = 1; return 1;}
else {hist_inited = 0; return 0;}
}
void TChBoard::PrintLMove()
{
PlayWrite::PMv pmv;
if (MainPlay.GetMoveL(pmv.mv) >= 0)
{
MainPlay.GetPosL(pmv.pos, 1);
char *s = new char[pmv.pos.GetLenMvEx(pmv.mv, 11)];
if (s)
{
pmv.pos.WriteMvEx(pmv.mv, s, 11);
printf("Checkers: %s%s\n", (pmv.pos.wmove == 1) ? "..." : "", s);
delete[] s;
}
if (!hist_inited) ReinitHistory();
else history.Move(pmv.pos, pmv.mv, MainPlay.GetN() - 1);
}
}
int TChBoard::CMove(TGraphDraw *drw, int x, int y)
{
if (AutoMove(drw)) return 1;
if (!CanPlayerMove()) return 0;
if (!game_end && text_line_type != TLT_Move) ChangeTLT(drw, TLT_Move);
int k = PoleToNum(x, y), s;
if (TheMove[0] > 0)
{
if (!PoleCpos(x, y) || k == TheMove[TheMove[0]]) {UnMove(drw); return 1;}
int e = 1;
s = MainPos.AMove(TheMove, k, e);
if (s < 0)
{
ChangeTLT(drw, GetTLTfromA(s));
return 0;
}
if (s < NUM_CELL) Eaten[++Eaten[0]] = (unsigned char)s;
TheMove[++TheMove[0]] = (unsigned char)k;
BecameD = BecameD || MainPos.BecameD(k, MainPos.SH[TheMove[1]]);
if (e == 0)
{
if (MainPlay.Add(TheMove) != 0)
{
ChangeTLT(drw, TLT_WrongMove);
return 0;
}
CurMoveN = MainPlay.GetN() - 1;
MoveErase();
RenewMPos();
PrintLMove();
if (AutoMove(drw)) return 1;
}
if (drw && drw->IsDraw())
{
drw->DrawClear();
Draw(drw);
}
return 1;
}
else
{
if (!PoleCpos(x, y)) return 0;
s = MainPos.AChCell(k);
if (s != 1)
{
ChangeTLT(drw, GetTLTfromA(s));
return 0;
}
TheMove[0] = 1;
TheMove[1] = (unsigned char)k;
Draw(drw);
return 1;
}
}
void TChBoard::SetNoMove(TGraphDraw *drw, int force)
{
if (!force && CurPoint.x < 0 && CurPoint.y < 0 && TheMove[0] == 0 && Eaten[0] == 0)
{
return;
}
CurPoint.x = -1; CurPoint.y = -1;
MoveErase();
if (drw && drw->IsDraw())
{
drw->DrawClear();
Draw(drw);
}
}
int TChBoard::AutoMove(TGraphDraw *drw, int nmove, int draw_check)
{
if (game_end || IsPlayView) {SetNoMove(drw, 0); return 0;}
if (CurMoveN < MainPlay.GetN() - 1)
{
CurMoveN = MainPlay.GetN() - 1;
RenewMPos();
SetNoMove(drw);
return 2;
}
if (!MainPos.AllCanEat() && !MainPos.AllCanMove())
{
game_end = 2 - MainPos.wmove;
ChangeTLT(drw, TLT_GameEnd);
if (!player[game_end - 1]) printf("Checkers: You win.\n");
else printf("Checkers: You lose.\n");
SetNoMove(drw);
return 3;
}
else if (draw_check > 0 && MainPlay.IsDraw())
{
game_end = 5;
ChangeTLT(drw, TLT_GameEnd);
printf("Checkers: Draw.\n");
SetNoMove(drw);
return 3;
}
if (!player[MainPos.wmove]) return 0;
TIntPoint CurP0 = CurPoint;
if (CurPoint.x >= 0 && CurPoint.y >= 0)
{
if (drw) CurPointClear(drw);
CurPoint.x = -1; CurPoint.y = -1;
}
MoveErase();
int k;
for (k = 0; player[MainPos.wmove] && (k < nmove || nmove == 0); k++)
{
TChPlayer::PMv pmv;
pmv.pos = MainPos;
Position::SetNullMv(pmv.mv);
MainPlay.GetMoveL(pmv.mv);
text_line_type = TLT_Move;
if (!player[MainPos.wmove]->Move(pmv))
{
text_line_type = TLT_PlDidntMove;
game_end = 4 - MainPos.wmove;
break;
}
if (MainPlay.Add(pmv.mv) != 0)
{
text_line_type = TLT_PlWrongMove;
game_end = 4 - MainPos.wmove;
break;
}
CurMoveN = MainPlay.GetN() - 1;
MoveErase();
RenewMPos();
PrintLMove();
if (!MainPos.AllCanEat() && !MainPos.AllCanMove())
{
game_end = 2 - MainPos.wmove;
text_line_type = TLT_GameEnd;
if (!player[game_end - 1]) printf("Checkers: You win.\n");
else printf("Checkers: You lose.\n");
break;
}
else if (draw_check >= 0 && MainPlay.IsDraw())
{
game_end = 5;
text_line_type = TLT_GameEnd;
printf("Checkers: Draw.\n");
break;
}
}
if (!game_end)
{
text_line_type = TLT_Move;
CurPoint = CurP0;
}
if (drw && drw->IsDraw())
{
drw->DrawClear();
Draw(drw);
}
return 1;
}
void TChBoard::DrawTimer(TGraphDraw *drw, double t, int wh) const
{
if (!drw || !drw->IsDraw()) return;
if (wh) drw->SetColor(drw->GetWhiteColor());
else drw->SetColor(drw->GetBlackColor());
double r1 = dw_delt * 0.4, r2 = dw_delt * 0.45;
double x = t * dw_cell * NW_CELL, y = -dw_delt / 2;
if (MainPos.wmove == 1)
{
x = dw_cell * NW_CELL - x;
y = dw_cell * NW_CELL - y;
}
LineB(drw, x - r1, y - r2, x + r2, y + r1);
LineB(drw, x - r2, y - r1, x + r1, y + r2);
LineB(drw, x - r1, y + r2, x + r2, y - r1);
LineB(drw, x - r2, y + r1, x + r1, y - r2);
if (wh)
{
int i, j, jj;
drw->SetColor(drw->GetBlackColor());
for (i = -1; i <= NW_CELL; i++)
{
double mval = dw_cell * NW_CELL + dw_delt;
double x0, x1, y;
if (i < 0) x0 = -dw_delt;
else if (i > NW_CELL) x0 = mval;
else x0 = i * dw_cell;
if ((i+1) < 0) x1 = -dw_delt;
else if ((i+1) > NW_CELL) x1 = mval;
else x1 = (i+1) * dw_cell;
if (fabs(x0 - x) < dw_delt || fabs(x1 - x) < dw_delt)
{
for (jj = 0; jj <= 1; jj++)
{
if (MainPos.wmove == 1) j = NW_CELL + jj;
else j = -jj;
if (j < 0 || j > NW_CELL || i >= 0 && i < NW_CELL)
{
if (j < 0) y = -dw_delt;
else if (j > NW_CELL) y = mval;
else y = j * dw_cell;
LineB(drw, x0, y, x1, y);
}
}
}
}
}
}
int TChBoard::SetCurMoveN(int n, TGraphDraw *drw)
{
int nmove = MainPlay.GetN() - 1;
if (n > nmove) n = nmove;
if (n < 0) n = 0;
if (CurMoveN != n)
{
CurMoveN = n;
RenewMPos();
if (n < nmove)
{
MoveErase();
CurPoint.x = -1; CurPoint.y = -1;
}
text_line_type = GetSimpleTLT();
if (drw && drw->IsDraw())
{
drw->DrawClear();
Draw(drw);
}
return 1;
}
else return 0;
}
int TChBoard::SetPlay(const PlayWrite &play)
{
if (play.GetN() <= 0) return 0;
MainPlay = play;
MoveErase();
CurPoint.x = -1; CurPoint.y = -1;
CurMoveN = INT_MIN;
SetCurMoveN(play.GetN());
if (!MainPos.AllCanEat() && !MainPos.AllCanMove()) game_end = 2 - MainPos.wmove;
else if (MainPlay.IsDraw()) game_end = 5;
else game_end = 0;
text_line_type = GetSimpleTLT();
IsPlayView = 1;
EraseHistory();
return 1;
}
void TChBoard::GoToCurMove()
{
if (!MainPos.AllCanEat() && !MainPos.AllCanMove() ||
MainPlay.IsDraw(CurMoveN + 1)) return;
MainPlay.ClearFrom(CurMoveN + 1);
MoveErase();
game_end = 0;
text_line_type = GetSimpleTLT();
IsPlayView = 0;
}
#endif //_HEADER_BOARD_H