一些实用的单片机c程序 单片机, 程序

yumuzi

一些实用的单片机c程序
//16进制<->10进制互换程序

unsigned char d[10];    //用于显示的10位显示缓存
//========================================================
     //16进制to10进制输出子程序:显示数据，起始位，结束位，有无小数点
//========================================================
void output(unsigned long dd,unsigned char s,unsigned char
e,unsigned char dip) {
     unsigned long div;
     unsigned char tm[8],i,j;
     div=10000000;
     for (i=0;i<8;i++) {
         tm[i]=dd/div;
         dd%=div;
         div/=10;
     }
     for (i=0;i<6;i++) {
         if (tm[i]!=0) break;
         tm[i]=nul;
     }
     tm[5]|=dip;            //小数点控制，请看“串行LED数码管显示驱动程序”
     j=7;
     for (i=s;i<e;i++) {
         d[i]=tm[j];
         j--;
     }
}

yumuzi

//把显示位5-9位的10进制数转换成为16进制数
unsigned int input(void) {
     unsigned int dd,dat;
     dd=10000;dat=0;
     for (i=5;i<10;i++) {
         dat+=dd*temp;
         dd/=10;
     }
     return(dat);
}
/*    89C51系列CPU编程器接收CPU程序*/

＃i nclude <reg51.h>
＃i nclude <intrins.h>
＃i nclude <absacc.h>

#define e 8
#define p 9
#define l 10

sbit led=P3^2;
sbit p27=P2^7;
sbit p26=P2^6;
sbit p36=P3^6;
sbit p37=P3^7;
sbit rst=P3^3;
sbit ale=P3^5;
sbit vpp=P3^4;

bit b_break;
unsigned int adds;


//    13.8mS
void int_t0(void) interrupt 1 {
     TH0=-100;
     b_break=1;
}

void wait(unsigned char w) {
     unsigned int t=w*184;
     b_break=0;
     TL0=-t%256-1;TH0=-t/256;
     while (b_break==0) {}
}

void nop(void) {
     _nop_();_nop_();_nop_();_nop_();
     _nop_();_nop_();_nop_();_nop_();
     _nop_();_nop_();_nop_();_nop_();
     _nop_();_nop_();_nop_();_nop_();
     _nop_();_nop_();_nop_();_nop_();
}

unsigned char command(void) {
     TH0=-100;b_break=0;
     while (RI==0) {if (b_break==1) return(0);}
     RI=0;
     return(SBUF);
}

void earsure(unsigned char cpu) {
     switch (cpu) {
     case 1:        //89C51
     case 2:rst=p26=1;p27=p36=p37=0;nop();vpp=1;nop();
         ale=0;wait(110);ale=1;nop();
         break;
     case 3:
     case 4:break;
     case 5:
     case 6:break;
     }
}

void program(unsigned char cpu) {
     unsigned int bdata adds=0;
     unsigned char d;
     switch (cpu) {
     case 1:    //89C51
     case 2:
         p36=p37=1;rst=1;
         while (1) {
             TH0=-100;b_break=0;
             while (RI==0) {if (b_break==1) return;}
             RI=0;
             d=SBUF;
             //address
             P0=adds%256;
             P2=adds/256;
             p27=1;
             //data
             P1=d;
             nop();    //48clcl
             //vpp
             vpp=1;
             nop();    //48clcl
             //ale
             ale=0;
             wait(1);//100uS
             ale=1;
             nop();    //10uS
             vpp=0;
             nop();    //48clcl
             p27=0;
             nop();    //48clcl
             P1=0xff;
             TH0=-100;b_break=0;
             while (d!=P1) {if (b_break==1) return;}    //data
polling
             SBUF=d;
             adds++;
         }
         break;
     case 3:
     case 4:
     case 5:
     case 6:break;
     }
}

yumuzi

