AVR单片机读PS2鼠标

#include

#include
#include "myh.h"
//MOUSE
//时钟接CLK:5--INT0--PD2
#define PINMCLK (PIND&BIT2)
#define PRTMCLK_H {DDRD&=NBIT2;PORTD|=BIT2;}
#define PRTMCLK_L {DDRD|=BIT2;PORTD&=NBIT2;}
//数据接DAT:1--PC4
#define PINMDAT (PINC&BIT4)
#define PRTMDAT_H {DDRC&=NBIT4;PORTC|=BIT4;}
#define PRTMDAT_L {DDRC|=BIT4;PORTC&=NBIT4;}

//KEYBOARD

#define PINKCLK (PIND&BIT3)
#define PRTKCLK_H {DDRD&=NBIT3;PORTD|=BIT3;}
#define PRTKCLK_L {DDRD|=BIT3;PORTD&=NBIT3;}
//数据接DAT:1--PC4
#define PINKDAT (PINC&BIT5)
#define PRTKDAT_H {DDRC&=NBIT5;PORTC|=BIT5;}
#define PRTKDAT_L {DDRC|=BIT5;PORTC&=NBIT5;}

//sbit pclk=P3^2;
//sbit pdat=P3^1;

uchar wait;
uchar mcnt=0;
uchar kcnt=0;
schar axes_x=0,axes_y=0;
schar mbuf[4];
uchar kbuf[4];

void delay(uint t)//延时 t*10us
{
char i;
for(;t>0;t--)
for(i=10;i>0;i--);
}

uchar send2m(uchar dat)//高电平期间改变数据，下降沿发出去
{
uchar i,ack,intc,check=1;
uint buf;

//EX0=0;
//IE0=0;
intc=GICR;
GICR&=0x3f; //不使能中断
buf=dat;
for(i=0;i<8;i++)
{
check^=dat&0x01; //校验,出现奇数个一该位为0。
dat>>=1;
}

buf|=check<8; //校验位
buf|=3<9; //停止位,以及应答位

// pclk=0;
// pdat=0;
PRTMCLK_L;
PRTMDAT_L; //下接时钟和数据
delay(10);
// pclk=1;//请求
PRTMCLK_H;//释放时钟线
for(i=0;i<11;i++)//发送8位数据
{
while(PINMCLK);//等待下降沿
if(buf&0x01)
PRTMDAT_H
else
PRTMDAT_L
//pdat=buf&0x01;
buf>>=1;
//if(i==10)ack=pdat;//最后一位为输入的应答
if(i==10)ack=PINMDAT;
//while(!pclk);
while(!PINMCLK);//等待上升沿
}
PRTMDAT_H;
//EX0=1;
GICR=intc;
return ack;
}

void chuli(void)
{
mcnt=0;
axes_x+=(schar)mbuf[1];
axes_y+=(schar)mbuf[2];
}

void display(uint number)//从0到F显示
{
char i,n[4]={0}, //要显示的四个数字
num[16]={0X3F,0X06,0X5B,0X4F,0X66,0X6D,0X7D,0X27,0X7F,0X6F,
0X77,0X7C,0X39,0X5E,0X79,0X71};//十六个数字的段码
n[0]=number>>12&0X0F;
n[1]=number>>8 &0X0F;
n[2]=number>>4 &0X0F;
n[3]=number &0X0F;
for(i=0;i<4;i++)
{
PORTD=~(0X80>>i);
PORTB=num[n[i]];delay(500);
PORTB=0x00; //显示清空
}
}

void port_init(void)
{
DDRB = 0xFF;//B用于显示
PORTB = 0xFF;
DDRC = 0x0F;//PC4,PC5为输入
PORTC = 0x7F; //m103 output only
DDRD = 0xF0; //INT0 INT1 为输入
PORTD = 0xFF;

}

#pragma interrupt_handler int0_isr:2
void int0_isr(void)
{
//external interupt on INT0
char i;
uint buf;
// EX0=0;
PRTKCLK_L; //抑制键盘时钟
//PRTKDAT_L;
//-while(1);
buf=0;
if(PINMDAT)
{
PORTC|=BIT0;
delay(10);
PORTC&=NBIT0;
return; //启始位为0
}
while(!PINMCLK); //等待启始位结束
for(i=0;i<10;i++)//8位数据+校验+停止,LSB在前
{
while(PINMCLK);//下降沿接收数据
if(PINMDAT)buf|=(1 while(!PINMCLK);
}
mbuf[mcnt]=buf&0xff;
wait=50;
mcnt++;
if(mcnt==3)
chuli();
PRTKCLK_H; //允许键盘时钟
GIFR=0XC0; //向高两位写1,清中断标志
//IE0=0;
}

#pragma interrupt_handler int1_isr:3
void int1_isr(void)
{
char i;
uint buf;
PRTMCLK_L; //抑制鼠标时钟
buf=0;
if(PINKDAT)
{
PORTC|=BIT0;
delay(10);
PORTC&=NBIT0;
return; //启始位为0
}
while(!PINKCLK); //等待启始位结束
for(i=0;i<10;i++)//8位数据+校验+停止,LSB在前
{
while(PINKCLK);//下降沿接收数据
if(PINKDAT)buf|=(1 while(!PINKCLK);
}
kbuf[kcnt]=buf&0xff;
kcnt=0;
PRTMCLK_H; //允许鼠标时钟
GIFR=0XC0; //向高两位写1,清中断标志
}

//call this routine to initialise all peripherals
void init_devices(void)
{
//stop errant interrupts until set up
CLI(); //disable all interrupts
port_init();

MCUCR = 0x0A;//1010,int0,int1 下降沿
GICR = 0xC0; //int1,int0 enable
TIMSK = 0x00; //timer interrupt sources
SEI(); //re-enable interrupts
//all peripherals are now initialised
}

void main()
{
uint dat;
init_devices();

send2m(0xff);
delay(10);
send2m(0xeb);

while(1)
{
//dat=axes_x<8|axes_y;
dat=axes_x<8|kbuf[0];
display(dat);
//display(kbuf[0]);
if(wait)
{
wait--;
if(wait==0)
mcnt=0;
}
}
}