【正文】 LCALL SD_DRT1: RETRT11: MOV R1,53HLOP_ADD: INC @R1 CJNE @R1,0AH,RET_ADD MOV @R1,00H DEC R1 CJNE R1,4FH,LOP_ADDRET_ADD: LCALL SD_D RET。*****減一子程序*****SUB1: JNB F1,RT22 CLR C 。用加法做減操作,對(duì)該位1 MOV A,9AH SUBB A,01H ADD A,@R0 DA A 。進(jìn)行 BCD 調(diào)整 ANL A,0FH MOV @R0,A ?；胤? LCALL SD_D RT2: RETRT22: MOV R1,53HLOP_SUB: DEC @R1 CJNE @R1,0FFH,RET_SUB MOV @R1,09H DEC R1 CJNE R1,4FH,LOP_SUBRET_SUB: LCALL SD_D RET。將非壓縮 BCD 碼( 設(shè)定轉(zhuǎn)速值) 轉(zhuǎn)換成十進(jìn)制浮點(diǎn)數(shù)。出口：TEMP(轉(zhuǎn)換結(jié)果暫存區(qū) ),入口：TEMPR01(待轉(zhuǎn)換數(shù)據(jù)指針)。影響資源：R0，R1，TEMP ，ACC B_FB: PUSH PSW SETB RS0MOV R1,TEMPMOV @R1,4 。階碼初始化（為最高階） MOV R0,TEMPR01CONTZ1: CJNE @R0,00H,COPY 。有效數(shù)字從第一位不為 0 的數(shù)開(kāi)始拷貝 DEC @R1 。 階碼減一 INC R0CJNE R0,54H,CONTZ1 。判斷是否檢測(cè)完 4 字節(jié)CLR AMOV TEMP,AMOV TEMP+1,AMOV TEMP+2,AMOV R0,TEMPR01 POP PSW RETCOPY: MOV A,@R0 ANL A,0FH SWAP A MOV TEMP+1,A INC R0CJNE R0,54H,FINI_FB 。判斷有無(wú)拷貝完，沒(méi)有則拷貝下一位POP PSWRETFINI_FB: MOV A,@R0 ANL A,0FH ORL A,TEMP+1 MOV TEMP+1,A INC R0 CJNE R0,54H,FINI_FB1 POP PSW RETFINI_FB1: MOV A,@R0 ANL A,0FH SWAP A MOV TEMP+2,A INC R0 CJNE R0,54H,FINI_FB2 POP PSW RETFINI_FB2: MOV A,@R0 ANL A,0FH ORL A,TEMP+2 MOV TEMP+2,A POP PSW RET。INTX0。外中斷 0 服務(wù)自程序，用于電機(jī)脈沖檢測(cè)，速度測(cè)量值計(jì)算與對(duì)外發(fā)送。影響資源： 標(biāo)志位：START_PULSE ，DIRECT ，OV11 ；。PSW，寄存器組 2。內(nèi)存單元：T_PULSE，SYSTIME，DA_CONTROL，TEMPR01， TEMP，MEAVAL。其中調(diào)用程序：DA_PROCESS，CALCULATE_S，SD_D ，HB2，B_NBINTX0: JB START_PULSE,STOP_PULSE JB START_PULSE,STOP_PULSE MOV TL0,0B0H MOV TH0,3CH 。50MS 定時(shí)初值 SETB TR0 SETB START_PULSE 。適下一次中斷為周期結(jié)束檢測(cè) MOV T_PULSE,00H MOV SYSTIME,00H RETISTOP_PULSE: CLR TR0 CLR EX0 MOV SYSTIME,00H CLR START_PULSE 。使下一次中斷為周期開(kāi)始檢測(cè) PUSH ACC PUSH PSW SETB RS1 CLR C MOV A,4H 。如果電機(jī)速度低于 300 轉(zhuǎn)每分鐘，不。做采 5 取 3 求平均數(shù)據(jù)處理 SUBB A,T_PULSE JC DIRECT MOV R0,DA_CONTROL MOV A,T_PULSE MOV @R0,A INC R0 MOV A,TH0 MOV @R0,A INC R0 MOV A,TL0 MOV @R0,A INC R0 MOV DA_CONTROL,R0 CLR C CJNE R0,8FH,RETINTX01 。判斷５組數(shù)據(jù)是否采集完畢OV11: MOV DA_CONTROL,80H AJMP TO_PROCESS　。轉(zhuǎn)到數(shù)據(jù)處理RETINTX01: JNC OV11 LJMP RETINTX0TO_PROCESS: LCALL DA_PROCESS　。調(diào)用數(shù)據(jù)處理程序，采５?。城笃骄? MOV SYSTIME,00H　。初始化系統(tǒng)時(shí)間 AJMP SKIP1 DIRECT: MOV R0,82H　　　。保存本次采集的定時(shí)值到處理暫存區(qū) MOV @R0,TL0 DEC R0 　MOV @R0,TH0 DEC R0 MOV @R0,T_PULSESKIP1: LCALL CALCULATE_S 。計(jì)算電機(jī)轉(zhuǎn)速 CLR C MOV A,14H SUBB A,R6 JC TOOBIG 　。判斷電機(jī)轉(zhuǎn)速是否大于５１２０轉(zhuǎn)。大于則做錯(cuò)誤處理 LCALL HB2　。將速度值轉(zhuǎn)化為 BCD 碼存儲(chǔ) LCALL B_NB　。將速度值轉(zhuǎn)化為非壓縮 BCD 碼送顯存 MOV TEMPR01,54H LCALL B_FB 。將速度值轉(zhuǎn)化為十進(jìn)制浮點(diǎn)數(shù) MOV MEAVAL,TEMP　。 保存十進(jìn)制浮點(diǎn)數(shù) MOV MEAVAL+1,TEMP+1 MOV MEAVAL+2,TEMP+2TOOBIG: SETB TOPIDM　。向 PID 控制器發(fā)送測(cè)量速度值 SETB BF NOP CLR TOPIDM JB DF,$ 。是否發(fā)送 SETB TOPIDM MOV P2,MEAVAL CLR BF 。發(fā)送完畢 JB ACK,$ 。對(duì)方是否接收完畢 SETB BF NOP CLR TOPIDM JB DF,$ SETB TOPIDM MOV P2,MEAVAL+1 CLR BF JB ACK,$ SETB BF NOP CLR TOPIDM JB DF,$ SETB TOPIDM MOV P2,MEAVAL+2 CLR BF JB ACK,$ SETB BF LCALL SD_DRETINTX0: CLR A　。清零定時(shí)值 　　MOV T_PULSE,A MOV TL0,0B0H MOV TH0,3CH 。50MS 定時(shí)初值 SETB EX0 POP PSW 　　POP ACC 　　MOV SYSTIME,00H 　　RETI 。 DA_PROCESS:　 采 5 取 3，求平均數(shù)據(jù)。處理,占用資源，８０~８FH ,R1,R0。POIONT，POINT1。調(diào)用程序：SUB3C，DV31，C_CYCLE。FCLR，DA_PROCESS: MOV R0,80H LCALL C_CYCLE MOV R0,83H LCALL C_CYCLE MOV R0,86H LCALL C_CYCLE MOV R0,89H LCALL C_CYCLE MOV R0,8CH LCALL C_CYCLE MOV R1,89H LCALL SUB3C　。比較大小 JC NEXTP1 MOV POINT,89H SJMP GO1 NEXTP1: MOV POINT,8CH　。找最大數(shù) GO1: MOV R0,80H MOV R1,83H LCALL SUB3C JC NEXTP2 MOV R0,POINT LCALL SUB3C JC GO2 MOV POINT,R1 AJMP GO2NEXTP2: MOV R1,POINT LCALL SUB3C JNC GO2 MOV POINT,R0 GO2: MOV R0,POINT MOV R1,86H LCALL SUB3C JC GO3 MOV POINT,R1 GO3: MOV R0,80H 。找最小的那個(gè)數(shù) MOV R1,83H LCALL SUB3C JC NEXTP3 MOV POINT1,R0 SJMP GO4NEXTP3: MOV POINT1,R1 GO4:　　 MOV R0,89H MOV R1,8CH LCALL SUB3C JC NEXTP4 MOV R1,POINT1 LCALL SUB3C JC GO5 MOV POINT1,R0 AJMP GO5 NEXTP4: MOV R0,POINT1 LCALL SUB3C JNC GO5 MOV POINT1,R1 GO5: MOV R0,POINT1 MOV R1,86H LCALL SUB3C JNC GO6 MOV POINT1,R1 GO6: MOV R0,POINT ACALL FCLR　　　。清零最大數(shù) MOV R0,POINT1 ACALL FCLR　　　。清零最小數(shù)。求平均數(shù) MOV R0,80H MOV R1,83H MOV R7,4AVERAGE: INC R0 　　INC R0 　　INC R1 　　INC R1 MOV A,@R0 　　ADD A,@R1 MOV @R0,A DEC R1 DEC R0 MOV A,@R0 ADDC A,@R1 MOV @R0,A DEC R0 DEC R1 MOV A,@R0 ADDC A,@R1 MOV @R0,A MOV A,3 ADD A,R1 MOV R1,A DJNZ R7, AVERAGE INC R0 INC R0 MOV A,@R0 MOV R5,A DEC R0 MOV A,@R0 MOV R4,A DEC R0 MOV A,@R0