工业顺序控制实验实验报告及程序

1、 实验四工业顺序控制实验主程序:姓名_专业通信工程学号成绩一、实验目的掌握工业顺序控制程序的简单编写和中断的使用。二、实验仪器与设备1.微机一台2.KeilC51集成开发环境3.Proteus仿真软件三、实验内容用Proteus画出仿真电路图。8031的P1.0P1.6控制注塑机的七道工序，现模拟控制七只发光二级管的点亮，高电平有效，设定每道工序时间转换为延时，K1为开工启动开关，低电平启动。K2为外故障输入模拟开关，P3.3输入为零时不断警告，P1.7为报警声音输出。参考电路见后面仿真原理图；P1.7报警输出时要求采取双音报警，请自行准备耳机。四、实验原理（包含程序框图）在工业控制中，像冲压

2、、注塑、轻纺、制瓶等生产过程，都是一些断续生产过程，按某种程序有规律地完成预定的动作，对这类断续生产过程的控制称顺序控制，例注塑机工艺过程大致按“合模注射延时开模产伸产退”顺序动作，用单片机最易实现。实验中应注意：实验中模拟外故障输入用外部中断1，初始化程序中需开中断。未开工时（K1未按下），按下K2不能有报警输出。实验程序框图：中斷-pin.pm口初始化pi口全低等开工工序1延时工序2延时五、实验步骤1.2.用Pro在Kei后，与六、.7.teus设计工业顺序控制电路；lC51中编写控制程序，编译通过ProteuK1开关拨在在上面;方式运行程序，此时应在等待开用连续工状态；K1

3、拨至下面（显低电平），各道工序应正常运行；K2拨至下面（低电平）,应有声音报警（人为设置故障）；K2拨至上面（高电平），即排除故障，程序应从刚才报警的那道工序继续执行。电路设计及调试（程序）1.实验电路仿真原理图C1V5+22uFV5+while(l)P1.01P1.12P1.23P1.34P1.45P1.56P1.678XTAL1XTAL2RSTPSENALEEAP1.0/T2P1.1/T2EXP1.2P1.3P1.4P1.5P1.690-123-3P0.0/ADOP0.1/AD1P0.2/AD3P0.3/AD3P0.4/AD4P0.5/AD5P0.6/AD6P0.7/AD7P2.0/A8P

4、2.1/A9P2.2/A10P2.3/A11P2.4/A12P2.5/A13P2.6/A14P2.7/A15P3.0/RXDP3.1TTXDP3.2/INT(P3.3/INT-P3.4/TCP3.5/T1P3.6/WFif(kl=0&k2=0)for(i=0;i200;i+)D2R3DelyUs2x(200);SPK=!DSPK；R5D5R6if(k2!=0)50break;D6R7A1Y118/SPK=0;/防止一直给喇叭通电造成损坏850for(i=0;i200;i+)DelayMs(l);SPK=!SPK;U2:B11.0A013-1A015-2A；173A319OE74LS240Y0Y

5、1Y2Y39753AT89C52NET=P1.13JiS?2.程序设计与调试/*中断方式程序*/#include#defineucharunsignedchar#defineuintunsignedintucharcodetable=0 x01,0 x02,0 x04,0 x08,0 x10,0 x20,0 x40;uchari=0,j;sbitSPK二P7;sbitkl二P34;sbitk2=P33;voidDelayUs2x(unsignedchart);/函数声明voidDelayMs(unsignedintt);/*主函数*/voidINT_l()interrupt2EXl=0;Del

6、ayMs(20);EXl=l;/SPK=l;U2:A囂5A0yoP6.681OE74LS240*+5Vif(k2!=0)break;voidmain()Pl=0;/kl=0 xff;/k2=0 xff;EA=l;EXl=l;ITl=l;while(l)if(kl=0)Pl=tablej+;DelayMs(l000);if(j=7)j=0;voidDelayUs2x(unsignedchart)while(-t);voidDelayMs(unsignedintt)while(t-)/大致延时1mSDelayUs2x(245);DelayUs2x(245);/*定时器方式程序*/#include#

7、defineucharunsignedchar#defineuintunsignedintucharcodetable=0 x01,0 x02,0 x04,0 x08,0 x10,0 x20,0 x40;uinti=0,j=0,k=0;sbitSPK二P7;sbitkl二P34;sbitk2=P33;voiddelay(uintc)uinta,b;for(;c0;c-)for(b=l42;b0;b-)for(a=2;a0;a-);voidINT_l()interrupt2EXl=0;delay(20);EXl=l;TR0=l;while(kl=0&k2=0)for(i=0;i200;i+)TH

8、0=(65536-l000)/256;TL0=(65536-l000)%256;while(TF0=0);SPK=!SPK;TF0=0;for(k=0;k200;k+)TH0=(65536-2000)/256;TL0=(65536-2000)%256;while(TF0=0);SPK=!SPK;TF0=0;voidmain()TMOD=0 x0l;EA=l;EXl=l;ITl=l;Pl=0;while(l)if(kl=0)delay(20);if(kl=0)Pl=tablej+;delay(200);if(j=7)j=0;调试过程：程序编译连接后，加到单片机上运行，出现问题时按下按键进行单步调试，在语句前加断点进行调试，一发现问题所在。分别按下kl、k2键看是否达到预期效果。实验结果：K1按下时二极管单管依次点亮，当K2按下时，二极管停在当前状态，双音报警响起，此时若松开K1,报警停止；松开K2,二极管从原来报