原创 锁相环BH1415的调频程序

//***************************************************************
//             锁相环BH1415的调频程序

////本程序未经本站测试过。
//作者:Ryudo
//日期:2006.8.20
//说明:四个按键分别控制：频率步进，步退，立体声开关，音频静音
//     复位默认:频率是 98MHZ ，立体声， 正常模式。
//     频率调节范围 ：88MHZ－－108MHZ
//硬件连接：
//  MUTE ------- P1^0
//  DI ------- P1^1
//  CLK ------- P1^2
//  CE ------- P1^3
//  按键   静音控制 ------- P1^4
//  按键   频率步进 ------- P1^5
//  按键   频率步退 ------- P1^6
//  按键 立体声控制 ------- P1^7
//
//***************************************************************

#include<reg51.h>

#define uchar unsigned char
#define uint  unsigned int

sbit MUTE = P1^0;
sbit DI   = P1^1;
sbit CLK  = P1^2;
sbit CE   = P1^3;
sbit KEY_1= P1^4;
sbit KEY_2= P1^5;
sbit KEY_3= P1^6;
sbit KEY_4= P1^7;

void Send_16(uint ui_Date, uchar uc_MONO ,uchar uc_PD);        //发送数据函数
void Key_Scan_1(void);     //控制静音
void Key_Scan_2(void);     //频率步进 精度0.1MHZ
void Key_Scan_3(void);     //频率步退 精度0.1MHZ
void Key_Scan_4(void);     //立体声控制
void Delay(void);    

uchar uc_Count_1;
uchar uc_Count_2;
uchar uc_Count_3;
uchar uc_Count_4;
uint ui_TEMP_1;            //保存频率数据
uint ui_TEMP_2;      //保存立体声数据

void main(void)
{
 Send_16(0x3d4,0x01,0x00);
 while(1)
 {
 Key_Scan_1();
 Key_Scan_2();
 Key_Scan_3();
 Key_Scan_4();
 }
}

void Delay()
{
 uchar i,j;
 for(i=100;i;--i)
  for(j=200;j;--j);
}

void Key_Scan_1(void)      //控制静音
{
 if(KEY_1==0)
  {
   Delay();
    if(KEY_1==0)
     {
      MUTE=(uc_Count_1++)%2;
      while(KEY_1==0);
     }
  }  
}

void Key_Scan_2(void)      //频率步进
{
 if(KEY_2==0)
  {
   Delay();
    if(KEY_2==0)
     {
      uc_Count_2++;
      if(uc_Count_2==100)
       {
         uc_Count_2=0;
         Send_16(0x3d4,ui_TEMP_2,0x00);
       }
      Send_16(ui_TEMP_1+1,ui_TEMP_2,0x00);
      while(KEY_2==0);
     }
  }
}

void Key_Scan_3(void)      //频率步退
{
 if(KEY_3==0)
  {
   Delay();
    if(KEY_3==0)
     {
      uc_Count_3++;
      if(uc_Count_3==100)
       {
         uc_Count_3=0;
         Send_16(0x3d4,ui_TEMP_2,0x00);
       }
      Send_16(ui_TEMP_1-1,ui_TEMP_2,0x00); 
      while(KEY_3==0);
     }
  }
}

void Key_Scan_4(void)     //立体声控制
{
 if(KEY_4==0)
  {
   Delay();
    if(KEY_4==0)
     {
      uc_Count_4++;
      if(ui_TEMP_2=uc_Count_4%2)
       Send_16(ui_TEMP_1,0x01,0x00);
      else
       Send_16(ui_TEMP_1,0x00,0x00);
      while(KEY_4==0);
     }
  } 
}

void Send_16(uint ui_Date,uchar uc_MONO ,uchar uc_PD)
{
 uchar i;
 ui_TEMP_1=ui_Date;
 CLK=0;
 CE=0;
 CE=1;
 for(i=11;i;--i)
  {
  DI="ui"_Date&0x01;
  ui_Date>>=1;
  CLK="1";
  CLK="0";
  } 
 DI=uc_MONO&0x01;
 CLK=1;
 CLK=0;
 DI=uc_PD&0x20;
 CLK=1;
 CLK=0;
 uc_PD<<=1;
 DI=uc_PD&0x20;
 CLK=1;
 CLK=0;
 DI=1;
 CLK=1;
 CLK=0;
 DI=0;
 CLK=1;
 CLK=0;
 CE=0;
}

/*********************************************************************/
//                      BH1415F调频台控制C程序
//                         使用keil C51
//                       2005.3.16通过调试
/*********************************************************************/
//使用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
    }
}
//
//*********************结束**************************//

