【正文】 轉(zhuǎn)入工作寄存器區(qū) 1 MOV P0,00H 。=============================================================================================== 。y 坐標(biāo)不能大于 16 DEC R2 JNC SUBB_1_Y CJNE R2,0,R2_FOOD_Y 。放新的食物 PUT_FOOD_COUNT: 。================================================================================================ SNAKE_DED: SETB B_SNAKE_DED MOV A,1 。延時 MOV P0,00H MOV P2,00H CJNE R0,53H,GAME_DISP_20 。蛇頭 Y 坐標(biāo)加上 方向 Y 坐標(biāo) MOV R0,SNAKE_TOU_Y MOVE_CHANGE_Y: 。=============================================================================================== READKEY_X_Y: JNB ,PD_UP_DOWN1 。啟 停鍵在游戲中按下則結(jié)束顯示GAMEOVER JNB B_GAME_ON_OFF,GAMEOVER 。清除 T0 中斷標(biāo)志 CALL KEYTEST 。堆棧初始化 JB B_PASS,GOTO_GAME 。蛇死亡標(biāo)志位初始化 CLR B_SNAKE_FOOD 。定時器 T0 中斷 ORG 13H JMP IR_IN 。Y 坐標(biāo)小于 8 的寄存器 IR_COM1 EQU 39H 。蛇的節(jié)數(shù) PUT_FOOD EQU 2CH 。============================================================================== 11 =================== 。蛇尾 Y 坐標(biāo)暫存器 FOOD_X EQU 29H 。蛇身第二節(jié) X 坐標(biāo) 存儲單元 SNAKE_SHEN2_Y EQU 56H 。游戲開始 。初始化蛇長為 3 節(jié) CLR BT0 。波特率為 9600 MOV TL1,0FDH SETB TR1 。游戲主程序 判斷鍵盤 , 移動 , 是否死亡 , 吃食 , 顯示 。吃到食物則增長一節(jié)并重放食物========4 JNB B_PASS,MAINDISP CLR TR0 CALL SNAKE_PASS MOV A,PASS_NUM CJNE A,10,GOTO_START JMP START_1 16 MAINDISP: CALL GAME_DISP 。============================================================================================== KEYTEST: SETB B_KEYTEST MOV A,P1 ANL A,0F0H CJNE A,0F0H,KEYTEST_OUT CLR B_KEYTEST KEYTEST_OUT: RET 。蛇頭 X 坐標(biāo)加上 方向 X 坐標(biāo) MOV R0,SNAKE_TOU_X MOVE_CHANGE_X: 。輸出 Y 坐標(biāo)的高 8 位 MOV P2,L_Y_8 。將 Y坐標(biāo)低 8位轉(zhuǎn)化為可輸出的字節(jié)存入 L_Y_8 RLC A DJNZ R2,COUNT_Y_L_1 MOV L_Y_8,A COUNT_Y_OUT: RET 。================================================================================================ SNAKE_ZHANGCHANG: CLR B_PASS INC SNAKE_CHANG 。存入 R2 CJNE A,0,SUBB_1_Y 。關(guān)數(shù)加 1 MOV A,PASS_NUM CJNE A,10,PASS_GO 。關(guān)閉所有中斷 PUSH ACC 。等待引導(dǎo)碼出現(xiàn) JMP IR_IN_OUT I2: MOV R2,40 。清除接收標(biāo)志 MOV A,SBUF 。判斷食物是否與蛇身重疊 MOV R0,SNAKE_TOU_X 。隨機數(shù)除 10 取余 MOV R3,A 。判斷蛇頭是否撞到下邊的墻 CJNE A,SNAKE_TOU_Y,Y_17 JMP SNAKE_DED_OUT Y_17: MOV A,17 。============================================================================== 20 ================ 。=============================================================================================== 。判斷是否為向下鍵按下 JMP KEY_LEFT PD_UP_DOWN2: MOV A,Y CJNE A,0,KEY_LEFT MOV YY,1 。=============================================================================================== 。有鍵按下調(diào)用鍵盤操作子程序 CJNE A,0F0H,XX_X_YY_Y 。等待游戲開始 并顯示 SNAKE 啟停鍵按下則顯示 PLAYGAME 并進(jìn)入游戲模式 。開中斷 SETB EX0 。=============================================================================================== 13 。================================================================================================= 。過關(guān)時間調(diào)節(jié)暫存器 TIME_400 EQU 32H 。================================================================================================= 。字節(jié)定義區(qū) 。蛇頭 Y 坐標(biāo) 存儲單元 SNAKE_SHEN1_X EQU 41H 。蛇吃到實物標(biāo)志位 B_PASS BIT 05H 。初始化隨機碼產(chǎn)生器歸 0 MOV X,1 。開串口中斷 MOV TMOD,20H 。定時器 0 定時初值 MOV TH0,DPH 15 MOV TL0,DPL SETB TR0 。判斷蛇是否死亡子程序================2 JB B_SNAKE_DED,GAMEOVER 。置啟停標(biāo)志位為 1 表示按下 OUT: SETB EX0 17 RETI 。=============================================================================================== 。下一節(jié)蛇身的 X 坐標(biāo) MOV A,R1 。調(diào)整后的 Y 坐標(biāo)存回R2 SETB C MOV A,00H COUNT_Y_H_1: 。食物的 Y 坐標(biāo)是否與蛇頭 Y 坐標(biāo)重合 SETB B_SNAKE_FOOD SNAKE_FOOD_OUT: RET 。將上一次除完后的整數(shù)放入 A MOV B,10 DIV AB 。過關(guān)子程序 每過一關(guān)顯示 GOOD 并顯示關(guān)數(shù) 。=============================================================================================== 。IRIN 狀態(tài)為 0則視為是引導(dǎo)碼 ,等待高電平的結(jié)果碼出現(xiàn) CALL DEL_014 JMP I2_1 I3: MOV R3,0 LL: JNB IRIN,I4 。收到 01H 則向上 CJNE A,01H,DOWN MOV A,Y CJNE A,0,DOWN MOV X,0 MOV Y,1