mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-21 06:12:34 +03:00
165 lines
4.3 KiB
Plaintext
165 lines
4.3 KiB
Plaintext
/*******************************************************************************
|
|
|
|
MenuetOS MineSweeper
|
|
Copyright (C) 2003, 2004 Ivan Poddubny
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
|
|
*******************************************************************************/
|
|
|
|
void draw_window() // Ïðîöåäóðà îòðèñîâêè îêíà
|
|
{
|
|
sys_get_colors(#colors, 40);
|
|
|
|
// WINDOW
|
|
sys_window_redraw(1);
|
|
EBX = xpos << 16 + xsize;
|
|
ECX = ypos << 16 + ysize;
|
|
sys_draw_window(EBX, ECX, 0x14CCCCCC, colors.w_work | 0x80000000, "MineSweeper");
|
|
sys_window_redraw(2);
|
|
|
|
// Leency ROLLED UP FIX
|
|
sys_process_info(#procinfo, -1);
|
|
IF (procinfo.ysize<70) return;
|
|
|
|
// <NEW GAME> BUTTON (911)
|
|
EBX = xsize / 2 - 10;
|
|
EBX = EBX << 16 + 20;
|
|
sys_draw_button(EBX, 25<<16+20, 911, clLightGray);
|
|
|
|
// <CHANGE MODE> BUTTON (1001)
|
|
sys_draw_button(10<<16+7, 23<<16+7, 1001, 0x118811);
|
|
|
|
// <USER FIELD> BUTTON (1002)
|
|
//sys_draw_button(20<<16+7, ECX, EDX+1, 0xddbb44);
|
|
|
|
draw_time(); // draw timer
|
|
draw_minesi(); // draw mines
|
|
draw_squares(); // draw field
|
|
}
|
|
|
|
dword num_colors[8]=
|
|
{
|
|
0x4444d0, // 1
|
|
0x118811, // 2
|
|
0xd04444, // 3
|
|
0x111199, // 4
|
|
0x991111, // 5
|
|
0x117089, // 6
|
|
0x000000, // 7
|
|
0x808080 // 8
|
|
};
|
|
|
|
|
|
// Îòðèñîâêà îäíîé êëåòêè
|
|
void draw_square(int x, y)
|
|
{
|
|
int xl, xr, yt, yb; // ñëåâà, ñïðàâà, ñâåðõó, ñíèçó
|
|
dword tcolor = clBlack; // öâåò çíà÷åíèÿ êëåòêè ïî óìîë÷àíèþ ÷åðíûé
|
|
byte tchar, tval;
|
|
|
|
xl = XPX * x + XST;
|
|
xr = xl + XPX - 1;
|
|
yt = YPX * y + YST;
|
|
yb = yt + YPX - 1;
|
|
|
|
EBX = xl+1 << 16 + xr - xl-1;
|
|
ECX = yt+1 << 16 + yb - yt-1;
|
|
$inc ebx
|
|
$inc ecx
|
|
sys_draw_bar(EBX, ECX, clLightGray); // ðèñóåò çàêðàøåííûé ïðÿìîóãîëüíèê
|
|
|
|
if (!get_open(x, y))
|
|
{
|
|
// ðèñóåì ðàìêó
|
|
ECX = yt << 16 + yb - 1;
|
|
sys_draw_line(xl<<16+xl, ECX, clWhite);
|
|
EBX = xl << 16 + xr - 1;
|
|
sys_draw_line(EBX, yt << 16 + yt, EDX);
|
|
sys_draw_line(xr << 16 + xl, yb << 16 + yb, clDarkGray);
|
|
sys_draw_line(xr << 16 + xr, yb << 16 + yt, EDX);
|
|
|
|
SWITCH (get_mark(x, y))
|
|
{
|
|
CASE 2: tcolor = 0x121288; tchar = '?'; BREAK;
|
|
CASE 1: tcolor = 0xd04444; tchar = 'P';
|
|
}
|
|
|
|
IF (get_mark(x,y))
|
|
{
|
|
EBX = xl + 5 << 16 + yt + 4;
|
|
sys_write_text(EBX, tcolor, #tchar, 1);
|
|
EBX += 0x00010000;
|
|
/* Âòîðîé ðàç - ðåãèñòðû ñîõðàíÿþòñÿ */
|
|
sys_write_text(EBX, ECX, EDX, ESI);
|
|
}
|
|
}
|
|
else // get_open(x,y)==TRUE
|
|
{
|
|
tval = get_value(x, y);
|
|
IF (tval != 0)
|
|
{
|
|
IF (tval == MINE)
|
|
{
|
|
tcolor = 0xee1111;
|
|
tchar = '*';
|
|
}
|
|
ELSE
|
|
{
|
|
tchar = tval + '0';
|
|
tcolor = num_colors[tval-1];
|
|
}
|
|
EBX = xl + 5 << 16 + yt + 5;
|
|
sys_write_text(EBX, tcolor, #tchar, 1);
|
|
EBX += 0x00010000;
|
|
sys_write_text(EBX, ECX, EDX, ESI);
|
|
}
|
|
sys_draw_line(xl << 16 + xl, yt << 16 + yb, clDarkGray);
|
|
sys_draw_line(xl << 16 + xr, yt << 16 + yt, EDX);
|
|
}
|
|
}
|
|
|
|
|
|
// Òàéìåð
|
|
void draw_time()
|
|
{
|
|
sys_draw_bar(XST<<16+25, 31<<16+14, 0xCCCCCC);
|
|
sys_write_number(0x00030000, time, XST<<16+32, 0x10ff0000);
|
|
}
|
|
|
|
|
|
// Èíäèêàòîð êîëè÷åñòâà íåðàññòàâëåííûõ ìèí
|
|
void draw_minesi()
|
|
{
|
|
EBX = xsize - XST - 25;
|
|
$PUSH EBX
|
|
EBX = EBX << 16 + 25;
|
|
sys_draw_bar(EBX, 31<<16+14, 0xCCCCCC);
|
|
$POP EDX
|
|
EDX <<= 16; EDX += 32;
|
|
sys_write_number(0x00030000, cmines, EDX, 0x10ff0000);
|
|
}
|
|
|
|
|
|
// Îòðèñîâêà ìèííîãî ïîëÿ
|
|
void draw_squares()
|
|
{
|
|
int x,y;
|
|
|
|
FOR (y=0; y < ncy; y++)
|
|
FOR (x=0; x < ncx; x++)
|
|
draw_square(x, y);
|
|
}
|