【正文】 返回主程序 END 。R2+acL送（ R0＋ 2） MOV A,B ADDC A,R1 INC R0 MOV R0,A 。若 Cy=1,則存 R1 NEXT: MOV A,R7 MOV B,R5 MUL AB ； a c=BA ADD A,R2 。R2＋ bcH+Cy送 R2 MOV R1,00H JNV NEXT 。b c=BA ADD A,R3 INC R0 MOV R0,A 。加法形成 Cy MOV R3,A 。 MOV A,R0 CPL A ADD A,01H MOV R0,A INC R0 MOV A,R0 CPL A ADDC A,00H MOV R0,A TPL: RET MLTY: MOV A,R6 MOV B,R4 MUL AB ； b d=BA MOV R0,A 。 JNC TPL 。若是，則 TPL MOV C,SIGN1 。兩乘數(shù)皆為負(fù)？ ANL C,SIGN2 。對 R5求補(bǔ) CPL A ADDC A,00H MOV R5,A POS2: ACALL MULT 。乘數(shù)符號送 SIGN2 JNC POS2 MOV A,R4 。對 R6求補(bǔ) CPL A ADD A,01H MOV R6,A MOV A,R7 。被乘數(shù)符號送 SIGN1 JNC POS1 。 MOV R7,A 。 Y MOV A,R5 。 N ADD A,R2 。 最低字節(jié) 次低字節(jié) 次高字節(jié) 最高字節(jié) 根據(jù) E（ K）＝ UR－ Ui(K) 計算 E（ K) 29 46H 47H 積分單元 48H 49H 4AH 4BH積分單元 4CH 4DH 圖 3－ 7 PID算法程序流程圖 雙字節(jié)加法 程序 DSUM。 E（ K）送 E（ K－ 1)單元 MOV 3CH,3AH 。 E（ K－ 1）送 E（ K－ 2）單元 MOV 3EH,3CH 。 存入 2FH和 30H單元 MOV 30H,R6 。 ACALL DSUM 。 MOV R5,2FH 。PP＋ PI+PD MOV R3,R7 。PP＋ PI送 R3R2 ACALL DSUM 。 MOV R3,4AH 。求得 PD MOV R5,49H 。 MOV R0,46H 。求 E（ K）－ 2E（ K－ 1）＋ E（ K－ 2） MOV R5,37H 。 ACALL CPL1 。 MOV R3,3BH 。計算 {E(K)+E(K2)E(K－ 1)} MOV R5,R7 。 28 ACALL CPL1 。 MOV R3,3BH 。計算 E（ K）＋ E（ K－ 2） MOV R5,R7 。 E（ K－ 2）送 R3R2 MOV R2,3EH 。 E（ K）送 R5R4 MOV R4,3AH 。 存入 4AH和 4BH單元 MOV 4BH,R6 。 ACALL DSUM 。 MOV R3,4DH 。求得 PP MOV R5,49H 。 MOV R0,46H 。求 [E（ K）－ E（ K－ 1） ] MOV R5,33H 。 ACLL CPL1 。 MOV R3,3BH 。計算 PI=KI E（ K） MOV R5,39H 。KI送 R5R4 MOV R0,4AH 。 MOV R5,35H 。計算 E（ K） MOV 39H,R7 。 27 ACALL CPL1 。 MOV R3,2AH 。A送 2AH RET : 3. PID計算程序 式（ 2－ 8）可以改寫成： ( ) ( 1 ) [ ( ) ( 1 ) ] ( )[ ( ) 2 ( 1 ) ( 2 ) ]( 1 )P K P K K E K E K K E KPIK E K E K E KDP K P P PP I D? ? ? ? ? ? ?? ? ? ? ?? ? ? ? ? （ 3－ 8）根據(jù) 式（ 3－ 8）編程，相應(yīng)程序框圖如圖 3－ 7所示，程序清單如下： PID: MOV R5,31H 。若（ 2EH） (2CH),則 CMP6 XCH A,2CH 。否則（ 2EH）送 2AH RET 。(2EH)送 A CJNE A,2CH,CMP5 。否則，（ 2DH）送 2AH RET 。返回 CMP3: JC COMP4 。若（ 2DH）！ =(2EH),則 CMP3 MOV 2AH,A 。 CMP2: MOV A,2DH 。若（ 2CH） （ 2DH），則 CMP2 XCH A,2DH 。若（ 2CH）！＝（ 2DH），則 CMP1 AJMP CMP2 。 N Y Y N N N Y Y Y N N N Y Y N Y 圖 2－ 5采樣子程序流程圖 圖 2－ 6 數(shù)學(xué)濾波程序流程圖 采樣值始址送 R0采樣次數(shù)送 R2 （ 2CH ）！ ＝（ 2DH） ? （ 2CH）送 A A/D 完成 返回 （ 2DH ）送2AH (2CH) (2DH)? （ 2DH） （ 2EH） ? （ 2CH）?。剑?2EH） ? （ 2EH） （ 2CH） ? 選通 IN0啟動 ADC 延時 所有采樣結(jié)束？ (2CH)送 2AH （ 2CH)（ 2DH） ? （ 2DH）?。剑?2EH） ? （ 2DH ）送2AH （ 2DH ）送2AH （ 2EH ）送2AH 返回 26 相應(yīng)程序清單為： FILTER:MOV A,2CH 。中值濾波及只需對 2CH、 2DH和 2EH中三次采樣值進(jìn)行比較，取中間值存放到 2AH單元內(nèi)，以作為溫度標(biāo)度轉(zhuǎn)換時使用。中斷返回 （ 2） T1中斷服務(wù)程序： 此處刪除 500字此處刪除 500字此處刪除 500字此處刪除 500字此處刪 25 除 500字此處刪除 500字此處刪除 500字此處刪除500字 數(shù)字濾波程序用于濾去來自控制現(xiàn)場對采樣值的干擾。 恢復(fù)現(xiàn)場 POP ACC 。 清越限標(biāo)志 POP DPH 。否則，越上限聲光報警 CLR 5EH 。越限 N次嗎？ JNZ WL 。 CLR C 。若 上次未越限，則轉(zhuǎn) WL INC 44H 。轉(zhuǎn) NM執(zhí)行 TPL1: SETB 5EH 。 取 PID值求補(bǔ)，作為 TL1 INC A 。否則，越下限聲光報警 MOV A,45H 。中斷返回 MTPL: JNC HAT 。 恢復(fù)現(xiàn)場 POP ACC 。等待 T1中斷 POP DPH 。調(diào)用標(biāo)度轉(zhuǎn)換程序 LOOP: ACALL DISPLY 。啟動 T1 SETB ET1 。 T1賦初值 MOV TH1,0FFH SETB PT1 。 NM: SETB 。PID值送 A CPL A 。若溫度不越限，則令綠燈亮 ACALL PID 。清上次越限標(biāo)志 CJNE A,43H,MTPL 。中斷返回 TPL： JNC TPL1 。 POP ACC 。轉(zhuǎn)上限處理程序 POP DPH 。 CLR 5EH 。若 Ui（ K）?。?Umax,則 TPL WL: MOV C,5EH 。調(diào)用采樣子程序 ACALL FILTER