基于51單片機(jī)的波形發(fā)生器畢業(yè)論文設(shè)計(jì)-資料下載頁
2025-06-28 00:16本頁面
【正文】 KEY:ACALL KS 。調(diào)按鍵查詢子程序，判斷是否有鍵按下 JNZ K1 。有鍵按下，轉(zhuǎn)移 WEI1跳轉(zhuǎn) ACALL DELAY 。無鍵按下，調(diào)延時(shí)程序去抖 AJMP K4 。繼續(xù)查詢按鍵 。***********鍵盤逐列掃描程序***********************************K1:ACALL DELAY ACALL KS 。再次判別是否有鍵按下 JNZ K2 。有鍵按下，轉(zhuǎn)移 AJMP K4 K2:MOV R3,0FEH 。首列掃描字送R3 MOV R4,00H 。首列號送R4K3MOV A,R3 MOV P2,A 。列掃描字送P2口 MOV P1,0FFH 。初始化P1口 MOV A,P1 。讀取行掃描值 JB ,L1 。第零行無鍵按下轉(zhuǎn)查第一行為1跳轉(zhuǎn) MOV A,00H 。第零行有鍵按下，行首鍵號送A AJMP LK 。轉(zhuǎn)求鍵號L1:JB ,NEXT 。第一行無鍵按下，轉(zhuǎn)查下一列 MOV A,03H AJMP LK 。鍵掃描結(jié)束，返回。************************************************************ NEXT: INC R4 。修改列號 MOV A,R3 JNB ,KEY 。三列掃描完返回按鍵查詢狀態(tài) RL A 。未掃描完，改為下列掃描字 MOV R3,A 。掃描字暫存R3 AJMP K3 。轉(zhuǎn)列掃描程序LK:ADD A,R4 。形成鍵碼送A MOV KU,A PUSH ACC 。鍵碼入棧保護(hù) 。**********************************************K4: ACALL KS 。等待鍵釋放 JNZ K4 POP ACC 。鍵釋放，彈棧送A RETI 。中斷返回。**********按鍵查詢子程序**************************************KS:MOV A,00H MOV P2,00H 。全掃描字送p2口 MOV P1,0FFH MOV A,P1 。讀入P1口狀態(tài) CPL A 。變正邏輯，高電平表示有鍵按下 ANL A,0FH 。屏蔽高四位 RET 。子程序返回 。****************鋸齒波***********************JCB: MOV A,JUCHI 。轉(zhuǎn)換初值WW:MOVX @DPTR,A 。D/A轉(zhuǎn)換 INC A 。A自加1 NOP 。延時(shí) CJNE A,255,WW 。判斷A是否加到255，若沒有返回到WW繼續(xù)加 MOV JUCHI,A AJMP START。******************三角波********************SJB: MOV A,SANJI 。轉(zhuǎn)換初值EE:MOVX @DPTR,A 。D/A轉(zhuǎn)換 INC A NOP CJNE A,255,EE DEC A:MOVX @DPTR,A DEC A NOP CJNE A,00, MOV SANJI,A AJMP START。******************方波*********************FB: MOV A,FANGB MOVX @DPTR,A ACALL DELAY3 ACALL DELAY3 CPL A MOVX @DPTR,A ACALL DELAY3 ACALL DELAY3 MOV FANGB,A POP ACC AJMP START 。***************梯形波********************** TXB: MOV A,TIXINSS:MOVX @DPTR,A INC A ACALL DELAY3 CJNE A,255,SS ACALL DELAY3 ACALL DELAY3 DEC AZZ:MOVX @DPTR,A DEC A ACALL DELAY3 CJNE A,00,ZZ ACALL DELAY3 ACALL DELAY3 MOV TIXIN,A AJMP START。*******************************************************1msDELAY3:MOV R0,7DHDEL7:NOP NOP DJNZ R0,DEL7 RET 。*******************************************50毫秒延時(shí)子程序DELAY2: MOV R0,05DEL5: MOV R1,10DEL4: MOV R2,7DHDEL3: NOP NOP DJNZ R2,DEL3 DJNZ R1,DEL4 DJNZ R0,DEL5 RET。****************************************** END 頁 28
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1