【正文】 pop si 25 pop dx pop cx pop bx pop ax ret getfood endp 。函數(shù)名 : Delay 。****************************************************************************************** Delay proc push ax push bx push cx push dx mov cx,33144 waitf: in al,61h and al,10h cmp al,ah je waitf mov ah,al loop waitf pop dx pop cx pop bx pop ax ret Delay endp 。函數(shù)名 : Check_key 。函數(shù)返回 : Direction 的值 ,gameover 的值（按 ESC時(shí)） 。如果沒有按鍵就繼續(xù) mov ah , 0 。往左移動(dòng) jz check_LEFT cmp ah , RIGHT 。往上移動(dòng) jz check_UP cmp ah , DOWN 。結(jié)束游戲 jz check_QUIT jmp check_nokey check_LEFT: mov ah , 1 。檢查是否反向 add bx , Direction jz check_nokey mov Direction , ax jmp check_nokey check_RIGHT: mov ah , 1 。檢查是否反向 add bx , Direction jz check_nokey mov Direction , ax jmp check_nokey check_UP: 27 mov ah , 0 。檢查是否反向 sub bl , 1 jz check_nokey mov Direction , ax jmp check_nokey check_DOWN: mov ah , 0 。檢查是否反向 add bl , 1 jz check_nokey mov Direction , ax jmp check_nokey check_QUIT: jmp check_exit check_exit: 。****************************************************************************************** 。功能 : 處理死亡的響應(yīng) 。函數(shù)返回 : 蛇參數(shù)的值 。檢查是否到達(dá)邊界 jz dead cmp si , 255 jz dead cmp di , 50 jz dead cmp di , 255 jz dead mov ax,si 。DX 中獲得當(dāng)前坐標(biāo) mov ax,di mov dl,al mov cx,0 mov cl, Len sub cl,1 mov bx,offset Body check_die_loop: add bx , 2 mov ax , [bx] cmp ax , dx 。觸及蛇身即死亡 loop check_die_loop jmp next dead: mov gameover,1 。****************************************************************************************** 。功能 : 處理吃到食物的響應(yīng) 。函數(shù)返回 : cx 。橫坐標(biāo)相等 cmp bx , di jz ok2 jmp check_eat_out ok2: 。加分 mov cx,1 check_eat_out: pop di pop si pop dx pop bx pop ax ret Check_eat endp 。函數(shù)名 : Run_snake 。****************************************************************************************** run_snake proc push ax push bx push cx push dx push si push di mov dx, 0005h call SetGb mov bl,white lea bp,msg6 30 mov cx,30 call Msg loop1: call Delay mov al,1 cmp al,gameover jz stop mov bx , offset Body mov cx,0 mov cl,Len add bx,cx add bx,cx sub bx,2 A1: mov ax,[bx] mov [bx+2],ax sub bx,2 loop A1 addhead: mov bx , offset Body 。坐標(biāo)加方向 add al , dl 。存入頭部 mov dx,0 。檢查死亡 mov al,1 cmp al,gameover jz stop call check_eat 。取到蛇尾 add bx , ax sub bx , 2 31 mov ax , [bx] mov cx,0 mov [bx],cx 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 。檢查按鍵 jmp loop1 。********************************************************************** 32 ******************** 。功能 : 蛇初始化 。蛇的初始大小為 4 mov ax,256 。蛇的初始位置設(shè)為 25， 25 mov cl , 25 mov [bx] , cx mov cx,3 init_first: 。坐標(biāo) x減方向 sub al , dl 。保存一格蛇的信 息 loop init_first init_print: 。畫一格 add bx , 2 33 loop init_print_loop Init_over: pop di pop si pop dx pop cx pop bx pop ax ret Init_snake endp 。函數(shù)名 : clear_area 。****************************************************************************************** clear_area proc push ax push bx push cx push dx push si push di mov ax,0 mov dx,0 clear_loop1: 。****************************************************************************************** 。功能 : 畫橫線 。 ah 0ch 。 di 終點(diǎn) 。 dx 行號 。****************************************************************************************** HLine proc near push ax push bx push cx push dx push si push di mov bx,1 push si clc sub si , di jnc M1_1 。正數(shù) M1_1: neg bx M1_2: pop si M1_3: 。****************************************************************************************** 。功能 : 畫豎線 。 ah 0ch 。 di 終點(diǎn) 。 cx 列號 。****************************************************************************************** VLine proc near push ax push bx push cx push dx push si push di mov bx , 1 push si clc sub si , di jnc M2_1 。正數(shù) M2_1: neg bx M2_2: pop si M2_3: 。****************************************************************************************** 。功能 : 畫矩形 。 cl 顏色 。 bx 上邊 。 dx 下邊 。****************************************************************************************** Rec proc near push ax push bx push cx push dx push si push di mov ah , 0ch mov al , cl push dx mov dx , bx call HLine 。畫下邊線 mov cx , si mov si , bx push di mov di , dx call VLine 。補(bǔ)右下角一點(diǎn) call VLine 。****************************************************************************************** 。功能 : 打印分?jǐn)?shù) (進(jìn)制轉(zhuǎn)換 ) 。二進(jìn)制數(shù) mov bx, offset Score 。更改的末位在字串中的位置（后面保留 2個(gè) 0） HS: mov cx,0ah mov dx,0 div cx add dl,30h mov [bx],dl sub bx,1 cmp ax,0 jz PR jmp HS PR: mov dx,1810h call SetGb 。顯示分?jǐn)?shù) mov cx,10 call