⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 avryejing.c

📁 使用OKI公司8255A控制62256RAM程序,并使用8803液晶显示
💻 C
字号:
#include"mega16.h"
#include"delay.h"
#define Line_Len 30
//---------定义数据通道口------------------
#define Data_Addr PORTC
#define Date_en DDRC
#define Date_in PINC
#define MyWR PORTB.0
#define MyRD PORTB.1
#define MyCE PORTB.2
#define MyCD PORTB.3

void Post_Msg(unsigned char msg)
{Date_en=0xff;
 Data_Addr=0xff; 		
 MyCE=0;
 MyCD=0;
 Data_Addr = msg;  
 MyWR=0;
 MyWR=1;
 MyCE=1;
}

//------------送一条指令函数-----------------
void Post_Com(unsigned char msg)
{Date_en=0xff;
 MyCE=0;
 MyCD=1;
 Data_Addr=msg;  
 MyWR=0;
 MyWR=1;
 MyCE=1;
}

//-------------接收一帧据数-------------------
unsigned char Read_Msg()
{unsigned char Statu;
 Date_en=0xff;
 Data_Addr=0xFF;
 MyCE=0;
 MyCD=1;
 MyRD=0;
 Date_en=0;
 Statu=Date_in;
 MyRD=1;
 MyCE=1;
 Date_en=0xff;
 return (Statu);
}
//*********************************************


//*************************************
//读状态函数
//*************************************
void Read_Sta(unsigned char mark)
{     
   bit exit=0;
   unsigned char Sta;
   while(1)
   {
     Sta=Read_Msg();                                      //取得lcd当前状态	 
     switch(mark)										  //得到需要的状态
	  {
	    case 1:if((Sta&0x03)==0x03)exit=1;break;		  //分离状态1,读写状态
            case 2:if(Sta&0x04)exit=1;break;				  //分离状态2
            case 3:if(Sta&0x10)exit=1;break;				  //分离状态3
	    default:break;  
	  }
   	  if(exit)break;   									  //确认退出
   } 
}

//****************************************



//*************************************
//通讯函数
//说明:参数mark:传送的数据,2为两帧dat1和dat2都有效,1为一帧dat1有效,dat1为数据1, dat2为数据2,com为指令码
//*************************************
void Send_lcd(unsigned char mark,unsigned char dat1,unsigned char dat2,unsigned char com)
{
  if(mark)												//判断指令类型
     {
	  Read_Sta(1);
	  Post_Msg(dat1);		     	//类型1和2dat1均有效
	  if(mark==2)
	  {
	    Read_Sta(1);
	    Post_Msg(dat2);                              	//类型2时dat2有效
	  }	 		
	 }
   Read_Sta(1);
   Post_Com(com);								//送指令码
}
//*************************************


//*************************************
//清显示函数
//说明:此函数可将液晶屏内从00单元开始8200单元结束的所有区域数据清零,但是不会对CGRAM汉字字模区清零
//************************************
void Clear()
{
    unsigned int i;	
	Send_lcd(2,0x00,0x00,0x24);			   //置光标首地址(0x00,0x00)
	Send_lcd(0,0x00,0x00,0xb0);			   //设置自动写方式
    for(i=0;i<0x1b00;i++)
	{
		Read_Sta(3);					   //判断状态三(自动写标志位)
		Post_Msg(0x00);					   //当前地址数据清零
	}
	for(i=0x1b00+1100;i<8200;i++)
	{Read_Sta(3);Post_Msg(0x00);}
	Send_lcd(0,0x00,0x00,0xb2);			   //自动写入结束
}
//***********************************
void Reset_Cgram()
{
   unsigned int i;
   Send_lcd(2,0x03,0x00,0x22);				//置CGRAM偏置地址为0x03(0011 100000 000)
   Send_lcd(2,0x00,0x1c,0x24);				//置CGRAM字模首地址为0x1c (001 1100 00000000)
   Send_lcd(0,0x00,0x00,0xb0);				//设置自动写方式,(地址自动增一)
   for(i=0;i<1024;i++)						//将汉字点阵写入对应CGRAM区域
    {
	  Read_Sta(3);  						//读状态三,写标志判断 
	  Post_Msg(k[i]);	
	}
   Send_lcd(0,0x00,0x00,0xb2);				//自动写入结束
}


//************************************
//显示屏初始化函数
//************************************

