26-通过PWM驱动无源蜂鸣器实验程序，STC8H8K64U实验箱演示程序, STC8H2K32U, STC8H2K1
26-通过PWM驱动无源蜂鸣器实验程序，AI8051U实验箱演示程序主程序main.C代码如下（汇编版本在附件中）：
/*---------------------------------------------------------------------*/
/* --- Web: www.STCAI.com ---------------------------------------------*/
/* --- BBS: www.STCAIMCU.com-----------------------------------------*/
/* 如果要在程序中使用此代码,请在程序中注明使用了STC的资料及程序 */
/*---------------------------------------------------------------------*/
/*************功能说明 **************
本例程基于AI8051U为主控芯片的实验箱进行编写测试。
使用Keil C51编译器,为了达到比较高的效率,一般建议选择"Small"模式。
当编译器出现 "error C249: 'DATA': SEGMENT TOO LARGE" 错误时，则需要手动将部分比较大的数组通过"xdata" 强制分配到 XDATA 区域(例如: char xdata buffer ;)
通过P5.0口输出PWM驱动无源蜂鸣器.
行列扫描按键每个按键按下后蜂鸣器响一声.
下载时, 选择时钟 24MHz (用户可自行修改频率).
******************************************/
#include "..\comm\AI8051U.h"
#include "stdio.h"
#include "intrins.h"
typedef unsigned char u8;
typedef unsigned int u16;
typedef unsigned long u32;
/****************************** 用户定义宏 ***********************************/
#define MAIN_Fosc 24000000UL
#define Timer0_Reload (65536UL -(MAIN_Fosc / 1000)) //Timer 0 中断频率, 1000次/秒
/*****************************************************************************/
/*************本地常量声明 **************/
/*************本地变量声明 **************/
bit B_1ms; //1ms标志
u8 cnt50ms;
u8KeyCode; //给用户使用的键码, 1~16有效
u8 IO_KeyState, IO_KeyState1, IO_KeyHoldCnt; //行列键盘变量
/*************本地函数声明 **************/
void IO_KeyScan(void); //50ms call
voiddelay_ms(u8 ms);
/********************* 主函数 *************************/
void main(void)
{
WTST = 0;//设置程序指令延时参数，赋值为0可将CPU执行指令的速度设置为最快
EAXSFR(); //扩展寄存器(XFR)访问使能
CKCON = 0; //提高访问XRAM速度
P0M1 = 0x00; P0M0 = 0x00; //设置为准双向口
P1M1 = 0x00; P1M0 = 0x00; //设置为准双向口
P2M1 = 0x00; P2M0 = 0x00; //设置为准双向口
P3M1 = 0x00; P3M0 = 0x00; //设置为准双向口
P4M1 = 0x00; P4M0 = 0x00; //设置为准双向口
P5M1 = 0x00; P5M0 = 0x00; //设置为准双向口
P6M1 = 0x00; P6M0 = 0x00; //设置为准双向口
P7M1 = 0x00; P7M0 = 0x00; //设置为准双向口
//Timer0初始化
AUXR = 0x80; //Timer0 set as 1T, 16 bits timer auto-reload,
TH0 = (u8)(Timer0_Reload / 256);
TL0 = (u8)(Timer0_Reload % 256);
ET0 = 1; //Timer0 interrupt enable
TR0 = 1; //Tiner0 run
PWMB_CCER1 = 0x00;//写 CCMRx 前必须先清零 CCxE 关闭通道
PWMB_CCMR1 = 0x30;//通道模式配置，翻转模式
PWMB_CCER1 = 0x01;//配置通道输出使能和极性
PWMB_ARRH = 0x07; //设置周期时间
PWMB_ARRL = 0xff;
PWMB_ENO = 0x01; //PWM5使能输出
PWMB_PS = 0x03; //高级 PWM 通道输出脚选择位, P50
PWMB_BKR = 0x80; //使能主输出
PWMB_CR1 |= 0x01; //开始计时
delay_ms(250);
delay_ms(250);
PWMB_ENO = 0x00; //PWM5关闭输出
EA = 1; //打开总中断
while(1)
{
if(B_1ms) //1ms到
{
B_1ms = 0;
if(++cnt50ms >= 50) //50ms扫描一次行列键盘
{
cnt50ms = 0;
IO_KeyScan();
}
if(KeyCode > 0) //有键按下
{
PWMB_ENO = 0x01; //PWM5使能输出
delay_ms(250);
PWMB_ENO = 0x00; //PWM5关闭输出
KeyCode = 0;
}
}
}
}
//========================================================================
// 函数: void delay_ms(u8 ms)
// 描述: 延时函数。
// 参数: ms,要延时的ms数, 这里只支持1~255ms. 自动适应主时钟.
// 返回: none.
// 版本: VER1.0
// 日期: 2013-4-1
// 备注:
//========================================================================
void delay_ms(u8 ms)
{
u16 i;
do{
i = MAIN_Fosc / 6000;
while(--i);
}while(--ms);
}
/********************** Timer0 1ms中断函数 ************************/
void timer0(void) interrupt 1
{
B_1ms = 1; //1ms标志
}
/*****************************************************
行列键扫描程序
使用XY查找4x4键的方法，只能单键，速度快
Y P04 P05 P06 P07
| | | |
X | | | |
P00 ---- K00 ---- K01 ---- K02 ---- K03 ----
| | | |
P01 ---- K04 ---- K05 ---- K06 ---- K07 ----
| | | |
P02 ---- K08 ---- K09 ---- K10 ---- K11 ----
| | | |
P03 ---- K12 ---- K13 ---- K14 ---- K15 ----
| | | |
******************************************************/
u8 code T_KeyTable = {0,1,2,0,3,0,0,0,4,0,0,0,0,0,0,0};
void IO_KeyDelay(void)
{
u8 i;
i = 60;
while(--i);
}
void IO_KeyScan(void) //50ms call
{
u8j;
j = IO_KeyState1; //保存上一次状态
P0 = 0xf0;//X低，读Y
IO_KeyDelay();
IO_KeyState1 = P0 & 0xf0;
P0 = 0x0f;//Y低，读X
IO_KeyDelay();
IO_KeyState1 |= (P0 & 0x0f);
IO_KeyState1 ^= 0xff; //取反
if(j == IO_KeyState1) //连续两次读相等
{
j = IO_KeyState;
IO_KeyState = IO_KeyState1;
if(IO_KeyState != 0) //有键按下
{
F0 = 0;
if(j == 0)F0 = 1; //第一次按下
else if(j == IO_KeyState)
{
if(++IO_KeyHoldCnt >= 20) //1秒后重键
{
IO_KeyHoldCnt = 18;
F0 = 1;
}
}
if(F0)
{
j = T_KeyTable;
if((j != 0) && (T_KeyTable != 0))
KeyCode = (j - 1) * 4 + T_KeyTable + 16; //计算键码，17~32
}
}
else IO_KeyHoldCnt = 0;
}
P0 = 0xff;
}
页:
[1]