资源描述：
《程序说明此文档是该系统操作运行的所有程序，所提供的程.doc》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。
1、程序说明：此文档是该系统操作运行的所有程序，所提供的程序均在DICE-51单片仿真机上调试仿真，并已经全部通过。源程序：ORG0000HAJMPMAINORG0003HAJMPKEYSORG000BHAJMPPTT0ORG001BHAJMPPTT1;中断入口及优先级MAIN:MOVSP,#60HCLR5EHCLR5FH;清上、下限越限标志MOVA,#00HMOVR7,#09HMOVR0,#28HLP1:MOV@R0,AINCR0DJNZR7,LP1MOVR7,#06HMOVR0,#39HLP2:MOV@R0
2、,AINCR0DJNZR7,LP2;清变量暂存单元MOVR7,#06HMOVR0,#50HLP3:MOV@R0,AINCR0DJNZR7,LP3;清显示缓冲区MOV33H,#HMOV34H,#H;赋Kp高、低字节MOV35H,#HMOV36H,#H;赋Ki高、低字节MOV37H,#HMOV38H,#H;赋Kd高、低字节MOV42H,#HMOV43H,#H;赋K高、低字节（风扇参数）MOVTMOD,#56H;T0方式2，T1方式1计数MOVTL0,#06HMOVTH0,#06H;T0赋初值MOV25H，#28
3、H;设定值默认为40摄氏度SETBTR0;键盘高优先级SETBET0SETBEX0SETBEA;开键盘、T0、T1中断LOOP:MOVR0,#56HMOVR1,#55HLCALLSCACOV;调用标度转化-BCD转化子程序MOVR0,#53HLCALLDIRNOPLCALLDLY10MSNOPLCALLDLY10MSAJMPLOOP;等待中断，循环显示当前温度;**************************************************************************
4、**KEYS:CLREX0;[键盘子程序]CLREAPUSHPSWPUSHACC;关中断，压栈LCALLDLY10MS;消抖CC:JBP3.2,AASETB5DH;置“显示设定温度”标志MOVA,25H;取运算位的值(默认为40度)MOVB,#10;进行BCD码转化DIVABMOV52H,AMOVA,BMOV51H,AMOVR0,#50HLCALLDIR;显示设定温度NOPLCALLDLY10MSNOPLCALLDLY10MSJBP1.7,BBMOVR1,#25HLCALLDAAD1;加一操作NOPLCAL
5、LDLY10MSAJMPCCBB:JBP1.6,CCMOVR1,#25HLCALLDEEC1;减一操作NOPLCALLDLY10MSAJMPCCAA:POPACCPOPPSWSETBEX0SETBEA;出栈，开中断RETI;**************************************************************************** ［显示子程序］DIR:MOVSCON,#00H;置串行口移位寄存器状态SETBP1.4;开显示JB5DH
6、,DL1;显示设定温度则转DL2:MOVDPTR,#SEGTDL0:MOVA,@R0MOVCA,@A+DPTRMOVSBUF,ALOOP1:JNBTI,LOOP1CLRTIINCR0MOVA,@R0MOVCA,@A+DPTRANLA，#7FH;使个位带小数点MOVSBUF,ALOOP2:JNBTI,LOOP2CLRTIINCR0MOVA,@R0MOVCA,@A+DPTRMOVSBUF,ALOOP3:JNBTI,LOOP3CLRTICLRP1.4CLR5DHRETDL1:MOV50H,#0AH;使小数位黑屏A
7、JMPDL2SEGT:DB0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH;****************************************************************************DAAD1:MOVA,#00H;［加1子程序］ORLA,@R1ADDA,#01HCJNEA,#5AH,DAAD2;判断超过90度了吗？DAAD3:MOV@R1,ADAA:RETDAAD2:JCDAAD3MOV@R1,#28H;超过90
8、度则回到40度AJMPDAA;***************************************************************************DEEC1:MOVA,@R1;［减1子程序］DECACJNEA,#28H,DEEC2;判断低于40度了吗？DEEC3:MOV@R1,ADEE:RETDEEC2:JNCDEEC3MOV@R1,#5AH;低于40度则回到90度AJMPDEE