void rest_lcd()
{ DDRB|=0x0f;
  PORTB|=0x0f;
  Date_en=0xff;
  Data_Addr=0xff;
  Clear();
  Reset_Cgram();
  Send_lcd(2,0x00,0x00,0x40);               //文本区首地址(0x00,0x00)
  Send_lcd(2,Line_Len,0x00,0x41);			//文本区宽度(30字符)
  Send_lcd(2,0x00,0x08,0x42);               //图形区首地址(0x00,0x08)
  //Send_lcd(2,0x00,0x04,0x42);
  Send_lcd(2,Line_Len,0x00,0x43);           //图形区宽度(30字符位置)  
  Send_lcd(0,0x00,0x00,0xa0);               //光标形状态(一行高度)    
  Send_lcd(0,0x00,0x00,0x80);               //点阵逻辑"或"合成
  Send_lcd(0,0x00,0x00,0x9f);               //开文本显示区,开图形显示区,显示光标,置光标闪烁
}
//************************************


//************************************
//显示单个英文字符函数
//说明:输入参数x_h:字符行坐标,(0-15),y_l:字符列坐标(0-29),word为字符代码(支持ASCII码)
//************************************
void word(unsigned char x_h,unsigned char y_l,unsigned char word)
{
   	unsigned int sum;
	sum=(unsigned int)(Line_Len)*(unsigned int)(x_h)+(unsigned int)(y_l);				   //计算当前字符位置以前的总点阵数量
	Send_lcd(2,sum%256,sum/256,0x24);	   //转换为实际行和列地址,并写入LCD
	Send_lcd(1,word,0x00,0xc0);			   //写入LCD当前字符数据
	Send_lcd(2,0,0,0x24);				   //光标回位
}
//************************************




//************************************
//显示英文字符串函数
//说明:输入参数x_h:字符串行坐标(0-15),y_l:字符串起始列坐标(0-29),word_list:字符串指针,(提示:当本行写满时,会自动换行)
//************************************
void En_List(unsigned char x_h,unsigned char y_l,unsigned char *word_list)
{
  unsigned char length=0;
  while(word_list[length]!=0x00)    	   //判断是否字符串结束,将字符串拆分成为单个字符轮流显示
	{
	  word(x_h+length/Line_Len,y_l+length%256,word_list[length++]-32);	   //得到实际行坐标和列坐标,调用显示当前单字符
	}
  Send_lcd(2,0,0,0x24);					   //光标回位
}
//************************************
 
void chinese(unsigned char x_h,unsigned char y_l,unsigned char dat)
{
   unsigned int sum;
   dat=0x80+dat*4;                                 //得到实际地址

   sum=(unsigned int)(x_h)*(unsigned int)(Line_Len)+(unsigned int)y_l;					   //得到当前字符位置
   y_l=sum%256;                                    //得到显示列数
   x_h=sum/256;									   //得到显示行数
   Send_lcd(2,y_l,x_h,0x24);					   //置显示地址
   Send_lcd(1,dat,0x00,0xc0);					   //送显示值--汉字左上部分 
   Send_lcd(1,dat+2,0x00,0xc0);					   //送显示值--汉字右上部分
   sum=sum+Line_Len;							   //修正下半部分字符位置
   y_l=sum%256;									   //得到显示列数
   x_h=sum/256;									   //得到显示行数
   Send_lcd(2,y_l,x_h,0x24);					   //置显示地址
   Send_lcd(1,dat+1,0x00,0xc0);					   //送显示值--汉字左下部分 
   Send_lcd(1,dat+3,0x00,0xc0);					   //送显示值--汉字右下部分
   Send_lcd(2,0,0,0x24);
}

//************************************
//画实点函数
//说明:该函数可以产行屏幕上的任意位置上的点,输入参数,X:行坐标(0-127)Y:列坐标(0-239)
//************************************ 

void point(unsigned char X,unsigned char Y)
{
   unsigned int Sum;						       
   Sum=(unsigned int)(X)*(unsigned int)(Line_Len)*8+(unsigned int)Y;							   //得到当单位置前的点阵和
   Send_lcd(2,Sum/8,Sum/2048+0x08,0x24);		   //换算出实际行列坐标,并将操作地址写入lcd
   Send_lcd(0,0x00,0x00,(0x07-Y%8)|0xf8); 		   //换算出当前位,将该位置1显示
} /**/
//*************************************

