12-基于51单片机智能红外遥控电源电压调节系统源程序、原理图、元件清单实物制作

功能介绍：采用51单片机作为主控，LCD1602显示，通过红外接收来接收遥控器的按键指令，通过单片机识别解码，控制继电器打开对应通道的电压，采用的时3路输出开关电源，分别可以输出5V、12V、24V三路电压，通过红外遥控可以控制当前的电源输出哪路电压，方便电源电压切换，更加安全，文末有资料分享：

12-基于51单片机智能红外遥控可调电源电压调节系统（程序+原理图+元件清单全套资料）

程序部分展示，有中文注释，新手容易看懂
/********************************************************************
* 名称 : enable(uchar del)
* 功能 : 1602命令函数
* 输入 : 输入的命令值
* 输出 : 无
***********************************************************************/

void enable(uchar del)
{	
	RS = 0;
	RW = 0;
	LCD_DATA = del;
	E = 1;
	delay();
	E = 0;
	delay();
}

/********************************************************************
* 名称 : write(uchar del)
* 功能 : 1602写数据函数
* 输入 : 需要写入1602的数据
* 输出 : 无
***********************************************************************/

void write(uchar del)
{  
	RS = 1;
	RW = 0;
	LCD_DATA = del;
	E = 1;
	delay();
	E = 0;
	delay();
}

/********************************************************************
* 名称 : L1602_init()
* 功能 : 1602初始化，请参考1602的资料
* 输入 : 无
* 输出 : 无
***********************************************************************/
void lcd1602_init(void)
{
	enable(0x38);
	enable(0x0c);
	enable(0x06);
	enable(0x01);
	enable(0xd0);
}

/********************************************************************
* 名称 : L1602_char(uchar hang,uchar lie,char sign)
* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符显示"b" ，调用该函数如下
		 L1602_char(1,5,'b')
* 输入 : 行，列，需要输入1602的数据
* 输出 : 无
***********************************************************************/
void L1602_char(uchar hang,uchar lie,char sign)
{
	uchar a;
	if(hang == 1) a = 0x80;
	if(hang == 2) a = 0xc0;
	a = a + lie - 1;
	enable(a);
	write(sign);
}

/********************************************************************
* 名称 : L1602_string(uchar hang,uchar lie,uchar *p)
* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符开始显示"ab cd ef" ，调用该函数如下
	 	 L1602_string(1,5,"ab cd ef;")
* 输入 : 行，列，需要输入1602的数据
* 输出 : 无
***********************************************************************/
void L1602_string(uchar hang,uchar lie,uchar *p)
{
	uchar a;
	if(hang == 1) a = 0x80;
	if(hang == 2) a = 0xc0;
	a = a + lie - 1;
	enable(a);
	while(1)
	{
		if(*p == '\0') break;
		write(*p);
		p++;
	}
}

//显示整型的温湿度数据用，共占用4位，其中一位符号位

 下面是原理图文件展示：

 百度云盘资料分享链接