【正文】 POP PSW RETI ； 西南科技大學(xué)應(yīng)用型自學(xué)考試畢業(yè)設(shè)計（論文） 33 KEY1: … … ；鍵值處理程序 （ 4）鍵盤程序清單： KEY1: ACALL KS1 ； 有無鍵按下子程序 JNZ LK1 ；有鍵按下，轉(zhuǎn)去抖延時 AJMP KEY1 ；無鍵按下，繼續(xù)掃描 LK1: ACALL DELA12 ； 12ms 延時程序調(diào)用 ACALL KS1 ；判斷鍵是否真正按下 JNZ LK2 ；有鍵按下，轉(zhuǎn)逐列掃描 AJMP KEY1 ；無鍵按下，繼續(xù)掃描 LK2: MOV R2， 0FEH ；設(shè)置首列掃描字 MOV R4， 00H ；保存首列號 LK4: MOV DPTR， 7F01H；列掃描字送至 PA 口 MOV A， R2 MOVX @DPTR， A INCDPTR ；指向 PC 口 INCDPTR MOVX A， @DPTR ；讀入行狀態(tài) JB ， LONE ；第 0 行無鍵按下，轉(zhuǎn) LONE MOV A， 00H ；有鍵按下，設(shè)置行首鍵號 AJMP LKP ；轉(zhuǎn)求鍵號 LONE: JB ， LTWO ；第 1 行無鍵按下，轉(zhuǎn) LTWO MOV A， 08H ；有鍵按下，設(shè)置行首鍵號 AJMP LKP ；轉(zhuǎn)求鍵號 LTWO: JB ， LTHR ；第 2 行無鍵按 下，轉(zhuǎn) LTHR MOV A， 10H ；有鍵按下，設(shè)置行首鍵 ? AJMP LKP ；轉(zhuǎn)求鍵號 LTHR: JB ， NEXT ；第 3 行無鍵按下，查下一列 西南科技大學(xué)應(yīng)用型自學(xué)考試畢業(yè)設(shè)計（論文） 34 MOV A， 18H ；有鍵按下，設(shè)置行首鍵 LKP: ADD A， R4 ；求鍵號，鍵號 =行首鍵號 +列號 PUSH ACC ；保護(hù)鍵號 LK3: ACALL KS1 ；等待鍵釋放 JNZ LK3 ； 鍵未釋放，繼續(xù)等待 POP ACC ；鍵釋放，鍵號送 A AJMP OVER ；鍵掃描結(jié)束 NEXT: INCR4 ；列號加 1，指向下一列 MOV A， R2 ；判斷 8 列掃描完否 JNB ， KND ； 8 列掃描完，繼續(xù) RL A ；掃描字左移一位 MOV R2， A ；送掃描字 AJMP LK4 ；轉(zhuǎn)下一列掃描 KND: AJMP KEY1 OVER: RET ；鍵掃描結(jié)束 KS1: MOV DPTR， 7F01H ；指向 PA 口 MOV A， 00H ；設(shè)置掃描字 MOVX @DPTR， A ；掃描字送 PA 口 INCDPTR ；指向 PC 口 INCDPTR MOVX A， @DPTR ；讀入 PC 口狀態(tài) CPL ；以高電平表示有鍵按下 ANL A， 0FH ；屏蔽高 4 位 RET （ 5）初始化程序如下： INIT:MOV DPTR， 7FFFH ；置 8279 命令 /狀態(tài)口地址 MOV A， 0D1H ；置清顯示命令字 MOVX @DPTR， A ；送清顯示命令 WEIT:MOVX A， @DPTR ；讀狀態(tài) 西南科技大學(xué)應(yīng)用型自學(xué)考試畢業(yè)設(shè)計（論文） 35 JB ， WEIT ；等待清顯示 RAM 結(jié)束 MOV A， 34H ；置分頻系數(shù)，晶振 12MHz MOVX @DPTR， A ；送分頻系數(shù) MOV A， 00H ；置鍵盤 /顯示命令 MOVX @DPTR， A ；送鍵盤 /顯示命令 MOV IE， 84H ；允許 8279 中斷 RET （ 6）顯示子程序如下： DIS:MOV DPTR， 7FFFH ；置 8279 命令 /狀態(tài)口地址 MOV R0， 30H ；字段碼首地址 MOV R7， 08H ； 8 位顯示 MOV A， 90H ；置顯示命令字 MOVX @DPTR， A ；送顯示命令 MOV DPTR， 7FFEH ；置數(shù)據(jù)口地址 LP:MOV A， @R0 ；取顯示數(shù)據(jù) ADD A， 6 ；加偏移量 MOVC A， @A＋ PC ；查表，取得數(shù)據(jù)的段碼 MOVX @DPTR， A ；送段碼顯示 INC R0 ；調(diào)整數(shù)據(jù)指針 DJNZ R7， LP ； RET （ 7）鍵盤中斷子程序如下： KEY:PUSH PSW PUSH DPL PUSH DPH PUSH ACC PUSH B SETB MOV DPTR， 7FFFH ；置狀態(tài)口地址 西南科技大學(xué)應(yīng)用型自學(xué)考試畢業(yè)設(shè)計（論文） 36 MOVX A， @DPTR ；讀 FIFO 狀態(tài) ANL A， 0FH ； JZ PKYR ； MOV A， 40H ；置讀 FIFO 命令 MOVX @DPTR， A ；送讀 FIFO 命令 MOV DPTR， 7FFEH ；置數(shù)據(jù)口地址 MOVX A， @DPTR ；讀數(shù)據(jù) LJMP KEY1 ；轉(zhuǎn)鍵值處理程序 PKYR: POP B POP ACC POP DPH POP DPL POP PSW RETI ； （ 8）驅(qū)動電路子程序的設(shè)計： PUSH:MOV R3 ， NUM PUSH A PUSH PSW LOOP: SETB ACALL DELAY1 CLR ACALL DELAY2 DJNZ R3， LOOP POP PSW POP A RET （ 9）延時子程序的設(shè)計： MOV R2， 18H LCALL 7FEBH RET 西南科技大學(xué)應(yīng)用型自學(xué)考試畢業(yè)設(shè)計（論文） 37 ORG 7FEBH 。通用延時子程序 (07EBH amp。 0FEBH amp。 ...) L7FEB: PUSH 02H 。R2(復(fù)位后 R2 即為 02H)存放時間常數(shù) ， 進(jìn)棧保護(hù) L7FED: PUSH 02H 。 R2 進(jìn)棧保護(hù) L7FEF: PUSH 02H 。 進(jìn)棧 L7FF1: DJNZ R2， $ 。R2 不為零等待 POP 02H 。出棧 DJNZ R2， L7FEF 。 R2 不為零轉(zhuǎn) POP 02H 。 出棧 DJNZ R2， L7FED 。 R2 不為零轉(zhuǎn) POP 02H 。 出棧 DJNZ R2， L7FEB 。 R2 不為零轉(zhuǎn) RET 。子程序返回 END 西南科技大學(xué)應(yīng)用型自學(xué)考試畢業(yè)設(shè)計（論文） 38 附錄 2 主程序如下 : CON: MOV R3， N MOV TMOD ， 10H MOV TL1 ， LOW MOV TH1 ， H IGH JNB FLAG ， LEFT MOV R0 ， RM AJMP TIME S LEFT: MOV R0 ， LM TIME: SETB EA SETB ET1 SETB TR1 步進(jìn)電機(jī)控制程序 正轉(zhuǎn) ， 反轉(zhuǎn) ， 停止 步進(jìn)電機(jī)接 00h stop: orl p1， 0ffh 。 步進(jìn)電機(jī)停止 loop:jnB ， for2 。 如果 按下正轉(zhuǎn) jnB ， rev2 。 如果 按下反轉(zhuǎn) jnB ， stop1 。 如果 按下停止 jmp loop 。反復(fù)監(jiān)測鍵盤 for: mov r0， 00h 。正轉(zhuǎn)到 tAB 取碼指針初值 for1:mov A， r0 。取碼 mov dptr， tABle 。 movC A， @A+dptr jz for 。是否到了結(jié)束碼 00h Cpl A 。把 ACC 反向 mov p1， A 。輸出到 p1 開始正轉(zhuǎn) jnB ， stop1 。 如果 按下停止 jnB ， rev2 。 如果 按下反轉(zhuǎn) 西南科技大學(xué)應(yīng)用型自學(xué)考試畢業(yè)設(shè)計（論文） 39 CAll delAy 。轉(zhuǎn)動的速度 inC r0 。取下一個碼 jmp for1 。繼續(xù)正轉(zhuǎn) rev:mov r0， 05h 。反轉(zhuǎn)到 tAB 取碼指針初值 rev1:mov A， r0 mov dptr， tABle 。取碼 movC A， @A+tABle jz rev 。是否到了結(jié)束碼 00h Cpl A 。把 ACC 反向 mov p1， A 。輸出到 p1 開始反轉(zhuǎn) jnB ， stop1 。 如果 按下停止 jnB ， rev2 。 如果 按下反轉(zhuǎn) CAll delAy 。轉(zhuǎn)動的速 度 inC r0 。取下一個碼 jmp rev1 。繼續(xù)反轉(zhuǎn) stop1:CAll delAy 。 按 的消除抖動 jnB ， $ 。 放開否 ? CAll delAy