真正的萬(wàn)能紅外學(xué)習(xí)與發(fā)射單片機(jī)程序

ID:773929 · 發(fā)表于 2023-8-9 11:23

無(wú)需外圍38KHZ晶振，STC8H系列芯片按道理都能用，萬(wàn)能接受，萬(wàn)能發(fā)射，EEPROM存儲(chǔ)數(shù)據(jù)，暫時(shí)只能存一個(gè)碼，串口輸出信息，按下遙控器按鍵，發(fā)送02可顯示剛剛收到的信息并保存，發(fā)送10可發(fā)射剛剛保存的數(shù)據(jù)，本人新手，程序有些亂，但有注釋，因?yàn)閯倓傋龀鰜?lái)所以并不完善，還請(qǐng)大佬多多指教！
紅外發(fā)射接P11，接受接P20。
原始波形:

經(jīng)過(guò)學(xué)以后發(fā)射的波形:

單片機(jī)源程序如下:

#include "stc8H.h"
#include "intrins.h"
#include <stdio.h>
#include "uart.h"
#include "eeprom.h"
#include "launch.h"
extern char ch;
int ir1 = 0x0400;
unsigned short xdata captures[VAL] = {0},eep_captures[VAL] = {0}; //緩存數(shù)組
static unsigned int num = 0; //一共接受了幾個(gè)脈沖
unsigned int two_num;
static unsigned int Overflow = 0; //溢出次數(shù)
static unsigned char val; //接收超時(shí)變量
void Timer0_Init(void) //1毫秒@24.000MHz，定時(shí)器0
{
AUXR |= 0x80;
TMOD &= 0xF0; //設(shè)置定時(shí)器模式
// TL0 = 0x90; //設(shè)置定時(shí)初始值
// TH0 = 0xE8; //設(shè)置定時(shí)初始值
TL0 = 0x40; //設(shè)置定時(shí)初始值
TH0 = 0xA2; //設(shè)置定時(shí)初始值
TF0 = 0; //清除TF0標(biāo)志
TR0 = 1; //定時(shí)器0開(kāi)始計(jì)時(shí)
ET0 = 1;
}
void IR() //初始化
{
P1M0 = 0x00;
P1M1 = 0x00;
P3M0 = 0x00;
P3M1 = 0x00;
P5M0 = 0x00;
P5M1 = 0x00;
P_SW2 = 0x80;
PWM1_PS = 0x05;
//(CC1捕獲TI1上升沿,CC2捕獲TI1下降沿)
PWMA_CCER1 = 0x00;
PWMA_CCMR1 = 0x01; //CC1為輸入模式,且映射到TI1FP1上
PWMA_CCMR2 = 0x02; //CC2為輸入模式,且映射到TI1FP2上
PWMA_CCER1 = 0x11; //使能CC1/CC2上的捕獲功能
PWMA_CCER1 |= 0x00; //設(shè)置捕獲極性為CC1的上升沿
PWMA_CCER1 |= 0x20; //設(shè)置捕獲極性為CC2的下降沿
PWMA_CR1 = 0x01;
PWMA_PSCR = 0x09;
PWMA_IER = 0x04; //使能CC2捕獲中斷
PWMA_IER |= 0x02; //使能CC1捕獲中斷
EA = 1;
}
void PWMA_ISR() interrupt 26 //PWM沿觸發(fā)中斷
{
unsigned int cnt_l;
unsigned int cnt_h;
if (PWMA_SR1 & 0x02)
{
PWMA_SR1 &= ~0x02;
cnt_l = (PWMA_CCR1 - PWMA_CCR2)/24; //差值即為低電平寬度 cnt/時(shí)鐘頻率 = 脈寬(us)
captures[num++] = cnt_l;
}
if (PWMA_SR1 & 0x04)
{
PWMA_SR1 &= ~0x04;
cnt_h = (PWMA_CCR2 - PWMA_CCR1)/24; //差值即為高電平寬度
captures[num++] = cnt_h;
}
}
void TM0_Isr() interrupt 1 //定時(shí)器0中斷用來(lái)判斷脈沖接受是否超時(shí)，大于30ms為超時(shí)
{
if(P20 == 1)
{
val++;
if(val > 30)
{
Overflow = 1;
val = 0;
}
}else {val = 0;Overflow = 0;}
}
void UartReceiveHandler() interrupt 4 {
if (RI) { // 接收中斷
RI = 0; // 清除接收標(biāo)志位
ch = SBUF; // 讀取接收到的數(shù)據(jù)
//UartSend(ch); // 原樣返回接收到的數(shù)據(jù)
}
}
void TM3_Isr() interrupt 19 //定時(shí)器3中斷發(fā)生38K載波
{
P11 = !P11; //紅外1端口
}
//---------------------------------------------------------------------------------------------
void main()
{
unsigned int i = 0,a = 0;
Timer0_Init();
Timer3_Init();
UartInit();
IR();
UartSendString("Starting\r\n");
lach1 = 1;
while(1)
{
//lach1 = 1;
if(Overflow == 1 && ch == 0x02)//如果超時(shí)溢出,并且接收到0x02
{
EraseUIntFromEEPROM(0x0400);
EraseUIntFromEEPROM(0x0600);
delays(5);
EraseUIntFromEEPROM(0x0000);
delays(5);
for(i = 0; i <= num; i++)
{
SaveUIntToEEPROM(ir1+i*2, captures[i]); //寫(xiě)入eeprom
//SaveUIntToEEPROM(ir1+i*2, '3'); //寫(xiě)入eeprom
UartSendUint(captures[i]);//打印保存到數(shù)組里的數(shù)據(jù)
captures[i] = 0;
delays(1);
}
SaveUIntToEEPROM(0x0000, num); //將脈沖個(gè)數(shù)寫(xiě)入eeprom
UartSendString("End\r\n"); /*End結(jié)束*/
UartSendUint(num);
ir1 = 0x0400;
ch = 0;
num = 0;
Overflow = 0;
PWMA_IER = 0; //關(guān)閉PWM中斷使能
ET0 = 0; //關(guān)閉定時(shí)器0中斷
}else if(P20 == 0 && Overflow==0){
PWMA_IER = 0x06; //打開(kāi)PWM中斷使能
ET0 = 1; //打開(kāi)定時(shí)器0中斷
}
if(ch == 0x01)
{
two_num = ReadUIntFromEEPROM(0x0000);
for(a = 0;a<=two_num;a++) //讀取紅外接收數(shù)組
{
eep_captures[a] = ReadUIntFromEEPROM(ir1+a*2);
UartSendUint(eep_captures[a]);//打印保存到數(shù)組里的數(shù)據(jù)
delays(1);
}
UartSendUint(two_num);
ir1 = 0x0400;
two_num = 0;
ch = 0x00;
}
if(ch == 0x10)
{
two_num = ReadUIntFromEEPROM(0x0000);
for(a = 0;a<=two_num;a++) //讀取紅外接收數(shù)組
{
eep_captures[a] = ReadUIntFromEEPROM(ir1+a*2);
UartSendUint(eep_captures[a]);//打印保存到數(shù)組里的數(shù)據(jù)
delays(1);
}
Launch_1(eep_captures,two_num);
ch = 0;
}
}
}
單片機(jī)源程序如下:
[code]#include "stc8H.h"
#include "intrins.h"
#include <stdio.h>
#include "uart.h"
#include "eeprom.h"
#include "launch.h"
extern char ch;
int ir1 = 0x0400;
unsigned short xdata captures[VAL] = {0},eep_captures[VAL] = {0}; //緩存數(shù)組
static unsigned int num = 0; //一共接受了幾個(gè)脈沖
unsigned int two_num;
static unsigned int Overflow = 0; //溢出次數(shù)
static unsigned char val; //接收超時(shí)變量
void Timer0_Init(void) //1毫秒@24.000MHz，定時(shí)器0
{
AUXR |= 0x80;
TMOD &= 0xF0; //設(shè)置定時(shí)器模式
// TL0 = 0x90; //設(shè)置定時(shí)初始值
// TH0 = 0xE8; //設(shè)置定時(shí)初始值
TL0 = 0x40; //設(shè)置定時(shí)初始值
TH0 = 0xA2; //設(shè)置定時(shí)初始值
TF0 = 0; //清除TF0標(biāo)志
TR0 = 1; //定時(shí)器0開(kāi)始計(jì)時(shí)
ET0 = 1;
}
void IR() //初始化
{
P1M0 = 0x00;
P1M1 = 0x00;
P3M0 = 0x00;
P3M1 = 0x00;
P5M0 = 0x00;
P5M1 = 0x00;
P_SW2 = 0x80;
PWM1_PS = 0x05;
//(CC1捕獲TI1上升沿,CC2捕獲TI1下降沿)
PWMA_CCER1 = 0x00;
PWMA_CCMR1 = 0x01; //CC1為輸入模式,且映射到TI1FP1上
PWMA_CCMR2 = 0x02; //CC2為輸入模式,且映射到TI1FP2上
PWMA_CCER1 = 0x11; //使能CC1/CC2上的捕獲功能
PWMA_CCER1 |= 0x00; //設(shè)置捕獲極性為CC1的上升沿
PWMA_CCER1 |= 0x20; //設(shè)置捕獲極性為CC2的下降沿
PWMA_CR1 = 0x01;
PWMA_PSCR = 0x09;
PWMA_IER = 0x04; //使能CC2捕獲中斷
PWMA_IER |= 0x02; //使能CC1捕獲中斷
EA = 1;
}
void PWMA_ISR() interrupt 26 //PWM沿觸發(fā)中斷
{
unsigned int cnt_l;
unsigned int cnt_h;
if (PWMA_SR1 & 0x02)
{
PWMA_SR1 &= ~0x02;
cnt_l = (PWMA_CCR1 - PWMA_CCR2)/24; //差值即為低電平寬度 cnt/時(shí)鐘頻率 = 脈寬(us)
captures[num++] = cnt_l;
}
if (PWMA_SR1 & 0x04)
{
PWMA_SR1 &= ~0x04;
cnt_h = (PWMA_CCR2 - PWMA_CCR1)/24; //差值即為高電平寬度
captures[num++] = cnt_h;
}
}
void TM0_Isr() interrupt 1 //定時(shí)器0中斷用來(lái)判斷脈沖接受是否超時(shí)，大于30ms為超時(shí)
{
if(P20 == 1)
{
val++;
if(val > 30)
{
Overflow = 1;
val = 0;
}
}else {val = 0;Overflow = 0;}
}
void UartReceiveHandler() interrupt 4 {
if (RI) { // 接收中斷
RI = 0; // 清除接收標(biāo)志位
ch = SBUF; // 讀取接收到的數(shù)據(jù)
//UartSend(ch); // 原樣返回接收到的數(shù)據(jù)
}
}
void TM3_Isr() interrupt 19 //定時(shí)器3中斷發(fā)生38K載波
{
P11 = !P11; //紅外1端口
}
//---------------------------------------------------------------------------------------------
void main()
{
unsigned int i = 0,a = 0;
Timer0_Init();
Timer3_Init();
UartInit();
IR();
UartSendString("Starting\r\n");
lach1 = 1;
while(1)
{
//lach1 = 1;
if(Overflow == 1 && ch == 0x02)//如果超時(shí)溢出,并且接收到0x02
{
EraseUIntFromEEPROM(0x0400);
EraseUIntFromEEPROM(0x0600);
delays(5);
EraseUIntFromEEPROM(0x0000);
delays(5);
for(i = 0; i <= num; i++)
{
SaveUIntToEEPROM(ir1+i*2, captures[i]); //寫(xiě)入eeprom
//SaveUIntToEEPROM(ir1+i*2, '3'); //寫(xiě)入eeprom
UartSendUint(captures[i]);//打印保存到數(shù)組里的數(shù)據(jù)
captures[i] = 0;
delays(1);
}
SaveUIntToEEPROM(0x0000, num); //將脈沖個(gè)數(shù)寫(xiě)入eeprom
UartSendString("End\r\n"); /*End結(jié)束*/
UartSendUint(num);
ir1 = 0x0400;
ch = 0;
num = 0;
Overflow = 0;
PWMA_IER = 0; //關(guān)閉PWM中斷使能
ET0 = 0; //關(guān)閉定時(shí)器0中斷
}else if(P20 == 0 && Overflow==0){
PWMA_IER = 0x06; //打開(kāi)PWM中斷使能
ET0 = 1; //打開(kāi)定時(shí)器0中斷
}
if(ch == 0x01)
{
two_num = ReadUIntFromEEPROM(0x0000);
for(a = 0;a<=two_num;a++) //讀取紅外接收數(shù)組
{
eep_captures[a] = ReadUIntFromEEPROM(ir1+a*2);
UartSendUint(eep_captures[a]);//打印保存到數(shù)組里的數(shù)據(jù)
delays(1);
}
UartSendUint(two_num);
ir1 = 0x0400;
two_num = 0;
ch = 0x00;
}
if(ch == 0x10)
{
two_num = ReadUIntFromEEPROM(0x0000);
for(a = 0;a<=two_num;a++) //讀取紅外接收數(shù)組
{
eep_captures[a] = ReadUIntFromEEPROM(ir1+a*2);
UartSendUint(eep_captures[a]);//打印保存到數(shù)組里的數(shù)據(jù)
delays(1);
}
Launch_1(eep_captures,two_num);
ch = 0;
}
}
}

