transform.i

MSM6882,OKI公司MSK调制芯片

 PORTA.1    =0;
 DDRC    =0;
 messege=PINC    ;
 PORTA.1    =1;
 PORTB.0    =1;
 DDRC    =0xff;
 return (messege);
}
//*************************************
//读状态函数
//*************************************
void Read_Sta(unsigned char mark)
{     
   bit exit=0;
   unsigned char Sta;
   while(1)
   {
     Sta=Recieve();           //取得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_Data(dat1);		     	//类型1和2 ,dat1均有效
	  if(mark==2)
	  {
	    Read_Sta(1);
	    Post_Data(dat2);                     //类型2时dat2有效
	  }	 		
	 }
   Read_Sta(1);
   Post_Com(com);	                       //送指令码
}
//*************************************
//清显示函数
//说明:此函数可将液晶屏内从00单元开始8200单元结束的所有区域数据清零,但是不会对CGRAM汉字字模区清零
//************************************
void Clear()
{
    unsigned int i;	
    //Send_lcd(2,0x00,0x00,0x21);		//置光标首地址(0x00,0x00)
    Send_lcd(2,0x00,0x00,0x24);
    Send_lcd(0,0x00,0x00,0xb0);		//设置自动写方式
    /*for(i=0;i<0x1b00;i++)
        {Read_Sta(3);				//判断状态三(自动写标志位)
         Post_Msg(0x00);		//当前地址数据清零
        }*/
    for(i=0;i<5888;i++)
        {Read_Sta(3);
         Post_Data(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);  			//读状态三,写标志判断 
	  //delay_us(100);
	  Post_Data(k[i]);	
	}
   Send_lcd(0,0x00,0x00,0xb2);		//自动写入结束
}
//************************************
//显示屏初始化函数
//************************************
void resetlcd()
{ DDRA.0=1;
  DDRA.1=1;
  DDRB.0=1;
  DDRA.2=1;
  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,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 listword(unsigned char x_h,unsigned char y_l,unsigned char *word_list)
{
  unsigned char length=0,i=0;
  
  length=strlen(word_list);
  for(i=0;i<length;i++)
  {word(x_h,y_l,word_list[i]-32);
   y_l++;
  } 
  Send_lcd(2,0,0,0x24);			
}
//显示汉字函数 
void chinese(unsigned char x_h,char y_l,unsigned char dat)
{
   unsigned int sum;
   dat=0x80+dat*4;                                 //得到实际地址
   sum=(unsigned int)(x_h)*(unsigned int)(30     )+(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+30     ;				//修正下半部分字符位置
   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)Ｙ:列坐标(0-239)
//      1：画实点，0：画虚点
//************************************ 

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




unsigned char int0_cnt=0;
unsigned SendByte[]={255,114,15,240,123,220,0,120};
unsigned char temp=0;
bit flag=0;
unsigned char hang=0;
unsigned char lie=0;
unsigned char i=0; 


void display(unsigned char data)
{unsigned char tmp;    
//unsigned char gw,sw,bw;
tmp=data;
//bw=tmp/100;
//sw=tmp%100/10;
//gw=tmp%10;
//word(hang,lie,bw+16);
//word(hang,lie+1,sw+16);
//word(hang,lie+2,gw+16);
if(tmp==0x80)word(hang,lie,1+16);
          else word(hang,lie,0+16);
lie=lie+4;
          if(lie>29)
          {
          hang++;
          lie=0;              
                    if(hang==16)
                    {
                    hang=0;
                    }
          }
}

void main(void)
{
DDRA.0=1;
DDRB.0=1;
DDRA.2=1; 
DDRA.0=1;
DDRC    =0xff;
resetlcd();
delay_ms(10);

DDRA.6=1;
DDRD.2=0;

MCUCR=0x02;
GICR=0x40;
SREG=0x80;



          while(1)
          {
                    if(flag==1)
                    {
                    display(temp);
                    flag=0;
                    }
          }
}


interrupt [2] void int0(void)   
{
int0_cnt++;

if(int0_cnt<=8)
{
temp=(SendByte[i]<<int0_cnt-1)&0x80;
flag=1; 
          if(temp==0x80)PORTA.6=1;
                    else PORTA.6=0;
}
          if(int0_cnt==8)
          {
          int0_cnt=0;
          i++;
          if(i==1)i=0;
          }
}