【正文】 ************************************** 。正數(shù) M1_1: neg bx M1_2: pop si M1_3: 。函數(shù)名 : clear_area 。檢查按鍵 jmp loop1 。橫坐標(biāo)相等 cmp bx , di jz ok2 jmp check_eat_out ok2: 。功能 : 處理死亡的響應(yīng) 。往左移動 jz check_LEFT cmp ah , RIGHT 。取坐標(biāo)值 mul cut_y 。功能 : 產(chǎn)生指定范圍大小的隨機數(shù) 。函數(shù)名 : clearcut 。****************************************************************************************** 。顯示提示信息 mov cx , 37 call Msg 。 cx 字符串長度 。顯示提示信息 lea bp , msg5 mov cx , 29 call Msg exit_loop: mov ah , 00h int 16h 。鍵盤掃描碼 LEFT EQU 4Bh RIGHT EQU 4Dh UP EQU 48h DOWN EQU 50h QUIT EQU 01h SPACE EQU 39h .code main proc far mov ax , data mov ds , ax start: mov ah , 00 mov al , 12h int 10h 。最大格數(shù)（縱） msg1 db 39。 。往右邊移動 jz check_RIGHT cmp ah , UP 。蛇運動循環(huán) DATAS SEGMENT stop: pop di pop si pop dx pop cx pop bx pop ax ret run_snake endp getfood 函數(shù) 設(shè)置了一個隨機數(shù)坐標(biāo) x 最大值 50，調(diào)用 Rand 函數(shù)獲取隨機 x 軸坐標(biāo)，同 9 理可得隨機 y 軸坐標(biāo)，該坐標(biāo)就是食物的隨機坐標(biāo)。設(shè)置文本模式 mov ah , 4ch int 21h 。設(shè)置圖形模式 640*480 call show_start_msg 。 3 程序流程圖 4 數(shù)據(jù)定義及重要函數(shù) 數(shù)據(jù)定義及鍵盤掃描碼 數(shù)據(jù)定義： Len db ? 。 食物的產(chǎn)生： 通過一系列運算產(chǎn)生在要求范圍內(nèi)的的隨機數(shù)，此時的隨機數(shù)便是隨即點，可以通過產(chǎn)生的隨即點的坐標(biāo)畫出隨即點，也就是食物了。進入游戲，重新設(shè)置圖形模式，調(diào)用 rec， clear_area,getfood,run_sanke 函數(shù)分別打印邊框，初始化蛇，隨機食物，開始運動蛇。顯示提示信息 lea bp , msg5 mov cx , 29 call Msg exit_loop: mov ah , 00h int 16h 。取到蛇尾 add bx , ax sub bx , 2 mov ax , [bx] mov cx,0 mov [bx],cx 8 mov dx,0 mov dl , ah mov si , dx mov dl , al mov di , dx sub Len,1 call clearcut mov bx , offset Body mov ax, [bx] mov dx,0 mov dl , ah mov si , dx mov dl , al mov di , dx call cutsnake jmp A3 A2: add Len,1 mov bx , offset Body mov ax, [bx] mov dx,0 mov dl , ah mov si , dx mov dl , al mov di , dx call cutsnake 。如果沒有按鍵就繼續(xù) mov ah , 0 。蛇的長度 Body dw 200 dup(0) 。每格寬 cut_y dw 3 。 39。設(shè)置光標(biāo)位置 mov bl , white 。傳遞參數(shù) : 。顯示作者信息 mov cx,11 call Msg 。乘象素值 add ax,leftline 。加上邊界 mov si , ax add ax , 3 mov di , ax pop dx pop bx call Rec 。Rec 的參數(shù)是 cl顏色 si左邊 bx上邊 di右邊 dx下邊 pop di pop si pop dx pop cx pop bx pop ax ret clearcut endp 。置隨機數(shù)范圍（最大值 +1） call Rand 。****************************************************************************************** Check_key proc push ax push bx push cx push dx push si 26 push di mov ah , 01h int 16h jz check_nokey 。按下 ESC鍵的情況 mov gameover,1 check_nokey: mov ah,0ch mov al,0 int 21h pop di pop si pop dx pop cx pop bx pop ax ret Check_key endp 。傳遞參數(shù) : SI,DI 為當(dāng)前蛇頭部的坐標(biāo) 。檢查吃 cmp cx,1 jz A2 mov bx , offset Body mov ax,0 add Len,1 mov al , Len add bx , ax 。開始畫第一個蛇 mov cx,0 mov cl, Len mov dx,0 mov bx , offset Body init_print_loop: mov ax , [bx] mov dl , ah mov si , dx mov dl , al mov di , dx call cutsnake 。函數(shù)返回 : 空 。負數(shù) jmp M2_2 。畫左邊線 pop cx inc di 。設(shè)置光標(biāo) mov bl,green lea bp,Score 。 di 右邊 。 si 起點 。傳遞參數(shù) : 。初始方向為右 mov Direction,ax mov gameover,0 mov point,0 mov bx , offset Body mov ch , 25 。增加新頭部并改寫數(shù)據(jù) mov ax , [bx] mov dx , Direction add ah , dh 。取出蛇身信息進行比較 jz dead 。(1,0) mov al , 0 mov bx , ax 。功能 : 延時 。功能 : 產(chǎn)生新食物 ,即隨機產(chǎn)生一組 49*49 的坐標(biāo) 。取坐標(biāo)值 mul cut_y 。置顏色 mov ax,di 。****************************************************************************************** cutsnake proc near push ax push bx push cx push dx push si push di mov cl, snake_color 。****************************************************************************************** show_title proc near push ax push bx push cx push dx mov dl,10h mov cx,10h yidong: push cx dec dl mov dh,0fh call SetGb mov al,020h mov ah,0eh int 10h inc dl mov dh,0ch call SetGb 19 mov bl,yello lea bp,title1 mov cx,26 call Msg mov dh,0dh call SetGb mov bl,yello lea bp,title2 mov cx,26 call Msg mov dh,0eh call SetGb mov bl,yello lea bp,title3 mov cx,26 call Msg mov dh,0fh call SetGb mov bl,yello lea bp,title4 mov cx,26 call Msg call delay inc dl pop cx call show_start_msg loop yidong mov ah,0ch mov al,0 int 21h pop dx pop cx pop bx pop ax ret show_title endp 。功能 : 設(shè)置光標(biāo)位置 。打印邊框 call clear_area 。Press any key for start! Esc for exit39。食物坐標(biāo) foodY dw ? seed dw 2 。檢查是否反向 add bx , Direction jz check_nokey mov Direction , ax jmp check_nokey check_UP: mov ah , 0 。賦予食物坐標(biāo) y mov si,foodx mov di,foody mov ax,di 。坐標(biāo)加方向 add al , dl 。得到第一個食物 call run_snake 。食物色 speed db 0 。 1 目錄 1程序簡介 ....................................................................................................................... 1 2程序設(shè)計 ....................................................................................................................... 1 程序初始化： ....................................................................................... 1 .......................................................................