我自己用单片机做的电子琴

jili1986729

( R' f: X. L$ `3 H! d$ F3 A8 M我自己用单片机做的电子琴，比较简单，用了一个功放，自己做了个矩阵键盘
8 ]& x/ Q; W. w; N5 o9 g单片机应该用892051，这里89c51，有点浪费

程序：
  Q3 y  W5 ^+ t, XORG 00H
AJMP START
% N% U1 Q3 H/ R3 L7 MORG 001BH
  R  r  {2 Z7 _LJMP TIME1
ORG 30H
6 {8 K: S% V* F, t8 W; }# TSTART:MOV TMOD,#10H
6 H6 A( Y- B+ K% g      MOV IE,#88H
KEY:SETB F0
    CLR EA
CLR TR1
; {' G) c, g% U9 I3 h  q    MOV P1,#0F0H
KEY1:MOV A,P1
  CPL A
  ANL A,#0F0H
  JZ KEY
  CLR F0
L1: LCALL SKEY
  CLR EA
9 z2 {3 j- w. E1 G/ N  CLR TR1
  JB F0,KEY
MOV 22H,A
7 W& h) [: R7 q4 Z& j   ADD A,22H
   MOV R3,A
   MOV DPTR,#TABLE1
6 Y$ x; d- o+ s5 G2 M: ?   MOVC A,@A+DPTR
   MOV TH1,A
   MOV 21H,A
   MOV A,R3
7 }% ^: x6 Y1 F   INC A
   MOVC A,@A+DPTR
$ W/ ^7 H. ~  ]2 [$ M+ u! X! a  R   MOV TL1,A
9 }" B" r, r0 [  t   MOV 20H,A
      SETB EA
   SETB TR1
$ J. `7 Z0 Y5 t% Y. M# L- a8 rL2:CALL SKEY
% L% ^) D- X6 P   SETB EA
   SETB TR1
   JB F0,KEY
/ p& Z  a$ t. m/ h   LJMP L2
SKEY:MOV A,#00
     MOV R0,A
  MOV R1,A
2 k0 k/ `/ E5 [; t  MOV R3,#0FEH
SKEY2:MOV A,R3
3 J+ Q/ O# ~" o% U% M, H5 o3 f      MOV P1,A
   NOP
* n" }% X+ ^3 Q3 \  z   NOP
1 D$ ]; l2 x2 v" C  i8 z1 P   NOP
   MOV A,P1
. G5 `, u8 s8 S! _/ S   MOV R1,A
+ L/ K8 {, E! e3 M- L      CPL A
   ANL A,#0F0H
S123:JNZ SKEY3
  SETB F0
9 K( _) l5 p& L     INC R0
: x- r) d, Q$ H7 t$ Y  SETB C
  MOV A,R3
  RLC A
  MOV R3,A
" P4 }0 }! N2 S  MOV A,R0
  CJNE A,#04H,SKEY2
0 P- [, R+ E5 ?; x1 ]EKEY:RET
. d; `8 K- |$ }6 _( I/ sSKEY3:CLR F0
      MOV A,R1
: ^/ O: `7 q" s      JNB ACC.4,SKEY5
   JNB ACC.5,SKEY6
/ B. O3 Y: e% i   JNB ACC.6,SKEY7
   JNB ACC.7,SKEY8
1 m& j: }0 W# F% ^, s, Z2 F+ O! a   AJMP EKEY
SKEY5:MOV A,#00H
      MOV R2,A
8 B6 w* Y$ X! {  W9 M4 q7 v+ c3 S   AJMP DKEY
SKEY6:MOV A,#01H
      MOV R2,A
   AJMP DKEY
SKEY7:MOV A,#02H
$ b5 U4 I/ j7 T2 n0 O% X     MOV R2,A
5 r6 i' |* w  ?# X: L+ g+ D  AJMP DKEY
SKEY8:MOV A,#03H
      MOV R2,A
   AJMP DKEY
DKEY:MOV A,R0
8 i2 k5 x& a. C; R* W0 L: G! A     ACALL DECODE
( g* d7 p1 h6 w* \4 T  AJMP EKEY
6 ?: |; _' [: y* |% T" }4 M" ADECODE:MOV A,R0
       MOV B,#04H
    MUL AB
4 C1 S9 D9 J, q+ R7 x: V) i    ADD A,R2
    RET
TIME1:   PUSH ACC
* X* Q# x$ ?7 x5 F      PUSH PSW
0 P% ]# @/ {+ H2 {0 Q   CPL P2.4
   MOV TL1,20H
3 F7 m, x& P% h   MOV TH1,21H
   POP PSW
   POP ACC
1 l; G4 h7 P- M/ T! w- [2 o   RETI
% `( v6 k! b+ @8 G0 F/ \% M- VTABLE1:  DW 64021,64103,64260,64400,64524,64580,64684,64777
6 l0 d% x4 u2 m3 ~       DW 64820,64898,64968,65030,65058,65110,65157,65178
END

syw开门造车

jili1986729 网友好！
.
进入任何一门“陌生”的知识领域，选准正确的路径由为重要，会使你少走弯路。
6 R- }  m/ ~7 M4 I! C, N6 b: X.
* u0 F8 Y, G# _" E5 s; N4 x7 ?) D汇编语言，是在计算机技术发展的过程中，由机器码走向高级语言的过程中的一个
过渡语言，当出现了能做底层操作的高级语言的C语言后，汇编语言就应该从高校的
) z  u6 D4 N( n& F. }9 ^8 G教材中清除出去，以免浪费学生的精力，以提高学时的有效性。
& ~% {+ _4 U. B; F: q" t: Y.
1 ]9 `: a7 ^- f/ a" P" `& K我国高校教材的更新存在着滞后现象，做为学生应该学会取舍。
4 V8 l# x3 b0 t$ t" U对此，我能给出如下建议：
.
  M2 r! K8 Z9 p5 @, f/ I, I1、学单片机应该改用C语言，而抛弃汇编。
- ~3 C" R% B, ~2、应该尽可能的设计出一套自己专用的万能板，以应对“所有的项目”。
3、一定要在画专业的PCB电路板方面下足功夫。
0 s5 T) `) v8 b" p. X* l4 e8 [4、……
.
% |  M& b$ e7 B0 l0 m% P  ?8 H3 rsyw  091008---06.51

郑华

不错啊，我在学习！

FLEI200410

现在用C语言的比较多

卓信

嗯 不错 其实不应该叫电子琴  这个离电子琴远啦  不过能自己动手做东西还是很好的

jili1986729

恩，谢谢提醒。
因为在学校里学的是汇编。
6 d0 E  p- D) Z2 H; N- ?现在正在学习C语言，感觉C有它的好处，但有时汇编语言也有优势

次元碎片

造车总工
9 f1 V& y/ L+ Y  e1 A9 M  j现在的C语言支持底层编程，能大体说说优势吗？我有10多年没用过汇编了，记得96年用C编了段程序，用工具转换成低汇编，程序量太大了，而直接用汇编编程，短短的几行就可以，不知道现在支持底层编程的C这方面改进的怎么样了，多年没接触单片机，以为大家还都在用汇编呢

zjhioau

牛人

舟航

在学校时摸索的用用也挺好

cc0579

对于很多低端的单片机，还是用汇编比较多，因为考虑到汇编可以更加精简，可以节省很多程序空间，这对于低成本的单片机来说尤为重要。原因很简单，你如果程序量太大，就只好选用程序空间更多，也更贵的单片机来做。像义隆，中翰等单片机都是用汇编的多。
不过，现在的趋势上，单片机的程序空间越来越大 ，成本越来越低，用C成为了大势所趋。