forked from KolibriOS/kolibrios
210 lines
5.0 KiB
Plaintext
210 lines
5.0 KiB
Plaintext
|
/*
|
|||
|
Memory Blocks for KolibriOS v1.02
|
|||
|
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
|
|||
|
*/
|
|||
|
#codesize
|
|||
|
#include "kolibri.h--"
|
|||
|
#include "icons.txt"
|
|||
|
#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>
|
|||
|
|
|||
|
char button_r[20] = "<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>(F2) <20><><EFBFBD><EFBFBD>:"; //<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
char button_e[20] = "New game (F2)Count:";
|
|||
|
|
|||
|
byte bitstat[60], bitpict[60];
|
|||
|
dword butonsx[60], butonsy[60];
|
|||
|
dword firstbit, secondbit;
|
|||
|
int i, count, lang;
|
|||
|
|
|||
|
void main()
|
|||
|
{
|
|||
|
byte id;
|
|||
|
init();
|
|||
|
loop()
|
|||
|
{
|
|||
|
switch (WaitEvent())
|
|||
|
{
|
|||
|
CASE evButton:
|
|||
|
id = GetButtonID();
|
|||
|
SWITCH (id)
|
|||
|
{
|
|||
|
CASE 1:
|
|||
|
ExitProcess();
|
|||
|
CASE 5:
|
|||
|
init();
|
|||
|
break;
|
|||
|
CASE 6:
|
|||
|
FOR (i=0;i<20;i++) button_r[i]><button_e[i];
|
|||
|
IF (!lang) lang=1; ELSE lang=0;
|
|||
|
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] = bitstat[secondbit-100] = 2;
|
|||
|
ELSE
|
|||
|
bitstat[firstbit-100] = 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;
|
|||
|
case evKey:
|
|||
|
IF (GetKey()==51) init();
|
|||
|
BREAK;
|
|||
|
case evReDraw:
|
|||
|
WindowRedrawStatus(1);
|
|||
|
DefineAndDrawWindow(100, 100, 434, 291 + GetSkinWidth(), 0x34, 0x10C0C0C0, 0, 0, "Memory Blocks L&V Edition");
|
|||
|
Draw_Panel();
|
|||
|
Draw_Game_Pole();
|
|||
|
WindowRedrawStatus(2);
|
|||
|
}
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
void init()
|
|||
|
{
|
|||
|
byte off;
|
|||
|
$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>v<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] = i;
|
|||
|
do off = random(60); while (bitpict[off] != 0);
|
|||
|
bitpict[off] = i;
|
|||
|
}
|
|||
|
Draw_Game_Pole();
|
|||
|
Draw_Panel();
|
|||
|
}
|
|||
|
|
|||
|
void ReDraw_Game_Button(int id)
|
|||
|
{
|
|||
|
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]*32*32+#data,32,32,butonsx[id]+3,butonsy[id]+3, #palitra);
|
|||
|
BREAK;
|
|||
|
CASE 2:
|
|||
|
Draw_Open_Block(butonsx[id], butonsy[id]);
|
|||
|
PutImage(bitpict[id]*32*32+#data,32,32,butonsx[id]+3,butonsy[id]+3, #palitra);
|
|||
|
BREAK;
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
void Draw_Game_Pole()
|
|||
|
{
|
|||
|
byte j;
|
|||
|
FOR (j = 0; j < stolbcov; j++) FOR (i = 0; i < strok; i++)
|
|||
|
{
|
|||
|
butonsx[j*strok+i] = j * 42 + 4; //<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[j*strok+i] = i * 42 + 4;
|
|||
|
ReDraw_Game_Button(j*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>
|
|||
|
DrawBar(x+1, y+1, 37, 1, 0xFFFFFF); //<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
DrawBar(x+1, y+2, 1, 35, 0xFFFFFF);
|
|||
|
DrawBar(x+1, y+37, 37, 1, 0xDEDEDE); //<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
DrawBar(x+37, y+2, 1, 35, 0xDEDEDE);
|
|||
|
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(0, 255, 425, 32, 0xEBE7DB);//<2F><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
DrawBar(0, 255, 425, 1, 0x94AECE); //<2F><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
DrawBar(0, 256, 425, 1, 0xFFFFFF); //<2F><><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
DrawFlatButton(9, 260, 107, 23, 5, 0xEFEBEF);//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
WriteText(22,268,0x00,0,#button_r,14);
|
|||
|
WriteText(150, 268, 0x80, 0x00, #button_r+14, 0); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "<22><><EFBFBD><EFBFBD>"
|
|||
|
DrawFlatButton(215, 260, 23, 23, 6, 0xEFEBEF); //<2F><><EFBFBD><EFBFBD>
|
|||
|
IF (!lang)
|
|||
|
WriteText(221,268,0x80,0,"EN",0);
|
|||
|
ELSE
|
|||
|
WriteText(221,268,0x80,0,"RU",0);
|
|||
|
Draw_Count();
|
|||
|
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
DrawBar(400 , 265, 2, 2, 0xBDCBDE);
|
|||
|
DrawBar(398 , 270, 6, 6, 0xBDCBDE);
|
|||
|
DrawBar(406 , 275, 6, 6, 0xBDCBDE);
|
|||
|
DrawBar(407 , 262, 9, 8, 0xD6D7CE);
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
void Draw_Count()
|
|||
|
{
|
|||
|
DrawBar(190,268,18,7,0xEBE7DB); //<2F><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
WriteNumber(190, 268, 0x80, 0x00, 3, count);
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
stop:
|