/************************************************************
************************************************************* 
     名称::射频发射BH1415F
 
     时间:06-07-06
     功能:控制BH1415F实现调频发射,频率范围(88~108Hz) MCU: ATMEGA8
     编写:LCJ
**************************************************************/
/*       ___________________________________________________
  CE ___|                                                  

|__________
           __    __    __    __    __         __    __    __
  CK _____|  |__|  |__|  |__|  |__|  |_---- _|  |__|  |__| 

|__________
         __    __    __    __    __          
  DA____|D0|__|D1|__|D2|__|D3|__|D4|__
       __    __    __
-----_|PD|__|T1|__|T2|__________
*/
/**********************************
   数字调频发射程序
***********************************/
//头文件
#include <iom8v.h>//单片机型号选择
#include <macros.h>//位定义
#include <eeprom.h>//EEPROM储存器
//晶振频率
#define fosc 6000000 //晶振6MHZ
#define baud 9600  //波特率

#define open_radio     (PINB & 0B00000100)//开机
#define function_open  (PORTB |= (1<<4))//控制开机
#define function_close (PORTB &= ~(1<<4))//控制关机
#define open_save      (PINB & 0B00000100)//开储存台功能
#define save_ensure    (PINB & 0B00000100)//储存台确定
#define adjust_station (PINB & 0B00000100)//调节存好的电台
#define F_ADD        (PINB & 0B00001000)  //频率加
#define F_REDUCE     (PINB & 0B00010000)  //频率减reduce
//unsigned char F_DATA_H, F_DATA_L;// 频率高低位
unsigned char open_radio_flag;// 开机标志位

//unsigned char F_flag_H;//频率储存高
//unsigned char F_flag_L;//频率储存低

unsigned char LCD_display_H;// 液晶显示高位
unsigned char LCD_display_L;//液晶显示低位

unsigned char function_flag;//存台标志

unsigned char save_dais_flag;//存台确定标志

#define save1_H (PORTC |= (1<<4))//保台状态指示
#define save2_H (PORTC |= (1<<5))//保台成功指示
#define save1_L (PORTC &= ~(1<<4))
#define save2_L (PORTC &= ~(1<<5))

#define LED_H (PORTD |= (1<<7))

#define CE_H  (PORTB |= (1<<0))    //15 CE
#define CE_L  (PORTB &= ~(1<<0)) 
#define CK_H  (PORTB |= (1<<1))    //16 CLOCK
#define CK_L  (PORTB &=~(1<<1))
#define DA_H  (PORTB |= (1<<5))    //17 DATA
#define DA_L  (PORTB &= ~(1<<5))
//#define LCD_display_OUT  PORTB
//#define LCD_display_control PORTC
//unsigned char LCD_display_data[8] [4];
unsigned char display_character[10]={ 0x3f, 0X06, 0X5B, 0X4F,

0X66, 0X6D, 0X7D, 0X07, 0X7F, 0X6F};//字模1, 2, 3, 4, 5, 6, 7, 8, 9
unsigned char EEPROM_READ_DATA;//读取保存数据
unsigned char EEPROM_READ_NUMBER;//读取保存地址
/********************************************************/
unsigned char display_one;//显示个位
unsigned char display_ten;//显示十位
unsigned char display_hundred;//显示百位
unsigned char display_thousand;//显示千位
/********************************************************
                  显示数据缓冲区
********************************************************/
unsigned char temp_display_one;
unsigned char temp_display_ten;
unsigned char temp_display_hundred;
unsigned char temp_display_thousand;
/*******************************************************
               控制BH1415数据缓冲区
*******************************************************/
unsigned char temp_BH1415_one;
unsigned char temp_BH1415_ten;
unsigned char temp_BH1415_hundred;
unsigned char temp_BH1415_thousand;
/******************************************************/
unsigned char BH1415_one;//BH1415控制个位
unsigned char BH1415_ten;//BH1415控制十位
unsigned char BH1415_hundred;//BH1415控制百位
/******************************************************/
unsigned char adjust_PS8889_OUT;//输出控制数
unsigned char adjust_PS8889_control[9];//控制数组
//unsigned char adjust_station_number;//查数组的位数
unsigned char adjust_save_address;//保存地址
unsigned char adjust_save_function;//保存功能
/********************************************************/
unsigned char temp_BH1415_L;//控制BH1415低8位
unsigned char temp_BH1415_H;//控制BH1415高8位

