BH1415F调频台控制C程序 使用keil C51 通过调试
//使用AT89C52单片机，12MHz晶振，用共阳四位LED数码管
//P0口输出段码，P2口扫描
//#pragma SRC(d:\aa.asm)
#include "reg52.h"
#include "intrins.h" //_nop_();延时函数用
#define Disdata P0 //段码输出口
#define disCAN P2 //扫描口
#define keyio P1 //键盘接口
#define uchar unsigned char
#define uint unsigned int
sbit DA=P3^0; //数据输出
sbit CK=P3^1; //时钟
sbit CE=P3^2; //片选
sbit DIN=P0^7; //LED小数点控制
sbit monolamp=P3^3; //立体声指示灯
uint h; //延时参量
//
//扫描段码表
uchar code dis_7[12]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0xff,0xbf};
/* 共阳LED段码表 "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "不亮" "-" */
uchar code scan_con[4]={0xfe,0xfd,0xfb,0xf7}; // 列扫描控制字
uint data f_data={0x00},f_data1; // 频率数据,数据运算时暂存用
uchar data display[4]={0x00,0x00,0x00,0x00}; //显示单元数据,共4个数据
uchar bdata condata=0x08; //1415控制字高5位,开机为立体声状态
sbit mono=condata^3; //单声道/立体声控制位
uchar data concommand[2],keytemp; //合成后的2个控制字,键值存放
//
/**********************************************************************/
//
//
/***********11微秒延时函数**********/
//
void delay(uint t)
{
for(;t>0;t--);
}
//
/***********LED显示动态扫描函数**********/
scan()
{
char k;
for(k=0;k<4;k++) //四位LED扫描控制
{
Disdata=dis_7[display[k]];
if(k==1){DIN=0;}
discan=scan_con[k];delay(90);discan=0xff;
}
}
//
//
/***********频率数据转换为显示用BCD码函数**********/
turn_bcd()
{
display[3]=f_data/1000;if(display[3]==0){display[3]=10;}//最高位为0时不显示
f_data1=f_data%1000;
display[2]=f_data1/100;//求显示十位数
f_data1=f_data1%100;
display[1]=f_data1/10; //求显示个位数
display[0]=f_data1%10; //求显示小数位
}
/***********控制字合成函数**********/
command()
{
concommand[1]=f_data/256;
concommand[0]=f_data%256;
concommand[1]=concommand[1]+condata;
}
/***********写入1个字节函数**********/
write(uchar val)
{
uchar i;
CE=1;
for(i=8;i>0;i--)
{
DA=val&0x01;//
_nop_();_nop_();_nop_();_nop_();
CK=1;
_nop_();_nop_();_nop_();_nop_();
CK=0;
val=val/2;
}
CE=0;
}
/***********控制字写入1415函数**********/
w_1415()
{
write(concommand[0]);
write(concommand[1]);
}
//
//*************频率涮新*****************//
fup()
{
turn_bcd(); //显示BCD码转换
command(); //合成控制字
w_1415(); //写入1415
}
//
/***********查键函数**********/
read_key()
{
keyio=0xf0;
keytemp=(~keyio)&0xf0;
if(keytemp!=0)
{
keytemp=keyio;
keyio=0x0f;
keytemp=keytemp|keyio;
while(((~keyio)&0x0f)!=0); //
switch(keytemp)
{
case 238:{f_data++;if(f_data>1099){f_data=1099;}fup();break;}//加0.1MHZ
case 222:{f_data--;if(f_data<800){f_data=800;}fup();break;} //减0.1MHZ
case 190:{mono=~mono;if(mono){monolamp=0;}else monolamp=1;fup();break;}//立体声/单声道转换
case 126:{f_data=1090;fup();break;}//预置109.0MHZ
case 237:{f_data=1070;fup();break;}//预置107.0MHZ
case 221:{f_data=1050;fup();break;}//预置105.0MHZ
case 189:{f_data=1030;fup();break;}//预置103.0MHZ
case 125:{f_data=1000;fup();break;}//预置100.0MHZ
case 235:{f_data=970;fup();break;}//预置97.0MHZ
case 219:{f_data=950;fup();break;}//预置95.0MHZ
case 187:{f_data=930;fup();break;}//预置93.0MHZ
case 123:{f_data=900;fup();break;}//预置90.0MHZ
case 231:{f_data=870;fup();break;}//预置87.0MHZ
case 215:{f_data=850;fup();break;}//预置85.0MHZ
case 183:{f_data=830;fup();break;}//预置83.0MHZ
case 119:{f_data=800;fup();break;}//预置80.0MHZ
default:{break;}//
}
}
keyio=0xff;
}
//
//
//
/**************主函数****************/
main()
{
Disdata=0xff; //初始化端口
discan=0xff;
keyio=0xff;
DA=0; //bh1415禁止
CK=0; //
CE=0; //
for(h=0;h<4;h++){display[h]=8;}//开机显示"8888"
for(h=0;h<500;h++)
{scan();} //开机显示"8888"2秒
f_data=1000; //预置1000MHZ
monolamp=0; //开机立体声灯点亮
fup(); //频率送入BH1415
while(1)
{
read_key(); //查键按纽
scan(); //显示4ms
}
}
//
//*********************结束**************************//
本文关键字：单片机 程序 51单片机，单片机-工控设备 - 51单片机
