📄 62256tiao.i

📁 使用OKI公司8255A控制62256RAM程序,并使用8803液晶显示
💻 I
📖 第 1 页 / 共 2 页
字号:
12 下一页
/************************************************************************
该程序是所有的并行器件挂在PC口上面，由8255负责给62256写地址
该程序是测试单片机最小开发系统的小工具，里面包含8255，62256，串口，液晶
，还能将62256的数据送到PC机，对AD进行采样等，常用器件及常用调试工具和方法
**************************************************************************/
// CodeVisionAVR C Compiler
// (C) 1998-2001 Pavel Haiduc, HP InfoTech S.R.L.

// I/O registers definitions for the ATmega16


#pragma used+
sfrb TWBR=0;
sfrb TWSR=1;
sfrb TWAR=2;
sfrb TWDR=3;
sfrb ADCL=4;
sfrb ADCH=5;
sfrw ADCW=4;      // 16 bit access
sfrb ADCSRA=6;
sfrb ADMUX=7;
sfrb ACSR=8;
sfrb UBRRL=9;
sfrb UCSRB=0xa;
sfrb UCSRA=0xb;
sfrb UDR=0xc;
sfrb SPCR=0xd;
sfrb SPSR=0xe;
sfrb SPDR=0xf;
sfrb PIND=0x10;
sfrb DDRD=0x11;
sfrb PORTD=0x12;
sfrb PINC=0x13;
sfrb DDRC=0x14;
sfrb PORTC=0x15;
sfrb PINB=0x16;
sfrb DDRB=0x17;
sfrb PORTB=0x18;
sfrb PINA=0x19;
sfrb DDRA=0x1a;
sfrb PORTA=0x1b;
sfrb EECR=0x1c;
sfrb EEDR=0x1d;
sfrb EEARL=0x1e;
sfrb EEARH=0x1f;
sfrw EEAR=0x1e;   // 16 bit access
sfrb UBRRH=0x20;
sfrb UCSRC=0X20;
sfrb WDTCR=0x21;
sfrb ASSR=0x22;
sfrb OCR2=0x23;
sfrb TCNT2=0x24;
sfrb TCCR2=0x25;
sfrb ICR1L=0x26;
sfrb ICR1H=0x27;
sfrb OCR1BL=0x28;
sfrb OCR1BH=0x29;
sfrw OCR1B=0x28;  // 16 bit access
sfrb OCR1AL=0x2a;
sfrb OCR1AH=0x2b;
sfrw OCR1A=0x2a;  // 16 bit access
sfrb TCNT1L=0x2c;
sfrb TCNT1H=0x2d;
sfrw TCNT1=0x2c;  // 16 bit access
sfrb TCCR1B=0x2e;
sfrb TCCR1A=0x2f;
sfrb SFIOR=0x30;
sfrb OSCCAL=0x31;
sfrb OCDR=0x31;
sfrb TCNT0=0x32;
sfrb TCCR0=0x33;
sfrb MCUCSR=0x34;
sfrb MCUCR=0x35;
sfrb TWCR=0x36;
sfrb SPMCR=0x37;
sfrb TIFR=0x38;
sfrb TIMSK=0x39;
sfrb GIFR=0x3a;
sfrb GICR=0x3b;
sfrb OCR0=0X3c;
sfrb SPL=0x3d;
sfrb SPH=0x3e;
sfrb SREG=0x3f;
#pragma used-

// Interrupt vectors definitions



// CodeVisionAVR C Compiler
// (C) 1998-2000 Pavel Haiduc, HP InfoTech S.R.L.


#pragma used+

void delay_us(unsigned int n);
void delay_ms(unsigned int n);

#pragma used-

void rest8255(unsigned char state)
{DDRC=0xff;DDRB.5=1;DDRB.6 =1;DDRB.4=1;DDRB.1=1;DDRB.0=1;
 PORTC=0xff;
 PORTB.4=0;          //片选上
 PORTB.5=1;          PORTB.6=1;//写入寄存器
 PORTB.0=0;
 PORTC=state;
 PORTB.0=1;
 PORTB.4=1;
 }
void send8255(unsigned char data,unsigned char direct) 
{DDRC=0xff;
 PORTB.4=0;
 switch(direct)
 {case 0: PORTB.5=0;PORTB.6=0;break;
  case 1: PORTB.5=0;PORTB.6=1;break;
  case 2: PORTB.5=1;PORTB.6=0;break;
  case 3: PORTB.5=1;PORTB.6=1;break;
  } 
 PORTB.0=0;
 PORTC=data;
 PORTB.0=1;
 PORTB.4=1;  
 }
void send_a(unsigned char data)
{DDRC=0xff;
 PORTB.4=0;
 PORTB.5=0;PORTB.6=0; 
 PORTB.0=0;
 PORTC=data;
 PORTB.0=1;
 PORTB.4=1;
 }
void send_b(unsigned char data)
{DDRC=0xff;
 PORTB.4=0;
 PORTB.5=0;PORTB.6=1; 
 PORTB.0=0;
 PORTC=data;
 PORTB.0=1;
 PORTB.4=1;
 } 
void send_c(unsigned char data)
{DDRC=0xff;
 PORTB.4=0;
 PORTB.5=1;PORTB.6=0; 
 PORTB.0=0;
 PORTC=data;
 PORTB.0=1;
 PORTB.4=1;
 }  
