51单片机便携式输液点滴控制报警器

51单片机便携式输液点滴控制报警 该项目包括原理图电路图 程序源码 演示视频讲解文档全套资料 三分拿去 超值了 器

#include
#define uint unsigned int
#define uchar unsigned char
sbit beep = P2^0;

//步进电机步进数组
uchar code CCW[8]={0x800xc00x400x600x200x300x100x90};   //逆时钟旋转相序表
uchar code CWW[8]={0x900x100x300x200x600x400xc00x80};    //正时钟旋转相序表


uchar FZ=0;//0不转 1正转 2反转
uchar SD=0;//0，1，2，3，4速度级别
uchar BB=0; //步
//电机接口
#define JK P1

uchar qianbaishige;
uint speed = 0speed_tmp = 0;
uint num0num1;
uchar time_out = 0;
uchar code TAB[]={0xc00xcf0xa40xb00x990x920x820xf80x800x90};
uchar code TAB1[]={0xbf0x890xc70xa7};	 //三个依次是 - H L	 后面两个是温度符号
sbit wei1 = P2^1;    	 	//数码管位选
sbit wei2 = P2^2;
sbit wei3 = P2^3;
sbit wei4 = P2^4;
bit yyp=1;
uchar s1num=0; 
uint htemp=96ltemp=48;					//上下线初始化
void init（）;
void delayms（uint）;
void display（uchar speed_tmp）;
/****毫秒级延时函数*****/
sbit k1=P3^4;				//功能按键
sbit k2=P3^5;			  	// 增加键
sbit k3=P3^6;				//减少建
void delay（uint x）
{
  uint ij;
  for（i=x;i>0;i--）
     for（j=110;j>0;j--）;
}
void delay_T（uchar T）   //误差 0us
{
    uint ab;
    for（b=T*2+10;b>0;b--）
        for（a=12;a>0;a--）;
}

