單片機(jī)課程設(shè)計匯編語言程序

1、;流水燈匯編語言程序代碼：MAIN:MOV A,#0FEH ;保持只有一個LED燈亮MOV R3,#08H ;把立即數(shù)08H送到寄存器R3中LOOP:MOV P2,ALCALL DELAY ;長調(diào)用子程序，跳轉(zhuǎn)到DELAY程序RL A ;累加器循環(huán)左移DJNZ R3,LOOP ;R3減1，不為0則跳轉(zhuǎn)到LOOPLJMP MAIN ;轉(zhuǎn)移到MAIN程序DELAY:MOV R4,#00H ;延時程序MOV R5,#00HD1:DJNZ R4,D1 ;R4減1，不為0則繼續(xù)執(zhí)行D1程序D2:DJNZ R5,D2 ;R5減1，不為0則繼續(xù)執(zhí)行D2程序RETEND流水燈程序電路圖：;數(shù)碼顯示管/LCD匯

2、編語言程序：MAIN:MOV R6,#00H ;把立即數(shù)00H送到寄存器R6中MOV R5,#00HMOV R2,#00HMOV R1,#00HDR:MOV A,R6MOV P3,#08H ;00001000，第一個數(shù)碼管顯示LCALL LOOPLCALL YS0MOV A,R5MOV P0,#0FFHMOV P3,#04H ;00000100，第二個數(shù)碼管顯示LCALL LOOPLCALL YS0MOV A,R2MOV P0,#0FFHMOV P3,#02HLCALL LOOPLCALL YS0MOV A,R1 ;第一次循環(huán)時R1為0送入A中，第二次循環(huán)時把R1+1送入A中MOV P0,#0

3、FFH MOV P3,#01HLCALL LOOPINC R1CJNE R1,#0AH,DR ;R1循環(huán)10次，R2加1 INC R2 MOV R1,#00HCJNE R2,#0AH,DR ;R2循環(huán)10次，R5加1INC R5MOV R2,#00HCJNE R5,#0AH,DR ;R5循環(huán)10次，R6加1INC R6MOV R5,#00HCJNE R6,#0AH ,DRLJMP MAINTAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90HLOOP:MOV DPTR,#TAB ;把查表地址送到DPTR指針中MOVC A,A+DPTRMOV P

4、0,A ;在數(shù)碼管中顯示RETYS0: ;延時程序MOV R3,#06HMOV R4,#06HYS3:DJNZ R3,YS3 ;R3減1，不為0則繼續(xù)執(zhí)行YS3YS4:DJNZ R4,YS4RETEND數(shù)碼顯示管程序電路圖：;鍵盤匯編語言程序代碼： ORG 0000H MAIN:MOV P1,#0FH;以行列排布，若按鍵按下列為1 MOV A ,P1 CJNE A,#0FH,SCAN ;比較A與0FH是否相等，不相等則跳轉(zhuǎn)到SCAN SJMP MAIN;短轉(zhuǎn)移 SCAN: JB P1.4 ,HX0;直接尋址位P1.4為1則轉(zhuǎn)移到HXO，判斷按鍵是否按下 JB P1.5 ,HX1 JB P1.6

5、,HX2 JB P1.7 ,HX3HX0: MOV R2,#0;列編號0、1、2、3送入R2中 LCALL FXHX1: MOV R2,#1LCALL FXHX2:MOV R2,#2LCALL FXHX3:MOV R2,#3LCALL FXFX: MOV P1, #0F0H ;若按鍵按下則行為1JNB P1.0 ,FX1 ;直接尋址位P1.0為0則轉(zhuǎn)移到FX1，判斷按鍵是否按下 MOV A,#0;行編號0、4、8、12送入A中 ADD A,R2;將列編號與行編號相加得鍵值送入A中，經(jīng)壓棧送入顯示程序 PUSH Acc;壓棧 LCALL XS;鍵值經(jīng)壓棧后送入顯示程序 POP Acc;出棧 LJ

6、MP MAINFX1:JNB P1.1 ,FX2 MOV A,#4 ADD A,R2 PUSH Acc LCALL XS POP Acc LJMP MAIN FX2: JNB P1.2 , FX3 MOV A,#8 ADD A,R2 PUSH Acc LCALL XS POP Acc LJMP MAIN FX3: MOV A,#12 ADD A,R2 PUSH Acc LCALL XS POP Acc LJMP NONE XS: MOV DPTR, #TAB ;顯示程序 MOVC A,A+DPTR MOV P2 ,A LCALL DELAY RET DELAY:MOV R3 ,#0 ;延時程序 D1:MOV R4 ,#0 D2:DJNZ R4,D2 DJNZ R3,D1 RET NO