main__.c

使用OKI公司8255A控制62256RAM程序,并使用8803液晶显示

	  i=0;
	  //-------------显示小数部分---------------
	if(DpLen)
	{
	if((DpLen<8)||(DpLen>=8&&temp!=0))
	{
	  Post_Msg('.');
	do
	  {Post_Msg(mynum[i]+48);i++;} 
	while(i<j);
	}
	}
   }
}	
//************************************


/************************************************************************
滚动x1到x2这几行的显示屏幕，行是以一个象点为单位
************************************************************************/  
void h_gundong(unsigned x1,unsigned char x2)
{Send_Com(0x03,0xf3);
 Send_Com(0x71,x1*16);
 Send_Com(0x72,x2*16);
 }
 
/************************************************************************
/向上垂直滚动整个屏幕
************************************************************************/  
void l_gundong(unsigned y1,unsigned char y2)
{Send_Com(0x03,0xf4);
 Send_Com(0x71,y1);
 Send_Com(0x72,y2);
 }
//*************************************************************************


//================
//画点
void point(unsigned char X0,unsigned char Y0,unsigned char Pos) 
{
   unsigned char Temp;
   Send_Com(0x12,0xB1+Pos);                     //选择操作图层
   Send_Com(0x00,0xC3);
   Send_Com(0x60,Y0/8);
   Send_Com(0x70,X0);
   Temp=Read_Data(Y0/8,X0,Pos);
   Temp|=0x80>>(Y0%8);
   Post_Msg(Temp);      
   Send_Com(0x00,0xCD);
}

void point_back(unsigned char X0,unsigned char Y0,unsigned char type)
{
 unsigned char temp=0;
 Send_Com(0x12,0x32);//读写数据均在第二层屏幕上面操作
 temp=Y0%8;
 temp=1<<(7-temp);
 Send_Com(0x00,0xc5);//进入图形模式
 Send_Com(0x60,Y0/8); //ｘ，ｙ与液晶的实际地址刚好是反的
 Send_Com(0x70,X0);
 if(type)temp|=Read_Data(Y0/8,X0,type);
 else
  {temp=~temp;
   temp&=Read_Data(Y0/8,X0,type);
   }
 Post_Msg(temp);
 Send_Com(0x12,0x31);//返回到第一层屏幕的操作
 Send_Com(0x00,0xcd);//返回到文字模式 
}
/***************************************************************************
该函数的功能是在屏幕上面打印一条直线 
x1,y1分别表示所画直线的起点坐标 ，x2,y2表示的是所画的直线的终点坐标
type表示的是所画的是空line还是实line，画空line的目的是可以擦除上次画的line

注意x2>x1,y2>y1;必须得保证这两个条件  
****************************************************************************/ 
void Line(unsigned char x1,unsigned char y1,unsigned char x2,unsigned char y2)
{float xielv;
 float temp; 
 unsigned char i;
 xielv=((float)(x2)-(float)(x1))/((float)y2-(float)(y1));
 if(y1==y2)
 {
  if(x1<=x2)
   for(i=x1;i<=x2;i++)point_back(i,y1,2); 
  else
   for(i=x2;i<=x1;i++)point_back(i,y1,2); 
  }
 else 
  if(y1<y2)
  {
   for(i=0;i<(y2-y1);i++)
    {temp=x1+xielv*i;
     point_back(temp,y1+i,2); 
     }
   }
 else
  if(y1>y2)
  {
   xielv=-xielv;
   for(i=0;i<(y1-y2);i++)
    {temp=x1+xielv*i;
     point_back(temp,y1-i,2); 
     }
   } 
 }

void init_8803(void)
{
   MyWR_en=1;
   MyRD_en=1;
   MyCS_en=1;
   MyCD_en=1;
   MyRS_en=1;
   DATA_DIR=0xFF;
   reset_lcd();
   clear();
 
}
#include "8255.c"
#include <mega16.h>
#include <delay.h>

