18/18C＋＋課程實訓系別：軟件學院班級：軟工一班姓名:趙波//貪吃蛇Dlg。cpｐ：imｐlemｅntationfiｌe//＃inclｕde"ｓtｄａfx.h＂#ｉｎclude”貪吃蛇.ｈ＂＃incluｄｅ＂貪吃蛇Dlｇ。h＂＃iｆdef_DEBUG#deｆｉnenewDＥBUG_NEＷ#ｕndeｆＴHＩS_ＦILEsｔａt(yī)icｃｈarＴＨIS_ＦＩLE［]=_＿FＩLE__；#endiｆ／／定義全局變量的結構體ｓtrｕctsｎａkeabouｔ//其他相關參數(shù)｛ ｉnｔx，y；／/食物坐標 bｏoliｓabt;//食物是否顯示,１為不顯示食物，0為顯示食物?ｉnｔspｅnｄ；/／等級記錄1為初級,2為中級，3為高級?intlen；//蛇的長度初始為3節(jié)，最長為49節(jié) intsｔatus；//游戲狀態(tài)1為未開始，2為運行,３為暫停 ｉntｍode；／/游戲類型記錄1為空地，２為方盒，3為格子?intcｌｏr;/／顏色選擇1為灰色，2為白色，3為橙色 intdirｅction；/／方向1為上，2為下,3為左，4為右｝ａbt；ｓtｒｕctsnakｅs／/蛇身體相關｛ inｔx，y;/／每節(jié)蛇的坐標｝Snake[51］;//最多５1節(jié)／///////／／//／/////／／//／／／////／////／/／//////／／///////／///／///／/////／//／///／/／/／/ＣAboｕtDlgdialogusedfoｒAｐpＡbｏutclａｓsCAboutDｌg:pubｌｉcCDiａloｇ{pｕblic: CAboutDlｇ()；//DｉalogDaｔａ //｛｛AFX_DAＴＡ（CAboｕtDlｇ)?enuｍ｛IＤD=IDD_AＢOUTBOX｝；?//｝｝AFＸ_ＤAＴA ／/ＣlassWiｚarｄgeｎeraｔedvirtｕalｆuｎctionovｅrrｉdes?//｛{AＦX＿VIRTUAL（ＣAboutDlg)?proｔeｃtｅd: virtｕalvoｉｄDoDataExcｈａnｇe(CDataExｃｈanｇｅ＊pＤX）;/／DDX／DDVsｕppｏｒt?//｝}AFX＿VIＲTUＡＬ/／Imｐlｅmentatｉoｎpｒoteｃtｅｄ：?//｛｛AFX＿ＭSG（CＡｂoｕtDlg） ／／｝}AFX_ＭSG?DECＬARE_MESＳＡＧＥ_MAＰ()}；CAboutＤｌg：：CＡboutDlg(）：CDialｏｇ（CＡbouｔDlg::ＩDD)｛?／/{{AFX_DATＡ_INIT(CAｂoｕtDlｇ）?/／｝｝AFＸ_DＡTＡ_INＩT}ｖoidＣAbｏｕｔDlg::ＤoDatａExcｈanｇe(CDataEｘchangｅ＊pDX）｛ ＣDiaｌog：:DoＤａｔaExｃhange（ｐDＸ)； /／{{ＡFＸ_DATＡ＿ＭAＰ(CＡbouｔDlg) //｝}ＡFＸ＿DATA_MAＰ｝BEＧＩN＿MESSAGE_MAＰ（ＣAｂｏuｔDlｇ，CDｉalog） ／/｛｛AFX＿ＭＳG＿ＭAP(CAboutDlg） ?/／Nｏmessａgehａndlers //}}ＡＦX_MSG_MAPEＮD＿MESSAＧE_MAP(）/／/／////／/／////／／///／//////////／/／/////／///／/////／///／／//////////////////／／////CＭyＤlｇdialogCＭyDlg：：CMｙDlg(CWnd＊pPaｒent/＊=ＮULＬ＊/) ：CDiａｌog(CMyDlｇ：：IＤＤ，pParｅｎt)｛ ／/{｛AＦＸ_DＡＴA_INＩT(CMyＤlg）? //NOＴE：theClassWizaｒdwillaｄdmeｍbｅrinitiａlizaｔｉonｈerｅ //｝｝ＡFX＿ＤATＡ_INＩT //NoｔetｈａｔLoadIｃondoeｓｎoｔreｑuireasubsｅqueｎｔDeｓｔrｏyＩｃｏniｎWｉｎ３2?ｍ＿hIcoｎ=AｆxGetＡpp（）—>ＬｏａdIcon(IDＲ_MAIＮFRAMＥ）；｝ｖｏidＣＭｙDlg::DoDatａExchａｎge（CDａt(yī)ａＥxchaｎge＊ｐDX）｛?CDiａlｏg：:DoDataExcｈange（ｐＤＸ)； ／／{{AFX_DATA_MAP(ＣMyＤlg) /／ＮOＴＥ：theClassＷiｚardwillaｄdDDXaｎdDDVcallｓhｅre /／｝｝AFＸ_DAＴA_ＭＡP｝BEGIＮ_MESSＡGE_ＭＡP(CMyDlg,CDiａlｏg） /／｛{ＡＦX＿MSＧ_MAP（CＭｙＤlg)?ON_WM_SＹSCOＭMANＤ（) ＯN_WM_ＰAIＮT（）?ON_ＷＭ_QＵERYDRAGIＣON（）?ON_WＭ＿TIMER() ON_COMMAND（IDＭ_ＳTARY，ＯnSｔarｙ）?ＯN_COMＭAND（IＤM＿PＡUSE,OｎPaｕse) ON_COMMAND(IＤM_COＮＴＩＮUE，ＯnContｉnue)?OＮ_COMMAＮＤ（IDM_S1，OｎＳ1) ＯN_COＭMＡNＤ(IＤM＿S2，OｎS2）?ON_COMＭAND（IDM_S3，OｎＳ3) OＮ_ＣＯＭMＡＮD(IＤＭ_ＭAX,ＯnMax）?ON＿COＭＭAND（ＩＤM_EXＩT，OnＥxit） ＯN_CＯMMAND(ＩDM_AREA，OｎAreａ)?OＮ_COMＭAND(IDM_ＢOＸ,OnBox) ON_COＭMAND（IＤM_RＯOＭ，OnＲoom） ON_COMMANＤ（ＩＤM_WHITE，ＯnWhite) ON_COMMAＮD（ＩDM＿ＧRＥY，OnGrey) ON_ＣOMMAND(IＤM_OＲAＮGE，OnOｒａｎge)?OＮ_ＣＯMMAＮD(IDＭ＿HＥLＰ，OｎHｅlp）?ON_ＣＯＭMＡND（IDM_ＡBOUT，OnAbout)?//}}AFX_MSG_MAＰEND_ＭＥSSAGＥ_MAＰ(）／／／/／///／／///／//／////／／//////／/////／／///／////／/／///／/／//／/／／／//////／／////////／/CMｙDlgmessaｇehandｌｅrｓBOOLCMｙＤlg：:OnInitDialｏg（）{?CDialｏｇ：:OnＩnitDiａｌｏg();?//Add＂Abｏut。。。"menuiteｍtosystemｍｅnu。?//IＤM_ABOUＴBOＸmustbeinthｅsyｓｔemcｏmmaｎdraｎｇｅ． AＳSＥRT(（IDM＿ABOUTBＯX&０xFFF0）==IDM_ABＯUTＢOX)；?ＡSSERＴ（ＩDM_ABOUＴBOX<0xＦ0０0）；?CMenu＊pSysMenｕ=GeｔＳyｓtemMenu(ＦALSＥ);?if(pSysMenｕ！=NUＬＬ)?｛ CＳｔrinｇstrＡbｏutMｅnu; ?ｓtrAｂouｔＭenu。ＬoadStriｎg（IDS＿ABＯUＴBＯX）;? if(!ｓtｒＡboutMeｎu。ＩsＥmｐｔｙ（））??｛ ?ｐSysMenu—＞ApｐendMenu(MF_SEPARATOR）；? ?pSyｓＭenｕ-〉AｐpｅndMｅnu(ＭF_STRING,ＩDM_ＡＢＯＵTBOX，strＡboutMenu)；? } ｝?//Setｔｈｅiconfortｈisdｉalog。Tｈefｒameｗｏrｋdoeｓthｉｓautomａt(yī)icaｌlｙ?//ｗhｅntheapｐｌiｃａt(yī)ion＇sｍainwinｄowisnoｔaｄｉａｌog SｅtIcon(m＿hIcｏn,TRUE); /／Ｓｅtbiｇｉcｏn SeｔＩｃｏn（m_hIcon，F(xiàn)ALSE）； //Ｓｅtsmallicｏｎ? //初始默認值?CMenｕ*p=GetMenu(）；? //獲得菜單窗口 CMenｕ*pm=p—>ＧetSubＭｅnｕ（０）；//獲得第一級菜單下拉ＩD pm->EnableMenｕItem（IDM_S１，ＭF_GＲAYED）；//設置暫停按鈕不可用 ＣMｅnｕ*ｐn=p-〉ＧetSuｂMeｎu(1）；//獲得第一級菜單下拉ID pn－>EnabｌeMenuIteｍ（IDM_ARＥA,MF_GRAYＥD）；/／設置空地按鈕不可用 CＭenu*pｓ＝p—〉GｅtSubMenu（2）；//獲得第二級菜單下拉ID ps－〉EnａbleＭenｕItem(IDM＿WＨITE，MF_GRAYED)；//設置白色按鈕不可用?aｂt．sｐeｎd=1；//等級為初級 aｂt.mode=1;／/類型為空地 abt。ｃｌor＝1；/／顏色為灰色?abｔ.diｒeｃｔｉon=3；／/設置游戲開始時,蛇向左移動?//TOＤO:Ａddextrainitialｉzatioｎhere ｒeｔurnTRUE；／/reｔurｎTＲUEunlessyousetthefoｃｕstoaｃontrｏｌ}ｖｏidCMyＤｌg::ＯnSｙｓCoｍmａnｄ（UＩＮＴnID,LPARＡMlPａｒａm){?if((ｎID＆０xFＦＦ0）==IＤＭ_ABOUTＢOX）?｛??CAbｏutＤlgdlgAbouｔ； ?ｄｌｇAbouｔ．DoＭｏdal(）；?}?eｌsｅ?｛ CDialog：：ＯnSysCommand(nIＤ，ｌPａｒam)； ｝}//Iｆｙouａdｄａｍｉnimizebｕttonｔoyoｕrdｉalｏｇ,yoｕwiｌｌneeｄtｈｅｃoｄebelｏｗ／／todraｗtheiｃon．FｏrMＦCａｐplｉcaｔionsｕsiｎgthedocument／viｅwmodeｌ，//tｈisisauｔoｍaｔｉcallｙdonｅforyoｕbythｅfｒamework．voidCMyDlg::OｎPaｉnt（)｛?if（IsIconic（)）?｛ ?CPaiｎｔDCdc（thｉs）；／/dｅｖicｅcontｅｘtｆｏrpaintｉｎｇ? SendMｅssage（WM_ICONERASEBKGND，（WＰARAM）dc。GetSafeHdｃ（）,0)；??//Cｅnｔeｒｉcｏｎincliｅnｔrectanglｅ ?ｉｎtcｘＩｃｏn=ＧeｔSysｔemＭeｔricｓ(SM＿CXICON);??intcyIcon=ＧetＳyｓｔeｍMｅｔrｉcs（SM＿CYＩＣＯＮ）；??CＲectrect； ＧetClｉenｔRect(&rect）; inｔx=(reｃｔ.Wiｄtｈ（)－ｃxＩcon+1）/２； ｉnty=（rｅct.Ｈeight()-cｙIｃon+1)/2； //Drａwtheicon dｃ。DrawIcon（x，y，m_hIcon）； ｝?ｅlse ｛ CMeｎu*p=GeｔMeｎu()； ?//獲得菜單? CMenｕ*ｐm=p->GetSuｂＭenu(0)；/／獲得第一級菜單下拉ID? pm—>EnableMeｎuItｅm（IDＭ_PAＵSＥ,MF_GRＡYED）；/／設置暫停按鈕不可用??pm－>EnａbｌeMenｕItem（ＩDM＿CONTＩNＵＥ，ＭF＿GRAYEＤ);／／設置繼續(xù)按鈕不可用? ｐm－〉ModifyMｅnu（0,MＦ_BＹＰOSITIOＮ,IDM_STARＹ，”開始游戲＂）；/／修改菜單《重新開始》文字，變成《開始游戲》文字? GetＤｌｇItem(IDC_STATIC）—〉SｅtWinｄowＴext("貪吃蛇”);／/回復靜態(tài)文本文字顯示 ???Ｓｎake[0］.x=７；//初始蛇頭ｘ坐標? Snakｅ［0］。ｙ=７;／／初始蛇頭y坐標 ?Snake［1］。x=8;/／初始蛇身x坐標??Ｓｎake[１].y=7；//初始蛇身ｙ坐標 Ｓnake[2］。ｘ=9；／/初始蛇尾x坐標 ?Sｎake［２］.y=７；／/初始蛇尾y坐標 ?aｂｔ.sｔatus=1;／/初始化游戲狀態(tài)(為未開始狀態(tài))??abｔ.ｌｅn＝3;／/初始化蛇的長度 abt。ｉsabt=1;／/初始化為無食物? iｆ（aｂt。cloｒ==1）OnWhite（);//背景為白色 elseif（ａｂｔ。cｌor==2）OnＧrey()；／/背景為灰色? elｓeOnOrangｅ（）；//背景為橙色 if（abt．modｅ==１）OnArea（);//空地類型 ｅlseif（abt.modｅ==２）OｎBｏx（)；//方盒模式? elsｅOnＲooｍ（)；//格子模式 ＣＤｉaｌog::OnＰaint();?｝}/／Thesystｅmｃaｌlsthisｔｏobtａｉｎtｈecuｒｓortodisｐlaywhilｅｔhｅｕｓｅrdragｓ//theminimｉzeｄwindow．HＣURＳORCＭyＤlg::OｎQueryＤragIcon(）｛ ｒetｕrn（HCURＳOR)m_hIｃon；｝ｖｏｉｄCMｙDlg：：ＯnTiｍｅr(ＵINTｎIDＥveｎt）//時間軸{ if(ａｂt.sｐend=＝1）SｅtTimer(1，２80，NULＬ）;//選擇初級時的速度設置 if(abt。spｅnd==2）SetTｉmer（1,1８0，NUＬL)；/／選擇中級時的速度設置?iｆ(ａｂｔ.ｓpenｄ==3)SetＴimer(１，９0，NULL）;//選擇高級時的速度設置 OnＡｗay（);//調用移動行走函數(shù) OnFoｏd(）；/／食物判斷函數(shù) OnＤelet(）；／/判斷結束函數(shù) ?///／///////／///////////／／／///////／/／/／/／//／/////設置模式顯示?CStringxs； CＳｔrｉngms,ｊb，gｋ,clo; if(abｔ.spend=＝1)ｊb＝”初級"; elsｅiｆ（abｔ.ｓｐｅｎd＝＝2)jb=”中級"； elsejb="高級”; if（abt.modｅ=＝１)gk="自由模式：空地＂;?ｅlｓeif（abｔ．mode==２）gk=”自由模式：方盒”; eｌseif(abt。modｅ＝=３)gｋ=”自由模式:格子"; eｌｓeｇk="＜戰(zhàn)役模式＞＂;?ｉf(ａｂｔ．clｏr==1）cｌo=＂白色＂； elｓeif(abt.clor==2）clo=”灰色"; elｓeclo=”橙色＂; xs。Foｒmaｔ(＂游戲狀態(tài)：％s%s%s%s＂,ms,jb,gk，clo）;?GetDlgＩtem（IDC_ＳTATIC)-〉SeｔWindｏwText（xs）;//為防止蛇經過時把靜態(tài)文本線覆蓋所增加的設置靜態(tài)文本框文字刷新,已達到刷新靜態(tài)文本 /／////／////////／//／///////／//／／///／//////////／／/設置模式顯示 ?CDialog：：ＯnTimer（nＩDＥvent);}BOOLCMｙＤｌｇ：：PreTrａnｓｌateMｅｓsaｇｅ(MSG＊pMsg）//鍵盤控制{ if（pMsg-〉mｅssage＝=WＭ＿KEＹDOWN）／/獲取鍵盤 ?sｗｉtｃh（pＭsg－〉wPaｒａm)//鍵盤按鍵 ｛ ??caｓeＶK_UP:ｉf（abt.dirｅction！=2)abt.direcｔion＝１；ｂｒeaｋ;//按上? caseVK＿ＤOWN:if（abt。dｉrｅcｔiｏn!=１)abｔ。dｉrectiｏn=2;ｂrｅak;//按下 ?caseVK_ＬEFT：if（aｂｔ。ｄirｅction！=4)abｔ。ｄiｒectioｎ=3；brｅａｋ；//按左? ?ｃａseＶK_RIGHT：if(abt.direction！=3)aｂt。dｉrectｉon＝4;ｂreak；//按右?? ｃａｓeVK＿SＰACE：if（abt.ｓtaｔus＝=1）OnStａｒy（);eｌseｉf（abｔ.sｔatｕｓ==2)OnPaｕｓe（);eｌｓｅOnContinue();breaｋ；//按空格 ? cａseＶＫ_NUMＰＡD１：if（aｂt．spenｄ！=1)OnＳ1(）;break；／/按小鍵盤數(shù)字1,可以設置為初級 ??caseＶＫ_NＵMPＡＤ2：ｉf(ａbt.ｓｐeｎd！=2）OnS２（）；break;／/按小鍵盤數(shù)字2，可以設置為中級 ??ｃａseVK_NＵMPAD３：if(abｔ。spend！=3）OnＳ3(）；break；／／按小鍵盤數(shù)字3，可以設置為高級???cａseＶK_NUＭPAＤ４：ｉｆ（abt.ｓpeｎd！=3）OnArea(）;ｂreak;／/按小鍵盤數(shù)字４，可以設置為空地???ｃaseＶK_NUMPAＤ5：if(abt．spend！=3）OnBoｘ（);breaｋ；/／按小鍵盤數(shù)字5，可以設置為方盒?? ｃaseＶＫ_ＮUＭPAD6：if（aｂt。speｎd！=3）OnＲｏom（)；ｂrｅａk;//按小鍵盤數(shù)字6，可以設置為格子?? ｃaseVK_NUMPAＤ7：ｉf（abt。clor!=1)ＯｎWｈiｔｅ()；bｒｅａk；//按小鍵盤數(shù)字7，可以設置為白色???casｅVK_ＮUMＰAD8：if(ａｂt。clor!=2）ＯnGｒeｙ()；bｒeak；//按小鍵盤數(shù)字8,可以設置為灰色? ?caseVK＿NUMPAD９：if(abt.cｌor!=3）OｎOranｇe（);break;/／按小鍵盤數(shù)字9，可以設置為橙色 ｝?returnCDialog：：PreＴrａnｓlａt(yī)eMessａge(pMsｇ）;}vｏiｄCMｙDlg::OnStａry（)／/開始按鈕{ CMenu＊ｐ=GeｔMenu（）；/／獲取菜單ＩD?CMenｕ*pm=p->GetＳubMｅnu（0);//獲取菜單第一級IＤ iｆ（aｂt。staｔus==1）／/判斷是否是為未開始狀態(tài) ｛? SetTimeｒ（1，２00，NＵLL)；//設置游戲等待0.2秒開始 GｅtDlｇIｔem（ＩDＣ_STATIＣ）—>SetWiｎdowText（"0.２秒后游戲開始”)；//修改提示? GeｔMenu（）—>GetSubＭｅnu(0）-〉ＭodifyＭenｕ（０，ＭF_ＢYPＯSＩTION，IＤM＿STAＲＹ，＂重新開始＂）；//修改菜單《開始游戲》文字,變成《重新開始》文字 ?pm－＞ＥｎableMｅnuItｅｍ（ＩDM_PAUSＥ，MＦ_ENABＬEＤ)；//由于游戲開始，則讓暫停鍵可用? abt．ｓtａｔｕｓ=2；//設置游戲狀態(tài)為開始后未暫停狀態(tài)?}?elsｅ?{? KilｌTｉmｅr（１）；//停止程序時間跳動 ｐm－＞EnableＭeｎuIｔeｍ(IDM_PAＵSE，ＭＦ＿GRＡYＥD）；//由于重新開始,則設置暫停鍵不可用??pm-＞EｎableMenuIｔem(IDM＿COＮＴINUE，ＭＦ_GRAYED）;/／由于重新開始,則設置繼續(xù)鍵不可使用 ?OnPａinｔ（)；／/游戲重新進入 ｝｝voidCＭyDlg:：OnＰａusｅ（)//暫停按鈕｛ ＣＭenｕ＊p=ＧｅtMenu（）；／/獲取菜單ＩD CMｅnu*ｐm=p－〉ＧetＳubMenｕ(0)；/／獲取菜單第一級ＩＤ?iｆ(ａbｔ．ｓtatus==２）//判斷是否是為開始狀態(tài)?{ ＫiｌlＴimeｒ（1)；/／停止程序時間跳動 GetDｌgItem（ＩDＣ_ＳTAＴIC）-〉ＳeｔWｉndowTｅｘt（”暫停游戲＂);／/修改提示 ｐm—〉ＥnabｌeＭeｎｕItｅm(IDＭ＿ＰAUSE,ＭF_ＧRAYＥD);//由于使用完暫停，則設置暫停鍵不可用 ｐm—>ＥnableMenuItem（ＩDM_COＮTINUE，MF_ＥNABLED）；／/由于使用暫停,則設置繼續(xù)鍵可使用??abt。ｓtａt(yī)us＝3;//設置當前狀態(tài)為開始后暫停未繼續(xù)狀態(tài)?｝ ｝voiｄＣMyＤlg：:OｎContinue（)//繼續(xù)按鈕｛?CMeｎu＊ｐ=GｅtＭenu（);//獲取菜單ID CMenu＊pｍ＝p－〉GetSubMenu（0)；／/獲取菜單第一級ID iｆ（abｔ．sｔatｕs=＝３)/／判斷是否是為暫停狀態(tài) ｛ ?ＳetTimer（１，200,NUＬＬ）;//開始程序時間跳動??GetDlgＩｔem（IDC_ＳTATIC)—>SｅtWindowTeｘｔ（"0。2秒后游戲繼續(xù)”)；//修改提示??pm－>ＥｎaｂleMｅｎｕIｔeｍ(IDM_COＮTINUE,MF_GRAYED）;//由于使用完繼續(xù)，則設置繼續(xù)鍵不可用 ?pm—〉ＥnableMeｎuＩtｅｍ（IDM_PAUSE，MF_ENABLED);//由于使用完繼續(xù)，則設置暫停鍵可用??ａbt．ｓｔatus=2；//設置游戲狀態(tài)為開始未暫停狀態(tài)?}?｝ｖoidCMｙDlｇ：：OnS1（）／/初級{?ＣMｅnｕ*p=ＧetＭenu(); //獲得菜單窗口 CMenu*ｐｍ=p-〉ＧｅtSubMenu（0)；／／獲得第一級菜單下拉ID ｐm—>EｎableMｅnuItｅm(IDM_Ｓ1，MF＿GRAYED)；//設置初級按鈕不可用 pｍ—>EnaｂleMenuItem(IＤM_Ｓ２,ＭF_ＥＮABLED）;//設置中級按鈕可用 pm->EnableMenuItem（IＤM_S3，MF_ENAＢLED）；/／設置高級按鈕可用?ＫiｌｌTｉmer(1）；／/暫停游戲 abｔ.spend=1；//改為初級值?OｎPaｉnt(）；//回到初始狀態(tài)｝voｉｄCＭyDlｇ:：OnS2()／/中級{ CMｅｎu*ｐ=GｅｔMeｎu（）； ?//獲得菜單窗口 CMenu＊pm=p->GetSubMenu（0）；//獲得第一級菜單下拉ID ｐm->EnablｅMenuItem（IDM_S1，MF_ENAＢLEＤ);//設置初級按鈕可用 pm->EnableMenuIｔem（IDM_S2,MF_GＲAYED);//設置中級按鈕不可用?ｐm->EｎableMenuIｔem（IDＭ＿S3,MF_ENABLED);//設置高級按鈕可用?KiｌlTimer(1）;//暫停游戲 abt.ｓpeｎｄ=2；／/改為中級?OnPainｔ();//回到初始狀態(tài)}voidCMyＤlｇ：:OnS3()//高級｛ CＭenu*p=GetＭｅnu(）；??/／獲得菜單窗口 CＭｅnｕ*pm=p->GｅtＳubMenu（0）;//獲得第一級菜單下拉ID?ｐｍ－〉EnableMenuＩtem（IDＭ_S1，MF_ENABＬED）；//設置初級按鈕可用 pｍ－〉EnableMenuItｅm（IＤM_S２,MＦ_ENＡＢLED）;//設置中級按鈕可用?pｍ－＞EnabｌeMenuＩｔem（IDM_S3,MF_GRAYＥＤ）;//設置高級按鈕不可用 KｉllＴimer（１）;//暫停游戲? aｂt。spend=3;//改為高級 OnPainｔ();//回到初始狀態(tài)}ｖoidCMyDｌg::OnMａx（）//最大值｛?KｉｌlTimer(1）；//暫停游戲 GetDlｇIｔem(IDC_STAＴIC）—＞SetWindoｗTｅｘｔ（＂暫停游戲"）；/／修改提示?FＩLE＊fｐ；//由于使用C++文件找不到直接讀取整數(shù)的方法，所以改為用C語言操作文件 ｉf(!（fｐ=fopeｎ("max"，"rｂ”）））／/若沒有文件記錄高分則設置彈出都為空 ｛? MｅｓsaｇeBox(”初級：0\n中級：0＼n高級:0"）;?｝?ｅlse ｛??CSｔriｎｇmax；//定義提示框提示所用的字符串? inｔm1,m２，m3；／/接受文件提供的三個級別最高分數(shù) fscaｎf（fp，＂%ｄ,％d,％d"，&m1,&m2，＆m3)；//獲取文件三個整數(shù) mａx。Fｏｒmaｔ（＂初級：%d\n中級：％d＼n高級：％d\n”,m１，m2，m3）；//設置彈出框內容 ?MessageBｏｘ（max,”英雄榜”）；／/彈出框提示三個級別不同的最高分??fclｏse(ｆp)；//關閉文件 } }ｖoｉdＣMyＤlg：:OnExit（)/／結束｛exit（1）；?｝voiｄCMｙDｌｇ：：OnArea（）／/空地｛ CMenu＊p=ＧｅtMeｎu（)；? //獲得菜單窗口 CＭeｎu＊pm=ｐ－>ＧetＳubMenu(1）;//獲得第一級菜單下拉ＩD?ｐm－＞ＥnableMeｎuIｔem（IDＭ_ARＥＡ，MF＿GＲＡYED);//設置暫停按鈕不可用 pm—＞EnabｌeMenuIｔeｍ(IDM_ＢOX,MF_EＮABLED);／/設置暫停按鈕可用 pm－>EnablｅMｅnuIteｍ（IDM_ＲＯＯＭ，MF_ENABLEＤ)；/／設置暫停按鈕可用 aｂt．ｍｏdｅ＝1;/／修改類型 rｅfｕrbｉｃh（)；//刷新}voiｄＣMｙDlg：：ＯnBox(){ CMeｎu＊p=ＧetMenu（);??//獲得菜單窗口?CMeｎu＊pｍ=p—＞GetSubMenu(1）;//獲得第一級菜單下拉IＤ?pm—>EnableMenuItem（ＩＤM_ARＥA,MF_ＥＮAＢLＥD）；//設置暫停按鈕可用?pｍ－＞ＥnａbleMenuItem（ＩDM_BOX,ＭF＿GRAYＥＤ）；//設置暫停按鈕不可用?ｐm-〉ＥnaｂleMｅnｕItem（IDＭ_ROOM,ＭF_ENABLED);//設置暫停按鈕可用 ａbt．mode=2;//修改類型?refuｒbich()；//刷新?CDC＊pDC＝ＧeｔDC（)；//獲取窗口對象 CBｒushmoｄe1＝（RGB（0,０,0））; //設置方盒的顏色?ＣBrush*ｍode11=pＤC—＞ＳelectObjecｔ（&modｅ1);//替換當前樣式 for（intｍd１=1;ｍd1〈=18;md1+＋)/／繪制方盒 ｛??ｐＤC－〉Rｅcｔａngle(mｄ1＊2０，1＊20,(md１+1)＊2０，2＊20）； pDC->Ｒｅｃtａnｇle（md１*２０,13*20,(md１＋1)*20，14*20）；?｝ for（intmd１1=１;md11<=13；md11+＋）?｛? pDC-＞Rectaｎｇle(0＊20，md11＊20,1＊20，（ｍd１１+1）*20）;? pＤC—＞Reｃｔaｎｇlｅ(1８＊20,mｄ１1*2０,1９＊20,(ｍd11+1）*２0)；?}?pＤC－〉SelectObject（mode1)；｝voidCMyＤｌg：:OｎRｏoｍ（){?CＭｅnｕ＊p=GeｔMenu（）; ?//獲得菜單窗口?CMｅｎｕ＊ｐm＝p－＞GetSubMenu(1);/／獲得第一級菜單下拉ＩＤ ｐm—＞EnabｌｅMｅnｕItem（IＤM_AREA，MF＿ＥNABLEＤ）；/／設置暫停按鈕可用 pm—〉ＥnablｅＭenuＩｔem(IDM＿BＯX，MF_ＥNABＬED);/／設置暫停按鈕可用?pm-〉EｎableMenuItem（ＩＤM_ＲOOM,MF＿GＲAYＥD）;/／設置暫停按鈕不可用 abt.mode=３；//修改類型?ｒｅfuｒｂich（)；//刷新?CＤC*pDC＝ＧeｔDＣ(）;//獲取窗口對象 CＢrusｈmodｅ1=（RGB(0，０,0));?／/設置顏色（黑）?CBruｓh＊mode11=pDC－>SｅlectObｊｅｃt（&ｍｏde1）；?for(ｉntmｄ1=０；md1<=1８;md1+＋）//繪制格子 { ?if（ｍd1＜7）pDC—〉Recｔanｇlｅ(ｍｄ1*20，１2＊20，（md１+１）*20，1３＊2０);? iｆ(ｍd1>10）pDＣ－>Rectａｎｇｌe（ｍd1*20，2*20,（ｍｄ1+1）＊２0,３＊２０）； }?foｒ(intmd１1=1;md１１〈=1４;ｍd11++） {? if（md１1<7)pDＣ—＞Rectanｇle（6＊2０，md１１＊2０,7＊20,（md11＋1）＊20）；??if(md１1〉７）pDC－〉Rectangle(１1＊２0，ｍd11*2０，12＊２0,(mｄ11+１)*２0）; }?pDC-＞ＳelectObｊｅｃt(mｏｄｅ1）；｝voidＣMyＤlg：:OnWhite(){?CMｅnu*p=ＧeｔMｅnu(）;? //獲得菜單窗口?CMenｕ*pm=p－＞GetＳuｂＭｅnu（2）；／/獲得第一級菜單下拉ID ｐm－>EnaｂleMｅnｕIｔem（IDM_WHITE,MＦ_ＧRAYED）；//設置白色按鈕不可用 pｍ-＞EnablｅMｅnuＩtem（ＩDＭ_GREY,MＦ_EＮＡBLＥＤ）；//設置灰色按鈕可用 pm—〉ＥnaｂleMenｕItｅm(IDM＿ＯRANGＥ，MF＿ＥＮABLＥＤ);/／設置橙色按鈕可用?ａbt．clor＝1;／／修改顏色值 rｅｆurbiｃh（)；//刷新}voｉdCMyＤlg：：ＯnGrey（）｛ ＣMenｕ＊ｐ＝ＧｅtMenu（）； ?//獲得菜單窗口 CMenu*pｍ=ｐ－＞ＧetSubMｅnu(2）；//獲得第一級菜單下拉ＩD?pｍ->EnａｂlｅMeｎuItem（IDＭ＿WＨＩＴE，MＦ_ENＡBLEＤ）；/／設置暫停按鈕可用 pm—＞EnａbｌeＭenuIｔem（ＩＤM＿GＲEY，MF_GRＡYED）;//設置暫停按鈕不可用 pｍ-〉EnablｅMenuIｔem(IDM_ＯＲAＮGＥ，ＭF_ＥNＡBＬED）；//設置暫停按鈕可用 ａｂｔ。clｏｒ＝2;//修改顏色值 ｒｅfurbich(）；//刷新?OｎSnaｋe（)；//繪制蛇｝voidＣＭyDlg：：OnＯrangｅ（）/／橙色｛ CMeｎu*p=GｅｔMｅnu（)； ?//獲得菜單窗口 CMｅｎu*pm=ｐ－>GｅｔSubMenu（2）;／／獲得第一級菜單下拉ID?pm－＞EnａblｅMenuＩteｍ(IDＭ＿ＷHITＥ,ＭＦ_ENＡBLEＤ);//設置暫停按鈕可用?ｐm-＞EnabｌｅMｅｎｕIteｍ(IＤＭ_GＲＥY,ＭF_ENＡBLED)；//設置暫停按鈕可用?pm－〉EnableＭenｕＩtｅm(IDＭ_OＲANGE,MF＿ＧRAYＥD)；//設置暫停按鈕不可用 abt．clor=3；/／修改顏色值 rｅfurbich（);／／刷新 OｎSnakｅ();//繪制蛇｝ｖoiｄCMyDlｇ：：OｎHｅlｐ(）//幫助｛?MesｓageＢox(”按上，下,左，右控制蛇前進方向＼n按空格控制蛇開始，暫停與繼續(xù)\ｎ吃掉食物，同時避開障礙物。”，"貪食蛇操作說明”);｝voiｄCMyＤlg：：OnAｂout(）//關于｛?MessageＢox（”嘿嘿"，"關于貪吃蛇＂）;?｝voidＣMyDｌg：:ＯnFood（){ CDＣ＊pDC＝ＧetDC（)；/／獲取對話框 ? if（Snake［0］．ｘ*20==aｂt．x*2０&&Ｓｎaｋe[0］.y＊20==ａｂｔ。y＊20)/／判斷吃豆的條件,撞到就吃 {?? aｂt.isabt=１;／／食物被吃 ??abｔ.leｎ＋+；//蛇身+１? ?Ｓｎakｅ[abt.lｅn—1］.x=Sｎaｋe[abt.len—2］。ｘ;//增加一節(jié)蛇身跟隨蛇尾坐標ｘ???Ｓnaｋe［abｔ。leｎ—１]。y=Ｓnake[aｂt．lｅn—2]．y；//增加一節(jié)蛇身跟隨蛇尾坐標y ｝?? iｆ(ａbt.isabt=＝1） /／如果食物被吃了就生成新食物? ｛? ??abt。iｓabt=０;//改為有食物狀態(tài) ??ｓｒand（（unsiｇned)time（NULＬ)）；//食物隨時間變化隨機出現(xiàn)的種子? ｍｓ:／／重新設置食物出現(xiàn)的位置,防止食物出現(xiàn)在蛇身上 abt。ｘ=rａnd（）%17;//隨機出現(xiàn)食物x坐標,防止食物出現(xiàn)在邊界x+1 ａbｔ．y＝１+rand()%13；／/隨機出現(xiàn)食物y坐標，防止食物出現(xiàn)在邊界y+１ ? ?ｆｏｒ(ｉnｔiｓｆo=ａbt.ｌｅn—1；isfo>=０；ｉsfo-—)／/遍歷蛇 ? ?iｆ(Ｓnａke［isfo］。x＝＝ａｂt．x＆&Snaｋe［isｆo］。y==abt．y)//判斷食物是否在蛇身上 ?? ?gｏtomｓ;／/重新設置食物???iｆ（ａｂt.mｏdｅ＝=２)／/類型為２,方盒模式，食物不應出現(xiàn)在盒子上? ?｛? ? fｏr(iｎtmd1＝0；md1<＝18；md１+＋）? ｛ ???ｉｆ（abｔ．x==md1&&ａｂｔ。y==1） ?????gｏtoms;? ???ｉf（abｔ.x==md1＆＆ａbt.y＝=1３) ? gotoms；????} ?? ｆｏｒ（ｉｎｔmｄ１１=2；ｍd１1＜14；ｍd１1+＋）? ??{ ?? iｆ(abt．x==０＆&aｂt。y==mｄ１1）? ? ?goｔoms；? ??if（aｂt。x=＝18&＆abt．y==md11)? ?? ??ｇoｔoms； ?} ? ????｝ ??if（aｂt。ｍoｄe＝=3）/／類型為3，食物不能顯示到格子模式的格子上?? ｛?? fｏr(iｎtmd1=０;md1<=18;md1++）? ?｛ ? ?if（md1〈7)?? if（abt。x==mｄ1＆&abt.y＝=12） ? ?ｇotoms;??? ?ｉf（mｄ1>１０） ?????if（ａｂt。ｘ==ｍd1&＆abｔ.y==2) ??? gｏtomｓ； ? }????ｆor（inｔmd１1=１；ｍｄ11〈=14；ｍd11+＋) ? ?｛? ?if(mｄ１1<７） ? ｉf(abt。x==6＆＆abt。ｙ==ｍｄ1１）?? ? ? gotomｓ；? ? ?iｆ（mｄ11＞10）?? ?if(abｔ.x=＝１1&&aｂt.y=＝md11）????? ｇotoms； ? ?} ? } } ?CBrushDraｗBruｓｈ=（ＲＧB（２55,0,０）)；/／設置食物的顏色 ?CＢrｕsh*Ｄrawbruｓh=ｐDC->SelecｔOｂｊect(＆DｒawＢrｕsh)；/／繪制方框 ?ｐDC-〉Rectanｇｌe(abｔ.ｘ*2０，ａbt.y＊２0，(aｂt．x＋1）*2０,(abt.y＋1）*20);／／食物顯示?｝voiｄCMyDｌg：：OnFilｅ(){ FＩLE*fp；//定義C語言文件 if（！(fp=fopen(”maｘ”，"rb＂）)）//若無文件記錄最高分?{ fp＝foｐen（”max＂,”wb”）；//新建以maｘ為名稱的最高分記錄文件 ?fpｒｉnｔf（ｆｐ，”0,0，０")；//初始化三個級別的最高分問為０ ?fcloｓe(ｆp）；//關閉文件??fp=ｆoｐen（”max＂，”rｂ")；//以讀的方式打開新建的mａx文件 ｝ ? intm1，m2,m3,ｓ=(abｔ。len—3）＊1０0;//定義三個變量接受文件存儲的三個級別分數(shù)及一個變量定義當次游戲的分數(shù)? fｓcanf(fp，”%d，％d,%d",&m１，＆m2,＆m3)；//接受三個級別記錄的整數(shù) ?ｆcｌose(ｆp)；/／關閉文件??ｉf(abt。sｐenｄ=＝1)if(s>m1)m1=s;//當游戲級別為初級時.判斷當次分數(shù)以歷史初級最高,保存比較后最大的數(shù) iｆ(ａｂt．ｓpend==２)if(s＞m2)m2=s;//當游戲級別為高級時。判斷當次分數(shù)以歷史初級最高，保存比較后最大的數(shù) ?if(abt．ｓpｅnd==３）if（s>m３）m３=s;//當游戲級別為高級時。判斷當次分數(shù)以歷史初級最高，保存比較后最大的數(shù) ?fp=fopｅn（”mａx”，”wb”）;／／以寫的方式打開ｍａx文件??fprintf(ｆp，＂％d，％d，％d＂，ｍ1，m2，ｍ3);／／刪除以往記錄，保存目前記錄的分數(shù) ?fcｌosｅ(fp）；//關閉文件}vｏiｄＣＭｙDlg::OnAway()//行走{?foｒ(inｔｉ＝abt．len－１;ｉ〉0；i--）/／使蛇身跟著蛇頭走 ｛ Ｓnａke［i］．x=Snａkｅ[i-１]。x；//傳遞x坐標??Snake［i］。y＝Ｓnake［i—１］。y；//傳遞y坐標 ｝? if（abｔ。ｄirectｉｏn==1）Sｎakｅ[０］.y--;//判斷蛇頭的方向(向上）?if(abt．dｉreｃｔion=＝2）Snake［0］。y++;//判斷蛇頭的方向（向下）?ｉｆ(abt.dirｅｃｔion==3）Sｎakｅ［0]。ｘ－—;//判斷蛇頭的方向(向左) if（abt。direction=＝４)Ｓnａke[0］.ｘ++;//判斷蛇頭的方向(向右）? if（Snaｋe［0］。x==-1）Snake[0]。x＝1８；/／設置左穿墻?if(Sｎaｋe［0］.ｘ＝＝１9）Snake［0].x=０；/／設置右穿墻 if(Snaｋe［０]。y==０）Snake［０］。ｙ=13；/／設置上穿墻 if（Sｎaｋe［0］。y＝=1４）Sｎake［0］．y＝1;/／設置下穿墻?refurbｉch()；//刷新 if（aｂt。moｄe=＝1）OnAｒｅａ（)；//繪制空地模式 elｓeif(abt.mode=＝２）OｎBｏx（）；／/繪制方盒模式 ｅｌseOnRｏｏm()；//繪制格子模式 OnDelet（)；//調用判定是否結束函數(shù)?}voidCMｙDlｇ：：OnＳnａke（)//繪制蛇{?CDＣ＊pDC=GetＤC（)；//初始顏色繪制 CBruｓhＤｒaｗBrｕsh=（RＧB(100,1００，１0０)）;?//設置蛇的顏色?CＢｒush*Drawbrush=pDC->ＳeleｃtObject(＆DｒawBrｕsh);／／替換當前樣式?for(inti=0;ｉ＜=abt。leｎ-1;i++）? pDC—〉Reｃtａｎgｌe（Snake［i］。x＊2０，Ｓnaｋe[i］.y＊2０，（Ｓnakｅ［