void lock(unsigned char cpu) {
     unsigned char i;
     switch (cpu) {
     case 1:    //89c51
     case 2:
         //lock 1
         rst=p26=p36=p27=p37=1;nop();
         vpp=1;
         nop();
         ale=0;
     //    for (i=0;i<6;i++) wait(100);
         wait(1);
         ale=1;
         nop();
         vpp=0;
         nop();
     
         //lock 2
         rst=p26=p27=1;p36=p37=0;nop();
         vpp=1;
         nop();
         ale=0;
     //    for (i=0;i<6;i++) wait(100);
         wait(1);
         ale=1;
         nop();
         vpp=0;
         nop();
         
         //lock 3
         rst=p26=p36=1;p27=p37=0;nop();
         vpp=1;
         nop();
         ale=0;
     //    for (i=0;i<6;i++) wait(100);
         wait(1);
         ale=1;
         nop();
         vpp=0;
         nop();
         break;
     case 3:
     case 4:
     case 5:
     case 6:break;
     }
}

void main(void) {
     unsigned char disp,flash,temp,cpu;
     EA=1;
     SCON=0xd8CON=0x80;
     TMOD=0x21;
     TL1=TH1=0xff;TR1=1;
     TH0=-100;ET0=TR0=1;

     flash=0x80;

yumuzi

while (1) {
         temp=command();
         switch (temp) {
         case 0:
         case 1:        //89c51
         case 2:        //89C52
         case 3:        //80f51
         case 4:        //80F52
         case 5:        //87F51
         case 6:cpu=temp;SBUF=temp;break;//87f52
         case e:SBUF=temp;earsure(cpu);break;    //erasure
         case p:SBUF=temp;program(cpu);break;    //program
         case l:lock(cpu);SBUF=temp;break;    //lock
         default:SBUF=temp;break;
         }
         b_break=0;
         if ((++disp)>flash) {disp=0;led=!led;}
     }
}
//HT1380实时时钟驱动程序

sbit clock_dat=P0^1;
sbit clock_clk=P0^2;
sbit clock_rst=P0^3;

sbit a0=ACC^0;
sbit a1=ACC^1;
sbit a2=ACC^2;
sbit a3=ACC^3;
sbit a4=ACC^4;
sbit a5=ACC^5;
sbit a6=ACC^6;
sbit a7=ACC^7;

void clock_out(unsigned char dd) {
     ACC=dd;
     clock_dat=a0;clock_clk=1;clock_clk=0;
     clock_dat=a1;clock_clk=1;clock_clk=0;
     clock_dat=a2;clock_clk=1;clock_clk=0;
     clock_dat=a3;clock_clk=1;clock_clk=0;
     clock_dat=a4;clock_clk=1;clock_clk=0;
     clock_dat=a5;clock_clk=1;clock_clk=0;
     clock_dat=a6;clock_clk=1;clock_clk=0;
     clock_dat=a7;clock_clk=1;clock_clk=0;
}
unsigned char clock_in(void) {
     clock_dat=1;
     a0=clock_dat;
     clock_clk=1;clock_clk=0;a1=clock_dat;
     clock_clk=1;clock_clk=0;a2=clock_dat;
     clock_clk=1;clock_clk=0;a3=clock_dat;
     clock_clk=1;clock_clk=0;a4=clock_dat;
     clock_clk=1;clock_clk=0;a5=clock_dat;
     clock_clk=1;clock_clk=0;a6=clock_dat;
     clock_clk=1;clock_clk=0;a7=clock_dat;
     return(ACC);
}
unsigned char read_clock(unsigned char ord) {
     unsigned char dd=0;
     clock_clk=0;
     clock_rst=0;
     clock_rst=1;
     clock_out(ord);
     dd=clock_in();
     clock_rst=0;
     clock_clk=1;
     return(dd);
}
void write_clock(unsigned char ord,unsigned char dd) {
     clock_clk=0;
     clock_rst=0;
     clock_rst=1;
     clock_out(ord);
     clock_out(dd);
     clock_rst=0;
     clock_clk=1;
}
/*单个汉字库字摸提取程序，tc2.0编译*/
＃i nclude "stdio.h"
＃i nclude "dos.h"
＃i nclude "process.h"
＃i nclude "string.h"


