基于51单片机的双向晶闸管触发精选.pdf

基于51 单片机的双向晶闸管的导通实验 实验环境： Proteus 编程语言： 汇编 编程环境： KEIL 单片机：AT89C51 晶振： 12MHz 设计说明：本设计实现以下功能： 1、通过单片机控制晶闸管的触发信号，从而实现晶闸管的触发 2、通过七段数码管显示触发角大小 3、通过键盘操作调节晶闸管导通触发角，并控制显示的开关 仿真图： 图 （1）仿真效果图 图(2)交流电过零检测电路 图（3 ）数码管连接电路 图（4 ）晶闸管触发电路 图（5 ）键盘连接电路 图（6 ）单片机最小系统电路 图（7 ）系统总图 部分源程序: ORG 000H AJMP MAIN ORG 0003H ;外部中断0 中断程序入口 AJMP INT_0 ORG 000BH AJMP TMR0 ORG 001BH AJMP TMR1 ORG 0040H ;以上参看51 单片机中断系统介绍 MAIN: ACALL INIT;调用初始化子程序。 HERE: JNB FLAG1.7,HERE;100ms 不到不进行键盘扫描 CLRFLAG1.7;清标志位 HERE2:MOV A,P2;********有无按键扫描, ORL A,#70H; MOV P2,A MOV A,P2 ANL A,#70H XRLA,#70H JZ NKEY; MOV KTEMP,A AJMP HERE NKEY: JB KTEMP.KEY0,KSET;是SET 键，转处理程序 JB KTEMP.KEY1,KADD;加，转处理 JB KTEMP.KEY2,DISOC;显示开关键 AJMP KOUT;以上键都不是，不处理 KSET: INCSHIFT;根据SHIFT 的值做不同的处理 SETB FLAG1.3;按键状态标志位 SETB FLAG1.6;有键按下，开显示 CLREX0 ; 停止触发 MOV A,SHIFT CLRC SUBB A,#4;SHIFT 的范围是 1~4，大于4 归 0，即按四次SET 键保存设置退出按键模式 JC KOUT MOV SHIFT,#0 CLRFLAG1.3; MOV A,AERF;将导通角转化为时间单位 MOV R5,A MOV B,#9 DIVAB MOV B,#2 MUL AB MOV SCR,A SETB EX0 AJMP KOUT DISOC:MOV A,SHIFT;显示关程序,在按键调节状态无效 JNZ KOUT CPLFLAG1.6 AJMP KOUT KOUT: MOV KTEMP,#0;每次按键的结束要清该单元 AJMP SCRDIS ;*************************** KADD: MOV A,SHIFT;加处理程序 JZ KOUT