89C51编程程序

发布时间：2012-8-15 23:15    发布者：zbzb12345
关键词： 89C51 , 编程
  1. #include "at89x52.h"
  2. #include "stdio.h"
  3. #include "intrins.h"
  4. #include "ctype.h"
  5. sbit rdy=P3^2;
  6. sbit vpp=P3^3;
  7. sbit  p26=P3^4;
  8. sbit p27=P3^5;
  9. sbit p36=P3^6;
  10. sbit p37=P3^7;
  11. sbit  prog=P2^7;
  12. void init_serial()
  13. {
  14. SCON=0x50; /*mode  1*/
  15. TMOD=0x20;
  16. TH1=0xfd;
  17. PCON=0x80;  /*38400bps*/
  18. TR1=1;   /*load tmr1*/
  19. TI=1;
  20. ES=1;}
  21. void init_pro()
  22. {
  23. p26=0;
  24. p27=0;
  25. p36=0;
  26. p37=0;
  27. vpp=1;
  28. prog=1;
  29. }
  30. void sendbyte(unsigned char da)        /*send a  byte*/
  31. {
  32. while(!TI);
  33. TI=0;
  34. SBUF=da;}

  36. unsigned char  IntToAscii(unsigned char a)     /*change DEC to ASCII HEX code*/
  37. {
  38. if(a<10) return a+48;
  39. if(a>9) return a+55;}
  40. unsigned int getadr()                        /*get 5 diti  DEC adr*/
  41. {
  42. unsigned char i,a[5];
  43. for(i=0;i<5;i++)
  44. {
  45.   while(!RI);
  46.   RI=0;
  47.   a=SBUF-48;
  48.   }
  49. return  a[0]*10000+a[1]*1000+a[2]*100+a[3]*10+a[4];}
  50. unsigned char getdata()                     /*get 2 diti  HEX data*/
  51. {
  52. unsigned char d1,d2;
  53. while(!RI);
  54. RI=0;
  55. d1=toint(SBUF);
  56. while(!RI);
  57. RI=0;
  58. d2=toint(SBUF);
  59. return d1*16+d2;}

  61. unsigned int detchip(int adr)
  62. {
  63. P0=0xff;
  64. P1=adr%256;P2=adr/256;
  65. init_pro();
  66. _nop_();_nop_();_nop_();_nop_();_nop_();  /*delay 10 us*/
  67. _nop_();_nop_();_nop_();_nop_();_nop_();
  68. return P0;}

  70. void read()
  71. {
  72. unsigned int adr,maxadr;
  73. unsigned char h,l;
  74. P0=0xff;
  75. maxadr=getadr();
  76. for(adr=0;adr
  77. {
  78.    P1=adr%256;P2=adr/256;
  79.    p26=0;
  80.    p27=0;
  81.    p36=1;
  82.    p37=1;
  83.    vpp=1;
  84.    prog=1;
  85.    h=IntToAscii(P0/16);
  86.    sendbyte(h);
  87.    l=IntToAscii(P0%16);
  88.    sendbyte(l);}
  89. init_pro();}
  90. unsigned int test(unsigned int nn)
  91. {
  92. unsigned int adr,counter=0;
  93. P0=0xff;
  94. for(adr=0;adr
  95. {
  96.   P1=adr%256;P2=adr/256;
  97.   p26=0;
  98.   p27=0;
  99.   p36=1;
  100.   p37=1;
  101.   vpp=1;
  102.   prog=1;
  103.   _nop_();_nop_();_nop_();_nop_();_nop_();  /*delay 10 us*/
  104.   _nop_();_nop_();_nop_();_nop_();_nop_();   
  105.   if(P0!=0xff) counter++;}
  106.   init_pro();
  107.   return counter;}
  108. unsigned char erase(unsigned int nn,unsigned  int p)
  109. {
  110. unsigned int i;
  111. P0=0xff;
  112. p26=1;
  113. p27=0;
  114. p36=0;
  115. p37=0;
  116. vpp=0;
  117. prog=1;
  118. for(i=0;i<50000;i++) _nop_();
  119. switch(p)
  120. {
  121.   case 0 : prog=0;
  122.            prog=1;
  123.            break;
  124.   case 1 : prog=0;
  125.            _nop_();
  126.            prog=1;
  127.            break;
  128.   case 2 : prog=0;
  129.            _nop_();_nop_();
  130.            prog=1;
  131.            break;
  132.   case 3 : prog=0;
  133.            _nop_();_nop_();_nop_();
  134.            prog=1;
  135.            break;
  136.   case 4 : prog=0;
  137.            _nop_();_nop_();_nop_();_nop_();
  138.            prog=1;
  139.            break;
  140.   case 5 : prog=0;
  141.            _nop_();_nop_();_nop_();_nop_();_nop_();
  142.            prog=1;
  143.            break;
  144.   case 6 : prog=0;
  145.            _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
  146.            prog=1;
  147.            break;
  148.   case 7 : prog=0;
  149.            _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
  150.            prog=1;
  151.            break;
  152.   case 8 : prog=0;
  153.            _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
  154.            prog=1;
  155.            break;
  156.   default: prog=0;
  157.            for(i=0;i
  158.            prog=1;
  159.            break;}
  160. _nop_();_nop_();_nop_();_nop_();
  161. _nop_();_nop_();_nop_();_nop_();
  162. vpp=1;
  163. for(i=0;i
  164. if(test(nn)==0) return 's';
  165. else return 'f';}
  166. unsigned char write()
  167. {
  168. unsigned int  adr,d,i;
  169. p26=0;
  170. p27=1;
  171. p36=1;
  172. p37=1;
  173. vpp=0;
  174. prog=1;
  175. for(i=0;i<4000;i++) _nop_();
  176. adr=getadr();
  177. d=getdata();
  178. while(1)
  179. {
  180.   if(adr>50000) break;
  181.   P1=adr%256;P2=(adr/256)|0x80;
  182.   P0=d;
  183.   TI=0;
  184.   SBUF='s';
  185.   prog=0;
  186.   _nop_();_nop_();_nop_();
  187.   prog=1;
  188.   adr=getadr();
  189.   d=getdata();
  190.   while(!rdy);}
  191.   init_pro();
  192.   return  'f';}
  193. unsigned char lock(unsigned char level)
  194. {
  195. unsigned int i;
  196. vpp=0;
  197. if(level==1) {p26=1;p27=1;p36=1;p37=1;}
  198. if(level==2) {p26=1;p27=1;p36=0;p37=0;}
  199. if(level==3)  {p26=1;p27=0;p36=1;p37=0;}
  200. for(i=0;i<4000;i++) _nop_();
  201. prog=1;
  202. _nop_();_nop_();_nop_();_nop_();_nop_();  /*delay 10 us*/
  203. _nop_();_nop_();_nop_();_nop_();_nop_();
  204. prog=0;
  205. _nop_();_nop_();_nop_();_nop_();_nop_();  /*delay 10 us*/
  206. _nop_();_nop_();_nop_();_nop_();_nop_();
  207. prog=1;
  208. _nop_();_nop_();_nop_();_nop_();_nop_();
  209. while(!rdy);
  210. init_pro();
  211. return 'o';}
  212. void main()
  213. {
  214. unsigned char data c;
  215. unsigned int data adr,l,dx;
  216. init_pro();
  217. init_serial();
  218. while(1)
  219. {
  220.   init_pro();
  221.   scanf("%c",&c);
  222.   switch(c)
  223.   {
  224.    case 'c' : printf("%c",'o');
  225.               break;
  226.    case 'd' :  scanf("%x",&adr);
  227.               printf("%x",detchip(adr));
  228.               break;
  229.    case 't' : scanf("%u",&dx);
  230.               printf("%u",test(dx));
  231.               break;
  232.    case 'r' : read();
  233.               break;
  234.    case 'e' : scanf("%u,%u",&adr,&dx);
  235.               printf("%c",erase(adr,dx));
  236.               break;
  237.    case 'w' : printf("%c",write());
  238.               break;
  239.    case 'l' :  scanf("%u",&l);
  240.               printf("%c",lock(l));
  241.               break;
  242.    case 'h' : printf("**********Er6y Programmer Help  Window***********\n");
  243.               break;
  244.     default : break;}


  247.   }
  248. }
复制代码


文章来源:http://www.originic.hk/bbs/display.asp?id=290
本文地址：https://www.eechina.com/thread-95814-1-1.html     【打印本页】

本站部分文章为转载或网友发布，目的在于传递和分享信息，并不代表本网赞同其观点和对其真实性负责；文章版权归原作者及原出处所有，如涉及作品内容、版权和其它问题，我们将根据著作权人的要求，第一时间更正或删除。
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以发表评论 登录 | 立即注册

贸泽电子有奖问答视频，答对领10元微信红包
白皮书下载：测量系统构建完整指南

厂商推荐

相关视频

关于我们  -  服务条款  -  使用指南  -  站点地图  -  友情链接  -  联系我们
电子工程网 © 版权所有   京ICP备16069177号 | 京公网安备11010502021702
快速回复 返回顶部 返回列表