復(fù)制代碼

原理圖:無(wú)
仿真:無(wú)
程序:

8路紅外.zip (125.01 KB, 下載次數(shù): 64)

ID:433219 · 發(fā)表于 2023-8-9 16:32

，發(fā)送02可顯 --->pc上，stc-isp軟件向mcu串口發(fā)送？？？

ID:276663 · 發(fā)表于 2023-8-9 17:41

實(shí)物靚照呢

ID:773929 · 發(fā)表于 2023-8-10 08:43

wkman 發(fā)表于 2023-8-9 16:32
，發(fā)送02可顯 --->pc上，stc-isp軟件向mcu串口發(fā)送？？？

向mcu發(fā)

ID:773929 · 發(fā)表于 2023-8-10 08:47

IdeaMing 發(fā)表于 2023-8-9 17:41
實(shí)物靚照呢

才剛調(diào)好一路，板子焊接的爛，沒(méi)好意思發(fā)

ID:276663 · 發(fā)表于 2023-8-10 11:06

范莉萍發(fā)表于 2023-8-10 08:47
才剛調(diào)好一路，板子焊接的爛，沒(méi)好意思發(fā)

現(xiàn)在學(xué)習(xí)型遙控器只要一個(gè)發(fā)射燈就能實(shí)現(xiàn)學(xué)習(xí)了，有沒(méi)有搞清楚原理

