?? mainform.cpp
字號:
//---------------------------------------------------------------------------
// 其實很早就寫過一個pascal版本的掃雷游戲,很簡陋的,覺得不太好,正好工作的時候
// 用到BCB,就想寫一個BCB版本的掃雷游戲,其實就是自己寫著玩玩.
// 從開始寫到寫完,間隔很久,中間有事就忘了寫了,沒寫完總歸是不爽的,什么事都要
// 有始有終,對吧.
//
// 日期:2004.02.28
// 作者:老姜(fjye)
// Email:fjye@fjye.com
// HomePage:http://www.YEStudio.cn
//
// 程序思路:
// 1,首先初始化二維數組,結構數組,定義好類以及結構體
// 2,填充全部空格,埋雷(),隨機布雷.
// 3,定義鼠標左鍵單擊事件,顯示格子屬性(數字0-8,空地,雷區)
// 4,鼠標右鍵單擊標雷.再單擊測消標雷
// 5,鼠標左右鍵齊擊,自動計算數字周邊已經顯示全部雷數的3*3范圍的數字己空格
// 6,利用注冊表記錄成績信息,新紀錄成績記錄寫入注冊表,記錄最后一次打開的級別
// 7,消息攔截,攔截F2按鍵消息,重新開始游戲.
// 8,使用TStringList方便快捷
// 9,資源的使用,使編譯以后的程序盡量簡潔,數字動態顯示
//
//
//
//
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MainForm.h"
#include "set.h"
#include "score.h"
#include "imagehlp.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TCleanBomb *CleanBomb;
//---------------------------------------------------------------------------
//主界面析構函數,新建位圖資源指針,初始化
__fastcall TCleanBomb::TCleanBomb(TComponent* Owner)
: TForm(Owner)
{
wastetime = 0;
label_bomb = 0;
virtual_num = 0;
globa_width = WIDTH;
globa_height = HEIGHT;
globa_bomb_num = BOMB_NUMBER;
//regkey = new TRegistry();
//TStringList * aList = new TStringList();
TStringList *aList = read_last_config();
if(aList->DelimitedText!="")
{
globa_width = StrToInt(aList->Strings[0]);
globa_height = StrToInt(aList->Strings[1]);
globa_bomb_num = StrToInt(aList->Strings[2]);
}
delete aList;
for (int i=0;i<50;i++)
for (int j=0;j<30;j++)
{
POS[i][j] = new BOMB(i,j);
POS[i][j]->show();
}
gameover = false;
//以下這段程序是檢驗可執行程序本身的校驗和的,防止程序被改寫
//需要在頭文件中加上#include "imagehlp.h"
/* DWORD HeadChksum=1,Chksum=0;
char Fn[512];
GetModuleFileName(GetModuleHandle(NULL),Fn,512);
if(MapFileAndCheckSum(Fn,&HeadChksum,&Chksum)!=CHECKSUM_SUCCESS)
{
MessageBox(NULL,"文件檢查出錯!","錯誤",MB_OK);
}
else
{
if(HeadChksum!=Chksum)
{
MessageBox(NULL,"文件已被改動,啟動失敗！","警告",MB_OK);
FormDestroy(NULL);
Close();
}
//--------
} */
}
//---------------------------------------------------------------------------
void TCleanBomb::init_interface(int p_width=WIDTH,int p_height=HEIGHT,int bomb_num=BOMB_NUMBER)
{
//TODO: Add your source code here
wastetime = 0;
time_pic(wastetime);
bombnum_pic(globa_bomb_num-virtual_num);
Refresh();
wastetime = 0;
label_bomb = 0;
virtual_num = 0;
//Timer1->Enabled = true;
Width = p_width*16+8; //設定程序寬度
Height = p_height*16+77+7; //設定程序高度
Set(p_width,p_height,bomb_num); //設定雷數
for (int i=0;i<p_width;i++) //繪制初始界面
for (int j=0;j<p_height;j++)
{
Draw(i,j,"button");
}
}
void TCleanBomb::Draw(int i, int j, AnsiString state)
{
try
{
Bitmap1 = new Graphics::TBitmap();
Bitmap1->LoadFromResourceName((int)HInstance,state);
//Bitmap1->LoadFromResourceName((int)HInstance,POS[i][j]->state);
Canvas->Draw(i*16,j*16+32,Bitmap1);
}
catch (...)
{
MessageBeep(0);
}
delete Bitmap1;
}
void __fastcall TCleanBomb::N5Click(TObject *Sender)
{
globa_width = 12;
globa_height = 12;
globa_bomb_num = 12;
click_label(true,false,false,false);
init_interface(globa_width,globa_height,globa_bomb_num);
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::N6Click(TObject *Sender)
{
globa_width = 16;
globa_height = 16;
globa_bomb_num = 40;
click_label(false,true,false,false);
init_interface(globa_width,globa_height,globa_bomb_num);
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::N7Click(TObject *Sender)
{
globa_width = 30;
globa_height = 16;
globa_bomb_num = 65;
click_label(false,false,true,false);
init_interface(globa_width,globa_height,globa_bomb_num);
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::N12Click(TObject *Sender)
{
click_label(false,false,false,true);
set_bomb->ShowModal();
}
//---------------------------------------------------------------------------
void TCleanBomb::click_label(bool k1,bool k2,bool k3,bool k4)
{
N5->Checked = k1;
N6->Checked = k2;
N7->Checked = k3;
N12->Checked = k4;
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::FormDestroy(TObject *Sender)
{
for (int i=0;i<50;i++)
for (int j=0;j<30;j++)
{
delete POS[i][j];
}
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::N10Click(TObject *Sender)
{
ShowMessage("版本1.06 C++Build版");
}
//---------------------------------------------------------------------------
bool TCleanBomb::Set(int p_width,int p_height,int bomb_num)
{
int num;
num = 0;
for (int i=0;i<p_width;i++)
for (int j=0;j<p_height;j++)
{
POS[i][j]->updata(i,j);
}
while(num<bomb_num)
{
if(Lay_Bomb(p_width,p_height))
num++;
}
calculate_around_bomb();
return true;
}
void __fastcall TCleanBomb::N11Click(TObject *Sender)
{
ShowMessage(" 老姜制作"+AnsiString('\n')+"Email:fjye@fjye.com");
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::N3Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::N2Click(TObject *Sender)
{
gameover = false;
init_interface(globa_width,globa_height,globa_bomb_num);
}
//---------------------------------------------------------------------------
BOMB::BOMB(int x,int y)
{
//TODO: Add your source code here
updata(x,y);
}
//---------------------------------------------------------------------------
void BOMB::updata(int x,int y)
{
//TODO: Add your source code here
around_bomb = 0;
be_flaged = false;
opened = false;
are_you_bomb = 0;
bombed = false;
x_position = x;
y_position = y;
state = "button";
}
//---------------------------------------------------------------------------
void BOMB::show()
{
//TODO: Add your source code here
CleanBomb->Draw(x_position,y_position,state);
}
void __fastcall TCleanBomb::Timer1Timer(TObject *Sender)
{
//計時
wastetime++;
bombnum_pic(globa_bomb_num-virtual_num);
}
//---------------------------------------------------------------------------
void __fastcall TCleanBomb::FormMouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
X = X/16;
Y = (Y-32)/16;
if(gameover) return;
if(!Timer1->Enabled)
{
Timer1->Enabled = true;
}
if ((Shift.Contains(ssLeft))&&(!Shift.Contains(ssRight))) //左鍵單擊
{
//ShowMessage(IntToStr(X)+","+IntToStr(Y));
Open(X,Y);
}
if ((!Shift.Contains(ssLeft))&&(Shift.Contains(ssRight))) //右鍵單擊
{
if(POS[X][Y]->state == "button")
{
Draw(X,Y,"flag");
POS[X][Y]->state = "flag";
POS[X][Y]->opened = true;
if(POS[X][Y]->are_you_bomb==1)
{
label_bomb++;
}
virtual_num++;
bombnum_pic(globa_bomb_num-virtual_num);
}
else
if(POS[X][Y]->state == "flag")
{
Draw(X,Y,"wenhao");
POS[X][Y]->state = "wenhao";
if(POS[X][Y]->are_you_bomb==1)
{
label_bomb--;
}
virtual_num--;
bombnum_pic(globa_bomb_num-virtual_num);
}
else
if(POS[X][Y]->state == "wenhao")
{
Draw(X,Y,"button");
POS[X][Y]->state = "button";
POS[X][Y]->opened = false;
}
}
if ((Shift.Contains(ssLeft))&&(Shift.Contains(ssRight))) //左右鍵齊擊
{
left_right_click(X,Y);
}
if(label_bomb==globa_bomb_num)
{
Timer1->Enabled = false;
ShowMessage("掃雷成功!");
//---寫注冊表
check_log();
return;
}
}
//---------------------------------------------------------------------------
bool TCleanBomb::Lay_Bomb(int i, int j)
{
//TODO: Add your source code here
Randomize();
int m,n;
//m=random(i);
//n=random(j);
m= random(GetTickCount()) % i;
n= random(GetTickCount()/2) % j;
if (POS[m][n]->are_you_bomb!=1)
{
POS[m][n]->are_you_bomb = 1;
POS[m][n]->around_bomb = -1;
return true;
}
else return false;
}
void TCleanBomb::calculate_around_bomb()
{
//TODO: Add your source code here
int m,n;
m = (Width/16)-1;
n = ((Height-32)/16)-3;
//四個角上的單獨處理
POS[0][0]->around_bomb = POS[0][1]->are_you_bomb+POS[1][0]->are_you_bomb+POS[1][1]->are_you_bomb;
POS[0][n]->around_bomb = POS[0][n-1]->are_you_bomb+POS[1][n]->are_you_bomb+POS[1][n-1]->are_you_bomb;
POS[m][0]->around_bomb = POS[m][1]->are_you_bomb+POS[m-1][0]->are_you_bomb+POS[m-1][1]->are_you_bomb;
POS[m][n]->around_bomb = POS[m][n-1]->are_you_bomb+POS[m-1][n]->are_you_bomb+POS[m-1][n-1]->are_you_bomb;
for(int i=1;i<n;i++) //最左邊縱向
{
POS[0][i]->around_bomb = POS[0][i-1]->are_you_bomb+POS[0][i+1]->are_you_bomb+POS[1][i]->are_you_bomb+POS[1][i-1]->are_you_bomb+POS[1][i+1]->are_you_bomb;
}
for(int i=1;i<m;i++) //最上面橫向
{
POS[i][0]->around_bomb = POS[i-1][0]->are_you_bomb+POS[i+1][0]->are_you_bomb+POS[i-1][1]->are_you_bomb+POS[i+1][1]->are_you_bomb+POS[i][1]->are_you_bomb;
}
for(int i=1;i<n;i++) //最右邊縱向
{
POS[m][i]->around_bomb = POS[m][i-1]->are_you_bomb+POS[m][i+1]->are_you_bomb+POS[m-1][i]->are_you_bomb+POS[m-1][i-1]->are_you_bomb+POS[m-1][i+1]->are_you_bomb;
}
for(int i=1;i<m;i++) //最下面橫向
{
POS[i][n]->around_bomb = POS[i-1][n]->are_you_bomb+POS[i+1][n]->are_you_bomb+POS[i][n-1]->are_you_bomb+POS[i-1][n-1]->are_you_bomb+POS[i+1][n-1]->are_you_bomb;
}
for(int i=1;i<m;i++)
for(int j=1;j<n;j++)
{
POS[i][j]->around_bomb = POS[i][j-1]->are_you_bomb+POS[i][j+1]->are_you_bomb+POS[i-1][j]->are_you_bomb+\
POS[i-1][j-1]->are_you_bomb+POS[i-1][j+1]->are_you_bomb+POS[i+1][j-1]->are_you_bomb+POS[i+1][j]->are_you_bomb+POS[i+1][j+1]->are_you_bomb;
}
}
bool TCleanBomb::Open(int x, int y)
{
//TODO: Add your source code here
int m,n;
m = (Width/16);
n = ((Height-32)/16)-2;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -