《keilc舵机的红外遥控.docx》由会员分享,可在线阅读,更多相关《keilc舵机的红外遥控.docx(7页珍藏版)》请在金锄头文库上搜索。
1、#include /*宏定义*/#define uchar unsigned char #define Imax 14000 /此处为晶振为11.0592时的取值, #define Imin 8000 /如用其它频率的晶振时,#define Inum1 1450 /要改变相应的取值。#define Inum2 700 #define Inum3 3000 /*位定义*/sbit dula = P26; sbit wela = P27;sbit pwm = P17 ; /PWM信号输出/*定义变量和数组*/uchar code table = 0x3f,0x06,0x5b,0x4f,0x66,0
2、x6d,0x7d,0x07, 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71; /数码管段码uchar Im4 = 0x00,0x00,0x00,0x00;uchar f;uchar IrOK;uchar jd; /角度标识uchar count; /0.5ms次数标识unsigned long m,Tc;/*/* 函数名称 : delay */* 函数描述 : 延时函数 */* 输入参数 : 无 */* 参数描述 : 无 */ /* 返回值 : 无 */*/void delay(uchar i) uchar j,k; for(j = i;j 0;j-) for
3、(k = 125;k 0;k-); /*/* 函数名称 : display */* 函数描述 : 显示函数函数 */* 输入参数 : 无 */* 参数描述 : 无 */ /* 返回值 : 无 */*/void display(void) unsigned char bai,shi,ge; switch(jd) /根据角度标识显示相应的数值 case 1: /为1,角度为0,前3个数码管显示000 bai = 0; shi = 0; ge = 0; break; case 2: /为2,角度为45,前3个数码管显示045 bai = 0; shi = 4; ge = 5; break; case
4、 3: /为3,角度为90,前3个数码管显示090 bai = 0; shi = 9; ge = 0; break; case 4: /为1,角度为135,前3个数码管显示135 bai = 1; shi = 3; ge = 5; break; case 5: /为5,角度为180,前3个数码管显示180 bai = 1; shi = 8; ge = 0; break; default: break; dula = 0; P0 = tablebai; dula = 1; dula = 0; wela = 0; P0 = 0xfe; wela = 1; wela = 0; delay(5); P
5、0 = tableshi; dula = 1; dula = 0; P0 = 0xfd; wela = 1; wela = 0; delay(5); P0 = tablege; dula = 1; dula = 0; P0 = 0xfb; wela = 1; wela = 0; delay(5);/*/* 函数名称 : intersvr1 */* 函数描述 : 外部中断解码程序 */* 输入参数 : 无 */* 参数描述 : 无 */ /* 返回值 : 无 */*/void intersvr1(void) interrupt 2 using 1Tc = TH0 * 256 + TL0; /提取中断时间间隔时长TH0 = 0; TL0 = 0; /定时中断重新置零if(Tc Imin) & (Tc Inum1 & Tc 1 | 0x80; m+; if(Tc Inum2 & Tc 1; m+; /取码if(m = 32) m = 0; f = 0; if(Im2 = Im3) IrOK =1 ; else IrOK = 0; /取码完成后判断读码是否正确 /*/* 函数名称 : Inf_Dispose */* 函数描述 : 红外接收处理函数 */* 输入参数 : 无 */* 参数描述 : 无