/****************************************/
void delay_ms(void);
void delay_xs(unsigned char x);
void adjust_station_OUT(void);
void station_save_IN(void);
void EEPROM_rite(unsigned int uAddr,unsigned char uData);
void EEPROM_read(unsigned int uAddr);
void F_ADD_function(void);
void F_REDUCE_function(void);
void control_BH1415_and_display(void);
void LCD_display(unsigned char display_data, unsigned char

function_number);
void control_BH1415(void);
void BH1415_OUT(unsigned char control_F_DATA, unsigned char

control_number);
/*******************************************************/

//延时子程序
void delay_xs(unsigned char x)
{
   unsigned char a;
   for (a=0;a<x;a++)
   {
     delay_ms();
  }
}

void delay_ms(void)
{
  unsigned char aa, bb;
  for (aa=0; aa<50; aa++)
  {
     for (bb=0; bb<100;bb++);
  }
}

/*********************************
        下面是读台函数
**********************************/
void adjust_station_OUT(void)
{//储存好的电台调节
   EEPROM_read(EEPROM_READ_NUMBER);
   temp_display_one = EEPROM_READ_DATA;
   EEPROM_READ_NUMBER++;
 
   EEPROM_read(EEPROM_READ_NUMBER);
   temp_display_ten = EEPROM_READ_DATA;
   EEPROM_READ_NUMBER++;
 
   EEPROM_read(EEPROM_READ_NUMBER);
   temp_display_hundred = EEPROM_READ_DATA;
   EEPROM_READ_NUMBER++;
 
   EEPROM_read(EEPROM_READ_NUMBER);
   temp_display_thousand = EEPROM_READ_DATA;
   EEPROM_READ_NUMBER++;
  
}

void station_save_IN(void)
{//储存电台函数
  EEPROMwrite(adjust_save_address,temp_display_one);
  adjust_save_address++;
 
  EEPROMwrite(adjust_save_address,temp_display_ten);
  adjust_save_address++;
 
  EEPROMwrite(adjust_save_address,temp_display_hundred);
  adjust_save_address++;
 
  EEPROMwrite(adjust_save_address,temp_display_thousand);
  adjust_save_address++;
}
/*********************************
     读EEPROM函数
**********************************/
void EEPROM_read(unsigned int uAddr)
{//读EEPROM函数
  while(EECR & (1<<EEWE));
  EEAR = uAddr;
  EECR |=(1<<EERE);
  EEPROM_READ_DATA = EEDR;
}

/************************************
        下面是频率渐加函数
*************************************/
void F_ADD_function(void)
{//频率渐加函数,//频率渐减函数,初始化时为F_DATA_H=0X03,F_DATA_L=0X66
    if (temp_display_thousand >=0x01)
   {
     if (temp_display_ten >=0x08)
  {//限制最高频率为108.0MHZ
     temp_display_one = 0x00;
  temp_display_ten = 0x08;
  temp_display_hundred = 0x00;
  temp_display_thousand = 0x01;
  }
  else
  goto ADD;
  }
  else
  {
ADD:    temp_display_one++;   
 if (temp_display_one>=0x0a)
 {
     temp_display_one = 0x00;
     temp_display_ten++;
     if(temp_display_ten>=0x0a)
        {
          temp_display_ten = 0x00;
       temp_display_hundred++;
       if( temp_display_hundred>=0x0a)
       {
           temp_display_hundred =0x00;
     temp_display_thousand++;
     if( temp_display_thousand>=0x01)
          {
      if(temp_display_ten>=0x08)
      {
         temp_display_one=0x00;
         temp_display_ten=0x08;
         temp_display_hundred=0x00;
      temp_display_thousand=0x01;
         }
           }
     
        }
  
       }
      }
  
 }

   control_BH1415_and_display();//输出控制BH1415发射
 
}
/****************************************
   下面是频率渐减函数
****************************************/
void F_REDUCE_function(void)
{//频率渐加函数,//频率渐减函数,初始化时为F_DATA_H=0X03,F_DATA_L=0X66
   if (temp_display_thousand <=0x00)
   {//限制最低频率为87.0MHZ
     if (temp_display_hundred <=0x08)
  {
    if (temp_display_ten <=0x07)
    {
      if (temp_display_one <=0x00)
      {
          temp_display_one = 0x00;
       temp_display_ten = 0x07;
       temp_display_hundred = 0x08;
       }
      else
   goto REDUCE;
     }
  else
  goto REDUCE;
  }
  else
  goto REDUCE;
  }
  else
  {
REDUCE: if (temp_display_one<=0x00)
 {//渐减开始
     temp_display_one = 0x0a;
     if(temp_display_ten<=0x00)
        {
          temp_display_ten = 0x0a;
       if( temp_display_hundred<=0x00)
       {
          temp_display_hundred =0x0a;
    temp_display_thousand=0x00;
       }
   temp_display_hundred--;
     }
  temp_display_ten--;
      }
    temp_display_one--;
  
 }
 control_BH1415_and_display();
}
void control_BH1415_and_display(void)
{//控制BH1415和显示输出
    unsigned char temp_one,temp_ten,temp_hundred,temp_one_L;
 unsigned int temp_BH1415_data1,

temp_BH1415_data2,temp_BH1415_data3;
 /************************************************/
 //显示转换成控制BH1415运算
 temp_BH1415_data1 = temp_display_thousand*1000

+temp_display_hundred*100 +temp_display_ten*10 +temp_display_one;
 temp_BH1415_data2 =temp_BH1415_data1;
 temp_BH1415_data3 = temp_BH1415_data2 >> 8;
 temp_ten = temp_BH1415_data3;
 temp_BH1415_L = temp_BH1415_data1;
 temp_BH1415_one = temp_BH1415_L & 0x0f;
 temp_BH1415_ten = temp_BH1415_L >> 4 & 0x0f;
 temp_BH1415_hundred = temp_ten & 0x0f;
 temp_BH1415_H = temp_ten | 0x48
 
 /*temp_ten = temp_BH1415_ten<<4;
 temp_ten = temp_ten &0xf0;
 temp_BH1415_L = temp_ten + temp_BH1415_one;
 temp_BH1415_H = temp_BH1415_hundred | 0x48 */
 //temp_BH1415_L = temp_ten + temp_BH1415_one
 
 /****************************************/
 //输出16位串行数据控制BH1415
 CE_L;
 CK_L;
 DA_L;
 NOP();
 NOP();
 NOP();
 CE_H;
    BH1415_OUT(temp_BH1415_L,0x08);
 CK_L;
 BH1415_OUT(temp_BH1415_H,0x08);
 CE_L;
 CK_L;
 DA_L;
}

