找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 3672|回復: 1
打印 上一主題 下一主題
收起左側

有用匯編寫的線反轉法掃描鍵盤程序嗎

[復制鏈接]
跳轉到指定樓層
樓主
ID:71905 發(fā)表于 2015-1-9 13:05 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
本人最近在寫單片機綜設，需要用到匯編寫掃描鍵盤程序，想用線反轉法，求各位大神有用匯編寫的線反轉法掃描鍵盤的程序
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復

使用道具 舉報

沙發(fā)
ID:1 發(fā)表于 2015-1-9 14:47 | 只看該作者
反轉法掃描的匯編程序：電路圖：矩陣鍵盤接p1口，數碼管位接p2 段選接p3，程序經過測試的可以用.
  1.         org 0000h
  2.         ljmp main
  3.         org 0030h
  4. main:   mov P2,#0feh    ;送數碼管位選
  5.         lcall scan      ;調用掃描函數
  6.         ljmp main
  7. scan:   mov P1,#0f0h
  8.         mov a,90h       ;讀引腳
  9.         cjne a,#0f0h,start0  ;
  10.         ljmp exit
  11. start0: lcall delay
  12.         mov P1,#0f0h
  13.         mov a,90h       ;再次讀引腳
  14.         cjne a,#0f0h,start1
  15.         ljmp exit
  16. start1: mov r3,a        ;存取行的碼值

  18.         mov P1,#0fh
  19.         mov a,90h          ;
  20.         cjne a,#0fh,start2
  21.         ljmp exit
  22. start2: lcall delay

  24.         mov P1,#0fh
  25.         mov a,90h       ;讀取列碼值
  26.         mov r2,a
  27.         cjne a,#0fh,strat3
  28.         ljmp exit
  29. strat3: ;mov r2,a

  31.         anl a,#0fh
  32.         mov r2,a
  33.         mov a,r3
  34.         anl a,#0f0h
  35.         orl a,r2
  36.        ; orl a,r3

  38.         mov 60h, a         ;存取鍵的碼值
  39.         mov r5,#00h
  40.         mov dptr,#cod
  41. w1:     mov a,r5
  42.         movc a,@a+dptr    ;開始查表
  43.         inc r5
  44.         cjne a,60h,w1      ;直到查表結束
  45.         lcall display     ;查到后開始顯示
  46. exit:   ret
  47. display:mov a,r5          ;顯示的數值代號存在r5中
  48.         subb a,#01h
  49.         mov dptr,#num
  50.         movc a,@a+dptr
  51.         mov P3,a          ;送數碼管段碼
  52.         ret



  56. delay:  MOV R5,#10
  57.   D2:        MOV R6,#2
  58.   D1:        MOV R7,#248
  59.         DJNZ R7,$
  60.         DJNZ R6,D1
  61.         DJNZ R5,D2
  62.         RET

  64.         ORG 0500H
  65. num:    DB  0C0H,0F9H,0A4H,0B0H,99H
  66.         DB   92H,82H,0F8H,080H,90H,88h,83h,0c6h,0a1h,86h,8eh
  67.         org 0550h
  68. cod:    db   0eeh,0deh,0beh,7eh, 0edh,0ddh,0bdh,7dh
  69.         db   0ebh,0dbh,0bbh,7bh,0e7h,0d7h,0b7h,77h

  71.         end
復制代碼
回復

使用道具 舉報

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

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表