void main(void) {
     long int num_bytes,qm,wm;
     unsigned char d,i,j,k,a[132],b[132];
     unsigned char * data;
     unsigned char * hz;
     static unsigned  char dd[103];
     FILE *fp;

     if ((fp=fopen("hzk16f","rb"))==NULL) {
         printf("can't open hzk16\n");
         exit(1);
     }
     clrscr();
     while (1) {

         data=(unsigned char *) malloc(33);
         printf("please input:\n");
         scanf("%s",dd);    /*输入一个汉字*/

         qm=* dd;        /*通过区位码计算其在hzk16f文件中的偏移地址*/
         qm=qm-161;
         if (qm>87) exit(0);
         wm=* (dd+1);
         wm=wm-161;
         if (wm>94) exit(0);
         num_bytes=((long)qm*94+wm)*32;
         fseek(fp,num_bytes,SEEK_SET);
         fgets(data,33,fp);
         for (i=0;i<32;i++) b[i]=* data++;
         for (i=0;i<32;i+=2) a[i/2]=b[i];
         for (i=0;i<32;i+=2) a[i/2+16]=b[i+1];
         for (i=8;i<16;i++) b[i]=a[i];
         for (i=8;i<16;i++) a[i]=a[i+8];
         for (i=8;i<16;i++) a[i+8]=b[i];

         /*转换，hzf16f在电脑的储存格式是以行为字节计算的，一般的lcd都采用以列为字节计算*/
         for (k=0;k<32;k+=8) {
             for (j=0;j<8;j++) {
                 d=0;
                 for (i=0;i<8;i++) {
                     if (a[i+k]>=0x80) {
                         switch (i) {
                         case 0:d+=1;break;
                         case 1:d+=2;break;
                         case 2:d+=4;break;
                         case 3:d+=8;break;
                         case 4:d+=0x10;break;
                         case 5:d+=0x20;break;
                         case 6:d+=0x40;break;
                         case 7:d+=0x80;break;
                         }
                     }
                 }
                 for (i=0;i<8;i++) a[i+k]<<=1;
                 b[j+k]=d;
             }
         }
         clrscr();
         printf("/*%s:*/\n",dd);        /*输出0x00格式的16进制数*/
         for (k=0;k<32;k+=8) {
             for (j=0;j<8;j++) printf("0x%x,",b[j+k]);
             printf("\n");
         }
         getch();
     }
}
//按键扫描驱动程序

unsigned char key,key_h,kpush;
unsigned int key_l;

//按键连接到p1.0、p1.1、p1.2

