#include <iom8v.h>
#include <macros.h>
#include "lcd.h"
#include "6x8.h"
#include "chinese.h"

/*-----------------------------------------------------------------------
LCD_init          : 3310LCD初始化

編寫日期          ：2004-8-10 
最后修改日期      ：2004-8-10 
-----------------------------------------------------------------------*/
void LCD_init(void)
  {
    PORTB &= ~LCD_RST;          // 產生一個讓LCD復位的低電平脈沖
    delay_1us();
    PORTB |= LCD_RST;
    
    PORTB &= ~LCD_CE ;		// 關閉LCD
    delay_1us();
    PORTB |= LCD_CE;		// 使能LCD
    delay_1us();

    LCD_write_byte(0x21, 0);	// 使用擴展命令設置LCD模式
    LCD_write_byte(0xc8, 0);	// 設置偏置電壓
    LCD_write_byte(0x06, 0);	// 溫度校正
    LCD_write_byte(0x13, 0);	// 1:48
    LCD_write_byte(0x20, 0);	// 使用基本命令
    LCD_clear();	        // 清屏
    LCD_write_byte(0x0c, 0);	// 設定顯示模式，正常顯示
        
    PORTB &= ~LCD_CE ;          // 關閉LCD
    //LCD_clear();
  }

/*-----------------------------------------------------------------------
LCD_clear         : LCD清屏函數

編寫日期          ：2004-8-10 
最后修改日期      ：2004-8-10 
-----------------------------------------------------------------------*/
void LCD_clear(void)
  {
    unsigned int i;

    LCD_write_byte(0x0c, 0);			
    LCD_write_byte(0x80, 0);			

    for (i=0; i<504; i++)
      LCD_write_byte(0, 1);			
  }

/*-----------------------------------------------------------------------
LCD_set_XY        : 設置LCD坐標函數

輸入參數：X       ：0－83
          Y       ：0－5

編寫日期          ：2004-8-10 
最后修改日期      ：2004-8-10 
-----------------------------------------------------------------------*/
void LCD_set_XY(unsigned char X, unsigned char Y)
  {
    LCD_write_byte(0x40 | Y, 0);		// column
    LCD_write_byte(0x80 | X, 0);          	// row
  }

/*-----------------------------------------------------------------------
LCD_write_char    : 顯示英文字符

輸入參數：c       ：顯示的字符；

編寫日期          ：2004-8-10 
最后修改日期      ：2004-8-10 
-----------------------------------------------------------------------*/
void LCD_write_char(unsigned char c)
  {
    unsigned char line;

    //c -= 32;
    
    //for (line=0; line<6; line++)
      //LCD_write_byte(font6x8[c][line], 1);
    for (line=0; line<7; line++)
      LCD_write_byte(font7x13[c][line], 1);
    for (line=7; line<14; line++)
      LCD_write_byte(font7x13[c][line], 1);
      
  }

/*-----------------------------------------------------------------------
LCD_write_char    : 英文字符串顯示函數

輸入參數：*s      ：英文字符串指針；
          X、Y    : 顯示字符串的位置

編寫日期          ：2004-8-10 
最后修改日期      ：2004-8-10 		
-----------------------------------------------------------------------*/
void LCD_write_String(unsigned char X,unsigned char Y,char *s)
  {
    unsigned char line;
    unsigned char i=0;
    while (*s) 
      {
	 LCD_set_XY(X+i*7,Y);
	 for (line=0; line<7; line++)
            LCD_write_byte(font7x13[*s-0X30][line], 1);
         
         LCD_set_XY(X+i*7,Y+1);
         for (line=7; line<14; line++)
            LCD_write_byte(font7x13[*s-0X30][line], 1);
	 s++;
	 i++;
      }
  }
