做的單片機課設
單片機源程序如下:
- #include<reg51.h>
- #include<intrins.h>
- sbit RES1=P2^0;
- sbit A0=P2^1;
- sbit RW=P2^2;
- sbit E=P2^3;
- sbit B0=P0^0;
- sbit B1=P0^1;
- sbit B2=P0^2;
- sbit DQ=P3^0;
- sbit IO=P3^3;
- sbit SCLK=P3^2;
- sbit CE=P3^1;
- unsigned char state_button,time_jian;
- void delay(unsigned int i)
- {
- while(i--);
- }
- void wendu_reset(void)
- {
- unsigned char r=0;
- DQ=1;
- delay(8);
- DQ=0;
- delay(90);
- DQ=1;
- delay(14);
- r=DQ;
- delay(20);
- }
- void wendu_write(unsigned char date)
- {
- unsigned char i=0;
- for(i=8;i>0;i--)
- {
- DQ=0;
- DQ=date&0x01;
- delay(7);
- DQ=1;
- date>>=1;
- }
- }
- signed int wendu_read(void)
- {
- unsigned char i=0,t=0,pn=0;
- for(i=8;i>0;i--)
- {
- DQ=0;
- t>>=1;
- DQ=1;
- if(DQ==1)
- {
- t=0x08;
- }
- delay(4);
- }
- return(t);
- }
- void time_write(unsigned char time_wd)
- {
- unsigned char i,j;
- for(i=0;i<8;i++)
- {
- j=time_wd&0x01;
- IO=0;
- SCLK=0;
- if(j==1)
- {
- IO=1;
- }
- time_wd=time_wd>>1;
- SCLK=1;
- }
- SCLK=0;
- }
- unsigned char time_read()
- {
- unsigned char time_rd;
- unsigned char i;
- IO=1;
- for(i=0;i<8;i++)
- {
- SCLK=0;
- time_rd=time_rd>>1;
- if(IO==1)
- {
- time_rd=time_rd|0x80;
- }
- SCLK=0;
- return(time_rd);
- }
- unsigned char get_time(unsigned char ord);
- {
- unsigned char dd=0;
- SCLK=0;
- CE=0;
- CE=1;
- time_write(ord);
- dd=time_read();
- CE=0;
- return(dd);
- }
- void set_time(unsigned char ord,unsigned char dd)
- {
- SCLK=0;
- CE=0;
- CE=1;
- time_write(ord);
- time_write(dd);
- CE=0;
- }
- void start(void)
- {
- unsigned char i;
- set_time(0x8e,0x00);
- set_time(0x80,0x00);
- set_time(0x84,0x00);
- set_time(0x90,0xa5);
- set_time(0x8e,0x80);
- RES1=0;
- RES1=1;
- dis_write_cmd(0xaf);
- clean();
- jianjie();
- for(i=1;i<20;i++)
- {
- delay(10000);
- }
- clean();
- tuxiang();
- }
- wendu_reset();
- wendu_write(0xcc);
- wendu_write(0x44);
- wendu_reset();
- wendu_write(0xcc);
- wendu_write(0xbe);
- a=wendu_read();
- b=wendu_read();
- pn=b&0x80;
- ……………………
- …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼
所有資料51hei提供下載:
單片機課程設計作業.zip
(123.35 KB, 下載次數: 118)
2017-12-30 13:31 上傳
點擊文件名下載附件
|