單片機8個獨立式鍵盤驅動程序(編程模板)

ID:350104 · 發表于 2018-11-6 16:26

#define KEY P1 //鍵盤所連接的I/O接口組定義
/*********************************************************************************************
函數名：8個獨立式鍵盤驅動程序
調用：? = Key ();
參數：無
返回值：unsigned char 鍵值0~8
結果：有鍵按下時返回值為鍵值1~8，無鍵按下時返回值為0
備注：在主函數中不斷調用
/**********************************************************************************************/
unsigned char Key ( ){ //8個獨立鍵盤處理程序
unsigned char a,b;
KEY = 0xff; //設定鍵盤初始電平狀態
if (KEY != 0xff){ //讀取鍵盤狀態是否改變
Delay (20); //延時20ms去抖動
if (KEY != 0xff){ //重新讀取
a = KEY; //寄存狀態值到a
}
switch(a){ //鍵盤狀態查表
case 0xfe: b = 1; break;
case 0xfd: b = 2; break;
case 0xfb: b = 3; break;
case 0xf7: b = 4; break;
case 0xef: b = 5; break;
case 0xdf: b = 6; break;
case 0xbf: b = 7; break;
case 0x7f: b = 8; break;
default: b = 0 ; break;
}
}
return (b); //將b中的鍵值代號送入函數返回值
}
/**********************************************************************************************/
/*********************************************************************************************
程序名：　　 8位ADC轉換實驗程序
/*********************************************************************************************
說明：
PC串口端設置 [ 4800，8，無，1，無 ]
將ADC讀出的數值通過串口以十六進制方式顯示。
/*********************************************************************************************/
#include <STC12C2052AD.H> //單片機頭文件
#include <intrins.h> //51基本運算（包括_nop_空函數）
/*********************************************************************************************
函數名：毫秒級CPU延時函數
調用：DELAY_MS (?);
參數：1~65535（參數不可為0）
返回值：無
結果：占用CPU方式延時與參數數值相同的毫秒時間
備注：應用于1T單片機時i<600，應用于12T單片機時i<125
/*********************************************************************************************/
void DELAY_MS (unsigned int a){
unsigned int i;
while( a-- != 0){
for(i = 0; i < 600; i++);
}
}
/*********************************************************************************************/
/*********************************************************************************************
函數名：UART串口初始化函數
調用：UART_init();
參數：無
返回值：無
結果：啟動UART串口接收中斷，允許串口接收，啟動T/C1產生波特率（占用）
備注：振蕩晶體為12MHz，PC串口端設置 [ 4800，8，無，1，無 ]
/**********************************************************************************************/
void UART_init (void){
//EA = 1; //允許總中斷（如不使用中斷，可用//屏蔽）
//ES = 1; //允許UART串口的中斷
TMOD = 0x20; //定時器T/C1工作方式2
SCON = 0x50; //串口工作方式1，允許串口接收（SCON = 0x40 時禁止串口接收）
TH1 = 0xF3; //定時器初值高8位設置
TL1 = 0xF3; //定時器初值低8位設置
PCON = 0x80; //波特率倍頻（屏蔽本句波特率為2400）
TR1 = 1; //定時器啟動
}
/**********************************************************************************************/
/*********************************************************************************************
函數名：UART串口發送函數
調用：UART_T (?);
參數：需要UART串口發送的數據（8位/1字節）
返回值：無
結果：將參數中的數據發送給UART串口，確認發送完成后退出
備注：
/**********************************************************************************************/
void UART_T (unsigned char UART_data){ //定義串口發送數據變量
SBUF = UART_data; //將接收的數據發送回去
while(TI == 0); //檢查發送中斷標志位
TI = 0; //令發送中斷標志位為0（軟件清零）
}
/**********************************************************************************************/
/*********************************************************************************************
函數名：8位A/D轉換初始化函數
調用：Read (?);
參數：輸入的端口（0000 0XXX 其中XXX是設置輸入端口號，可用十進制0~7表示，0表示P1.0，7表示P1.7）
返回值：無
結果：開啟ADC功能并設置ADC的輸入端口
備注：適用于STC12C2052AD系列單片機（必須使用STC12C2052AD.h頭文件）
/**********************************************************************************************/
void Read_init (unsigned char CHA){
unsigned char AD_FIN=0; //存儲A/D轉換標志
CHA &= 0x07; //選擇ADC的8個接口中的一個（0000 0111 清0高5位）
ADC_CONTR = 0x40; //ADC轉換的速度（0XX0 0000 其中XX控制速度，請根據數據手冊設置）
_nop_();
ADC_CONTR |= CHA; //選擇A/D當前通道
_nop_();
ADC_CONTR |= 0x80; //啟動A/D電源
DELAY_MS(1); //使輸入電壓達到穩定（1ms即可）
}
/**********************************************************************************************/
/*********************************************************************************************
函數名：8位A/D轉換函數
調用：? = Read ();
參數：無
返回值：8位的ADC數據
結果：讀出指定ADC接口的A/D轉換值，并返回數值
備注：適用于STC12C2052AD系列單片機（必須使用STC12C2052AD.h頭文件）
/**********************************************************************************************/
unsigned char Read (void){
unsigned char AD_FIN=0; //存儲A/D轉換標志
ADC_CONTR |= 0x08; //啟動A/D轉換（0000 1000 令ADCS = 1）
_nop_();
_nop_();
_nop_();
_nop_();
while (AD_FIN ==0){ //等待A/D轉換結束
AD_FIN = (ADC_CONTR & 0x10); //0001 0000測試A/D轉換結束否
}
ADC_CONTR &= 0xE7; //1111 0111 清ADC_FLAG位, 關閉A/D轉換,
return (ADC_DATA); //返回A/D轉換結果（8位）
}
/**********************************************************************************************/
/*********************************************************************************************
函數名：主函數
調用：無
參數：無
返回值：無
結果：程序開始處，無限循環
備注：
/**********************************************************************************************/
void main (void){
unsigned char R;
UART_init();//串口初始程序
Read_init(0);//ADC初始化
P1M0 = 0x01; //P1.7~.0：0000 0001（高阻）//注意：更改ADC通道時須同時將對應的IO接口修改為高阻輸入。
P1M1 = 0x00; //P1.7~.0：0000 0000（強推）
while(1){
R = Read ();
UART_T (R); //串口小秘書，將ADC讀出值送入串口顯示
}
}/**********************************************************************************************/
#define KEY P1 //鍵盤所連接的I/O接口組定義
/*********************************************************************************************
函數名：16個陣列式鍵盤驅動程序
調用：? = Key ();
參數：無
返回值：unsigned char 鍵值0~16
結果：有鍵按下時返回值為鍵值1~16，無鍵按下時返回值為0
備注：在主函數中不斷調用
/**********************************************************************************************/
unsigned char Key (void){ //4*4陣列鍵盤處理程序
unsigned char a,b,c;
KEY = 0x0f; //設定鍵盤初始電平狀態
if (KEY != 0x0f){ //讀取鍵盤狀態是否改變
Delay (20); //延時20ms去抖動
if (KEY != 0x0f){ //重新讀取
a = KEY; //寄存狀態值到a
}
KEY = 0xf0; //設定鍵盤反向電平狀態
c = KEY; //讀取反向電平狀態值到c
a = a|c; //a與c相或
switch(a){ //鍵盤狀態查表
case 0xee: b = 1; break;
case 0xed: b = 2; break;
case 0xeb: b = 3; break;
case 0xe7: b = 4; break;
case 0xde: b = 5; break;
case 0xdd: b = 6; break;
case 0xdb: b = 7; break;
case 0xd7: b = 8; break;
case 0xbe: b = 9; break;
case 0xbd: b = 10; break;
case 0xbb: b = 11; break;
case 0xb7: b = 12; break;
case 0x7e: b = 13; break;
case 0x7d: b = 14; break;
case 0x7b: b = 15; break;
case 0x77: b = 16; break;
default: b = 0 ; break;
}
}
return (b); //將b中的鍵值代號送入函數返回值
}
/**********************************************************************************************/
/*********************************************************************************************
程序名：STC系列單片機內部EEPROM 測試程序
P1口接8個LED到VCC。
適用硬件：
STC12C5AxxAD系列單片機
STC12C52xxAD系列單片機
STC11xx系列單片機
STC10xx系列單片機
使用說明：
1，程序先別P1口高4位和低4位分別點亮一次。
2，檢查EEPROM中對應地址內的值是否與用戶測試值相同。
3，如果相同則P1.7上的LED亮，然后在P1口顯示EEPROM中的值。
4，如果不同則P1.3上的LED亮，然后全片擦除EEPROM并寫入用戶測試值到指定地址。
注意：
# 在第一次下載時為寫入（第4步），復位后才會測試。
# 當供電電源低于一定值時將不能寫入EEPROM，詳見數據手冊。
/*********************************************************************************************/
#include <reg51.H>
#include <intrins.H>
/*********************************************************************************************/
typedef unsigned char INT8U;
typedef unsigned int INT16U;
/*********************************************************************************************/
//用于STC12C2052系列單片機時選擇//
sfr IAP_DATA = 0xE2; //STC12C2052系列單片機的EEPRON操作地址是0xe2（以下類推）
sfr IAP_ADDRH = 0xE3;
sfr IAP_ADDRL = 0xE4;
sfr IAP_CMD = 0xE5;
sfr IAP_TRIG = 0xE6;
sfr IAP_CONTR = 0xE7;
#define WD1 0x46 //使用STC12C2052系列單片機時，先寫入0x46，然寫入0xb9
#define WD2 0xb9
/*********************************************************************************************
//用于STC11/10xx系列單片機時選擇//
sfr IAP_DATA = 0xC2; //STC11xx系列單片機的EEPRON操作地址是0xc2（以下類推）
sfr IAP_ADDRH = 0xC3;
sfr IAP_ADDRL = 0xC4;
sfr IAP_CMD = 0xC5;
sfr IAP_TRIG = 0xC6;
sfr IAP_CONTR = 0xC7;
#define WD1 0x5a //使用STC11xx系列單片機時，先寫入0x5a，然寫入0xa5
#define WD2 0xa5
/*********************************************************************************************/
//定義Flash 操作等待時間及允許IAP/ISP/EEPROM 操作的常數//
//#define ENABLE_ISP 0x80 //系統工作時鐘<30MHz 時，對IAP_CONTR 寄存器設置此值
//#define ENABLE_ISP 0x81 //系統工作時鐘<24MHz 時，對IAP_CONTR 寄存器設置此值
#define ENABLE_ISP 0x82 //系統工作時鐘<20MHz 時，對IAP_CONTR 寄存器設置此值
//#define ENABLE_ISP 0x83 //系統工作時鐘<12MHz 時，對IAP_CONTR 寄存器設置此值
//#define ENABLE_ISP 0x84 //系統工作時鐘<6MHz 時，對IAP_CONTR 寄存器設置此值
//#define ENABLE_ISP 0x85 //系統工作時鐘<3MHz 時，對IAP_CONTR 寄存器設置此值
//#define ENABLE_ISP 0x86 //系統工作時鐘<2MHz 時，對IAP_CONTR 寄存器設置此值
//#define ENABLE_ISP 0x87 //系統工作時鐘<1MHz 時，對IAP_CONTR 寄存器設置此值
/*********************************************************************************************/
#define DEBUG_DATA 0x55 //存儲在 EEPROM 單元的數值（用戶可修改測試）
#define DATA_FLASH_START_ADDRESS 0x00 //EEPROM存入地址（用戶可修改測試）
/*********************************************************************************************/
union union_temp16
{
INT16U un_temp16;
INT8U un_temp8[2];
}my_unTemp16;
INT8U Byte_Read(INT16U add); //讀一字節，調用前需打開IAP 功能
void Byte_Program(INT16U add, INT8U ch); //字節編程，調用前需打開IAP 功能
void Sector_Erase(INT16U add); //擦除扇區
void IAP_Disable(); //關閉IAP 功能
void Delay();
/*********************************************************************************************/
void main (void)
{
INT16U eeprom_address;
INT8U read_eeprom;
P1 = 0xF0; //演示程序開始，讓 P1[3:0] 控制的燈亮
Delay(); //延時
P1 = 0x0F; //演示程序開始，讓 P1[7:4] 控制的燈亮
Delay() ; //延時
//將EEPROM 測試起始地址單元的內容讀出
eeprom_address = DATA_FLASH_START_ADDRESS; //將測試起始地址送eeprom_address
read_eeprom = Byte_Read(eeprom_address); //讀EEPROM的值,存到read_eeprom
if (DEBUG_DATA == read_eeprom)
{ //數據是對的，亮 P1.7 控制的燈，然后在 P1 口上將 EEPROM 的數據顯示出來
P1 = ~0x80;
Delay() ; //延時
P1 = ~read_eeprom;
}
else
{ //數據是錯的，亮 P1.3 控制的燈，然后在 P1 口上將 EEPROM 的數據顯示出來
//再將該EEPROM所在的扇區整個擦除，將正確的數據寫入后，亮 P1.5 控制的燈
P1 = ~0x08;
Delay() ; //延時
P1 = ~read_eeprom;
Delay() ; //延時
Sector_Erase(eeprom_address); //擦除整個扇區
Byte_Program(eeprom_address, DEBUG_DATA);//將 DEBUG_DATA 寫入 EEPROM
P1 = ~0x20; //熄滅 P1.3 控制的燈，亮 P1.5 控制的燈
}
while (1); //CPU 在此無限循環執行此句
}
/*********************************************************************************************/
//讀一字節，調用前需打開IAP 功能，入口:DPTR = 字節地址，返回:A = 讀出字節
INT8U Byte_Read(INT16U add)
{
IAP_DATA = 0x00;
IAP_CONTR = ENABLE_ISP; //打開IAP 功能, 設置Flash 操作等待時間
IAP_CMD = 0x01; //IAP/ISP/EEPROM 字節讀命令
my_unTemp16.un_temp16 = add;
IAP_ADDRH = my_unTemp16.un_temp8[0]; //設置目標單元地址的高8 位地址
IAP_ADDRL = my_unTemp16.un_temp8[1]; //設置目標單元地址的低8 位地址
//EA = 0;
IAP_TRIG = WD1; //先送 WD1,再送WD2 到ISP/IAP 觸發寄存器,每次都需如此
IAP_TRIG = WD2; //送完WD2 后，ISP/IAP 命令立即被觸發起動
_nop_();
//EA = 1;
IAP_Disable(); //關閉IAP 功能, 清相關的特殊功能寄存器,使CPU 處于安全狀態,
//一次連續的IAP 操作完成之后建議關閉IAP 功能,不需要每次都關
return (IAP_DATA);
}
/*********************************************************************************************/
//字節編程，調用前需打開IAP 功能，入口:DPTR = 字節地址, A= 須編程字節的數據
void Byte_Program(INT16U add, INT8U ch)
{
IAP_CONTR = ENABLE_ISP; //打開 IAP 功能, 設置Flash 操作等待時間
IAP_CMD = 0x02; //IAP/ISP/EEPROM 字節編程命令
my_unTemp16.un_temp16 = add;
IAP_ADDRH = my_unTemp16.un_temp8[0]; //設置目標單元地址的高8 位地址
IAP_ADDRL = my_unTemp16.un_temp8[1]; //設置目標單元地址的低8 位地址
IAP_DATA = ch; //要編程的數據先送進IAP_DATA 寄存器
//EA = 0;
IAP_TRIG = WD1; //先送 WD1,再送WD2 到ISP/IAP 觸發寄存器,每次都需如此
IAP_TRIG = WD2; //送完WD2 后，ISP/IAP 命令立即被觸發起動
_nop_();
//EA = 1;
IAP_Disable(); //關閉IAP 功能, 清相關的特殊功能寄存器,使CPU 處于安全狀態,
//一次連續的IAP 操作完成之后建議關閉IAP 功能,不需要每次都關
}
/*********************************************************************************************/
//擦除扇區, 入口:DPTR = 扇區地址
void Sector_Erase(INT16U add)
{
IAP_CONTR = ENABLE_ISP; //打開IAP 功能, 設置Flash 操作等待時間
IAP_CMD = 0x03; //IAP/ISP/EEPROM 扇區擦除命令
my_unTemp16.un_temp16 = add;
IAP_ADDRH = my_unTemp16.un_temp8[0]; //設置目標單元地址的高8 位地址
IAP_ADDRL = my_unTemp16.un_temp8[1]; //設置目標單元地址的低8 位地址
//EA = 0;
IAP_TRIG = WD1; //先送 WD1,再送WD2 到ISP/IAP 觸發寄存器,每次都需如此
IAP_TRIG = WD2; //送完WD2 后，ISP/IAP 命令立即被觸發起動
_nop_();
//EA = 1;
IAP_Disable(); //關閉IAP 功能, 清相關的特殊功能寄存器,使CPU 處于安全狀態,
//一次連續的IAP 操作完成之后建議關閉IAP 功能,不需要每次都關
}
/*********************************************************************************************/
void IAP_Disable()
{
//關閉IAP 功能, 清相關的特殊功能寄存器,使CPU 處于安全狀態,
//一次連續的IAP 操作完成之后建議關閉IAP 功能,不需要每次都關
IAP_CONTR = 0; //關閉IAP 功能
IAP_CMD = 0; //清命令寄存器,使命令寄存器無命令,此句可不用
IAP_TRIG = 0; //清命令觸發寄存器,使命令觸發寄存器無觸發,此句可不用
IAP_ADDRH = 0;
IAP_ADDRL = 0;
}
/*********************************************************************************************/
void Delay() //延時程序
{
INT8U i;
INT16U d=5000;
while (d--)
{
i=255;
while (i--);
}
}