?? unit1.cpp
字號(hào):
//如果得分，則銷掉此行
if (m_bIsSucced)
{
for (k=i;k>0;k--)
for (j=0;j<m_iCol;j++)
GameStatus[k][j] = GameStatus[k-1][j];
//第1行清零
for (j=0;j<m_iCol;j++)
GameStatus[0][j]=0;
m_iMuch += 1;
}
}
if (m_iMuch>0)
{
m_iPerformance += m_iMuch * m_iMuch * 100;
//刷新游戲區(qū)域
TRect rect1(m_iStartY, m_iStartX, m_iStartY+300, m_iStartX+360);
InvalidateRect(Handle,&rect1,false);
//刷新分?jǐn)?shù)區(qū)域
TRect rect2(m_iStartY+320, m_iStartX+180, m_iStartY+440, m_iStartX+200);
InvalidateRect(Handle,&rect2,false);
}
}
}
//---------------------------------------------------------------------------
/* * * * * * * * * * * * * * * * * * * * * *
* 內(nèi)部函數(shù)：方塊是否還可以左移
* * * * * * * * * * * * * * * * * * * * * */
BOOL TForm1::LeftIsLimit()
{
int x1,x2,x3,x4,y1,y2,y3,y4;
x1 = ActiveStatus[0][0];
x2 = ActiveStatus[1][0];
x3 = ActiveStatus[2][0];
x4 = ActiveStatus[3][0];
y1 = ActiveStatus[0][1];
y2 = ActiveStatus[1][1];
y3 = ActiveStatus[2][1];
y4 = ActiveStatus[3][1];
switch(m_currentRect)
{
case 1:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x3][y3-1] || GameStatus[x4][y4-1])
return FALSE;
break;
case 11:
if (GameStatus[x1][y1-1])
return FALSE;
break;
case 2:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1])
return FALSE;
break;
case 3:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1])
return FALSE;
break;
case 31:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 32:
if (GameStatus[x1][y1-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 33:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x4][y4-1])
return FALSE;
break;
case 4:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x4][y4-1])
return FALSE;
break;
case 41:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1])
return FALSE;
break;
case 5:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 51:
if (GameStatus[x1][y1-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 6:
if (GameStatus[x1][y1-1] || GameStatus[x3][y3-1] || GameStatus[x4][y4-1])
return FALSE;
break;
case 61:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1])
return FALSE;
break;
case 62:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 63:
if (GameStatus[x1][y1-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 7:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 71:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1])
return FALSE;
break;
case 72:
if (GameStatus[x1][y1-1] || GameStatus[x2][y2-1] || GameStatus[x3][y3-1])
return FALSE;
break;
case 73:
if (GameStatus[x1][y1-1] || GameStatus[x4][y4-1])
return FALSE;
break;
}
return TRUE;
}
//---------------------------------------------------------------------------
/* * * * * * * * * * * * * * * * * * * * * *
* 內(nèi)部函數(shù)：方塊是否還可以右移
* * * * * * * * * * * * * * * * * * * * * */
BOOL TForm1::RightIsLimit()
{
int x1,x2,x3,x4,y1,y2,y3,y4;
x1 = ActiveStatus[0][0];
x2 = ActiveStatus[1][0];
x3 = ActiveStatus[2][0];
x4 = ActiveStatus[3][0];
y1 = ActiveStatus[0][1];
y2 = ActiveStatus[1][1];
y3 = ActiveStatus[2][1];
y4 = ActiveStatus[3][1];
switch(m_currentRect)
{
case 1:
if (GameStatus[x1][y1+1] || GameStatus[x2][y2+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 11:
if (GameStatus[x4][y4+1])
return FALSE;
break;
case 2:
if (GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 3:
if (GameStatus[x2][y2+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 31:
if (GameStatus[x1][y1+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 32:
if (GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 33:
if (GameStatus[x2][y2+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 4:
if (GameStatus[x1][y1+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 41:
if (GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 5:
if (GameStatus[x2][y2+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 51:
if (GameStatus[x2][y2+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 6:
if (GameStatus[x2][y2+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 61:
if (GameStatus[x2][y2+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 62:
if (GameStatus[x1][y1+1] || GameStatus[x2][y2+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 63:
if (GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 7:
if (GameStatus[x2][y2+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 71:
if (GameStatus[x1][y1+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 72:
if (GameStatus[x2][y2+1] || GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
case 73:
if (GameStatus[x3][y3+1] || GameStatus[x4][y4+1])
return FALSE;
break;
}
return TRUE;
}
//---------------------------------------------------------------------------
/* * * * * * * * * * * * * * * * * * * * * *
* 內(nèi)部函數(shù)：方塊的變形
* * * * * * * * * * * * * * * * * * * * * */
void TForm1::RectChange()
{
//先預(yù)先變形，然后判斷變形后的方塊是否有空間，
//如有足夠空間，則進(jìn)行實(shí)際變形，否則不變
int xx1,xx2,xx3,xx4,yy1,yy2,yy3,yy4;
int m_lscurrentRect;
AnsiString lsStr;
int x1,x2,x3,x4,y1,y2,y3,y4;
x1 = ActiveStatus[0][0];
x2 = ActiveStatus[1][0];
x3 = ActiveStatus[2][0];
x4 = ActiveStatus[3][0];
y1 = ActiveStatus[0][1];
y2 = ActiveStatus[1][1];
y3 = ActiveStatus[2][1];
y4 = ActiveStatus[3][1];
//變形后位置在數(shù)組中的存放順序仍需遵循先左后右，在同一列中先上后下
xx1=x1; xx2=x2; xx3=x3; xx4=x4; yy1=y1; yy2=y2; yy3=y3; yy4=y4;
switch(m_currentRect)
{
case 1:
xx1=x1+1; yy1=y1-1; xx3=x3-1; yy3=y3+1; xx4=x4-2; yy4=y4+2;
m_lscurrentRect = 11;
break;
case 11:
xx1=x1-1; yy1=y1+1; xx3=x3+1; yy3=y3-1; xx4=x4+2; yy4=y4-2;
m_lscurrentRect = 1;
break;
case 2:
m_lscurrentRect=2;
break;
case 3:
xx1=x1-2; yy1=y1+1; xx4=x4-1; yy4=y4;
m_lscurrentRect = 31;
break;
case 31:
xx1=x1+1; yy1=y1-1;
m_lscurrentRect = 32;
break;
case 32:
xx1=x1+1; yy1=y1; xx4=x4+2; yy4=y4-1;
m_lscurrentRect=33;
break;
case 33:
xx4=x4-1; yy4=y4+1;
m_lscurrentRect=3;
break;
case 4:
xx1=x1+2; yy1=y1-1; xx3=x3+1; yy3=y3-1; xx4=x4-1;
m_lscurrentRect = 41;
break;
case 41:
xx1=x1-2; yy1=y1+1; xx3=x3-1; yy3=y3+1; xx4=x4+1;
m_lscurrentRect = 4;
break;
case 5:
xx1=x1-1; xx2=x2-2; yy2=y2+1; xx3=x3+1; yy4=y4+1;
m_lscurrentRect = 51;
break;
case 51:
xx1=x1+1; xx2=x2+2; yy2=y2-1; xx3=x3-1; yy4=y4-1;
m_lscurrentRect = 5;
break;
case 6:
xx2=x1+1; yy2=y2-1; xx3=x3-1; xx4=x4-2; yy4 = yy4+1;
m_lscurrentRect = 61;
break;
case 61:
xx3=x3+2; yy3=y3-1; xx4=x4+2; yy4=y4-1;
m_lscurrentRect = 62;
break;
case 62:
xx1=x1+1; yy1=y1-1; xx3=x3-2; yy3=y3+1; xx4=x4-1;
m_lscurrentRect = 63;
break;
case 63:
xx1=x1-2; yy1=y1+1; xx2=x2-2; yy2=y2+1;
m_lscurrentRect = 6;
break;
case 7:
xx3=x3-1; yy3=y3+1; xx4=x4+1; yy4=y4+1;
m_lscurrentRect = 71;
break;
case 71:
xx1=x1+2; xx2=x2-1; yy2=y2+1; xx4=x4+1; yy4=y4-1;
m_lscurrentRect = 72;
break;
case 72:
xx1=x1-2; xx3=x3-1; yy3=y3+1; xx4=x4-1; yy4=y4+1;
m_lscurrentRect = 73;
break;
case 73:
xx2=x2+1; yy2=y2-1; xx3=x3+2; yy3=y3-2; xx4=x4-1; yy4=y4-1;
m_lscurrentRect = 7;
break;
}
//如果變形后所在的區(qū)域內(nèi)無(wú)其他方塊，則表示有足夠空間，可以變形
//且不能超越邊界
GameStatus[x1][y1] = 0;
GameStatus[x2][y2] = 0;
GameStatus[x3][y3] = 0;
GameStatus[x4][y4] = 0;
if (GameStatus[xx1][yy1]==0 && GameStatus[xx2][yy2]==0 && GameStatus[xx3][yy3]==0 && GameStatus[xx4][yy4]==0
&& yy1>=0 && yy4<=m_iCol-1
&& !(xx1<0 || xx2<0 || xx3<0 || xx4<0)
&& !(xx1>m_iRow-1 || xx2>m_iRow-1 || xx3>m_iRow-1 || xx4>m_iRow-1) )
{
InvalidateCurrent();
ActiveStatus[0][0]=xx1;
ActiveStatus[1][0]=xx2;
ActiveStatus[2][0]=xx3;
ActiveStatus[3][0]=xx4;
ActiveStatus[0][1]=yy1;
ActiveStatus[1][1]=yy2;
ActiveStatus[2][1]=yy3;
ActiveStatus[3][1]=yy4;
GameStatus[xx1][yy1] = 1;
GameStatus[xx2][yy2] = 1;
GameStatus[xx3][yy3] = 1;
GameStatus[xx4][yy4] = 1;
InvalidateCurrent();
//改變形狀代碼
m_currentRect = m_lscurrentRect;
}
else
{
GameStatus[x1][y1] = 1;
GameStatus[x2][y2] = 1;
GameStatus[x3][y3] = 1;
GameStatus[x4][y4] = 1;
}
//判斷是否已到底
ActiveIsBottom();
}
//---------------------------------------------------------------------------
/* * * * * * * * * * * * * * * * * * * * * *
* 內(nèi)部函數(shù)：刷新當(dāng)前的區(qū)域
*
* 只刷新需要刷新的四個(gè)小方塊區(qū)域，防止屏幕抖動(dòng)情況發(fā)生
* * * * * * * * * * * * * * * * * * * * * */
void TForm1::InvalidateCurrent()
{
int i;
for (i=0;i<4;i++)
{
TRect rect(m_iStartX+ActiveStatus[i][1]*m_iLarge, m_iStartY+ActiveStatus[i][0]*m_iLarge,
m_iStartX+(ActiveStatus[i][1]+1)*m_iLarge+5, m_iStartY+(ActiveStatus[i][0]+1)*m_iLarge);
InvalidateRect(Handle,&rect,false);
}
}
//---------------------------------------------------------------------------
//用于生成當(dāng)前區(qū)域大小與級(jí)別所對(duì)應(yīng)的漢字描述
void TForm1::CurrentAreaAndLevel()
{
switch(m_iRow)
{
case 12:
m_strArea = "12行10列";
break;
case 18:
m_strArea = "18行15列";
break;
case 24:
m_strArea = "24行20列";
break;
case 30:
m_strArea = "30行25列";
break;
}
switch(m_iLevel)
{
case 0:
m_strLevel = "第一級(jí): 蝸牛級(jí)";
break;
case 1:
m_strLevel = "第二級(jí): 笨鴨級(jí)";
break;
case 2:
m_strLevel = "第三級(jí): 雄雞級(jí)";
break;
case 3:
m_strLevel = "第四級(jí): 獵狗級(jí)";
break;
case 4:
m_strLevel = "第五級(jí): 云豹級(jí)";
break;
case 5:
m_strLevel = "第六級(jí): 飛鷹級(jí)";
break;
}
}
//---------------------------------------------------------------------------
//插放背景音樂(lè), 所有錯(cuò)誤忽略
void TForm1::PlayMid()
{
char inBuf[300],outBuf[60],fileName[255];
MCIERROR mciError;
strcpy(fileName,"hwrect.mid");
wsprintf( inBuf,"open %s type sequencer alias myseq",fileName);
mciError = mciSendString( inBuf, outBuf, sizeof(outBuf), NULL);
if (mciError == 0)
{
mciError = mciSendString("play myseq notify",NULL,0, Handle);
if (mciError != 0)
mciSendString("close myseq",NULL,0,NULL);
}
}
//---------------------------------------------------------------------------
//終止插放背景音樂(lè)
void TForm1::StopMid()
{
mciSendString("close myseq",NULL,0,NULL);
}
//---------------------------------------------------------------------------
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -