/*********************************************************************
目    的:   建立操作PC鍵盤的示例程序（硬件中斷讀取PS/2接收到的數據）
目標系統:   基于AVR單片機                                                 
應用軟件:   ICCAVR                                                      
版    本:   Version 1.0                                                       
*********************************************************************/

/*01010101010101010101010101010101010101010101010101010101010101010101
----------------------------------------------------------------------
版本更新記錄：

----------------------------------------------------------------------
實驗內容：
按PC鍵盤，觀察單片機讀到的數據，使用PA/PB口的LED做指示。
----------------------------------------------------------------------
硬件連接：
將PA/PB口的LED指示燈使能開關切換到"ON"狀態
將PC鍵盤插入PS2接口，將PD3與PS2.SDA連接，將PD4與PS2.SCK連接
----------------------------------------------------------------------
注意事項： 
（1）若有加載庫函數，請將光盤根目錄下的“庫函數”下的“ICC_H”文件夾拷到D盤
（2）請詳細閱讀“使用必讀”及相關資料。
----------------------------------------------------------------------
10101010101010101010101010101010101010101010101010101010101010101010*/

#include
#include "D:ICC_HCmmICC.H"
#include "D:ICC_HPS2.H"

#define PRESS_DATA_DDR DDRA
#define PRESS_DATA_PORT PORTA
#define SHIFT_DATA_DDR DDRB
#define SHIFT_DATA_PORT PORTB

#define SET_SDA sbi(PORTD,4)
#define CLR_SDA cbi(PORTD,4)
#define GET_SDA gbi(PIND,4)
#define OUT_SDA sbi(DDRD,4)
#define IN_SDA cbi(DDRD,4)

#define SET_SCK sbi(PORTD,3)
#define CLR_SCK cbi(PORTD,3)
#define GET_SCK gbi(PIND,3)
#define OUT_SCK sbi(DDRD,3)
#define IN_SCK cbi(DDRD,3)

bool rcvF = 0; //是否收到字符標志
uint8 keyVal; //鍵值

/*--------------------------------------------------------------------
函數名稱：PS/2
函數功能：
注意事項：
提示說明：
輸 入：
返 回：
--------------------------------------------------------------------*/
#pragma interrupt_handler int1_isr:3
void int1_isr(void)
{
static uint8 rcvBits = 0; //接收次數，中斷次數
if((rcvBits>0) && (rcvBits<9))
{ 
keyVal=keyVal>>1; //數據是LSB格式
//IN_SDA; //當有對鍵盤有屬性設置時，注意輸入輸出切換
//DELAY();
if(GET_SDA) 
keyVal=keyVal|0x80; 
}
rcvBits++;
while(!GET_SCK); //等待PS/2CLK拉高

if(rcvBits>10)
{
rcvBits=0; //接收11次表示接收完一幀數據
rcvF=1; //標識有字符已經輸入
}
}
/*--------------------------------------------------------------------
函數名稱：PS/2
函數功能：
注意事項：
提示說明：
輸 入：
返 回：
--------------------------------------------------------------------*/
void keyHandle(uint8 val) 
{
uint8 i;
static bool isUp=0; //按鍵釋放動作標志
static bool shift=0; //shift鍵按下標志
rcvF = 0; 
PRESS_DATA_PORT = val; //狀態指示
if(!isUp)
{
switch(val)
{
case 0xF0 : // a relase action
isUp = 1;
break;
case 0x12 : // Left shift
shift = 1;
break;
case 0x59 : // Right shift
shift = 1;
break;
default:
if(!shift) // If shift not pressed
{ 
/*
for(i=0; unshifted[i][0]!=val && unshifted[i][0]; i++)
;
上述寫法較為靈活，但KEIL非UNIXC標準，不能采用該寫法
*/
for(i=0; unshifted[i][0]!=val && i<59; i++)
;
if(unshifted[i][0] == val) 
; //狀態指示

} 
else // If shift pressed
{ 
/*
for(i=0; unshifted[i][0]!=val && unshifted[i][0]; i++)
;
上述寫法較為靈活，但KEIL非UNIXC標準，不能采用該寫法
*/
for(i=0; shifted[i][0]!=val && i<59; i++)
;
if(shifted[i][0] == val) 
SHIFT_DATA_PORT = val;//狀態指示
}
}
}
else 
{
isUp=0; 
switch(val)
{
case 0x12 : // Left SHIFT
shift = 0;
break;
case 0x59 : // Right SHIFT
shift = 0;
break;
}
}
}
/*--------------------------------------------------------------------
函數名稱：PS/2
函數功能：
注意事項：
提示說明：
輸 入：
返 回：
--------------------------------------------------------------------*/
void int1_init()
{
IN_SCK; // set SCK_DDR (PD3/INT1) as input
SET_SCK; // set SCK_PORT as high level,avoid triggering
MCUCR |= 0b11110011; // set PD3/INT1 as low level active
GICR |= 0b10000000; // enable global interrupt
SEI(); // enable external interrupt
}
/*--------------------------------------------------------------------
函數名稱：PS/2
函數功能：
注意事項：
提示說明：
輸 入：
返 回：
--------------------------------------------------------------------*/
void main(void)
{
PRESS_DATA_DDR = 0XFF;
SHIFT_DATA_DDR = 0XFF;
IN_SDA;
int1_init();
while(1)
{
if(rcvF)
keyHandle(keyVal);
}
}