forked from KolibriOS/kolibrios
294 lines
6.6 KiB
Plaintext
294 lines
6.6 KiB
Plaintext
|
/*
|
|||
|
|
Memory Blocks for KolibriOS v1.01
|
|||
|
|
L&V Edition
|
|||
|
|
|
|||
|
|
<09><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>: Leency
|
|||
|
|
<09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>: Veliant <20> Leency
|
|||
|
|
Compile with C--
|
|||
|
|
2008
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
#pragma option J0
|
|||
|
|
#pragma option LST
|
|||
|
|
#pragma option OC
|
|||
|
|
#pragma option 4
|
|||
|
|
#pragma option A
|
|||
|
|
#include "kolibri.h--"
|
|||
|
|
#include "random.h--"
|
|||
|
|
#include "mbgraph.h--"
|
|||
|
|
|
|||
|
|
#define strok 6 //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
#define stolbcov 10 //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
#define header "Memory Blocks L&V Edition"
|
|||
|
|
|
|||
|
|
char button_r = "<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>(F2)"; //<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
|
char tcount_r = " <20><><EFBFBD><EFBFBD>:"; //<2F><><EFBFBD><EFBFBD>
|
|||
|
|
char lg_r = "RU";
|
|||
|
|
|
|||
|
|
char button_e = "New game (F2)";
|
|||
|
|
char tcount_e = "Count:";
|
|||
|
|
char lg_e = "EN";
|
|||
|
|
|
|||
|
|
#define button "<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>(F2)"
|
|||
|
|
#define tcount " <20><><EFBFBD><EFBFBD>:"
|
|||
|
|
|
|||
|
|
|
|||
|
|
int lang = 0;
|
|||
|
|
|
|||
|
|
byte bitstat[60] = 0;
|
|||
|
|
byte bitpict[60] = 0;
|
|||
|
|
dword butonsx[60] = 0;
|
|||
|
|
dword butonsy[60] = 0;
|
|||
|
|
dword i, k, x, id, count = 0;
|
|||
|
|
dword firstbit, secondbit;
|
|||
|
|
|
|||
|
|
void main()
|
|||
|
|
{
|
|||
|
|
int z=1;
|
|||
|
|
int off;
|
|||
|
|
FOR (i = 0; i < 30; i++)
|
|||
|
|
{
|
|||
|
|
do
|
|||
|
|
off = random(60);
|
|||
|
|
while (bitpict[off] != 0);
|
|||
|
|
bitpict[off] = z;
|
|||
|
|
do
|
|||
|
|
off = random(60);
|
|||
|
|
while (bitpict[off] != 0);
|
|||
|
|
bitpict[off] = z;
|
|||
|
|
z++;
|
|||
|
|
}
|
|||
|
|
skin_width = GetSkinWidth();
|
|||
|
|
firstbit = secondbit = 0x0BAD;
|
|||
|
|
Draw_Window();
|
|||
|
|
loop()
|
|||
|
|
{
|
|||
|
|
switch (WaitEvent())
|
|||
|
|
{
|
|||
|
|
CASE evButton:
|
|||
|
|
id = GetButtonID();
|
|||
|
|
switch (id)
|
|||
|
|
{
|
|||
|
|
CASE 1:
|
|||
|
|
ExitProcess();
|
|||
|
|
break;
|
|||
|
|
CASE 5:
|
|||
|
|
init();
|
|||
|
|
break;
|
|||
|
|
CASE 6:
|
|||
|
|
SWITCH (lang)
|
|||
|
|
{
|
|||
|
|
CASE 0:
|
|||
|
|
copystr(#button_e, button);
|
|||
|
|
copystr(#tcount_e, tcount);
|
|||
|
|
lang = 1;
|
|||
|
|
break;
|
|||
|
|
CASE 1:
|
|||
|
|
copystr(#button_r, button);
|
|||
|
|
copystr(#tcount_r, tcount);
|
|||
|
|
lang = 0;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
Draw_Panel();
|
|||
|
|
break;
|
|||
|
|
default:
|
|||
|
|
if (bitstat[id-100] == 0)
|
|||
|
|
{
|
|||
|
|
if (firstbit <> 0x0BAD)
|
|||
|
|
{
|
|||
|
|
if (secondbit <> 0x0BAD)
|
|||
|
|
{
|
|||
|
|
IF (bitpict[firstbit-100] == bitpict[secondbit-100])
|
|||
|
|
{
|
|||
|
|
bitstat[firstbit-100] = 2;
|
|||
|
|
bitstat[secondbit-100] = 2;
|
|||
|
|
}
|
|||
|
|
ELSE
|
|||
|
|
{
|
|||
|
|
bitstat[firstbit-100] = 0;
|
|||
|
|
bitstat[secondbit-100] = 0;
|
|||
|
|
}
|
|||
|
|
ReDraw_Game_Button(firstbit - 100);
|
|||
|
|
ReDraw_Game_Button(secondbit - 100);
|
|||
|
|
secondbit = 0x0BAD;
|
|||
|
|
firstbit = id;
|
|||
|
|
bitstat[id-100] = 1;
|
|||
|
|
ReDraw_Game_Button(id - 100);
|
|||
|
|
count++;
|
|||
|
|
}
|
|||
|
|
ELSE
|
|||
|
|
{
|
|||
|
|
IF (firstbit<>id)
|
|||
|
|
{
|
|||
|
|
secondbit = id;
|
|||
|
|
bitstat[id-100] = 1;
|
|||
|
|
ReDraw_Game_Button(id - 100);
|
|||
|
|
count++;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
ELSE
|
|||
|
|
{
|
|||
|
|
firstbit = id;
|
|||
|
|
bitstat[id-100] = 1;
|
|||
|
|
ReDraw_Game_Button(id - 100);
|
|||
|
|
count++;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
Draw_Count();
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case evKey:
|
|||
|
|
SWITCH (GetKey())
|
|||
|
|
{
|
|||
|
|
CASE 51:
|
|||
|
|
init(); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> F2
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case evReDraw:
|
|||
|
|
Draw_Window();
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
ExitProcess();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void Draw_Window()
|
|||
|
|
{
|
|||
|
|
begin_paint();
|
|||
|
|
DefineAndDrawWindow(100, 100, 434, 290 + skin_width + 1, 0x04, 0x00C0C0C0, 0, 0, 0);
|
|||
|
|
DrawTitle(header);
|
|||
|
|
Draw_Panel();
|
|||
|
|
Draw_Game_Pole();
|
|||
|
|
|
|||
|
|
end_paint();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void init()
|
|||
|
|
{
|
|||
|
|
int off, z;
|
|||
|
|
z=1;
|
|||
|
|
$mov edi, #bitstat
|
|||
|
|
$mov ecx, 60
|
|||
|
|
$xor al, al
|
|||
|
|
$rep $stosb //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
$mov edi, #bitpict
|
|||
|
|
$mov ecx, 60
|
|||
|
|
$xor al, al
|
|||
|
|
$rep $stosb //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
count = 0;
|
|||
|
|
firstbit = secondbit = 0x0BAD;
|
|||
|
|
FOR (i = 0; i < 30; i++)
|
|||
|
|
{
|
|||
|
|
do
|
|||
|
|
off = random(60);
|
|||
|
|
while (bitpict[off] != 0);
|
|||
|
|
bitpict[off] = z;
|
|||
|
|
do
|
|||
|
|
off = random(60);
|
|||
|
|
while (bitpict[off] != 0);
|
|||
|
|
bitpict[off] = z;
|
|||
|
|
z++;
|
|||
|
|
}
|
|||
|
|
Draw_Game_Pole();
|
|||
|
|
Draw_Panel();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void ReDraw_Game_Button(int id)
|
|||
|
|
{
|
|||
|
|
int off;
|
|||
|
|
DefineButton(0, 0, 0, 0, 100 + id + BT_DEL, 0); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DefineButton(butonsx[id], butonsy[id], 38, 38, 100 + id + BT_HIDE, 0xEFEBEF); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
switch (bitstat[id])
|
|||
|
|
{
|
|||
|
|
CASE 0:
|
|||
|
|
Draw_Block(butonsx[id], butonsy[id]);
|
|||
|
|
break;
|
|||
|
|
CASE 1:
|
|||
|
|
Draw_Pressed_Block(butonsx[id], butonsy[id]);
|
|||
|
|
PutImage(bitpict[id]-1*32*32*3+#data,32,32,butonsx[id]+3,butonsy[id]+3);
|
|||
|
|
break;
|
|||
|
|
case 2:
|
|||
|
|
Draw_Open_Block(butonsx[id], butonsy[id]);
|
|||
|
|
PutImage(bitpict[id]-1*32*32*3+#data,32,32,butonsx[id]+3,butonsy[id]+3);
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
//WriteText(butonsx[id] + 10, butonsy[id] + 10, 0x80, 0x000000, IntToStr(bitpict[id]), 0);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void Draw_Game_Pole()
|
|||
|
|
{
|
|||
|
|
FOR (k = 0; k < stolbcov; k++)
|
|||
|
|
{
|
|||
|
|
FOR (i = 0; i < strok; i++)
|
|||
|
|
{
|
|||
|
|
butonsx[k*strok+i] = k * 42 + 4 + 5; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
butonsy[k*strok+i] = i * 42 + 4;
|
|||
|
|
ReDraw_Game_Button(k*strok + i); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void Draw_Block(dword x, y)
|
|||
|
|
{
|
|||
|
|
DrawRegion(x, y, 38, 38, 0x0094AECE);//<2F><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawLine(x + 1*65536 + x + 37, y + skin_width + 1*65536 + y + skin_width + 1, 0x00FFFFFF);//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawLine(x + 1*65536 + x + 1, y + skin_width + 1*65536 + y + skin_width + 36, 0x00FFFFFF);
|
|||
|
|
DrawLine(x + 1*65536 + x + 37, y + skin_width + 37*65536 + y + skin_width + 37, 0x00DEDEDE);//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawLine(x + 37*65536 + x + 37, y + skin_width + 2*65536 + y + skin_width + 36, 0x00DEDEDE);
|
|||
|
|
DrawBar(x + 2, y + 2, 35, 35, 0x00BDC7D6);//<2F><><EFBFBD>
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void Draw_Open_Block(dword x, y)
|
|||
|
|
{
|
|||
|
|
DrawRegion(x, y, 38, 38, 0x0094AECE);//<2F><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawBar(x + 1, y + 1, 37, 37, 0x00EFEBEF);//<2F><><EFBFBD>
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void Draw_Pressed_Block(dword x, y)
|
|||
|
|
{
|
|||
|
|
DrawRegion(x, y, 38, 38, 0x0094AECE);//<2F><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawRegion(x + 1, y + 1, 36, 36, 0x0094DB00);//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawRegion(x + 2, y + 2, 34, 34, 0x0094DB00);//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawBar(x + 3, y + 3, 33, 33, 0x00EFEBEF);//<2F><><EFBFBD>
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void Draw_Panel()
|
|||
|
|
{
|
|||
|
|
DrawBar(5, 255, 425, 32, 0x00EBE7DB);//<2F><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawLine(5*65536 + 429, 255 + skin_width*65536 + 255 + skin_width, 0x0094AECE);//<2F><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawLine(5*65536 + 429, 256 + skin_width*65536 + 256 + skin_width, 0x00FFFFFF);//<2F><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawFlatButton(4 + 5, 260, 107, 23, 5, 0x00EFEBEF);//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
|
DrawFlatButton(210 + 5, 260, 23, 23, 6, 0x00EFEBEF);//<2F><><EFBFBD><EFBFBD>
|
|||
|
|
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
WriteText(22, 268, 0x80, 0x000000, button, 0);
|
|||
|
|
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "<22><><EFBFBD><EFBFBD>"
|
|||
|
|
WriteText(150, 268, 0x80, 0x000000, tcount, 0);
|
|||
|
|
IF (lang==0)
|
|||
|
|
WriteText(221, 268, 0x80, 0x000000, #lg_e, 0);
|
|||
|
|
ELSE
|
|||
|
|
WriteText(221, 268, 0x80, 0x000000, #lg_r, 0);
|
|||
|
|
Draw_Count();
|
|||
|
|
|
|||
|
|
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
DrawBar(395 + 10, 260 + 5, 2, 2, 0x00BDCBDE);
|
|||
|
|
DrawBar(393 + 10, 265 + 5, 6, 6, 0x00BDCBDE);
|
|||
|
|
DrawBar(401 + 10, 270 + 5, 6, 6, 0x00BDCBDE);
|
|||
|
|
DrawBar(402 + 10, 257 + 5, 9, 8, 0x00D6D7CE);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
void Draw_Count()
|
|||
|
|
{
|
|||
|
|
EDI = 0x00EBE7DB; //<2F><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
WriteText(190, 268, 0xC0, 0x000000, IntToStr(count), 0);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
stop:
|