///
// 程序名稱：找方塊
// 編譯環(huán)境：Mictosoft Visual Studio 2013, EasyX_20200315(beta)
//更多好玩源碼加Q群：724050348
//
 
#include<graphics.h>
#include<conio.h>
#include<stdio.h>
#include<time.h>
 
struct POS                // 一個(gè)點(diǎn)的結(jié)構(gòu)體
{
  int x;
  int y;
  COLORREF color;
};
 
void Interface(int Level, int Mark);  // 繪制界面 Level 為關(guān)卡數(shù)，Mark 為分?jǐn)?shù)
POS InitColor(int Grade);        // 初始化顏色和方塊的位置 Grade 難度等級(jí) 返回坐標(biāo)
int GetNum(int Mark);          // 判斷一個(gè)數(shù)字是幾位數(shù)
void GameOver();            // 游戲結(jié)束
void AddMark(POS pos, int addMark);    // 加分顯示以及方塊與分?jǐn)?shù)的平移
void ShowIips();            // 顯示提示
 
int main()
{
  initgraph(800, 600);
  int Level = 1;
  int Mark = 0;
  while (true)
  {
    int BeginTime = clock();
    int GameState = 0;  // 游戲狀態(tài)
 
    Interface(Level, Mark);
    POS pos = InitColor(Level / 10);
    MOUSEMSG m;  
    while (true)
    {
      m = GetMouseMsg();
      switch (m.uMsg)
      {
      case WM_LBUTTONDOWN:
        if (pos.x - 35 < m.x && pos.x + 35 > m.x && pos.y - 35 < m.y && pos.y + 35 > m.y)
        {
          GameState = 1;
        }
        else
        {
          setlinecolor(WHITE);
          setlinestyle(PS_SOLID | PS_ENDCAP_SQUARE, 4);
          line(m.x - 10, m.y - 10, m.x + 10, m.y + 10);
          line(m.x + 10, m.y - 10, m.x - 10, m.y + 10);
          if (GameState == 2)
          {
            GameState = 3;
          }
          else
          {
            GameState = 2;
          }
        }
        break;
      }
      if (GameState == 1)
      {
        int EndTime = clock();
        int Times = EndTime - BeginTime;
        int addMark = (int)(80000.0 / Times);
        AddMark(pos, addMark);
        Mark += addMark;
        Level++;
        break;
      }
      if (GameState == 2)
      {
        continue;
      }
      if (GameState == 3)
      {
        GameOver();
        Level = 1;
        Mark = 0;
        break;
      }
    }
  }
  _getch();
  return 0;
}
 
void Interface(int Level, int Mark)
{
  setfillcolor(BLACK);
  bar(0, 0, 800, 50);
  bar(0, 550, 800, 750);
  settextcolor(WHITE);
  settextstyle(30, 0, L"微軟雅黑");
  TCHAR str[25];
  _stprintf_s(str, _T("第 %d 關(guān)"), Level);
  outtextxy(50, 10, str);
  _stprintf_s(str, _T("%d"), Mark);
  outtextxy(750 - GetNum(Mark) * 15, 10, str);
}
 
