久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

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

基于單片機的矩陣式鍵盤電子琴仿真課程設計 原創作品

[復制鏈接]
跳轉到指定樓層
樓主
電子琴的仿真我在本科階段的一個課程設計題目，以51單片機為核心，電子琴按鍵是4乘4的矩陣式鍵盤，代碼是用匯編語言寫的，都是原創。


51單片機源程序：
  1. //附錄一 程序清單
  2. BUFF EQU 30H
  3. STH0 EQU 31H
  4. STL0 EQU 32H
  5. TEMP EQU 33H
  6. ORG 0000H
  7. LJMP START
  8. ORG 000BH
  9. LJMP INT_T0
  10. ORG 001BH
  11. LJMP TIM1
  12. START:MOV TMOD,#01H
  13.       SETB ET0
  14.           SETB EA
  15. MAIN:MOV P1,#0FFH                        ;置為高電平
  16.      CLR P1.4                                ;掃第一行
  17.          MOV A,P1
  18.          ANL A,#0FH
  19.          XRL A,#0FH
  20.          JZ KKEY1                                ;為零無鍵按下轉移
  21.          LCALL DELY10MS
  22.          MOV A,P1                                ;到底有沒有鍵按下啊，去抖
  23.          ANL A,#0FH
  24.          XRL A,#0FH
  25.          JZ KKEY1                               
  26.          MOV A,P1
  27.          ANL A,#0FH
  28.          CJNE A,#0EH,KK1                    ;相等說明這回是真有鍵按下了，不騙人        00001110第一列
  29.          MOV BUFF,#0                        ;給個鍵值
  30.          LJMP NDK1                                ;終于出聲音了巴拉巴拉巴拉巴拉
  31. KK1:CJNE A,#0DH,KK2                    ;第二列00001101
  32.      MOV BUFF,#1
  33.          LJMP NDK1                                                                                                               
  34. KK2:CJNE A,#0BH,KK3                        ;第三列00001011
  35.     MOV BUFF,#2
  36.         LJMP NDK1
  37. KK3:CJNE A,#07H,KK4                        ;第四列0000 0111
  38.     MOV BUFF,#3
  39.         LJMP NDK1
  40. KK4:NOP                                                 ;空
  41.                            ;下面都是一樣的套路掃描第二三四行，復制三遍OK
  42. KKEY1:MOV P1,#0FFH                       
  43.      CLR P1.5                                ;掃第二行
  44.          MOV A,P1
  45.          ANL A,#0FH
  46.          XRL A,#0FH
  47.          JZ KKEY2                               
  48.          LCALL DELY10MS
  49.          MOV A,P1                               
  50.          ANL A,#0FH
  51.          XRL A,#0FH
  52.          JZ KKEY2                               
  53.          MOV A,P1
  54.          ANL A,#0FH
  55.          CJNE A,#0EH,KK5               
  56.          MOV BUFF,#4                       
  57.          LJMP NDK1                               
  58. KK5:CJNE A,#0DH,KK6               
  59.      MOV BUFF,#5
  60.          LJMP NDK1                                                                                                               
  61. KK6:CJNE A,#0BH,KK7                       
  62.     MOV BUFF,#6
  63.         LJMP NDK1
  64. KK7:CJNE A,#07H,KK8                       
  65.     MOV BUFF,#7
  66.         LJMP NDK1
  67. KK8:NOP

  69. KKEY2:MOV P1,#0FFH                       
  70.      CLR P1.6                                ;掃第三行
  71.          MOV A,P1
  72.          ANL A,#0FH
  73.          XRL A,#0FH
  74.          JZ KKEY3                               
  75.          LCALL DELY10MS
  76.          MOV A,P1                               
  77.          ANL A,#0FH
  78.          XRL A,#0FH
  79.          JZ KKEY3                               
  80.          MOV A,P1
  81.          ANL A,#0FH
  82.          CJNE A,#0EH,KK9               
  83.          MOV BUFF,#8                       
  84.          LJMP NDK1                               
  85. KK9:CJNE A,#0DH,KK10               
  86.      MOV BUFF,#9
  87.          LJMP NDK1                                                                                                               
  88. KK10:CJNE A,#0BH,KK11                       
  89.     MOV BUFF,#10
  90.         LJMP NDK1
  91. KK11:CJNE A,#07H,KK12                       
  92.     MOV BUFF,#11
  93.         LJMP NDK1
  94. KK12:NOP

  96. KKEY3:MOV P1,#0FFH                       
  97.      CLR P1.7                                ;掃第四行
  98.          MOV A,P1
  99.          ANL A,#0FH
  100.          XRL A,#0FH
  101.          JZ KKEY4                               
  102.          LCALL DELY10MS
  103.          MOV A,P1                               
  104.          ANL A,#0FH
  105.          XRL A,#0FH
  106.          JZ KKEY4                               
  107.          MOV A,P1
  108.          ANL A,#0FH
  109.          CJNE A,#0EH,KK13               
  110.          MOV BUFF,#12                       
  111.          LJMP NDK1                               
  112. KK13:CJNE A,#0DH,KK14               
  113.      MOV BUFF,#13
  114.          LJMP NDK1                                                                                                                                                                                  
  115. KK14:CJNE A,#0BH,KK15                       
  116.     MOV BUFF,#14
  117.         LJMP NDK1
  118. KK15:CJNE A,#07H,KK16                       
  119.     MOV BUFF,#15
  120.         LJMP NDK1
  121. KK16:NOP

  123. NDK1: MOV A,BUFF                                                ;給鍵值
  124.       MOV DPTR,#TABLE                               
  125.           MOVC A,@A+DPTR                                ;到表里找到它段碼
  126.           MOV P0,A                                                ;給數碼管數碼管
  127.           MOV A,BUFF                                       
  128.           RL A                                                       
  129.           MOV TEMP,A                                       
  130.           MOV DPTR,#TABLE1                               
  131.           MOVC A,@A+DPTR                                ;到表里找到它的T/2
  132.       MOV STH0,A                                       
  133.           MOV TH0,A                                               
  134.           INC TEMP                                               
  135.           MOV A,TEMP
  136.           MOVC A,@A+DPTR
  137.           MOV STL0,A
  138.           MOV TL0,A                                           ;給定時器高低位
  139.           SETB TR0
  140. NDK1A: MOV A,P1                                      ;松手了嗎親 ，不松手繼續出聲
  141.        ANL A,#0FH
  142.            XRL A,#0FH
  143.            JNZ NDK1A
  144.            CLR TR0
  145. KKEY4: MOV A,#0FFH
  146.        MOV P2,A
  147.            MOV A,P2
  148.            JB ACC.0,KKEY5                                  ;中斷按下了嗎，按下就唱歌了，想好了再按
  149.            LCALL DELY10MS
  150.            MOV A,P2
  151.            JB ACC.0,KKEY5
  152.            MOV BUFF,#16
  153.            MOV P0,#7FH
  154.            LJMP START22
  155. START22:MOV A,BUFF
  156.         CJNE A,#16,KKEY5
  157.                 LJMP START2
  158. KKEY5: LJMP MAIN
  159. START2:MOV TMOD,#10H            ；準備播放音樂
  160.                 MOV IE,#88H
  161. START0:         MOV 30H,#00
  162. NEXT:        MOV A,30H
  163.                 MOV DPTR,#TAB                         ;拿到簡譜碼表
  164.                 MOVC A,@A+DPTR
  165.                 MOV R2,A
  166.                 JZ EN0
  167.                 ANL A,#0FH
  168.                 MOV R5,A                 ;節拍放入R5
  169.                 MOV A,R2
  170.                 SWAP A
  171.                 ANL A,#0FH
  172.                 JNZ SING
  173.                 CLR TR1
  174.                 LJMP D1
  175. SING:        DEC A
  176.                 MOV 23H,A
  177.                 RL A
  178.                 MOV DPTR,#TAB1                  
  179.                 MOVC A,@A+DPTR
  180.                 MOV TH1,A
  181.                 MOV 24H,A                                  
  182.                 MOV A,23H
  183.                 RL A
  184.                 INC A
  185.                 MOVC A,@A+DPTR
  186.                 MOV TL1,A
  187.                 MOV 25H,A                               
  188.                 SETB TR1                                       
  189. D1:     CALL DELAY1                                                  
  190.                 INC 30H
  191.                 JMP NEXT
  192. EN0:    CLR  TR1
  193.                 LJMP START
  194. TIM1:   PUSH ACC
  195.         PUSH PSW
  196.                 MOV TL1,25H
  197.                 MOV TH1,24H
  198.                 CPL P3.0
  199.                 CPL P3.1
  200.                 POP PSW
  201.                 POP ACC
  202.                 RETI
  203. DELAY1: MOV R4,#02                             ;187MS
  204. DELAY2:    MOV R3,#187
  205. DELAY3:    MOV R2,#248
  206.         DJNZ R2,$
  207.                 DJNZ R3,DELAY3
  208.                 DJNZ R4,DELAY2
  209.                 DJNZ R5,DELAY1
  210.                 RET
  211. DELY10MS:MOV R6,#10                              ;10MS
  212. D10:     MOV R7,#248
  213.          DJNZ R7,$
  214.               DJNZ R6,D10
  215.              RET
  216. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

