潜艇大战演示程序

// ChildView.cpp : implementation of the CChildView class // #include "stdafx.h" #include "ShipDemo.h" #include "ChildView.h" #include "Explosion.h" #include "MyObject.h" #include "Score.h" #include "MyShip.h" #include "Submarine.h" #include "Bomb.h" #include "Torpedo.h" #ifdef _DEBUG #define new DEBUG_NEW #undef THIS_FILE static char THIS_FILE[] = __FILE__; #endif #define SHIP_VERT_POS 20 #define SKY_COLOR RGB(0, 255, 255) #define SEA_COLOR RGB(0, 128, 255) #define MAX_BOMBNUM 10 //indicate m_Objects[] //Fox example: use 'm_Objects[MYSHIP]' to handle "my ship" #define MYSHIP 0 #define SUBMARINE 1 #define MY_BOMB 2 #define ENEMY_BOMB 3 #define EXPLOSION 4 #define SCORE 5 ///////////////////////////////////////////////////////////////////////////// // CChildView CChildView::CChildView() { // load image list; CExplosion::LoadImage(); CMyShip::LoadImage(); CSubmarine::LoadImage(); CBomb::LoadImage(); CTorpedo::LoadImage(); // create my ship object, this is the 1st object in object list m_Objects[MYSHIP].AddTail(new CMyShip(CPoint((GAME_WIDTH-SHIP_WIDTH)*1/3, SHIP_VERT_POS),0 )); m_Objects[MYSHIP].AddTail(new CMyShip(CPoint((GAME_WIDTH-SHIP_WIDTH)*2/3, SHIP_VERT_POS),1 )); m_bGamePause = false; } CChildView::~CChildView() { // free memory // delete all objects POSITION pos = m_Objects[MYSHIP].GetHeadPosition(); int i; for(i=0;i<6;i++) { while(pos!=NULL) { delete m_Objects[i].GetNext(pos); } m_Objects[i].RemoveAll(); } // clear image lists CExplosion::DeleteImage(); CMyShip::DeleteImage(); CSubmarine::DeleteImage(); CBomb::DeleteImage(); CTorpedo::DeleteImage(); } BEGIN_MESSAGE_MAP(CChildView,CWnd ) //{{AFX_MSG_MAP(CChildView) ON_WM_PAINT() ON_WM_CREATE() ON_WM_TIMER() ON_WM_DESTROY() ON_COMMAND(IDM_GAMEPAUSE, OnGamepause) ON_WM_KEYDOWN() ON_WM_KEYUP() //}}AFX_MSG_MAP END_MESSAGE_MAP() ///////////////////////////////////////////////////////////////////////////// // CChildView message handlers BOOL CChildView::PreCreateWindow(CREATESTRUCT& cs) { if (!CWnd::PreCreateWindow(cs)) return FALSE; // cs.dwExStyle |= WS_EX_CLIENTEDGE; // Wanghaitao remove this line cs.style &= ~WS_BORDER; cs.lpszClass = AfxRegisterWndClass(CS_HREDRAW|CS_VREDRAW|CS_DBLCLKS, ::LoadCursor(NULL, IDC_ARROW), HBRUSH(COLOR_WINDOW+1), NULL); return TRUE; } void CChildView::OnPaint() { // TODO: Add your message handler code here CPaintDC dc(this); // device context for painting // repaint window so easily dc.BitBlt(0, 0, GAME_WIDTH, GAME_HEIGHT, &m_VirtualDC, 0, 0, SRCCOPY); // Do not call CWnd::OnPaint() for painting messages } int CChildView::OnCreate(LPCREATESTRUCT lpCreateStruct) { if (CWnd ::OnCreate(lpCreateStruct) == -1) return -1; // TODO: Add your specialized creation code here // create virtual back buffer CClientDC dc(this); m_VirtualBitmap.CreateCompatibleBitmap(&dc, GAME_WIDTH, GAME_HEIGHT); m_VirtualDC.CreateCompatibleDC(&dc); m_VirtualDC.SelectObject(&m_VirtualBitmap); // create loop SetTimer(100, 30, NULL); srand( (unsigned)time( NULL ) ); return 0; } void CChildView::OnTimer(UINT nIDEvent) { // TODO: Add your message handler code here and/or call default static int nCreator = random(15) +15 ; CClientDC dc(this); int i,j,k; CRect l_Rect; CMyObject* pObject; if(m_bGamePause) return; // create new sub if(nCreator==0) { m_Objects[SUBMARINE].AddTail(new CSubmarine(random(2)%2?true:false, random(GAME_HEIGHT-SHIP_VERT_POS-SHIP_HEIGHT*2-30)+SHIP_VERT_POS+SHIP_HEIGHT+30, random(4), random(4)+3)); nCreator = random(15) + 15; } // Draw sky and see m_VirtualDC.FillSolidRect(0, 0, GAME_WIDTH, SHIP_VERT_POS+SHIP_HEIGHT-5, SKY_COLOR); m_VirtualDC.FillSolidRect(0, SHIP_VERT_POS+SHIP_HEIGHT-5, GAME_WIDTH, GAME_HEIGHT, SEA_COLOR); // Draw all objects on the virtual dc, Be careful using "POSITION" POSITION pos1, pos2, pos3, pos4; CSubmarine* pSub; CMyShip* pMyShip; if(m_Objects[MYSHIP].GetCount()!=0) pMyShip=(CMyShip*)m_Objects[MYSHIP].GetHead();//Get my ship for(j=0;j<6;j++) for(i=0,pos1=m_Objects[j].GetHeadPosition(); (pos2=pos1)!=NULL; i++) { pObject=(CMyObject*)m_Objects[j].GetNext(pos1); if(pObject->Draw(&m_VirtualDC, m_bGamePause)) // object terminated { m_Objects[j].RemoveAt(pos2); delete pObject; } //submarine throw torpedo else if(m_Objects[MYSHIP].GetCount()!=0 && j==SUBMARINE ) { //double "my ship" for(k=0;k<m_Objects[MYSHIP].GetCount();k++) { if(0 == k) pMyShip=(CMyShip*)m_Objects[MYSHIP].GetHead(); if(1 == k) pMyShip=(CMyShip*)m_Objects[MYSHIP].GetTail(); //if "my ship" is above if( pObject->GetPos().x+SUBMARINE_WIDTH/2 > pMyShip->GetPos().x && pObject->GetPos().x+SUBMARINE_WIDTH/2 < pMyShip->GetPos().x+SHIP_WIDTH ) { //reduce the torpedo number if( ((CSubmarine*)pObject)->GetFireFlag() && random(10)==2) { CTorpedo *pTorpedo=new CTorpedo( CPoint(pObject->GetPos().x+SUBMARINE_WIDTH/2-TORPEDO_WIDTH/2, pObject->GetPos().y) ); m_Objects[ENEMY_BOMB].AddTail(pTorpedo); ((CSubmarine*)pObject)->SetFireFlag(); } }//if }//for(i=0;i<2;i++) } }//for //Find collision between explosion and submarine //Notice that an explosion can trigger an explosion of the submarines nearby for(pos1=m_Objects[EXPLOSION].GetHeadPosition(); (pos2=pos1)!=NULL;) { pObject=(CMyObject*)m_Objects[EXPLOSION].GetNext(pos1); for(pos3=m_Objects[SUBMARINE].GetHeadPosition(); (pos4=pos3)!=NULL;) { pSub = (CSubmarine*)m_Objects[SUBMARINE].GetNext(pos3); l_Rect=pObject->GetRect(); //if there is collision between explosion and submarine if( (l_Rect.IntersectRect(pSub->GetRect(), l_Rect )) ) { // here we first create explosion object to make score always above that explosion CExplosion *pExplosion=new CExplosion(pSub->GetPos()); // when an explosion trigger another explosion, the score should multiple pExplosion->SetMulti( ((CExplosion*)pObject)->GetMulti()+1 ); m_Objects[EXPLOSION].AddTail(pExplosion); m_Objects[SCORE].AddTail(new CScore(pSub->GetPos(), pExplosion->GetMulti(), pSub->GetType()+1, RGB(random(255), random(255), random(255)))); m_Objects[SUBMARINE].RemoveAt(pos4); delete pSub; break; }//if }//for }//for //Find bombs which shoot on submarine for(pos1=m_Objects[MY_BOMB].GetHeadPosition(); (pos2=pos1)!=NULL;) { pObject=(CMyObject*)m_Objects[MY_BOMB].GetNext(pos1); for(pos3=m_Objects[SUBMARINE].GetHeadPosition(); (pos4=pos3)!=NULL;) { pSub = (CSubmarine*)m_Objects[SUBMARINE].GetNext(pos3); // save for deletion l_Rect=((CBomb*)pObject)->GetRect(); //if there is collision between this bomb and submarine if( (l_Rect.IntersectRect(pSub->GetRect(), l_Rect )) ) { // here we first create explosion object to make score always above that explosion m_Objects[EXPLOSION].AddTail(new CExplosion(pSub->GetPos())); m_Objects[SCORE].AddTail(new CScore(pSub->GetPos(),1,pSub->GetType()+1, RGB(random(255), random(255), random(255)))); m_Objects[SUBMARINE].RemoveAt(pos4); delete pSub; m_Objects[MY_BOMB].RemoveAt(pos2); delete pObject; // break is important! to avoid next recycle use a bomb not exist break; }//if }//for }//for //Find enemy bombs which shoot on "my ship" if(m_Objects[MYSHIP].GetCount()!=0) for(pos1=m_Objects[ENEMY_BOMB].GetHeadPosition(); (pos2=pos1)!=NULL;) { pObject=(CMyObject*)m_Objects[MY_BOMB].GetNext(pos1); for(pos3=m_Objects[MYSHIP].GetHeadPosition(); (pos4=pos3)!=NULL;) { pMyShip =