void int_t0(void) interrupt 1 {
     unsigned char dd,i;
     TL0=TL0+30;TH0=0xfb;    //800
     /*    按键判别    */
     if ((P1&0x7)==0x7) {
         if ((key_l>30)&&(key_l<800)&&(key_h>30)) {        
//释放按键，如果之前按键时间少于1秒，读入键值
             key=kpush;
         }
         if ((++key_h)>200) key_h=200;
         key_l=0;
         if (key>=0x80) key=0;                           
//如果之前的按键为长按1秒，清除键值
     } else {
         kpush=P1&0x7;
         key_l++;
         if ((key_l>800)&&(key_h>30)) {                    
//如果按键超过1秒，键值加0x80标志长按键
             key=kpush|0x80;
             key_h=0;
             key_l=0;
         }
     }
}
void main(void) {
     TMOD=0x1;TR0=1;ET0=1;EA=1;
     while (1) {
         while (!key) {}
         switch (key) {
         case 1:break;
         case 2:break;
         }
     }
//串行驱动led显示，
//一个74hc595位移寄存器驱动三极管驱动led位，
//两个74hc595驱动led段，方式位5位x8段x2=10个数码管
//5分频，每次扫描时间位1.25ms


//定义特殊符号

#define nul 0xf
#define qc 0xc
#define qb 0xb
#define q_ 0xa
#define q__ 0xd
#define q___ 0xe
#define qp 0x10
#define qe 0x11
#define qj 0x12
#define qn 0x13
#define qf 0x14
#define qa 0x15
#define qr 0x16
#define qd 0x17
#define qu 0x18
#define ql 0x19
#define qh 0x1a
#define qwen 0x1b
#define qt 0x1c
#define qla 0x1d
#define qlb 0x1e
#define qlc 0x1f
#define qld 0x20
#define qle 0x21
#define qlf 0x22
#define qlg 0x23
#define qldp 0x24


//显示段信息，不同led排列组合的段信息只需更改8个数值即可。
//因此，该定义具有通用性。

//    显示   
//        -d 20
//    |c 40    |e 10
//        - g        80        
//    |b 2    |f 4
//        _a1    .dp 8
#define pa 1
#define pb 2
#define pc 0x40
#define pd 0x20
#define pe 0x10
#define pf 4
#define pg 0x80
#define pdp 8

//--------------
#define l0 pdp+pg
#define l1 255-pf-pe
#define l2 pdp+pc+pf
#define l3 pdp+pc+pb
#define l4 pdp+pa+pb+pd
#define l5 pdp+pb+pe
#define l6 pdp+pe
#define l7 pdp+pc+pg+pb+pa
#define l8 pdp
#define l9 pdp+pb
#define la pdp+pa
#define lb pdp+pd+pe
#define lc pdp+pg+pe+pf
#define ld pdp+pc+pd
#define le pdp+pe+pf
#define lf pdp+pe+pf+pa
#define l_ 255-pg
#define lnul 255
#define ll pdp+pg+pd+pf+pe
#define lp pdp+pa+pf
#define lt pdp+pd+pe+pf
#define lr pdp+pe+pf+pg+pa
#define ln pdp+pg+pa
#define lh pdp+pd+pe+pa
#define ly pdp+pb+pd
#define lu pdp+pg+pd
#define l__ pdp+pg+pb+pc+pe+pf
#define l___ l__-pg
#define l_1 255-pa
#define l_2 255-pa-pg
#define lj 255-(pe+pf+pa)
#define lwen 255-(pd+pe+pg+pb)
#define lall 0


#define lla 255-pa
#define llb 255-pb
#define llc 255-pc
#define lld 255-pd
#define lle 255-pe
#define llf 255-pf
#define llg 255-pg
#define lldp 255-pdp


//串行送出的位信息，目前是10位led显示。
unsigned char code un_dig[]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb};
//串行送出的短信息。
unsigned char code
un_disp[]={l0,l1,l2,l3,l4,l5,l6,l7,l8,l9,l_,lb,lc,l__,l___,lnul,lp,le,lj,ln,lf,la,lr,ld,lu,
ll,lh,lwen,lt,lla,llb,llc,lld,lle,llf,llg,lldp,lnul};




sbit d_clk=P0^0;        //移位时钟
sbit d_dat=P0^1;        //移位数据
sbit d_st=P0^2;            //移位锁定


unsigned char dig;            //位扫描计数器
unsigned char d[10];                            //显示缓冲

//送出8位串行数据
void out_disp(unsigned char dd) {
     unsigned char i;
     for (i=0;i<8;i++) {
         if (dd&1) d_dat=1; else d_dat=0;
         d_clk=0;
         dd>>=1;
         d_clk=1;
     }
}
//控制小数点和闪烁，显示数据|0x040表示有小数点；显示数据|0x80表示闪烁。
void out_displ(unsigned char dd) {
     if (dd>=0x80) {
         if (s001>flash_time) {out_disp(0xff);return;}
     }
     dd&=0x7f;
     if (dd>=0x40) {
         dd=un_disp[dd&0x3f]^pdp;
     } else dd=un_disp[dd];
     out_disp(dd);
}





unsigned int s001;    //闪烁时间参考
void int_t0(void) interrupt 1 {
     unsigned char dd;
     TL0=TL0+30;TH0=0xfb;    //800
     time++;
     if ((++s001)>=800) s001=0;
     //    显示   
     if ((++dig)>4) dig=0;
     d_st=0;
     dd=d[dig+5];
     out_displ(dd);
     dd=d[dig];
     out_displ(dd);
     out_disp(un_dig[dig]);
     d_st=1;
}
void main(void) {
     unsigned char i;
     TMOD=0x1;
     TR0=ET0=1;
     EA=1;
     for (i=0;i<10;i++) d[i]=i;    //display test
     while (1) {}
}

mlkdz2011

