標題: 匯編鍵盤掃描及顯示源程序 [打印本頁]
作者: daniu    時間: 2014-12-25 13:07
標題: 匯編鍵盤掃描及顯示源程序
本帖最后由 daniu 于 2014-12-25 13:17 編輯

  2. ORG     0000H
  3. MOV     SP,50H
  4. SJMP    MAIN


  7. MAIN:   LCALL   SM
  8.         MOV     A,R7
  9.         CJNE    A,#16,NEXT
  10.         SJMP    MAIN
  11. NEXT:   MOV     B,#10
  12.         DIV     AB
  13.         MOV     DPTR,#TAB
  14.         MOVC    A,@A+DPTR
  15.         MOV     R1,A
  16.         MOV     A,B
  17.         MOVC    A,@A+DPTR
  18.         MOV     R0,A


  21.         MOV     R3,#3
  22. L3:     MOV     SBUF,R1
  23.         JNB     TI,$
  24.         CLR     TI

  26.         MOV     SBUF,R0
  27.         JNB     TI,$
  28.         CLR     TI
  29.         DJNZ    R3,L3
  30.         LCALL   YS
  31.         SJMP    MAIN
  32.         RET


  35. SM:MOV  P0,#0F0H
  36.    MOV  R7,P0
  37.    CJNE R7,#0F0H,KX
  38.    SJMP KK
  39.    LCALL  YS
  40.    CJNE R7,#0F0H,KX
  41.    SJMP KK
  42. KX:MOV  P0,#0FH
  43.    MOV  A,P0
  44.    ORL  A,R7

  46.    CJNE A,#0EEH,K1
  47.    MOV  R7,#1
  48.    RET
  49. K1:CJNE A,#0EDH,K2
  50.    MOV  R7,#2
  51.    RET
  52. K2:CJNE A,#0EBH,K3
  53.    MOV  R7,#3
  54.    RET
  55. K3:CJNE A,#0E7H,K4
  56.    MOV  R7,#4
  57.    RET
  58. K4:CJNE A,#0DEH,K5
  59.    MOV  R7,#5
  60.    RET
  61. K5:CJNE A,#0DDH,K6
  62.    MOV  R7,#6
  63.    RET
  64. K6:CJNE A,#0DBH,K7
  65.    MOV  R7,#7
  66.    RET
  67. K7:CJNE A,#0D7H,K8
  68.    MOV  R7,#8
  69.    RET
  70. K8:CJNE A,#0BEH,K9
  71.    MOV  R7,#9
  72.    RET
  73. K9:CJNE A,#0BDH,K10
  74.    MOV  R7,#0
  75.    RET
  76. K10:CJNE A,#0BBH,K11
  77.    MOV  R7,#10
  78.    RET
  79. K11:CJNE A,#0B7H,K12
  80.    MOV  R7,#11
  81.    RET
  82. K12:CJNE A,#07EH,K13
  83.    MOV  R7,#12
  84.    RET
  85. K13:CJNE A,#07DH,K14
  86.    MOV  R7,#13
  87.    RET
  88. K14:CJNE A,#07BH,K15
  89.    MOV  R7,#14
  90.    RET
  91. K15:CJNE A,#077H,K16
  92.    MOV  R7,#15
  93.    RET
  94. K16:NOP
  95.    RET



  99. KK:MOV  R7,#16
  100.    RET


  103. YS:MOV   R6,#00FH
  104. Y1:MOV   R5,#0FFH
  105.    DJNZ  R5,$
  106.    DJNZ  R6,Y1
  107.    RET

  109. TAB:DB 088H,0BEH,0C4H,094H,0B2H
  110.     DB 091H,081H,0BCH,080H,090H
  111.     END
復制代碼





歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1