/*-----------------------------------------------------------------------
LCD_write_chi: 在LCD上顯示漢字

輸入參數：X、Y    ：顯示漢字的起始X、Y坐標；
          ch_with ：漢字點陣的寬度
          num     ：顯示漢字的個數；  
          line    ：漢字點陣數組中的起始行數
          row     ：漢字顯示的行間距
編寫日期          ：2004-8-11 
最后修改日期      ：2004-8-12 
-----------------------------------------------------------------------*/                        
void LCD_write_chi(unsigned char X, unsigned char Y, 
                   unsigned char ch_with,unsigned char num,
                   unsigned char line,unsigned char row)
  {
    unsigned char i,n;
    
    LCD_set_XY(X,Y);                             //設置初始位置
    
    for (i=0;i<num;)
      {
      	for (n=0; n<ch_with*2; n++)              //寫一個漢字
      	  { 
      	    if (n==ch_with)                      //寫漢字的下半部分
      	      {
      	        if (i==0) LCD_set_XY(X,Y+1);
      	        else
      	           LCD_set_XY((X+(ch_with+row)*i),Y+1);
              }
      	    LCD_write_byte(china_char[line+i][n],1);
      	  }
      	i++;
      	LCD_set_XY((X+(ch_with+row)*i),Y);
      }
  }
  
/*-----------------------------------------------------------------------
LCD_write_chi: 漢字移動

輸入參數：X、Y    ：顯示漢字的起始X、Y坐標；
          T       ：移動速度；

編寫日期          ：2004-8-13 
最后修改日期      ：2004-8-13 
-----------------------------------------------------------------------*/                        
void LCD_move_chi  (unsigned char X, unsigned char Y, unsigned char T)
  {
    unsigned char i,n,j=0;
    unsigned char buffer_h[84]={0};
    unsigned char buffer_l[84]={0};
      
    for (i=0; i<156; i++)
      {
        buffer_h[83] = china_char[i/12][j];
        buffer_l[83] = china_char[i/12][j+12];
        j++;
        if (j==12) j=0;
        
        for (n=0; n<83; n++)
          { 
            buffer_h[n]=buffer_h[n+1];
            buffer_l[n]=buffer_l[n+1];
          } 
        
        LCD_set_XY(X,Y);
        for (n=0; n<83; n++)
          { 
            LCD_write_byte(buffer_h[n],1);
          } 
        
        LCD_set_XY(X,Y+1); 
        for (n=0; n<83; n++)
          { 
            LCD_write_byte(buffer_l[n],1);
          } 
          
       delay_nms(T);
      }
  }

/*-----------------------------------------------------------------------
LCD_draw_map      : 位圖繪制函數

輸入參數：X、Y    ：位圖繪制的起始X、Y坐標；
          *map    ：位圖點陣數據；
          Pix_x   ：位圖像素（長）
          Pix_y   ：位圖像素（寬）

編寫日期          ：2004-8-13
最后修改日期      ：2004-8-13 
-----------------------------------------------------------------------*/
void LCD_draw_map(unsigned char X,unsigned char Y,unsigned char *map,
                  unsigned char Pix_x,unsigned char Pix_y)
  {
    unsigned int i,n;
    unsigned char row;
    
    if (Pix_y%8==0) row=Pix_y/8;      //計算位圖所占行數
      else
        row=Pix_y/8+1;
    
    for (n=0;n<row;n++)
      {
      	LCD_set_XY(X,Y);
        for(i=0; i<Pix_x; i++)
          {
            LCD_write_byte(map[i+n*Pix_x], 1);
          }
        Y++;                         //換行
      }      
  }

/*-----------------------------------------------------------------------
LCD_write_byte    : 使用SPI接口寫數據到LCD

輸入參數：data    ：寫入的數據；
          command ：寫數據/命令選擇；

編寫日期          ：2004-8-10 
最后修改日期      ：2004-8-13 
-----------------------------------------------------------------------*/
void LCD_write_byte(unsigned char data, unsigned char command)
  {
    PORTB &= ~LCD_CE ;		        // 使能LCD
    
    if (command == 0)
      PORTB &= ~LCD_DC ;	        // 傳送命令
    else
      PORTB |= LCD_DC ;		        // 傳送數據

    SPDR = data;			// 傳送數據到SPI寄存器

    while ((SPSR & 0x80) == 0);         // 等待數據傳送完畢
	
    PORTB |= LCD_CE ;			// 關閉LCD
  }