/*******************************************
    下面是显示输出函数
*******************************************/
void LCD_display(unsigned char display_data, unsigned char

function_number)
{//液晶显示输出
   delay_ms();
   PORTC = function_number;
   PORTD = display_character[display_data];  
}

/********************************************
   下面是控制BH1415~~~8位发送串行数据函数
*********************************************/

void BH1415_OUT(unsigned char control_F_DATA, unsigned char

control_number)
{//控制BH1415
    unsigned char i;
    for(i=0; i<8; i++)
    {
      if(control_F_DATA & 0x01== 0x01)
        DA_H;  
      else
       DA_L;
    NOP();
    NOP();
       CK_H;
       delay_ms();
       NOP();
       NOP();
       CK_L;
       NOP();
       NOP();
      control_F_DATA>>=1;
   delay_ms();
   } 
}

/***************************************
    下面是存台函数
****************************************/
void check_save_dais(void)
{//存台函数
    display_one = 0x01;
 display_ten = 0x00;
    display_hundred = 0x00;
 display_thousand = 0x00;
 adjust_save_address = 0x00;//存台地址初始化
    while(save_dais_flag <= 5)
 {
     if (open_radio == 0)
     {//存台确定
       delay_xs(20);
    if (open_radio == 0)
    { 
       station_save_IN();//EEPRAM 存台函数
    save_dais_flag = 6;
    delay_xs(20);
      }
      }
    else if (F_ADD == 0X00)
    {//存台加
       delay_xs(20);
       if (F_ADD == 0X00)
    {
       display_one++;
       adjust_save_address += 4; //存台地址加四
       if (display_one >= 9)
    {//限制存台个数9个
       adjust_save_address = 36;
    display_one = 9;
    }
         }
       }
      else if (F_REDUCE == 0)
      {//存台减
         delay_xs(20);
         if (F_REDUCE == 0)
         {
      display_one--;
      adjust_save_address -=

4;//temp_adjust_save_address-4;//存台地址减四
         if (display_one <= 0x01)
      {
         adjust_save_address =0x00;
      display_one = 0x01;
      }   
          }
    
        }
   /*********************************
    输出显示存台位置
    *********************************/ 
      LCD_display(display_one, 0xFE);
      LCD_display(display_ten, 0xFD);
      LED_H;
      LCD_display(display_hundred, 0xFB);
      LCD_display(display_thousand,0xF7);
         }
         save_dais_flag =0x00;//存台确定标志清零
   function_flag = 0x00;//存台标志位清零
  }
