/*
	ATmega8L LCD12864
*/
#include <avr/io.h>
#define uchar unsigned char
#define uint  unsigned int
#define bool  unsigned char
#define true  1
#define false 0
#define setbit(sfr,bit) (sfr|=(1<<bit))
#define clrbit(sfr,bit) (sfr&=~(1<<bit))
#define RS   0
#define RW   1
#define CS1  2
#define CS2  3
#define E    4
#define RST  5
#define DATA PORTB
#define CTRL PORTC

void init(void);
uchar getState(void);			//得到LCD狀態(tài)字
bool lcdBusy(void);
void lcdCommand(uchar command);		//發(fā)送命令字
void lcdOpen(void);				//打開LCD
void lcdStartLine(uchar line);		//設置起始行
void lcdSetPage(uchar page);			//設置頁地址
void lcdSetRow(uchar row);				//設置列地址
void lcdWrite(uchar dat,uchar cs);					//寫顯示數(shù)據(jù),注'0'亮'1'暗
uchar lcdRead(uchar cs);							//讀數(shù)據(jù)
void pixel(uchar x,uchar y);					//畫點
int main(void)
{
	init();
	lcdOpen();
	lcdStartLine(0);
	lcdSetPage(0);
	lcdSetRow(0);
	pixel(30,30);
	pixel(100,50);
	pixel(15,40);
	while(1)
	{
	}
	return 0;
}

void init()
{
	PORTB=0xff;
	DDRB=0xff;
	PORTC=0xff;
	DDRC=0xff;
	PORTD=0xff;
	DDRD=0xff;
}

uchar getState()
{
	PORTB=0xff;
	DDRB=0x0;
	clrbit(CTRL,CS1);
	clrbit(CTRL,CS2);
	clrbit(CTRL,RS);
	setbit(CTRL,RW);
	setbit(CTRL,E);			//下降沿
	clrbit(CTRL,E);
	return PINB;
}

bool lcdBusy()
{
	uchar state=0;
	state=getState();
	if(state&0x80)
	{	//BUSY
		return true;
	}
	else
	{	//idle
		return false;
	}
}

void lcdCommand(uchar command)
{
	DDRB=0xff;
	clrbit(CTRL,CS1);
	clrbit(CTRL,CS2);
	clrbit(CTRL,RS);
	clrbit(CTRL,RW);
	DATA=command;
	setbit(CTRL,E);			//下降沿
	clrbit(CTRL,E);
}

void lcdOpen()
{
	while(lcdBusy());
	lcdCommand(0x3f);
}

void lcdStartLine(uchar line)
{
	line|=0xc0;
	while(lcdBusy());
	lcdCommand(line);
}

void lcdSetPage(uchar page)
{
	page&=0x7;
	page|=0xb8;
	while(lcdBusy());
	lcdCommand(page);
}

void lcdSetRow(uchar row)
{	//設置列地址
	row&=0x3f;
	row|=0x40;
	while(lcdBusy());
	lcdCommand(row);
}

void lcdWrite(uchar dat,uchar cs)
{	//寫顯示數(shù)據(jù)
	while(lcdBusy());
	DDRB=0xff;
	if(cs==1)
	{	//選擇左半屏
		clrbit(CTRL,CS1);
		setbit(CTRL,CS2);
	}
	else
	{	//選擇右半屏
		clrbit(CTRL,CS2);
		setbit(CTRL,CS1);
	}
	setbit(CTRL,RS);
	clrbit(CTRL,RW);
	DATA=dat;
	setbit(CTRL,E);			//下降沿
	clrbit(CTRL,E);
}

uchar lcdRead(uchar cs)
{	//讀數(shù)據(jù)
	uchar dat;
	while(lcdBusy());	
	DDRB=0x00;
	PORTB=0xff;
	if(cs==1)
	{	//選擇左半屏
		clrbit(CTRL,CS1);
		setbit(CTRL,CS2);
	}
	else
	{	//選擇右半屏
		clrbit(CTRL,CS2);
		setbit(CTRL,CS1);
	}
	setbit(CTRL,RS);
	setbit(CTRL,RW);
	setbit(CTRL,E);			//下降沿
	clrbit(CTRL,E);
	setbit(CTRL,E);			//高
	dat=PINB;
	return dat;
}
	
void pixel(uchar x,uchar y)
{
	uchar page,dX,dY;
	uchar cs=2;
	uchar dot=0;
	if(x>=64)
	{
		x-=64;
	}
	else
	{
		cs=1;
	}
	dX=x;									//算出x坐標
	page=y/8;							//算出頁號
	dY=y%8;								//算出y坐標
	lcdSetPage(page);
	lcdSetRow(dX);	
	dot=lcdRead(cs);
	clrbit(dot,dY);
	lcdSetPage(page);
	lcdSetRow(dX);	
	lcdWrite(dot,cs);
}