万众期待，由深圳市美力科电子有限公司研发、生产，拥有完全自主知识产权的MLK-0211半自动测试烧录机台揭开了神秘的幕纱，展现出空前的性能价格比绝对优势，为集成电路的半自动测试、烧录设备市场提供了不二的选择。具有以下优势功能：
●同时支持6条进料管和6+1条出料管（出料有六条OK管，一条NG管）。
●每次测试、烧录工作可以同时操作两颗集成电路，并能自动区分好坏。
●采用9个直线电机和2个步进电机精确控制，实现各种情况的智能判断。
●使用多种类型，总数达到9条直线导轨，保证相应机构运作的长期稳定。
●友好的简体中文人机对话界面，可扩展多国语言，方便于操作易懂。
●支持多种集成电路的功能测试、程序烧录，最高测试速度不低于每小时7000片，最高烧录速度不低于每小时2000片。
●主轨道材料采用特殊表面处理工艺，同时兼顾耐用、流畅、美观的要求。
●空前的性能价格比的具体表现在：使您的投资降低到其它同类型产品的几分之一至十分之一。填补了该领域的产业空白。
●与集成电路封装厂、专业测试厂合作，改建扩建相应的测试和烧录设备。
前期主推DIP300mil 、SOP300mil、SOP150mil等封装的集成电路机台，其它封装可以预先订货。欢迎贵客关注、了解本公司的系列产品。
深圳市美力科电子有限公司
电话：+86-755-82965828/82965118/82965533/82965566-610
传真：+86-755-82964700
网址：http://www.mlkdz.com
地址：深圳市福田区岗厦彩天名苑红荔轩10d。
联系人：王其玉 手机：13684932947
QQ：1097669821 981734760
邮箱：mlk_wqy@126.com

tl1116

选择千锋 选择卓越  千锋3G 手机软件开发培训第一品牌

北京3g  北京技能培训  网站工程师培训

shenmei123

楼主好东西啊
----------------------------
深圳市深美科技有限公司是一家专业代理和分销世界各类知名品牌IC及二三极管的高新技术性贸易公司，所经营的产品广泛应用于军工、通信、仪器仪表、金融设 备、工业控制、电脑周边设备以及电子消费类产品。公司凭借良好的商业信誉度与国内外多家实力强大的现货库存公司签订了计划销售协议，建立起多渠道的供应合 作关系，在欧美、美国、日本、韩国、新加坡、台湾等地拥有长期稳定的供货商。同时我们凭借全球性的供货渠道及采购网络为各客户寻求各类IC，尤其擅长供应 偏门（如军品和工业品）、停产、断档、计划分配的产品，在同行业中树立了良好的口碑，使公司的规模不断的得到巩固和发展，取得了良好的经济和社会效益。 公司主要经销的品牌有：SST、PHILIPS、AD、BB、MAXIM、ATMEL、XILINX、FREE（MOT）、ON、TASHIBA、 NEC、NS、HT等，还兼营诸多偏冷门、停产、军工业品电路。公司还致力于为产业伙伴提供全方位的嵌入式系统半导体产品技术服务，产品应用覆盖，军事， 医疗，工业，农业，电力，网络，通信，工控，汽车、消费类电子等行业，合作伙伴包括国内外贸易同行、电子产品制造商、广大科研院所以及众多的跨国企业。 公司始终坚持以“诚信为本”作为公司的经营理念，客户的任何需求我们都会尽最大的努力和热诚来配合，无论数量或金额大小，我们对所有询价、订单一视同仁， 询价在24－48小时内答复；国内现货交货期1－3天，国外现货交货期12－20天，最快4－7天。 我们具有最具实力的专业销售团队，经过全体队员的坚持不懈共同协作，在 香港 深圳 北京 西安等地建立了稳定的销售渠道。我公司保证售出的产品符合生产厂家的质量标准，并对进货和出货均有严格防静电保护措施，并有专人跟踪服务。 期待与您的合作，我们将以最优惠的价格、最优良的产品品质为您提供最优质的服务！   
Ic无忧网：www.51ic.cc
Ic商城：www.icmall.com.cn
连接器商城：http://www.connmall.com.cn/

xiaoyu228

楼主强悍啊...谢谢.分享