51系列单片机设计实例：光盘

/*********************************************************************/ // 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 } } // //*********************结束**************************//