#include <avr/io.h>
#include <compat/deprecated.h>
#include <util/delay.h>

//Подключение индикатора
#define PCF_PORT PORTB
#define PCF_DDR DDRB
#define PCF_SCK PB1
#define PCF_SDIN PB2
#define PCF_DC PB4
#define PCF_SCE PB5
#define PCF_RES PB6

typedef unsigned char u08;

void pcf_transmit(u08 byte)
{
	char i;

	for(i=7;i>=0; i--) {
		cbi(PCF_PORT,PCF_SCK);
		if (byte&(1<<i)) sbi(PCF_PORT,PCF_SDIN); else cbi(PCF_PORT,PCF_SDIN);
		_delay_us(1);
		sbi(PCF_PORT,PCF_SCK);
		_delay_us(1);
	}
}

void pcf_init(u08 tc, u08 bs, u08 vop)
{
	u08 i,j;

	PCF_DDR |= (1<<PCF_SCK)+(1<<PCF_SDIN)+(1<<PCF_DC)+(1<<PCF_SCE)+(1<<PCF_RES);
	sbi(PCF_PORT,PCF_SCE);
	cbi(PCF_PORT,PCF_RES);
	_delay_us(1);
	sbi(PCF_PORT,PCF_RES);
	_delay_us(1);
	cbi(PCF_PORT,PCF_DC);
	cbi(PCF_PORT,PCF_SCK);
	cbi(PCF_PORT,PCF_SCE);
	pcf_transmit(0);
	pcf_transmit(0x25); //Power down, horizontal addressation, extended command set
	pcf_transmit(0x04+(tc&0x03)); //Temperature coefficient
	pcf_transmit(0x10+(bs&0x07)); //Bias System
	pcf_transmit(0x80+(vop&0x7f)); //Vop
	pcf_transmit(0x24); //Power down, horizontal addressation, basic command set
	pcf_transmit(0x0C); //Normal mode
	pcf_transmit(0x40); //Y=0
	pcf_transmit(0x80); //X=0
	pcf_transmit(0x20); //Horizontal addressation, basic command set

	sbi(PCF_PORT,PCF_DC);
	for(i=0;i<=5;i++) for(j=0;j<=83;j++) pcf_transmit(0); //Clear screen
	sbi(PCF_PORT,PCF_SCE);
}

void pcf_write(u08 byte)
{
	sbi(PCF_PORT,PCF_DC);
	cbi(PCF_PORT,PCF_SCK);
	cbi(PCF_PORT,PCF_SCE);
	pcf_transmit(byte);
	sbi(PCF_PORT,PCF_SCE);
}

void pcf_setxy(u08 x, u08 y)
{
	cbi(PCF_PORT,PCF_DC);
	cbi(PCF_PORT,PCF_SCK);
	cbi(PCF_PORT,PCF_SCE);
	pcf_transmit(0x40|(y&0x7));
	pcf_transmit(0x80|(x&0x7f));
	sbi(PCF_PORT,PCF_SCE);
}

#define MAXROW 3

u08 screendata[MAXROW*84];

void initdisplay(void)
{
	int i;
	pcf_init(0, 4, 0x40);
	for (i=0;i<MAXROW*84;i++) screendata[i]=0;
}

void cleardisplay(void)
{
	int i;
	pcf_setxy(0,0);
	for (i=0;i<MAXROW*84;i++) {
		screendata[i]=0;
		pcf_write(0);
	}
}

void putpixel(u08 x, u08 y, char p)
{
	if ((x>83)||(y>8*MAXROW-1)) return;

	if (p) screendata[x+84*(y/8)]|=1<<(y%8) ; else screendata[x+84*(y/8)]&=~(1<<(y%8));
	pcf_setxy(x,y/8);
	pcf_write(screendata[x+84*(y/8)]);
}

int main(void)
{
	char x,y,dx,dy;

	x=42;
	y=12;
	dx=dy=1;

	initdisplay();

	for(;;) {
		putpixel(x,y,0);
		x+=dx;
		y+=dy;
		putpixel(x,y,1);
		if (x==83) dx=-1;
		if (x==0) dx=1;
		if (y==MAXROW*8-1) dy=-1;
		if (y==0) dy=1;
		_delay_ms(1000000);
	}
}