基于at89s52单片机控制红外线防盗报警器毕业论文.docVIP

PAGE 4 Dged 附录一 设计编程程序 1. 主程序清单如下： ORG 0000H LJMP MAIN ORG 0003H LJMP PINT0 ORG 0200H MAIN: MOV IE,#81H ;CPU开放中断，INT0允许中断 SETB IT0 ;外部中断为边沿触发方式 MOV SP,#30H ;指针入口地址 SETB P3.0 CLR P3.1 MOV P1,#0FFH ;使P1口全部置1 MOV P2,#00H ;P2口清零 CLR P1.2 LP: JNB P1.0,LA ;监测输入信号，是否有输入信号 LA: ACALL DELAY ;延时消抖 JNB P1.0,ALARM ;再次监测输入信号，若有输入信号转入报警子程序 AJMP LP DELAY:MOV R1,0AAH LD2:MOV R2,0BBH LD1:NOP DJNZ R2,LD1 DJNZ R1,LD2 RET ALARM:SETB P1.2 ;开始报警使运行正常绿指示灯熄灭，红灯