void send_r(unsigned char data)
{DDRC=0xff;
 PORTB.4=0;
 PORTB.5=1;PORTB.6=1; 
 PORTB.0=0;
 PORTC=data;
 PORTB.0=1;
 PORTB.4=1;
 }   
//#include<mega16.h>
//#include<delay.h >
void send(unsigned char w);
void xianshi(long w,unsigned char weishu); 
flash unsigned char  Led_tab[2][23]={              /*共阳数码管 显示段笔划 abcdefgh; 0=亮 *//* 0,1,2,3,4,5,6,7 */	 /* 8,9,A,b,C,d,E,F */
     0x03,0x9F,0x25,0x0D,0x99,0x49,0x41,0x1F,   
     0x01,0x09,0x11,0xC1,0x63,0x85,0x61,0x71,   
     0xFF,0x31,0x91,0xE3,0xFD,0x6D,0xD5,0x02,
     0x9E,0x24,0x0C,0x98,0x48,0x40,0x1E,0x00,
     0x08,0x10,0xC0,0x62,0x84,0x60,0x70,0x02,
     0x30,0x90,0xE2,0xFC,0x6E,0xD4};  
 
void send(unsigned char w)
{unsigned char i;
 for(i=0;i<8;i++)
 {PORTD.6 =0;
  PORTD.7=w&1; 
  PORTD.6 =1;
  w=w>>1;
  }
 }
void xianshi(long w,unsigned char weishu)
{unsigned char i;
 unsigned char k;
 bit flag=0;
 if(w<0)
  {w=-w;
   flag=1;
   }
 DDRD.6 =1;              
 DDRD.7=1;
 for(i=0;i<8;i++)
  {
  if(w!=0)
  {k=Led_tab[0][w%10];
   if(i==weishu)k=Led_tab[1][w%10];
   }
  else
    {if(flag)
      {k=253;
       }
     if(i==weishu)k=Led_tab[1][w%10]; 
     else
       if(i<weishu)k=0x03;
        else 
         {if(!flag)
           {k=0xff;
            }
           if((i==(weishu+1))&&flag)k=253; 
           flag=0; 
          }
        
     }
   send(k);
   w=w/10;
   }
 } 
void writeram(unsigned int address,unsigned char data)
{unsigned char temp=0;
 DDRA.7=1;
 PORTA.7=1;
 temp=address;
 send_a(temp);
 address=address>>8;
 temp=address;
 send_b(temp);
 PORTC=data;  
 
 PORTA.7=0;//片选上62256   
 #asm("NOP")
 PORTB.0=0;
 PORTB.0=1;
 #asm("NOP")
 PORTA.7=1; 
 }
unsigned char readram(unsigned int address)
{unsigned char temp=0;
 //CS_ram_en=1;
 PORTA.7=1;
 temp=address;
 send_a(temp);
 address=address>>8;
 temp=address;
 send_b(temp);
 PORTA.7=0;//片选上62256  
 DDRC=0x00;
 PORTC=0x00;
 PORTB.1=0; 
 #asm
 NOP
 NOP
 #endasm
 temp=PINC;
 PORTB.1=1; 
 PORTA.7=1; 
 return temp; 
 } 
// CodeVisionAVR C Compiler
// (C) 1998-2001 Pavel Haiduc, HP InfoTech S.R.L.

// I/O registers definitions for the ATmega16






// CodeVisionAVR C Compiler
// (C) 1998-2000 Pavel Haiduc, HP InfoTech S.R.L.





//---------定义数据通道口------------------

void Post_Msg(unsigned char msg)
{DDRC=0xff;
 PORTC=0xff; 		
 PORTB.2=0;
 PORTB.3=0;
 PORTC = msg;  
 PORTB.0=0;
 PORTB.0=1;
 PORTB.2=1;
}

//------------送一条指令函数-----------------
void Post_Com(unsigned char msg)
{DDRC=0xff;
 PORTB.2=0;
 PORTB.3=1;
 PORTC=msg;  
 PORTB.0=0;
 PORTB.0=1;
 PORTB.2=1;
}

//-------------接收一帧据数-------------------
unsigned char Read_Msg()
{unsigned char Statu;
 DDRC=0xff;
 PORTC=0xFF;
 PORTB.2=0;
 PORTB.3=1;
 PORTB.1=0;
 DDRC=0;
 Statu=PINC;
 PORTB.1=1;
 PORTB.2=1;
 DDRC=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;		  //分离状态１，读写状态
            case 2:if(Sta&0x04)exit=1;break;				  //分离状态２
            case 3:if(Sta&0x10)exit=1;break;				  //分离状态３
	    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;
  DDRC=0xff;
  PORTC=0xff;
  Clear();
  Reset_Cgram();
  Send_lcd(2,0x00,0x00,0x40);               //文本区首地址(0x00,0x00)
  Send_lcd(2,30,0x00,0x41);			//文本区宽度(30字符)
  Send_lcd(2,0x00,0x08,0x42);               //图形区首地址(0x00,0x08)
  //Send_lcd(2,0x00,0x04,0x42);
  Send_lcd(2,30,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)(30)*(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/30,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)
{
12 下一页
💿 文件大小 261 K
👤 上传用户 xiao11tian
📂 所属分类单片机开发
🏷️ 相关标签

#8255A #62256 #8803 #OKI
⌨️ 快捷键说明

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