貪吃蛇簡易代碼

1、#include#include resource1.h#include #include #include / 蛇的結(jié)構(gòu)體typedef struct snakeint x;int y;struct snake *pnext;snake;/ 豆的結(jié)構(gòu)體typedef struct beanint x;int y;struct bean *pnext;bean;/ 函數(shù)原型void createsnake(snake *psnake);void deleteall(snake *psnake);void showsnake(snake *psnake);void createbean(bean

2、 *pbean,snake *psnake);void showbean(bean *pbean);void deletebean(bean *pbean);void snakerun(snake *psnake);void snakegrowup(snake *psnake);int caneatbean(snake *psnake,bean *pbean);int candie(snake *psnake);/ /char g_classname20 = classname;lresult callback wndproc(hwnd hwnd,uint nmsg,wparam wparam

3、,lparam lparam);hbitmap hbitmap;int callback winmain(hinstance hinstance,hinstance hpreinstance,lpstr pcmdline, int ncmdshow) hbrush hbrush = createsolidbrush(rgb(100,100,410);hicon hicon = loadicon(hinstance,makeintresource(idi_wnd_icon);hicon hiconsm = loadicon(hinstance,makeintresource(idi_wnd_ic

4、onsm); hbitmap = loadbitmap(hinstance,makeintresource(idb_wdnbitmap);/ 設(shè)計類wndclassex wndclass;wndclass.cbclsextra = null;wndclass.cbsize = sizeof(wndclass);wndclass.cbwndextra = null;wndclass.hbrbackground = hbrush;wndclass.hcursor = loadcursor(hinstance,idc_arrow);wndclass.hicon = hicon;wndclass.hi

5、consm = hiconsm;wndclass.hinstance = hinstance;wndclass.lpfnwndproc = wndproc;wndclass.lpszclassname = g_classname;wndclass.style = cs_hredraw|cs_vredraw;wndclass.lpszmenuname = null;/ 注冊if (!registerclassex(&wndclass) messagebox(null,注冊失敗,消息,mb_ok);/ 創(chuàng)建hwnd hwnd = createwindow(g_classname, 貪吃蛇 ,ws_

6、overlappedwindow,200,50, 600+16,600+38,null, null, hinstance, null);if (!hwnd) messagebox(null,”創(chuàng)建失敗匚消息,mb_ok);/ 顯示showwindow(hwnd,ncmdshow);/ 消息循環(huán)msg msg;while (getmessage(&msg,null,0,0)translatemessage(&msg);/ 翻譯dispatchmessage(&msg);/ 回調(diào)函數(shù)return 0;hdc dc = null;bean *pbean = null;snake *psnake =

7、null;wparam,lparamint vk = vk_right;lresult callback wndproc(hwnd hwnd,uint nmsg,wparam lparam)switch (nmsg)case wm_create:createsnake(&psnake); / 創(chuàng)建蛇createbean(&pbean,psnake);dc = getdc(hwnd);break;case wm_keydown:switch (wparam) case vk_return:/ 按下后就開始settimer(hwnd,1,150,null);break;case vk_up:v k

8、 = vk_up;break;case vk_down:v k = vk_down;break;case vk_left:v k = vk_left;break;case vk_right:v k = vk_right;break;case :killtimer(hwnd,1);break; break;case wm_timer:/* 創(chuàng)建背景 */rect rect;getwindowrect(hwnd,&rect);hdc hmedc = createcompatibledc(dc);selectobject(hmedc,hbitmap);stretchblt(dc,0,0,rect.r

9、ight-rect.left,rect.bottom-rect.top,hmedc,0,0,500,600,srccopy);deletedc(hmedc);/* 背景創(chuàng)建結(jié)束*/ 各種函數(shù)if (candie(psnake)killtimer(hwnd,1);messagebox(null,笨蛋，撞到自己身上，我死啦！，消息,mb_ok);if ( caneatbean(psnake,pbean) ) snakegrowup(psnake);deletebean(&pbean);createbean(&pbean,psnake);snakerun(&psnake); elsesnakerun

10、(&psnake);showsnake(psnake);showbean(pbean);case wm_paint:/* 創(chuàng)建背景 */rect rect;getwindowrect(hwnd,&rect);hdc hmedc = createcompatibledc(dc);selectobject(hmedc,hbitmap);stretchblt(dc,0,0,rect.right-rect.left,rect.bottom-rect.top,hmedc,0,0,500,600,srccopy);/* 背景創(chuàng)建結(jié)束*/showsnake(psnake); / 顯示蛇showbean(pb

11、ean); / 顯示豆 deletedc(hmedc);break;case wm_close:deleteall(&psnake);deletebean(&pbean);destroywindow(hwnd);break;case wm_destroy:releasedc(hwnd,dc);postquitmessage(0);break;case wm_quit:break;return defwindowproc(hwnd,nmsg,wparam,lparam); / 創(chuàng)建蛇 create snake()void createsnake(snake *psnake)snake *u =

12、null,*w = null;int i = 3; / 開始的蛇有三截int x = 0; / 蛇頭的初始位置int y = 0; / 蛇尾的初始位置while (i-)u = (snake *)malloc(sizeof(snake);u-pnext = null;u-x = x;u-y = y;x +=20;if (null = *psnake)*psnake = u;elsew-pnext = u;w = u;/* 蛇的三屆創(chuàng)建完畢*/ 創(chuàng)建豆void createbean(bean *pbean,snake *psnake) snake *ji;int x = 0; / 隨機的位置x

13、坐標(biāo)int y = 0; / 隨機的位置y 坐標(biāo)srand(time(null);x = (unsigned)rand()%29)*20;y = (unsigned)rand()%29)*20;ji = psnake; while(psnake)if (x = psnake-x) & (y = psnake-y) ) x = (unsigned)rand()%29)*20;y = (unsigned)rand()%29)*20; psnake = ji; psnake = psnake-pnext;bean *u;u = (bean *)malloc(sizeof(bean);u-pnext

14、= null;u-x = x;u-y = y;*pbean = u;/ 刪掉全部蛇void deleteall(snake *psnake)snake *del;while(*psnake)del = *psnake;(*psnake) = (*psnake)-pnext; free(del);/ 刪掉豆void deletebean(bean *pbean)free(*pbean);*pbean = null;/ 顯示蛇void showsnake(snake *psnake)while (psnake)rectangle(dc,psnake-x,psnake-y,psnake-x+20,p

15、snake-y+20); psnake = psnake-pnext;/ 顯示豆void showbean(bean *pbean)rectangle(dc,pbean-x,pbean-y,pbean-x+20,pbean-y+20);/ 貪吃蛇移動void snakerun(snake *psnake)snake *ji, / 記錄變化的蛇頭*round; / 循環(huán)遍歷int x, / 蛇頭的當(dāng)前位置x 坐標(biāo)y; / 蛇頭的當(dāng)前位置 y 坐標(biāo)ji = *psnake;round = *psnake;while (round-pnext)round = round-pnext;x = roun

16、d-x;y = round-y;switch(vk)case vk_up:if (y = 0)y = 600;y -=20;break;case vk_down:if (y=600)y = 0;y +=20;break;case vk_left:if (x = 0)x = 600;x -= 20;break;case vk_right:if (x = 600)x = 0;x +=20;break;*psnake = (*psnake)-pnext;ji-x = x;ji-y = y;ji-pnext = null;round-pnext = ji;/ 下一步能吃到豆嗎? 返回 1 吃到int

17、caneatbean(snake *psnake,bean *pbean)while (psnake-pnext)psnake = psnake-pnext;if (psnake-x=pbean-x)&(psnake-y=pbean-y)return 1;return 0;/ 長大void snakegrowup(snake *psnake)snake *u;u = (snake *)malloc(sizeof(snake);u-pnext = null;u-x = pbean-x;u-y = pbean-y;while(psnake-pnext) psnake = psnake-pnext;psnake-pnext = u;/ 蛇會死嗎 返回 1 會死int candie(snake *psnake)snake *ji = null;int x = 0,y = 0;ji = psnake;while (psnake-pnext)psnake = psnake-