【正文】 顯示字符串 pop di pop si pop dx pop cx pop bx pop ax 38 ret Show_point endp end main 。設(shè)置光標 mov bl,green lea bp,Score 。取得目標字符串地址 add bx, 7 。****************************************************************************************** Show_point proc push ax push bx push cx push dx push si push di mov ax,0 mov al, point 。函數(shù)名 : Show_point 。畫右邊線 pop di pop si pop dx pop cx 37 pop bx pop ax ret Rec endp 。畫左邊線 pop cx inc di 。畫上邊線 pop dx call HLine 。函數(shù)返回 : 空 。 di 右邊 。 si 左邊 。傳遞參數(shù) : 。函數(shù)名 : Rec 。循環(huán)畫線 mov dx , si int 10h add si , bx cmp si , di je M2_4 jmp M2_3 M2_4: pop di pop si pop dx 36 pop cx pop bx pop ax ret VLine endp 。負數(shù) jmp M2_2 。函數(shù)返回 : 空 。 al 顏色號 。 si 起點 。傳遞參數(shù) : 。函數(shù)名 : VLine 。循環(huán)畫線 mov cx , si int 10h add si , bx cmp si , di je M1_4 jmp M1_3 M1_4: pop di pop si pop dx 35 pop cx pop bx pop ax ret HLine endp 。負數(shù) jmp M1_2 。函數(shù)返回 : 空 。 al 顏色號 。 si 起點 。傳遞參數(shù) : 。函數(shù)名 : HLine 。填充一遍黑顏色 cmp ax,50 jz clear_loop1_over clear_loop2: cmp dx,50 jz clear_loop2_over mov si,ax mov di,dx call clearcut inc dx jmp clear_loop2 clear_loop2_over: mov dx,0 inc ax jmp clear_loop1 clear_loop1_over: pop di pop si pop dx 34 pop cx pop bx pop ax ret clear_area endp 。功能 : 清空游戲區(qū)域 。****************************************************************************************** 。開始畫第一個蛇 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 。坐標 y減方向 add bx , 2 mov [bx] , ax 。生成第一個蛇 mov ax , [bx] mov dx , Direction sub ah , dh 。初始方向為右 mov Direction,ax mov gameover,0 mov point,0 mov bx , offset Body mov ch , 25 。****************************************************************************************** Init_snake proc push ax push bx push cx push dx push si push di mov al , 4 mov Len, al 。函數(shù)名 : Init_snake 。蛇運動循環(huán) DATAS SEGMENT stop: pop di pop si pop dx pop cx pop bx pop ax ret run_snake endp 。畫新頭部 call getfood A3: call show_point call check_key 。檢查吃 cmp cx,1 jz A2 mov bx , offset Body mov ax,0 add Len,1 mov al , Len add bx , ax 。為 check_die 準備參數(shù) si,di mov dl , ah mov si , dx mov dl , al mov di , dx call check_die 。坐標加方向 mov [bx] , ax 。增加新頭部并改寫數(shù)據(jù) mov ax , [bx] mov dx , Direction add ah , dh 。功能 : 蛇運動 。****************************************************************************************** ?？v坐標也相等 add point,1 。****************************************************************************************** 29 Check_eat proc push ax push bx push dx push si push di mov cx,0 mov ax , foodx mov bx , foody cmp ax , si jz ok1 jmp check_eat_out ok1: 。傳遞參數(shù) : SI,DI 為當(dāng)前蛇頭部的坐標 。函數(shù)名 : Check_eat 。死亡即賦 gameover值 1 next: pop di pop si pop dx pop cx pop bx pop ax ret Check_die endp 。取出蛇身信息進行比較 jz dead 。檢查是否接觸蛇身 mov dh,al 。****************************************************************************************** Check_die proc push ax push bx push cx push dx 28 push si push di cmp si , 50 。傳遞參數(shù) : SI,DI 為當(dāng)前蛇頭部的坐標 。函數(shù)名 : Check_die 。按下 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 。(0,1) mov al , 1 mov bx , Direction 。(0,1) mov al , 1 mov bx , Direction 。(1,0) mov al , 0 mov bx , ax 。(1,0) mov al , 0 mov bx , ax 。往下移動 jz check_DOWN cmp ah , QUIT 。往右邊移動 jz check_RIGHT cmp ah , UP 。取得掃描碼 int 16h push ax cmp ah , SPACE jnz S2 S1: mov ah,0 int 16h cmp ah, SPACE jnz S1 S2: pop ax cmp ah , LEFT 。****************************************************************************************** Check_key proc push ax push bx push cx push dx push si 26 push di mov ah , 01h int 16h jz check_nokey 。功能 : 處理鍵盤響應(yīng) 。****************************************************************************************** 。功能 : 延時 。****************************************************************************************** 。乘象素值 add ax,leftline mov cx,ax pop dx mov ah,0dh mov bh,0 int 10h cmp al,snake_color jz M1 call cutfood 。乘象素值 add ax,topline mov dx,ax push dx mov ax,si 。賦予食物坐標 y mov si,foodx mov di,foody mov ax,di 。置隨機數(shù)范圍（最大值 +1） call Rand 。產(chǎn)生隨機數(shù) mov foodx,ax 。****************************************************************************************** getfood proc push ax push bx push cx push dx push si push di M1: mov si,50 。功能 : 產(chǎn)生新食物 ,即隨機產(chǎn)生一組 49*49 的坐標 。****************************************************************************************** 。****************************************************************************************** Rand proc push bx push cx push dx push si mov ah,2ch int 21h mov ax,dx mov d