void di（）
{
	beep=0;
	delay（300）;
	beep=1;
}
//步进电机处理函数
void BJDJ（uchar FZuchar SD）
{
	if（FZ==1）
	{
		JK=CCW[BB];
		BB++;
		delay_T（SD*6）;
		if（BB==8）
		{
			BB=0;
		}
	}
	else if（FZ==2）
	{
		JK=CWW[BB];
		BB++;
		delay_T（SD*6）;
		if（BB==8）
		{
			BB=0;
		}
	}
	else
	{
		JK=0x00;
	}
}
/////////调最高调用的函数//////
void hdisplay（uchar dat）					
{	
	uchar fsfgfb;
	wei1=0;			  //符号“H-”
	P0=TAB1[1];
	delay（5）;
	wei1=1;
	P0=0xff;
	
	fb=dat/100;	
	fs=dat/10%10;
	fg=dat%10;						
	wei2=0;
	P0=TAB[fb];
	delay（5）;
	wei2=1;	
	P0=0xff;

	wei3=0;
	P0=TAB[fs];
	delay（5）;
	wei3=1;
	P0=0xff;

	wei4=0;
	P0=TAB[fg];
	delay（5）;
	wei4=1;		
	P0=0xff;
}
/////////调最低调用的函数//////
void ldisplay（uchar dat）					
{	
	uchar fsfgfb;
	wei1=0;			  //符号“L=”
	P0=TAB1[2];
	delay（2）;
	wei1=1;
	P0=0xff;

	fb=dat/100;
	fs=dat/10%10;
	fg=dat%10;
							
	wei2=0;
	P0=TAB[fb];
	delay（2）;
	wei2=1;	
	P0=0xff;	
		
	
	wei3=0;
	P0=TAB[fs];
	delay（2）;
	wei3=1;
	P0=0xff;

	wei4=0;
	P0=TAB[fg];
	delay（2）;
	wei4=1;	
	P0=0xff;	
}
/****按键扫描******/
void keyscan（）
{
	if（k1==0）
	{
		delay（10）;
		if（k1==0）
		{
			yyp=0;
			s1num++;
			while（!k1）;	//等待按键释放
			di（）;
		
			switch（s1num）
			{
				case 1:break;
				case 2:break;
				case 3:if（s1num==3）s1num=0;yyp=1;
						break;
			}

			 
		
		}
	}
	if（s1num!=0）
	{
		if（k2==0）
		{
			delay（10）;
			if（k2==0）
			{
			
				while（!k2）;	///等待按键释放
				di（）;
				switch（s1num）
        		{
					case 1: htemp++;
							if（htemp==999）htemp=0;
							hdisplay（htemp）;	
						
							break;
					case 2: ltemp++;
							if（ltemp==999）ltemp=0;
							ldisplay（ltemp）; 
						
				    		break;
				} 
			}
		}
		if（k3==0）
		{
			delay（10）;
			if（k3==0）
			{
			
				while（!k3）;		//等待按键释放
				di（）;
				switch（s1num）
        		{
					ca

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件       32282  2018-05-02 10:56  原理图.rar
     目录           0  2018-10-10 18:51  成品\
     目录           0  2018-05-02 17:15  成品\新建文件夹\
     目录           0  2018-05-02 17:11  成品\新建文件夹\原理图\
     目录           0  2018-05-02 17:11  成品\新建文件夹\原理图\99se原理图\
     文件      481280  2018-04-16 11:12  成品\新建文件夹\原理图\99se原理图\点滴测速.ddb
     文件       20082  2018-04-16 11:12  成品\新建文件夹\原理图\原理图.pdf
     文件     1564841  2018-05-02 17:15  成品\新建文件夹\基于单片机便携式输液点滴控制报警器.docx
     目录           0  2018-05-02 17:15  成品\新建文件夹\点滴输液仿真\
     文件       10810  2017-12-20 17:27  成品\新建文件夹\点滴输液仿真\按键模拟输液点滴.jpg
     文件      129687  2017-12-20 17:26  成品\新建文件夹\点滴输液仿真\点滴.DSN
     目录           0  2018-05-02 17:11  成品\新建文件夹\程序\
     目录           0  2018-05-02 17:11  成品\新建文件夹\程序\at 最终程序Ok\
     文件        1353  2015-08-09 14:17  成品\新建文件夹\程序\at 最终程序Ok\AT24C02.h
     文件         334  2011-09-25 22:09  成品\新建文件夹\程序\at 最终程序Ok\Data.h
     文件        4554  2015-08-09 14:10  成品\新建文件夹\程序\at 最终程序Ok\Ds1302.h
     文件        2378  2014-05-04 20:32  成品\新建文件夹\程序\at 最终程序Ok\eeprom.h
     文件         928  2011-09-25 21:07  成品\新建文件夹\程序\at 最终程序Ok\Key.h
     文件        1336  2016-09-05 11:39  成品\新建文件夹\程序\at 最终程序Ok\Lcd.h
     文件        4843  2018-01-12 14:52  成品\新建文件夹\程序\at 最终程序Ok\程序
     文件        5998  2017-11-21 12:13  成品\新建文件夹\程序\at 最终程序Ok\程序.c
     文件        3798  2018-01-12 14:52  成品\新建文件夹\程序\at 最终程序Ok\程序.hex
     文件          40  2018-01-12 14:52  成品\新建文件夹\程序\at 最终程序Ok\程序.lnp
     文件       16456  2018-01-12 14:52  成品\新建文件夹\程序\at 最终程序Ok\程序.LST
     文件       20641  2018-01-12 14:52  成品\新建文件夹\程序\at 最终程序Ok\程序.M51
     文件        7391  2018-01-12 14:52  成品\新建文件夹\程序\at 最终程序Ok\程序.OBJ
     文件        1420  2011-12-06 12:40  成品\新建文件夹\程序\at 最终程序Ok\程序.opt.bak
     文件         197  2018-05-02 17:10  成品\新建文件夹\程序\at 最终程序Ok\程序.plg
     文件        1662  2011-10-21 06:25  成品\新建文件夹\程序\at 最终程序Ok\程序.Uv2.bak
     文件       55347  2018-03-19 00:43  成品\新建文件夹\程序\at 最终程序Ok\程序.uvopt
     文件       13202  2015-08-09 13:46  成品\新建文件夹\程序\at 最终程序Ok\程序.uvproj
............此处省略50个文件信息