/****************wang1jin设计的FM发射板程序************************ 电路结构:STC12C2052+M62429+BH1415+9018+3355+2053 1602显示,电子音量
完成时间:2007年11月初
程序编写:sunhm ***************************************************************/
#include "STC89C51RC_RD_PLUS.H" #include "intrins.h" #define uchar unsigned char #define uint unsigned int #define nop _nop_();_nop_();_nop_();
uchar code C51BOX2[3] _at_ 0x43; //用三字节空间
sbit CE_1415= P1^4; //;1415的使能端 sbit CK_1415= P1^5; //;1415的时钟 sbit DT_1415= P1^6; //;1415数据口 sbit RS_1602=P3^3; //各控制脚 sbit RW_1602=P3^4; sbit EN_1602=P3^5; sfr DataPort_1602=0x90;//P1数据口 sbit CK_M62429=P3^1; sbit DATA_M62429=P3^0;
sbit KeyPow =P1^0; //按键 sbit KeyMenu =P1^1; sbit KeyUp =P1^2; sbit KeyDown =P1^3; sbit KeyGnd =P3^7;
sbit FmPow=P1^7;
uchar code Megs0[]={"Sunhm QQ8932867"}; uchar code Megs1[]={" FM Off "}; uchar code Megs2[]={" FM Transmitter "}; uchar code Megs3[]={" . MHz - dB"};
uchar code CG[]={ 0x02, 0x04, 0x19, 0x15, 0x15, 0x19, 0x04, 0x02, // 喇叭符号 0x20, 0x1f, 0x11, 0x0a, 0x04, 0x04, 0x04, 0x04, // 天线符号 };
uchar Vol; //存放音量值 uint Freq; //存放频率值 uchar KeyValue; //键值 uchar MenuState;//菜单切换状态变量 uchar Account;uchar MenuDelayTime; bit FlashState; //闪动状态变量
/**************************延时变量*****************************/ //#define Delay1 90 //STC12C2052+12M晶振使用 //#define Delay2 380 //#define Delay3 5 //#define Delay4 100
//#define Delay1 35 //STC12C2052+RC使用 //#define Delay2 200 //#define Delay3 2 //#define Delay4 50
#define Delay1 45 //AT89C2051+12M晶振使用 #define Delay2 150 #define Delay3 2 #define Delay4 100
/**********************延时子函数*******************************/ void uDelay(uchar i) //us延时子函数，入口参数每加1约加100us { for(;i>0;i--) {uchar j=Delay1;while(--j);} }
void mDelay(uint Dat) //ms延时子函数 { uint j; for (;Dat>0;Dat--) for (j=Delay2;j>0;j--); }
/****************以下为EPPROM读写相关函数*******************************/ /*以下为EPPROM保护，每次操作后更改指令值，使EPPROM免于被误操作*/ void EPPROM_Protect() { ISP_COR=0x00; //更改指令值，防止出现误操作 ISP_CMD=0x00; ISP_G=0x00; ISP_AH=0x00; ISP_ADDRL=0x00; }
/*以下为读入指令，入口参数为要读的地址（16位），返回内容（8位）*/ uchar _Read(uint Addr) { ISP_ADDRH=Addr/0x100; //送地址 ISP_ADDRL=Addr%0x100; ISP_CTR=0x83; //控制字节 ISP_CMD=0x01; //读命令 ISP_TRIG=0x46; //触发 ISP_TRIG=0xB9; EPPROM_Protect(); //更改相关数值，防止误操作 return(ISP_DATA); //返回读出的值 } /*以下为扇区擦除指令，入口参数为扇区首地址 */ void EEPROM_Erase(uint Addr) { ISP_ADDRH=Addr/0x100; //待写入扇区首地址 ISP_ADDRL=0x00; ISP_CONTR=0x83; ISP_CMD=0x03; //扇区擦除指令 ISP_TRIG=0x46; //触发，将擦除整个扇区 ISP_TRIG=0xB9; EPPROM_Protect(); //更改相关数值，防止误操作 }
/*以下为写入指令，入口参数为写入的地址（16位）和内容（8位），每次要写入的位置*/ void EEPROM_Write(uint Addr,uchar Data) { ISP_DATA=Data; //待写入值 ISP_ADDRH=Addr/0x100; //待写入扇区首地址 ISP_ADDRL=Addr%0x100; ISP_CONTR=0x83; ISP_CMD=0x02; //写入指令 ISP_TRIG=0x46; //触发，数据写入 ISP_TRIG=0xB9; EPPROM_Protect(); //更改相关数值，防止误操作 }
/**********************数据存储与读取******************************/ void DatSave() { EEPROM_Erase(0x1000); EEPROM_Write(0x1000,Vol); EEPROM_Write(0x1001,Freq/0x100); EEPROM_Write(0x1002,Freq%0x100); } void DatLoad() { Vol=EEPROM_Read(0x1000); Freq=EEPROM_Read(0x1001)*0x100+EEPROM_Read(0x1002); if(Vol>83){Vol=10;DatSave();} if ((Freq>1080)||(Freq<870)) //判断频率值是否有错 { Freq=908; //如果错误，设置为默认90.8M DatSave(); } }
/**************************M62429 发送用子函数**********************/ void VolSet(uchar Volume) { uint Dat;uchar i; Volume=87-Volume; //得到要送到芯片的实际数 Dat=0x600|(Volume&0xfc)|((Volume&0x03)<<7); //音量合并成控制数据，详看DATEET for (i=0;i<10;i++) //发送10位数据,共11位，最后1位另外发 { DATA_M62429=Dat&0x01; CK_M62429=1; nop; DATA_M62429=0; CK_M62429=0; Dat>>=1; } DATA_M62429=1; CK_M62429=1;nop;CK_M62429=0;
} /*************************1415 发送子函数*********************/
void PLLSend(uint Dat) //数据发送到BH1415 { uchar i; Dat+=0x4800; CE_1415=1; //打开片选准备发送 for(i=16;i>0;i--) { DT_1415=Dat&1; CK_1415=1; Dat>>=1; CK_1415=0; } CE_1415=0;DT_1415=0;CK_1415=0; }
/**********************1602 4线使用程序***********************/ void En1602(uchar Dat) //使能子函数 { KeyGnd=1; //释放线 uDelay(15); DataPort_1602&=0xf0; //数据送出，ASCII码 DataPort_1602|=Dat>>4; RS_1602=0; //控制发出 RW_1602=0; EN_1602=1;EN_1602=0;
DataPort_1602&=0xf0; DataPort_1602|=Dat&0x0f; RS_1602=0; RW_1602=0; EN_1602=1;EN_1602=0; KeyGnd=0; } void WrCharTo1602(uchar Dat) //写字节子函数 { KeyGnd=1; uDelay(15); DataPort_1602&=0xf0; //数据送出，ASCII码 DataPort_1602|=Dat>>4; RS_1602=1; //控制发出 RW_1602=0; EN_1602=1;EN_1602=0;
DataPort_1602&=0xf0; DataPort_1602|=Dat&0x0f; RS_1602=1; RW_1602=0; EN_1602=1;EN_1602=0; KeyGnd=0; }
void WrStringTo1602(uchar x,uchar *p) //写字符串子函数。入品：x行（0或1），数组 { En1602(0x80+(x<<6)); while(*p) { WrCharTo1602(*p);p++; } }
void Init1602(void) //初始化子函数 { En1602(0x28); //4位点阵方式 mDelay(100); En1602(0x28); mDelay(100); En1602(0x28); mDelay(100); En1602(0x28); mDelay(100); En1602(0x0c); //开显示 mDelay(100); En1602(0x01); //清屏 }
void WrCG1602(uchar *p) //自定义字符子函数 { En1602(0x40); while(*p) {WrCharTo1602(*p);p++;mDelay(1);} }
/****************************显示子函数*************************/ void DispFreq(bit state) //频率值拆分显示。入口参数：1为有显示,0为没 { uint Dat=Freq; if(state) //正常显示 { En1602(0xc5); WrCharTo1602(Dat%10+0x30); Dat/=10; En1602(0xc3); WrCharTo1602(Dat%10+0x30); Dat/=10; En1602(0xc2); WrCharTo1602(Dat%10+0x30); En1602(0xc1); if(Dat/10) WrCharTo1602(0x31); else WrCharTo1602(0x20); } else //无显示 { En1602(0xc1); WrCharTo1602(0x20);WrCharTo1602(0x20);WrCharTo1602(0x20); En1602(0xc5);WrCharTo1602(0x20); } }
void DispVol(bit State) //声音值拆分显示。入口参数：1为有显示,0为没 { if(State) { En1602(0xcc); if(Vol/10) WrCharTo1602(Vol/10+0x30); else WrCharTo1602(0x20); WrCharTo1602(Vol%10+0x30); } else { En1602(0xcc);WrCharTo1602(0x20);WrCharTo1602(0x20); } } void FmOn() //发射部分工作屏幕显示内容初始化 { FmPow=0; WrStringTo1602(0,Megs2); WrStringTo1602(1,Megs3); En1602(0xc0);WrCharTo1602(1); En1602(0xca);WrCharTo1602(0); VolSet(Vol); mDelay(50); DispFreq(1); DispVol(1); PLLSend(Freq); }
void FmOff() //发射部分不工作屏幕显示内容初始化 { FmPow=1; WrStringTo1602(0,Megs1); WrStringTo1602(1,Megs0); }
void DispFlash() //闪动显示处理 { if(!MenuState)return; if(MenuState==1) DispFreq(FlashState); if(MenuState==2) DispVol(FlashState); if(MenuDelayTime>Delay4) {MenuState=0;DispFreq(1);DispVol(1);} }
/************************按键读取及处理子函数**************************/