标题: 使用单片机汇编语言实现按键识别程序与Proteus仿真图 [打印本页]
作者: 456请问    时间: 2021-11-19 10:38
标题: 使用单片机汇编语言实现按键识别程序与Proteus仿真图
实现的效果如下

单片机源程序如下:
  1. KEY        DATA        30H
  2. LED0        BIT        P2^0
  3. LED1        BIT        P2^1
  4. LED2        BIT        P2^2
  5. LED3        BIT        P2^3
  6. LED4        BIT        P2^4
  7. LED5        BIT        P2^5
  8. LED6        BIT        P2^6
  9. LED7        BIT        P2^7


  12.         ORG        0000H
  13.               AJMP        START                           
  14.               ORG        0030H
  15. START:        
  16.         ACALL        KEYSCAN
  17.         MOV        A,KEY

  19.         CJNE        A,#1,M1
  20.         CLR        LED1
  21.         AJMP        START

  23. M1:        CJNE        A,#2,M2
  24.         CLR        LED2
  25.         AJMP        START

  27. M2:        CJNE        A,#3,M3
  28.         CLR        LED3
  29.         AJMP        START

  31. M3:        CJNE        A,#4,M4
  32.         CLR        LED4
  33.         AJMP        START

  35. M4:        MOV        P2,#0FFH
  36.         AJMP        START




  41. KEYSCAN:ORL        P3,#0FH                ;读前先写1
  42.         MOV        A,P3                ;读取扫描码
  43.         ORL        A,#0F0H                ;屏蔽高4位
  44.         
  45.         CJNE        A,#0FEH,KS1
  46.         MOV        KEY,#1
  47.         SJMP        KSRE
  48. KS1:        CJNE        A,#0FDH,KS2
  49.         MOV        KEY,#2
  50.         SJMP        KSRE
  51. KS2:        CJNE        A,#0FBH,KS3
  52.         MOV        KEY,#3
  53.         SJMP        KSRE
  54. KS3:        CJNE        A,#0F7H,KS4
  55.         MOV        KEY,#4
  56.         SJMP        KSRE
  57. KS4:        MOV        KEY,#0FFH

  59. KSRE:        RET


  62. DELAY:        MOV    R5,#2                  
  63. DEL1:         MOV    R4,#200
  64. DEL2:         MOV    R3,#250
  65.               DJNZ   R3,[        DISCUZ_CODE_1        ]nbsp;               //500us
  66.               DJNZ   R4,DEL2                //200x500us=100ms
  67.               DJNZ   R5,DEL1
  68.               RET

  70. TAB:        DB        0FFH,0FEH,0FCH,0F8H,0F0H,0E1H,0C3H,87H,0FH,1FH,3FH,7FH

  72.         END
复制代码

Proteus7.5版本的仿真图下载(dsn文件只能用这个版本打开): 03_2 独立按键.zip (88.09 KB, 下载次数: 8)




欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1