//*************************************
//画直线函数
//说明:需要用到画实心点函数Point(x,y),无需借助全局变量
//传入参数:x1,y1:直线起点行列坐标值(0<=x1<=127)(0<=y1<=239)
//传入参数:x2,y2:直线终点行列坐标值(0<=x2<=127)(0<=y2<=239)
//提示:本函数数支持斜率为0和无穷大直线的描绘,当起点和终点相同量,将产生一个实心点
//************************************* 

void Line(unsigned char x1,unsigned char y1,unsigned char x2,unsigned char y2)
{
   unsigned char temp,i;
   float k;
   signed char j;				   
   if(y1>y2){temp=x2;x2=x1;x1=temp;temp=y2;y2=y1;y1=temp;}    //变换次序,得到y2>y1的形式;
   if(y1==y2)												  //当斜率无穷时
     {
	   if(x1>x2)											  //对行坐标排序
	     {for(i=x2;i<=x1;i++)point(i,y1);}					  //画竖线从上到下
	   else
	     {for(i=x1;i<=x2;i++)point(i,y1);}	 
	 }
   else														  //当斜率为有限值时
   {  
      k=(float)y1-y2;									      //得到列差
	  j=x2-x1;												  //得到行差
      k=(float)j/k;	  	  	  								  //得到直线斜率
      if(k==0)												  //当斜率为零时
        {for(i=y1;i<=y2;i++)point(x1,i);}					  //从左至右画直线
      else													  //当斜率不为零时
	    {for(i=y1;i<=y2;i++)point(x1-(i-y1)*k,i);}	 	 	  //按列值从左至右画直线	
    }
}       /* */
//**************************************



//**********************************************************************************************************
//画直角坐标系
//说明:本函数功能的实现要用到画实心点函数Point(x,y),Line(x1,y1,x2,y2)无需用到全局变量参数
//传入参数:xo,yo:直角坐标系的原点行列坐标值,x_t,y_t:直角坐标系竖轴和横轴的长度值
//传入参数:x,y:直角坐标系的竖轴和横轴上该度间距,mark:直角坐标系标志:mark=0时,将以起点坐标为原点仅画出第一象限,
//         mark=1时将以起点坐标为原点画出四象限坐标系,但会占满全屏幕,并且x_t和y_t此时将被忽略
//提示:当x和y值超过240时,将会失去轴线上的该度标识,本函数画出的坐标系在轴的末端带有实心箭步头
//********************************************************************************************************** 
/*
void Zjzb(unsigned char xo,unsigned char yo,unsigned char x_t,unsigned char y_t,unsigned char x,unsigned char y,unsigned char mark)
{
    unsigned char P_x,P_y,i;
	P_x=xo-x_t;											 //得到竖轴终点行坐标值
	P_y=yo+y_t;											 //得到横轴终点列坐标值
    switch (mark)										 //判断坐标系的类型
	  {
	      case 0: 										 //第一象限坐标系
		      Line(xo,yo,P_x,yo);Line(xo,yo,xo,P_y);	 //画纵轴和横轴
			  //------------------------------------------纵轴末端打箭头
			  P_x+=1;Point(P_x,yo-1);Point(P_x,yo+1);
			  P_x+=1;Point(P_x,yo-2);Point(P_x,yo-1);
			  Point(P_x,yo+1);Point(P_x,yo+2);	  
			  //------------------------------------------横轴末端打箭头
			  P_y-=1;Point(xo-1,P_y);Point(xo+1,P_y);
			  P_y-=1;Point(xo-2,P_y);Point(xo-1,P_y);
			  Point(xo+1,P_y);Point(xo+2,P_y);	  
			  //--------------------------------------------
			  P_x=(x_t-3)/x;							  //得到竖轴刻度标志总数
			  for(i=0;i<=P_x;i++)						  //画竖轴刻度标志
			     {Point(xo-i*x,yo+1);Point(xo-i*x,yo+2);Point(xo-i*x,yo+3);}
		      P_y=(y_t-3)/y;							  //得到横轴刻度标志总数
			  for(i=0;i<=P_y;i++)						  //画横轴刻度标志
			     {Point(xo-1,yo+i*y);Point(xo-2,yo+i*y);Point(xo-3,yo+i*y);}
			  break;
		  	  //-------------------------------------------			  
		  case 1:										  //四象限坐标系
		       Line(0,yo,127,yo);Line(xo,0,xo,239);       //画横竖轴
			   break; 
	      default:break;	  
	  }
}   */
//***********************************************************************************************************

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -