【正文】 ；置累加次數(shù)MOV R0，4BH ；采樣值首址CLR A MOV R6， A ；清累加器MOV R7， ALOOP1： MOV A，R6 ；雙字節(jié)加法ADD A，R0MOV R6， AINC R0MOV A， R7ADDC A， R0MOV R7， AINC R0DJNZ R2， LOOP1MOV 25H， R6 ；被除數(shù)MOV 26H， R7MOV 29H， 5 ；除數(shù)MOV 2AH， 00HLCALL DIV16 ；求平均值MOV 55H， 25H ；存濾波值MOV 56H， 26HRETDIV16： CLR A ；雙字節(jié)除法MOV 27H， A ；清余數(shù)單元MOV 26H， AMOV R2， 10H ；置移位次數(shù)LOOP2： CLR CMOV R3， 04HMOV R0， 25H ；被除數(shù)地址LOOP3： MOV A， R0 ；被除數(shù)單元，系數(shù)單元左移一次RCL AMOV R0， AINC R0DJNZ R3， LOOP3MOV R0， 27H ；余數(shù)—除數(shù)MOV R1， 28HMOV A， R0CLR CSUBB A，R1MOV 2BH， A ；存差值低字節(jié)INC R0INC R1MOV A， R0SUBB A， R1MOV 27H， A ；存差值低字節(jié)JC LOOP4 ；不夠減則繼續(xù)左移MOV R0， 27H ；夠減時差值取代原余數(shù)MOV R1， 2BHMOV A， R1MOV R0， AINC R0INC R1MOV A， R1MOV R0， AINC 25H ；被除數(shù)單元加1LOOP4： DJNZ R2， LOOP2 ；移位次數(shù)不到繼續(xù) RETA/D啟動子程序 5次 4B為存放首值READ_AD： ；讀外部通道子程序MOV R0， 4BH ；設(shè)置緩沖區(qū)首址MOV R2， 0 ；選擇通道0，單極性，高位在前，12位輸出MOV R5， 05H ；最大采集路數(shù)LCALL READ ；空讀，第一次啟動，數(shù)據(jù)不準READAD1：MOV A， R2SWAP AMOV R2，A；將通道號的高4位與低4位交換，低4位為通道號 ；高4位為數(shù)據(jù)長度、數(shù)據(jù)格式等LCALL READMOV A， R3MOV R0， AINC R0MOV A， R4MOV R0， A ；保存數(shù)據(jù)MOV A， R2 ；將R2的高低4位交換以便通號加1SWAP A ；高低4位交換后，使A中的數(shù)字成為控制字， ；控制字的低4位為0MOV R2， AINC R2DJNZ R6， READAD1RETREAD：JNB EOC， ＄ ；等待TLC2543轉(zhuǎn)換完畢CLC ；清I/O時鐘信號SETB ；設(shè)置片選為高位CLR ；設(shè)置片選為低位MOV R7, 08H ；先讀高8位MOV A， R2 ；把方式/通道控制字放到AREAD_1： MOV C， ；讀轉(zhuǎn)換結(jié)果RLC A ；A寄存器左移，移入結(jié)果數(shù)據(jù)位，；移出方式/通道控制位MOV ， C ；輸出方式/通道控制位SETB ；設(shè)置I/O時鐘為高CLR ；清I/O時鐘DJNZ R7， READ1 ；R7不為0，則返回READ_1MOV R3， A ；轉(zhuǎn)換結(jié)果的高8位放到R3中MOV A， 00H ；復位A寄存器MOV R7， 04H ；再讀低4位READ_2： MOV C， ；讀轉(zhuǎn)換結(jié)果RCL A ；A寄存器左移，移入結(jié)果數(shù)據(jù)位SETB ；設(shè)置I/O時鐘為高CLR ；清I/O時鐘DJNZ R7， READ_2 ；R7不為0，則返回READ_2MOV R4， A ；轉(zhuǎn)換結(jié)果低4位放到R4中SETB ；設(shè)置片選為高RETBCD碼處理程序CHBCD： MOV A， 55HMOV R6， A ；把AD采樣處理后的高字節(jié)送R6MOV A， 56HMOV R7， A ；把AD采樣處理后的低字節(jié)送R7LCALL BCD2 ；調(diào)BCD碼處理子程序MOV 24H， 16MOV A， 60H ；采樣的高位送AANL A， 0F0HSWAP AMOV 20H， A ；轉(zhuǎn)換BCD碼高位送顯示緩沖首址MOV A， 55HANL A， 0FHMOV 21H， A ；溫度的BCD碼次高位送21HMOV A， 56HANL A， 0F0HSWAP AMOV 22H， A ；溫度的BCD碼次低位送22HMOV A， 56HANL A， 0FHMOV 23H， A ；溫度的BCD碼低位送23HLCALL DIS ；調(diào)顯示子程序SJMP ADC ；循環(huán)采集控制LOWER： SETB HEATLCALL TJTJ： MOV DPTR， 20 ；20ms送R0MOV R0， DPTRMOV DPTR， MOV R1， DPTRMOV A， PWM ；U(k)送入累加器AMOV B， MUL AB ；求αSUBB A， R1MOV B， R0MUL AB ；求TonBJ： SETB ；驅(qū)動聲音報警電路SETB ；紅燈亮CLR ；綠燈滅SJMP CHBCD ；轉(zhuǎn)BCD碼處理程序OVER： CLR ；電爐斷電SJMP BJ 定時計數(shù)器20ms子程序T0： MOV TMOD, 01H ；設(shè)置定時器0方式1工作MOV TH0, 0F1H ；設(shè)置計數(shù)初值MOV TL0, E0HMOV IE, 00H ；CPU開總中斷SETB TR0 ；啟動T0溫度值轉(zhuǎn)換為BCD碼子程序經(jīng)過標度變換后的溫度值還是十六進制數(shù)，為滿足LED顯示，需要變換為BCD碼用于顯示。 附錄表1PIDINC： MOV R5， 31H ；讀取溫度給定值MOV R4， 32H MOV R3， 2DH ；讀取反饋值MOV R2， 2EHLCALL CPL1 ；溫度反饋值取補碼LCALL DSUM ；計算溫度偏差值MOV 39H， R7 ；存入溫度偏差值MOV 3AH， R6MOV A， R7JNB ， S1MOV 39H， 00HMOV A， R6 ；溫度偏差值取補碼CPL AINC AMOV 3AH， AS1： MOV R5， 35H ；取KMOV R4， 36HMOV R0， 4AHLCALL MULT1 ；計算Kte(t)MOV 40H， R7 ；存Kie(k)MOV 41H， R6MOV A， 39H ；e(k) ε時，Kie(k)=0JNB ， SPIDSPD： MOV 40H， 00HMOV 41H， 00HSPID： MOV R5， 39H ；取溫度偏差值e(k)MOV R4， 3AHMOV R3， 3BH ；取前一次溫度偏差值e(k1)MOV R2， 3CHLCALL CPL1LCALL DSUM ；求溫度偏差值e(k)MOV R5， 33H ；取KpMOV R4， 34HMOV R0， 46HLCALL MULT1 ；求KpΔe(k)MOV 44H， R7 ；存KpΔe(k)MOV 45H， R6MOV R5， 40HMOV R4， 41HMOV R3， 45HMOV R2， 44HLCALL DSUM ；求KpΔe(k)+ Kie(k)MOV 42H， R7 ；保存結(jié)果MOV 43H， R6MOV R5， 39H ；求KpΔe(k)*Δe(k)MOV R4， 3AHMOV R3， 3DHMOV R2， 3EHLCALL DSUM ；求e(k)+ e(k2)MOV R5， R7MOV R4， R6MOV R3， 3BHMOV R2， 3CHLCALL CPL1LCALL DSUM ；求Δe(k)*Δe(k)MOV R5， 37H ；取KdMOV R4， 38HMOV R0， 46HLCALL MULT1 ；KdΔe(k) *Δe(k)MOV R5， 41HMOV R4， 40HMOV R3， 42HMOV R2， 43HLCALL DSUM ；求U(k)MOV R5， 29HMOV R4， 30HMOV R3， R7MOV R2， R6LCALL DSUM ；求U(k1)MOV 29H， R7 ；U(k)送U(k1)MOV 30H， R6MOV 3DH， 3BH ；e(k1)送e(k2)MOV 3EH， 3CHMOV 3BH， 39H ；e(k)送e(k1)MOV 3CH， 3AHMOV PWM， R6 ；U(k)加載PWMRET雙字節(jié)加法子程序（R5R4）+（R3R2） （R7R6）DSUM： MOV A， R4ADD A， R7MOV R6， AMOV A， R5ADDC A， R3MOV R7， ARET雙字節(jié)求補碼子程序（R3R2）求補碼CPL1： MOV A， R2CPD AADD A， 1MOV R2， AMOV A， R3CPL AADDC A，