POS InitColor(int Grade)
{
  srand((unsigned int)time(NULL));
  float H = (float)(rand() % 360);      // 色相
  float S = (rand() % 100) / 100.f;      // 飽和度
  float L = (rand() % 70 + 30) / 100.f;    // 亮度
  double h = 0;                // 高度
  double v = 0;                // 速度（方向向下）
  double dv = 9.8 / 50;            // 加速度（每 1/50 秒）
  BeginBatchDraw();
  int x1, y1, x2, y2;
  x1 = 800;
  y1 = 50;
  x2 = 1600;
  y2 = 550;
  while (true)
  {
    v += dv;                // 根據(jù)加速度計(jì)算速度
    h -= (v - dv / 2);            // 計(jì)算高度
    x1 = x1 + (int)h;
    x2 = x2 + (int)h;
    setfillcolor(HSVtoRGB(H, S, L));
    bar(x1, y1, x2, y2);
    ShowIips();
    FlushBatchDraw();
    Sleep(20);
    if (x1 <= 0)
    {
      break;
    }
  }
  EndBatchDraw();
 
  POS pos;
  pos.x = rand() % 730 + 35;
  pos.y = rand() % 430 + 85;
  pos.color = HSVtoRGB(H, S, L);
 
  if (Grade == 0)
  {
    setfillcolor(HSVtoRGB(H, S, (L - 0.1f) < 0 ? L = L + 0.1f : L = L - 0.1f));
  }
  if (Grade == 1)
  {
    setfillcolor(HSVtoRGB(H, (S - 0.1f) < 0 ? S = S + 0.1f : S = S - 0.1f, L));
  }
  if (Grade >= 2)
  {
    setfillcolor(HSVtoRGB((H - 20) < 0 ? H = H + 20 : H = H - 20, S, L));
  }
 
  bar(pos.x - 35, pos.y - 35, pos.x + 35, pos.y + 35);
  ShowIips();
  return pos;
}
 
int GetNum(int Mark)
{
  int sum = 0;
  while (Mark)
  {
    sum++;
    Mark /= 10;
  }
  return sum == 0 ? sum = 1 : sum;
}
 
void GameOver()
{
  settextstyle(60, 0, L"微軟雅黑");
  RECT r = { 0, 0, 800, 600 };
  settextcolor(WHITE);
  drawtext(_T("游戲結(jié)束"), &r, DT_CENTER | DT_VCENTER | DT_SINGLELINE);
  Sleep(1000);
}
 
void AddMark(POS pos, int addMark)
{
  setfillcolor(WHITE);
  bar(pos.x - 35, pos.y - 35, pos.x + 35, pos.y + 35);
  setbkmode(TRANSPARENT);
  settextstyle(30, 0, L"微軟雅黑");
  settextcolor(WHITE);
  TCHAR str[25];
  _stprintf_s(str, _T("+%d"), addMark);
  POS textpos;
  textpos.x = pos.x - 20;
  textpos.y = pos.y - 35 - 30;
  textpos.color = WHITE;
  outtextxy(textpos.x, textpos.y, str);
 
  double k = textpos.y / (textpos.x - 700.0);
  double b = (700 * textpos.y) / (textpos.x - 700.0);
 
  double h = 0;              // 高度
  double v = 0;              // 速度（方向向下）
  double dv = 9.8 / 50;          // 加速度（每 1/50 秒）
  BeginBatchDraw();
  while (true)
  {
    v += dv;              // 根據(jù)加速度計(jì)算速度
    h -= (v - dv / 2);          // 計(jì)算高度
    pos.y = pos.y - (int)h;
    setfillcolor(WHITE);
    settextcolor(WHITE);
    bar(pos.x - 35, pos.y - 35, pos.x + 35, pos.y + 35);
    textpos.x = textpos.x - (int)h;
    textpos.y = (int)(k*textpos.x - b);
    outtextxy(textpos.x, textpos.y, str);
    FlushBatchDraw();
    Sleep(20);
    setfillcolor(pos.color);
    settextcolor(pos.color);
    outtextxy(textpos.x, textpos.y, str);
    bar(pos.x - 35, pos.y - 35, pos.x + 35, pos.y + 35);
    if (pos.y > 600 && textpos.x > 700)
    {
      break;
    }
  }
  EndBatchDraw();
}
 
void ShowIips()
{
  setbkmode(TRANSPARENT);
  settextstyle(30, 0, L"微軟雅黑");
  RECT r = { 0, 50, 800, 100 };
  settextcolor(RGB(252, 203, 147));
  drawtext(_T("找出顏色不一樣的小方塊"), &r, DT_CENTER | DT_VCENTER | DT_SINGLELINE);
}