#define WR      PORTA.0
#define WR_en   DDRA.0
#define RD      PORTA.4
#define RD_en   DDRA.4
#define CS      PORTB.3
#define CS_en   DDRB.3
#define A0      PORTA.2
#define A0_en   DDRA.2 
#define A1      PORTA.3
#define A1_en   DDRA.3
#define BUS_out PORTC
#define BUS_in  PINC
#define BUS_en  DDRC

void reset8255(unsigned char state)
{
 BUS_en=0xff;A1_en=1;A0_en=1;CS_en=1;RD_en=1;WR_en=1;
 
 CS=0;          //片选上
 A1=1;          A0=1;//写入寄存器
 WR=0;
 RD=1;
 BUS_out=state;
 WR=1;
 CS=1;
 BUS_en=0x00;
 } 
 
void send8255(unsigned char data,unsigned char direct) 
{
 BUS_en=0xff;
 CS=0;
 switch(direct)
 {
  case 0: A1=0;A0=0;break;
  case 1: A1=0;A0=1;break;
  case 2: A1=1;A0=0;break;
  case 3: A1=1;A0=1;break;
  } 
 WR=0;
 RD=1;
 BUS_out=data;
 WR=1;
 CS=1;  
 }
 
void send_a(unsigned char data)
{
 BUS_en=0xff; 
 CS=0;
 A1=0;A0=0; 
 WR=0;
 RD=1;
 BUS_out=data;
 
 WR=1;
 CS=1;
 BUS_en=0x00;
 }
 
void send_b(unsigned char data)
{
 BUS_en=0xff;
 CS=0;
 A1=0;A0=1;
 WR=0;
 RD=1;
 BUS_out=data;
 WR=1;
 CS=1;
 BUS_en=0x00;
 }
  
void send_c(unsigned char data)
{
 BUS_en=0xff;
 CS=0;
 A1=1;A0=0; 
 WR=0;
 RD=1;
 BUS_out=data;
 WR=1;
 CS=1;
 BUS_en=0x00;
 } 
  
void send_r(unsigned char data)
{
 BUS_en=0xff;
 CS=0;
 A1=1;A0=1;
 WR=0;
 RD=1;
 BUS_out=data;
 WR=1;
 CS=1;
 BUS_en=0x00;
 }    
#include "62256.c"
#define CS_ram          PORTB.2
#define CS_ram_en       DDRB.2

void writeram(unsigned int address,unsigned char data)
{unsigned char temp=0;
 CS_ram_en=1;
 CS_ram=1;
 temp=address;
 send_a(temp);
 address=address>>8;
 temp=address;
 send_b(temp);
 BUS_en=0xff;
 BUS_out=data;  
 
 CS_ram=0;//片选上62256   
 #asm("NOP")
 WR=0;
 WR=1;
 #asm("NOP")
 temp=BUS_in;
 CS_ram=1;
 
 }
unsigned char readram(unsigned int address)
{unsigned char temp=0;
 CS_ram_en=1;
 CS_ram=1;
 RD_en=1;
 temp=address;
 send_a(temp);
 address=address>>8;
 temp=address;
 send_b(temp);
 BUS_en=0x00;
 BUS_out=0x00;
 
 CS_ram=0;//片选上62256   
 RD=0;
 #asm
 NOP
 NOP
 #endasm
 temp=BUS_in;
 RD=1; 
 CS_ram=1;
  
 return temp; 
 } 
unsigned char i=0,j=0;
unsigned char data=0;

void Display(unsigned char data_temp)
{
unsigned char tmp;
tmp=data_temp/100;
word(i,j,tmp+48);
j++;
tmp=data_temp%100/10;
word(i,j,tmp+48);
j++;
tmp=data_temp%10;
word(i,j,tmp+48);
j+=3;
if(j>18){j=0;i+=2;if(i>6)i=0;}
}

void main(void)
{
unsigned char temp=0;

reset8255(0x80);
init_8803();

writeram(0,60);
writeram(1,128);
writeram(2,50);
writeram(3,99);
Display(readram(0));
Display(readram(1));
Display(readram(2));
Display(readram(3));
Display(readram(4));
Display(readram(5));


while(1){};
}