找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 1770|回復(fù): 1
收起左側(cè)

我的單片機電子密碼鎖程序

[復(fù)制鏈接]
ID:461447 發(fā)表于 2019-5-11 20:44 | 顯示全部樓層 |閱讀模式
0.png

單片機源程序如下:
  1. #include "Absacc.h"
  2. #define C8255_A XBYTE[0x7F00]  //8255 端口地址定義
  3. #define C8255_B XBYTE[0x7F01]
  4. #define C8255_C XBYTE[0x7F02]
  5. #define C8255_CON  XBYTE[0x7F03]

  7. unsigned char a[] = {0x3f, 0x06, 0x5b, 0x4f, 0x66, 0x6d, 0x7d, 0x07,
  8.                                         0x7f, 0x6f, 0x77, 0x7c, 0x39, 0x5e, 0x79, 0x71};
  9. unsigned char b[] = {0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; // 顯示緩沖

  11. unsigned char key_down;
  12. unsigned char key_value;
  13. unsigned char key_count;
  14. void delay(unsigned int time)
  15. {
  16.         unsigned int i;
  17.         for(i=0; i<time; i++);
  18. }
  19. void keyscan() // 按鍵掃描函數(shù)
  20. {
  21.         unsigned char cc;
  22.         C8255_A = 0x00; //X1 ～ X4 置 0
  23.         cc = C8255_C;  // 得到 Y1 ～ Y4 的值
  24.         key_down = (~cc) & 0x0f;
  25. }
  26. void display() // 顯示函數(shù)
  27. {
  28.         unsigned char i, j = 0xDF;
  29.         for(i=0; i<6; i++)
  30.         {
  31.                 C8255_A = 0xFF;
  32.                 C8255_B = a[b[i]]; // 查表輸出顯示
  33.                 C8255_A = j;
  34.                 delay(0x100);
  35.                 j = (j>>1)|(j<<7);
  36.         }
  37. }
  38. void clear()  // 清屏
  39. {
  40.         C8255_B = 0x00;
  41. }
  42. void writebuffer()
  43. {
  44.         b[key_count] = key_value;
  45.         key_count--;
  46.         if(key_count == -1)
  47.         key_count = 5;
  48.         display();
  49.         clear();
  50.         keyscan();
  51.         while(key_down) // 鍵盤消抖
  52.         {
  53.                 display();
  54.                 clear();
  55.                 keyscan();
  56.         }
  57. }
  58. void getkey()  // 得到按鍵值
  59. {
  60.         unsigned char value;
  61.         unsigned char i, j = 0xFE;
  62.         for(i=0; i<4; i++)
  63.         {
  64.                 C8255_A = j;
  65.                 value = C8255_C;
  66.                 if(!(value & 0x01)) // 行 1
  67.                 {
  68.                         key_value = i + 0;
  69.                         writebuffer();
  70.                         return;
  71.                 }
  72.                 if(!(value & 0x02)) // 行 2
  73.                 {
  74.                         key_value = i + 4;
  75.                         writebuffer();
  76.                         return;
  77.                 }
  78.                 if(!(value & 0x04)) // 行 3
  79.                 {
  80.                         key_value = i + 8;
  81.                         writebuffer();
  82.                         return;
  83.                 }
  84.                 if(!(value & 0x08)) // 行 4
  85.                 {
  86.                         key_value = i + 12;
  87.                         writebuffer();
  88.                         return;
  89.                 }
  90.                 j <<= 1;
  91.         }
  92. }
  93. void main()
  94. {
  95.         C8255_CON = 0x81;  //8255 初始化
  96.         key_count = 5;
  97.         while(1)
  98.         {
  99.                 display(); // 顯示
  100.                 clear();  // 清屏
  101.                 keyscan(); // 按鍵掃描
  102.                 if(key_down)  // 判是否有鍵按下
  103.                 {
  104.                         display();
  105.                         delay(0x80);
  106.                         clear();
  107.                         keyscan();
  108.                         if(key_down)
  109.                         {
  110.                                 getkey();  // 得到按鍵值
  111.                         }
  112.                 }
  113.         }
  114. }
復(fù)制代碼

所有資料51hei提供下載:
課程設(shè)計.zip (293.17 KB, 下載次數(shù): 4)
keshetu.doc (256.5 KB, 下載次數(shù): 3)


回復(fù)

使用道具 舉報

ID:122829 發(fā)表于 2019-6-8 13:54 | 顯示全部樓層
這里面哪來的8255~~
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表