全部資料下載地址：
電子琴仿真及程序代碼.rar (329.4 KB, 下載次數: 84)


評分

參與人數 2黑幣 +13 收起 理由
小菜鳥的鳥 + 8 很給力！
syl829416534 + 5 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂1 踩踩
回復

使用道具 舉報

沙發
ID:195094 發表于 2017-5-22 16:56 | 只看該作者
支持支持，不過不會匯編啊，有C語言的嗎?
回復

使用道具 舉報

板凳
ID:209348 發表于 2017-6-8 21:25 | 只看該作者
還是不太懂啊。。。
回復

使用道具 舉報

地板
ID:354692 發表于 2018-6-20 09:20 | 只看該作者
老哥真的厲害
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 日韩久久中文字幕 | 亚洲人成在线播放 | 国产视频一区二区 | 天天久| 亚洲精品在线观看视频 | 二区国产 | 日本又色又爽又黄的大片 | 99精品视频在线观看 | 91av国产在线视频 | 亚洲精品视频导航 | 日韩在线播放中文字幕 | 成人精品福利 | 国产盗摄视频 | 国产成人精品一区二区三区视频 | 国产精品免费小视频 | 中午字幕在线观看 | 日韩一级 | 久久久99国产精品免费 | 99视频在线免费观看 | 一区免费| 91久久久久久久久久久 | 狠狠狠干| 欧美v在线观看 | 国产在线精品一区二区 | 欧美久久久网站 | 国产精品一区三区 | 免费在线日韩 | 成人国产精品久久 | 伦理二区 | 日韩在线91 | 久久成人精品视频 | 精品国产免费人成在线观看 | 久久出精品 | 欧美激情一区二区三区 | a欧美| 999视频在线播放 | 国产一区二区在线91 | 日韩欧美网 | 成人免费在线观看 | 久久久精品一区二区三区四季av | 久久久亚洲一区 |