按键控制PWM波程序

// Description: //通过按键改变PWM波的占空比，并用LCD1602
// 显示大致的占空比。按键短按一次加减1次，长按连续加减。
// 此程序用于恒流电路的测试。
//******************************************************************************
//main.c

#include
#include
#include"pwm.h"
#include"key.h"
#include"lcd1602.h"
__CONFIG(0x3739);

uchar Keyval = 0;

/*------------------------*/
void Init_port();
void Key_Process();

/*-------- 主函数--------*/
void main(void)
{

INTCON =0x00; //关总中断
PIE1=0;
Init_port();
Init_LCD() ;
Init_PWM();
GIE=1; //开总中断，使能所以高优先级中断
while(1)
{
Key_Process();
}

}

/*============================================
函数名称：Init_port
功 能：初始化I/O端口
参 数：无
返回值 ：无
==============================================*/
void Init_port()
{ OPTION=0;
ADCON1=0X07; //设置A口为普通I/O口
TRISA=0x00; //控制口A设为输出状态
TRISD = 0X00; //数据口为输出状态
PORTD = 0;
TRISC = 0XF0; //设置RC0~RC3为输CHU状态，RC4~RC7为输RU
PORTC = 0;

//定义按键端口
TRISB=0X1F; //设置B口低5位为输入

}

/*******************************************
函数名称：Key_Process
功 能：根据按键值执行任务
参 数：无
返回值 ：无
********************************************/
void Key_Process()
{
static uchar CNT=0;
static uchar CNT1=5;
uchar keyvalue;


keyvalue = Key_Scan();
Keyval = 0;


if(keyvalue == 1) //占空比加1%
{
CCPR1L += 0x02;
CNT++;
if(CNT>9)
{
CNT1++;
CNT=0;
}
Disp1Char(8,0,CNT1+0x30);
Disp1Char(9,0,CNT+0x30) ;

}
if(keyvalue == 2) //占空比减1%
{
CCPR1L -= 0x02;
CNT--;
Disp1Char(8,0,CNT1+0x30);
Disp1Char(9,0,CNT+0x30) ;

if(CNT==0)
{
CNT1--;
CNT = 0x0a;
}


}

}

//key.h

#include
#include

#define uchar unsigned char
#define keyin (PORTB&0x1f)

//------------------------------------------------
//延时程序
void delay40ms() //延时程序
{
int i,j; //定义整形变量
for(i=10;i>0;i--)
{
for(j=1000;j>0;j--);
}
}

//------------------------------------------------
//按键扫描程序
uchar Key_Scan()
{
extern uchar Keyval; //初始化按键扫描结果，无按键按下时的结果

if( keyin != 0x1f )
{
delay40ms();
if( keyin != 0x1f)
{
if(RB0==0) //判断B0是否按下
Keyval=1;
if(RB1==0) //判断B1是否按下
Keyval=2;
if(RB2==0) //判断B2是否按下
Keyval=3;
if(RB3==0) //判断B3是否按下
Keyval=4;
if(RB4==0) //判断B4是否按下
Keyval=5;
}

}

return Keyval;
}

//pwm.h

#include
#include

/*============================================
函数名称：Init_PWM
功 能：初始化定时器A，产生PWM波
参 数：无
返回值 ：无
==============================================*/
void Init_PWM()
{

PR2=0xff; //PWM Period=(PR2+1)*4*Tosc*(TMR2前分频值)
//占空比50%
CCPR1L=0x7f;
CCP1CON = 0x2C; //CCP1模块为PWM工作方式

TRISC = 0xF0; //设置RC2为输出
T2CON = 0x04; //打开TMR2，且使其前分频为1，同时开始输出PWM波形
CCP1IE =0; //CCP1中断禁止
}

//lcd1602.h

#include
#include

#define uint unsigned int
#define uchar unsigned char

//定义MCU与LCD的接口
/**************宏定义***************/
#define Busy 0x80
#define CLR_RS RA1=0 //RS = RA1
#define SET_RS RA1=1
#define CLR_RW RA2=0 //RW = RA2
#define SET_RW RA2=1
#define CLR_EN RA3=0 //EN = RA3
#define SET_EN RA3=1