void main(void)
{
   //端口初始化
   unsigned char i,aaw,y,x,TEMP;
   DDRB = 0X00;
   PORTB = 0XFF;
   DDRC = 0XFF;
   PORTC = 0X0F;
   DDRD = 0XFF;
   PORTD = 0XFF;
    x = 0x00;
    y = 0x9d;
   PORTC = y;
   CE_L;
   CK_L;
   DA_L;
   
   //开始频率为87.0MHZ 
   temp_display_one = 0x00;
   temp_display_ten = 0x07;
   temp_display_hundred = 0x08;
   temp_display_thousand = 0x00;
  /* 控制BH1415数据缓冲区*/
   temp_BH1415_one = 0x06;
   temp_BH1415_ten = 0x06;
   temp_BH1415_hundred = 0x03;
   temp_BH1415_thousand = 0x00;

   //各变量初始化
   //F_DATA_H = 0x00;
  // F_DATA_L = 0x00;   // 频率高低位
   
  // F_flag_H = 0x00;//频率储存高
  // F_flag_L = 0x00;//频率储存低
  
  // LCD_display_H = 0x00;// 液晶显示高位
  // LCD_display_L = 0x00;//液晶显示低位
  
   EEPROM_READ_DATA = 0x00;//读取保存数据
   EEPROM_READ_NUMBER = 0x00;//读取保存地址
  
   //adjust_PS8889_OUT = 0x00;//输出控制数
  
  // adjust_station_number = 0x00;//查数组的位数
  
   adjust_save_address = 0x00;//存台地址清零
   adjust_save_function = 0x00;//保存功能
  
/********************************************************/
   temp_BH1415_L = 0x00;//控制BH1415低8位
   temp_BH1415_H = 0x00;//控制BH1415高8位
 
   open_radio_flag =0x00;//开机标注清零
  
   function_flag = 0x00;//存台标志
  
   save_dais_flag = 0;//存台确定标志清零
  
   while (1)
  {
     if(open_radio == 0)
     {//按键查询,开机
       delay_xs(10);
    if(open_radio == 0)
    {
      open_radio_flag = 1;
     }
 while(open_radio_flag ==1)
   {//按键查询,调台
     if (open_radio == 0)
     { 
     delay_xs(10);
     if (open_radio == 0)
  {
     do
     {//长按为存台功能
         delay_xs(10);
         function_flag++;
      if (function_flag >=50)
     {
         save1_L; 
         delay_xs(250);
         save1_H;
      }
       
       }
      while (open_radio <=0);
         if (function_flag >=50)
         {
         check_save_dais(); //跳转到存台功能函数
        function_flag = 0x00;//存台标志清零
     }
    else
     { 
    if (EEPROM_READ_NUMBER>=36)
     {//读取调台个数限制,循环输出:0~9台
         EEPROM_READ_NUMBER=0;
    }
         adjust_station_OUT();//读取调台输出
     function_flag = 0x00;//存台标志清零
    }
   }
      }
     else if (F_ADD == 0)
     {//频率加
       delay_xs(10);
       if (F_ADD == 0X00)
       F_ADD_function();//频率增加
      }
     else if (F_REDUCE == 0)
     {//频率减
       delay_xs(10);
       if (F_REDUCE == 0X00)
       F_REDUCE_function();//频率减少
      }
 //输出显示
 LCD_display(temp_display_one, 0xFE);
 LCD_display(temp_display_ten, 0xFD);
 LED_H;
 LCD_display(temp_display_hundred, 0xFB);
 LCD_display(temp_display_thousand,0xF7);
     }
   }
 }
}

求救AD9850

如何做到扫频？？？？以下是自己编的扫频程序，但是不成功，哪为高手帮帮看

      ORG   0000H
      LJMP  START
      ORG   0100H
START:MOV   R2,#00H
      MOV   R3,#00H
      MOV   R4,#00H
      MOV   R5,#0D1H
      MOV   R6,#0B7H
      MOV   30H,R2
      MOV   31H,R3
      MOV   32H,R4
      MOV   33H,R5
      MOV   34H,R6
MAIN: MOV   R0,#05H
      MOV   R1,#30H
      MOV   DPTR,#0FFFFH
      MOVX   A,@DPTR
LOOP1:INC   R5
      LCALL DDS
      CJNE  R5,#0FFH,LOOP1
      MOV   R5,#0A3H
      MOV   R6,#6EH
      MOV   34H,R6
LOOP2:INC   R4
      LCALL DDS
      CJNE  R4,#66H,LOOP2
      MOV   32H,R4
      MOV   R5,#66H
      MOV   R6,#66H
      MOV   33H,R5
      MOV   34H,R6
LOOP3:INC   R3
      LCALL DDS
      CJNE  R3,#80H,LOOP3
      AJMP  START
DDS:  MOV  A,@R1
      MOVX  @DPTR,A
      INC   R1
      DJNZ  R0,DDS
      RET
    
      END