微機原理加法計算器設(shè)計及顯示-資料下載頁
2025-06-30 00:34本頁面
【正文】 Y1ms 。調(diào)用延時1ms子程序SETB 。MOV P3,0FFH 。關(guān)閉顯示RET 。返回TAB: DB 28H,7EH,0A2H,62H,74H,61H,21H,7AH,20H,60H,0FFH,0F7H 。共陽極譯碼表DELAY1ms: MOV 50H,2 。延時1ms子程序LOOP1: MOV 53H,248NOPLOOP2:DJNZ 53H,LOOP2DJNZ 50H,LOOP1RETDELAY1:MOV 51H,5 。延時子程序DELAY1DELAY3:DJNZ 51H,DELAY3RET。鍵盤子程序KEY: LCALL KS 。調(diào)用檢測按鍵子程序JNZ K1 。有鍵按下繼續(xù)LCALL DELAY2 。無鍵按調(diào)用延時去抖ACALL DIR 。調(diào)用動態(tài)顯示AJMP KEY 。返回繼續(xù)檢測按鍵K1: LCALL DELAY2 。有鍵按下延時去抖動LCALL KS 。再調(diào)用檢測按腱子程序JNZ K2 。確認有按鍵進行下一步ACALL DIR 。調(diào)用動態(tài)顯示AJMP KEY 。無鍵按下返回繼續(xù)檢測K2: MOV R2,0EFH 。將掃描值送入R2暫存MOV R3,00H 。將第一列值送入R3暫存K3: MOV P1,R2 。將R2值送入P1口L0: JB ,L1 。MOV A,00H 。將第一行值送入ACCAJMP LK 。跳轉(zhuǎn)到鍵值處理程序L1: JB ,L2 。MOV A,04H 。將第二行的行值送入ACCAJMP LK 。跳轉(zhuǎn)到鍵值處理程序L2: JB ,L3 。MOV A,08H 。將第三行行值送入ACCAJMP LK 。跳轉(zhuǎn)到鍵值處理程序L3: JB ,NEXT 。MOV A,0CH 。將第四行行值送入ACCLK: ADD A,R3 。行值與列值相加后的鍵值送入APUSH ACC 。將A中的值送入堆棧暫存K4: LCALL DELAY2 。調(diào)用延時去抖程序LCALL KS 。調(diào)用按鍵檢測程序JNZ K4 。按鍵沒有松開繼續(xù)返回檢測POP ACC 。將堆棧值送入ACCMOV DPTR,KEYTABMOVC A,@A+DPTRRETNEXT: INC R3 。列值加一MOV A,R2 。R2值送入AJNB ,KEY 。掃描完至KEY處進行下一掃描RL A 。掃描未完將值左移一位進行下一列掃描MOV R2,A 。將ACC值送入R2暫存AJMP K3 。跳轉(zhuǎn)到K3繼續(xù)KS: MOV P1, 0FH 。將P1口高四位置0低四位置1MOV A,P1 。讀P1口XRL A,0FH 。將A中的值與A中的值相異或RET 。子程序返回KEYTAB:DB 1,2,3,10,4,5,6,11,7,8,9,12,15,0,14,13 。鍵值表DELAY2:MOV 52H,2H 。延時去抖動子程序LP1: MOV 53H,0FAHLP2: DJNZ 53H,LP2DJNZ 52H,LP1RETEND四、 討論、心得本次計算器的實驗是一次綜合性比較強的實驗，對前面所學的知識是一個很好的考察。里面很多細小的地方在用匯編編程的時候都很有挑戰(zhàn)性。比如開始該如何在數(shù)碼管上一直顯示就困擾了我很長時間；乘法溢出時如何處理也讓我考慮了很久?？傊@次的實驗讓我對匯編語言的熟悉程度進一步加深，并且對我結(jié)構(gòu)化模塊化編程的能力有一定的提高作用。
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1