/*******************************************
函数名称：Delayus
功 能：延时Nus
参 数：无
返回值 ：无
********************************************/
/*void Delayus(uint N)
{
while (N != 0)
{
N--;
}
}*/
/*******************************************
函数名称：WaitForEnable
功 能：等待1602液晶完成内部操作
参 数：无
返回值 ：无
********************************************/
void WaitForEnable(void)
{
TRISD=0XFF; //将PORTD口切换为输入状态

CLR_RS;
SET_RW;
asm("nop");
SET_EN;
asm("nop");
asm("nop");
while((PORTD & Busy)!=0); //检测忙标志
CLR_EN;
TRISD=0X00; //将PORTD口切换为输出状态
}
/*******************************************
函数名称：write_cmd
功 能：向液晶模块写入命令
参 数：com--命令，
返回值 ：无
********************************************/
void write_cmd(unsigned char com)
{
WaitForEnable(); //等待液晶不忙
CLR_RS ; //RS=0,RW=0,写指令
CLR_RW;
asm("nop");
PORTD = com;
asm("nop");
SET_EN ;
asm("nop");
asm("nop");
CLR_EN;
}

/*******************************************
函数名称：write_data
功 能：向液晶显示的当前地址写入显示数据
参 数：data--显示字符数据
返回值 ：无
********************************************/
void write_data(unsigned char data)
{
WaitForEnable(); //等待液晶不忙
SET_RS; //RS=1,RW=0，写数据
CLR_RW;
asm("nop");
PORTD = data;
asm("nop");
SET_EN ; //产生负脉冲
asm("nop");
asm("nop");
CLR_EN ;
}

/*============================================
函数名称：Init_LCD
功 能：初始化液晶
参 数：无
返回值 ：无
==============================================*/
void Init_LCD()
{

write_cmd(0x38); //规定的复位操作
asm("nop");
asm("nop");
write_cmd(0x38);
asm("nop");
asm("nop");
write_cmd(0x38);
asm("nop");
asm("nop");

write_cmd(0x38);//16×2显示，5×7点阵，8位数据接口
write_cmd(0x08);//关闭显示
write_cmd(0x01);//清屏，数据指针=0，所有显示=0
write_cmd(0x06);//读或写一个字符后地址指针加1 &光标加1，整屏显示不移动
write_cmd(0x0c);//开显示， 关光标，光标所在位置的字符不闪烁

}

/*******************************************
函数名称：LocateXY
功 能：向液晶写入显示字符位置的坐标信息
参 数：x--位置的列坐标
y--位置的行坐标
返回值 ：无
********************************************/
void LocateXY(uchar x,uchar y)
{
uchar temp;

temp = x&0x0f;
y &= 0x01;
if(y) temp |= 0x40; //如果在第2行
temp |= 0x80;

write_cmd(temp);
}
/*******************************************
函数名称：Disp1Char
功 能：在某个位置显示一个字符
参 数：x--位置的列坐标
y--位置的行坐标
data--显示的字符数据
返回值 ：无
********************************************/
void Disp1Char(uchar x,uchar y,uchar data)
{
LocateXY( x, y );
write_data( data );
}

/***********************************************
函数名称：DispStr
功 能：让液晶从某个位置起连续显示一个字符串
参 数：x--位置的列坐标
y--位置的行坐标
ptr--指向字符串存放位置的指针
返回值 ：无
***********************************************/
void DispStr(uchar x,uchar y,uchar *ptr)
{
uchar *temp;
uchar i,n = 0;

temp = ptr;
while(*ptr++ != ) n++; //计算字符串有效字符的个数

for (i=0;i {
Disp1Char(x++,y,temp[i]);
if (x == 0x0f)
{
x = 0;
y ^= 1;
}
}
}

/*******************************************
函数名称：DispNchar
功 能：让液晶从某个位置起连续显示N个字符
参 数：x--位置的列坐标
y--位置的行坐标
n--字符个数
ptr--指向字符存放位置的指针
返回值 ：无
********************************************/
void DispNChar(uchar x,uchar y, uchar n,uchar *ptr)
{
uchar i;

for (i=0;i {
Disp1Char(x++,y,ptr[i]);
if (x == 0x0f)
{
x = 0;
y ^= 1;
}
}
}