ID:773929 · 發(fā)表于 2023-8-10 11:50

IdeaMing 發(fā)表于 2023-8-10 11:06
現(xiàn)在學(xué)習(xí)型遙控器只要一個(gè)發(fā)射燈就能實(shí)現(xiàn)學(xué)習(xí)了，有沒(méi)有搞清楚原理

8路發(fā)射對(duì)應(yīng)的是8個(gè)位置，比如八間屋子

ID:256970 · 發(fā)表于 2023-8-10 14:45

IdeaMing 發(fā)表于 2023-8-10 11:06
現(xiàn)在學(xué)習(xí)型遙控器只要一個(gè)發(fā)射燈就能實(shí)現(xiàn)學(xué)習(xí)了，有沒(méi)有搞清楚原理

發(fā)射頭是可以接收的，只是接收到的信號(hào)較弱，只能近距離接收

ID:773929 · 發(fā)表于 2023-8-10 15:36

藍(lán)色海陽(yáng) 發(fā)表于 2023-8-10 14:45
發(fā)射頭是可以接收的，只是接收到的信號(hào)較弱，只能近距離接收

��？這么吊

ID:1099505 · 發(fā)表于 2024-3-12 07:24

真不錯(cuò)，學(xué)習(xí)了。

ID:235438 · 發(fā)表于 2024-3-20 00:21

我都用定時(shí)器來(lái)做,還不會(huì)用捕獲,代碼收了,回頭試試看

ID:777254 · 發(fā)表于 2025-2-27 16:48

樓主做完萬(wàn)能學(xué)習(xí)型紅外方案了嗎？可不可以指導(dǎo)一下，不白嫖

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

真正的萬(wàn)能紅外學(xué)習(xí)與發(fā)射 單片機(jī)程序

評(píng)分

真正的萬(wàn)能紅外學(xué)習(xí)與發(fā)射單片機(jī)程序