包装及项实验报告.docVIP

包装机实验报告 一 问题描述 设计一个工业包装流水线用来传送带输送产品，当传送带传输六个产品后，传送带停止工作，打包机开始工作。打包停止后继续工作. 二 算法描述 以DI1灯的亮灭控制程序的开始与结束； 其他灯的遮挡均可模拟代替传送带上物品的通过； 以DO上的2红灯闪烁表示打包机工作 读入输入端口的值，若DI1灯被遮挡则开始工作； 当程序开始后，以遮挡代替物品通过，DI2灯被遮挡复原一次则记两次数（遮挡或复原时，DO2灯会闪烁一次）； 当计数满12(即通过6个货物)后，传送带停止，打包机开始工作（DO2至6灯循环闪烁4次，表示打包进行中）； 当上述步骤进行完了之后打包机停止工作，打包完的箱数+1； 重新读入输入端口的值，若DI1灯被遮挡则继续工作，否则退出。 三 程序流程图 四 源程序 int BASE_ADDRESS=0x220; int creat_DI(int *DI_NUM, int num) { int i=0; for(i=0;i6;i++) DI_NUM[i]=(numi)0x0001; return; }/*输入信号转换成二进制数组*/ int creat_DO(int *DO_NUM) { int temp=0; int i=0; for(i=5;i0;i--) { temp=(temp+DO_NUM[i])*2; } return temp+DO_NUM[0]; }/*输出转化成二进制*/ main() { int DO[6]={0},DI[6]={1}; int num=0; int DI_out,t; int j=0,k,q=1,c,DO_out; clrscr(); printf(please turn on down 1to start!\n) ;/*提示打开开关*/ sleep(5); DI_out=inportb(BASE_ADDRESS+6); creat_DI(DI,DI_out); while(!DI[0])/*判断开关是否打开*/ { DO[0]=1;/*DO1灯亮，开关开启*/ DO_out=creat_DO(DO); outportb(BASE_ADDRESS+13,DO_out); DI_out=inportb(BASE_ADDRESS+6); creat_DI(DI,DI_out); t=DI[1];/*第一次DI2等输入值*/ while(1) { DI_out=inportb(BASE_ADDRESS+6); creat_DI(DI,DI_out); if(t!=DI[1])/*第二次输入值与第一次输入值相比较，判断是否有货物经过*/ { j=j+1; outportb(BASE_ADDRESS+13,3); delay(500000); outportb(BASE_ADDRESS+13,1); } t=DI[1]; if(j/2==6){/*判断是否够6个货物*/ num=num+1; j=0; printf(paking!\n); for(q=0;q4;q++)/*连续闪烁4次*/ { outportb(BASE_ADDRESS+13,3);