基于ST7920控制器的12864温度曲线

#include <reg51.h>#include <intrins.h>#include <math.h>#define uint unsigned int#define uchar unsigned charsbit rs=P2^4;sbit rw=P2^5;sbit e=P2^6;sbit RES= P2^3;sbit PSB= P2^1;sbit DQ=P3^2; //18B20信号脚bit ReadTempFlag;uint temp;float ftemp;uchar code table[]="0123456789.";unsigned char code user16x16[]={ //℃字模0x00,0x00,0x00,0x00,0x00,0x00,0x63,0xC0,0x66,0x60,0x0C,0x20,0x0C,0x00,0x0C,0x00, 0x0C,0x00,0x0C,0x20,0x06,0x60,0x03,0xC0,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,};void writecom(uchar com);void writedat(uchar dat);void initinal(void);void Init_Timer0(void);/*------------------------------------------------uS延时函数------------------------------------------------*/void DelayUs2x(unsigned char t){while(--t);}/*------------------------------------------------mS延时函数------------------------------------------------*/void DelayMs(unsigned char t){while(t--){//大致延时1mSDelayUs2x(245);DelayUs2x(245);}}//12MHZ晶振延时50微秒void delay50us(uint t){uchar j;for(;t>0;t--)for(j=19;j>0;j--);}bit Init_DS18B20(void){bit dat=0;DQ = 1; //DQ复位DelayUs2x(5); //稍做延时DQ = 0; //单片机将DQ拉低DelayUs2x(200); //精确延时大于480us 小于960us DelayUs2x(200);DQ = 1; //拉高总线DelayUs2x(50); //15~60us 后接收60-240us的存在脉冲dat=DQ; //如果x=0则初始化成功, x=1则初始化失败DelayUs2x(25); //稍作延时返回return dat;}/*------------------------------------------------读取一个字节------------------------------------------------*/unsigned char ReadOneChar(void){unsigned char i=0;unsigned char dat = 0;for (i=8;i>0;i--){DQ = 0; // 给脉冲信号dat>>=1;DQ = 1; // 给脉冲信号if(DQ)dat|=0x80;DelayUs2x(25);return(dat);}/*------------------------------------------------写入一个字节------------------------------------------------*/void WriteOneChar(unsigned char dat){unsigned char i=0;for (i=8; i>0; i--){DQ = 0;DQ = dat&0x01;DelayUs2x(25);DQ = 1;dat>>=1;}DelayUs2x(25);}/*------------------------------------------------读取温度------------------------------------------------*/unsigned int ReadTemperature(void){unsigned char a=0;unsigned int b=0;Init_DS18B20();WriteOneChar(0xCC); // 跳过读序号列号的操作WriteOneChar(0x44); // 启动温度转换DelayMs(10);Init_DS18B20();WriteOneChar(0xCC); //跳过读序号列号的操作WriteOneChar(0xBE); //读取温度寄存器等（共可读9个寄存器）前两个就是温度a=ReadOneChar(); //低位b=ReadOneChar(); //高位temp=b;temp<<=8;temp=temp|a;ftemp=temp*0.0625;temp=ftemp*10+0.5;ftemp=ftemp+0.05;return temp;/*------------------检查忙位-----------------------------*/void chkbusy(){rs=0;rw=1;e=1;P0=0xff ;while((P0&0x80)==0x80);e=0;}//写命令void writecom(uchar com){chkbusy();rw=0;rs=0;delay50us(1);P0=com;e=1;delay50us(10);e=0;}//写数据void writedat(uchar dat){chkbusy();rw=0;rs=1;delay50us(1);P0=dat;e=1;delay50us(10);e=0;}//初始化void initinal(void){DelayMs(40); //大于40MS的延时程序PSB=1; //设置为8BIT并口工作模式DelayMs(1); //延时RES=0; //复位DelayMs(1); //延时RES=1; //复位置高DelayMs(10);//Write_Cmd(0x30); //选择基本指令集//DelayUs2x(50); //延时大于100uswritecom(0x30); //选择8bit数据流DelayUs2x(20); //延时大于37uswritecom(0x0c); //开显示(无游标、不反白)DelayUs2x(50); //延时大于100uswritecom(0x01); //清除显示，并且设定地址指针为00HDelayMs(15); //延时大于10mswritecom(0x06); //指定在资料的读取及写入时，设定游标的移动方向及指定显示的移位，光标从右向左加1位移动DelayUs2x(50); //延时大于100us}/*************读数据************/uchar read(){uchar shuju;chkbusy();P0=0xff;rs=1;rw=1;e=1;shuju=P0;DelayUs2x(5);e=0;DelayUs2x(5);return(shuju);}/*------------------------------------------------用户自定义字符------------------------------------------------*/void CGRAM(){int i;writecom(0x30);writecom(0x40);for(i=0;i<16;i++){writedat(user16x16[i*2]);writedat(user16x16[i*2+1]);}}/*------------------------------------------------显示用户自定义字符------------------------------------------------*/void DisplayCGRAM(unsigned char x,unsigned char y) {switch(y){case 1: writecom(0x80+x);break;case 2: writecom(0x90+x);break;case 3: writecom(0x88+x);break;case 4: writecom(0x98+x);break;default:break;}writedat(0x00);writedat(0x00);}//增加画点子程序void DrawPoint(uchar X,uchar Y,uchar Color){uchar Row,Tier,Tier_bit ;uchar ReadOldH,ReadOldL ;X&=0x7f;//防止x坐标超过127Y&=0x3f;//防止y坐标超过63writecom(0x34);writecom(0x36);Tier=X>>4 ;Tier_bit=X&0x0f ;if(Y<32){Row=Y ;}else{Row=Y-32 ;Tier+=8 ;}writecom(Row+0x80);writecom(Tier+0x80);read();ReadOldH=read();ReadOldL=read();writecom(Row+0x80);writecom(Tier+0x80);if(Tier_bit<8){switch(Color){case 0 :ReadOldH&=(~(0x01<<(7-Tier_bit)));break ;case 1 :ReadOldH|=(0x01<<(7-Tier_bit));break ;case 2 :ReadOldH^=(0x01<<(7-Tier_bit));break ;default :break ;}writedat(ReadOldH);writedat(ReadOldL);}else{switch(Color){case 0 :ReadOldL&=(~(0x01<<(15-Tier_bit)));break ;case 1 :ReadOldL|=(0x01<<(15-Tier_bit));break ;case 2 :ReadOldL^=(0x01<<(15-Tier_bit));break ;default :break ;}writedat(ReadOldH);writedat(ReadOldL);}writecom(0x30);}void clrscreen(){writecom(0x01);delay50us(10);}//------------------清整个GDRAM空间---------------------------- void clrgdram(){uchar i,j;for(j=0;j<32;j++){writecom(0x34);writecom(0x80+j);writecom(0x80);writecom(0x30); //基本指令集，绘图关for(i=0;i<32;i++)writedat(0x00); // 写入0x00}writecom(0x36);writecom(0x30);}/*------------------------------------------------------------主函数------------------------------------------------------------*/void main(){uchar i,j,e,colour=1;i=16;rw=0;Init_Timer0();initinal();clrgdram();delay50us(2);clrscreen();writecom(0x34); //绘图显示关CGRAM();while(1){uint a,b,c,d;DrawPoint(17,6 ,colour);DrawPoint(17,22,colour);DrawPoint(17,38,colour); DrawPoint(17,54,colour); for(j=16;j<=127;j++){DrawPoint(16,j-16,colour); DrawPoint(j,63,colour);//DrawPoint(i,e,colour); writecom(0x80);writedat(table[6]); writedat(table[7]); writecom(0x90);writedat(table[5]); writedat(table[1]); writecom(0x88);writedat(table[3]); writedat(table[5]); writecom(0x98);writedat(table[1]); writedat(table[9]); DisplayCGRAM(5,1);}if(ReadTempFlag==1){ReadTempFlag=0;a=ReadTemperature();e=73-a/10;DrawPoint(i,e,colour);delay50us(10);b=a/100;c=a%100/10;d=a%100%10;writecom(0x83);writedat(table[b]);delay50us(1);writedat(table[c]);delay50us(1);writedat(table[10]);delay50us(1);writedat(table[d]);delay50us(4);writecom(0x83);i++;if(i>=128){i=16;clrgdram();}}}}//18B20作为温度传感器，同时显示温度曲线和当前温度。