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

jili1986729

$ [2 k7 _: u. t% |1 }4 z  \
我自己用单片机做的电子琴，比较简单，用了一个功放，自己做了个矩阵键盘
9 X& C: e+ D; S# u: Q' F4 F单片机应该用892051，这里89c51，有点浪费

; [& {. q+ g8 z5 i7 a! B( G9 Y+ V程序：
ORG 00H
* q; C, a, L* E% _) mAJMP START
ORG 001BH
8 N1 O7 @9 t' x) ]LJMP TIME1
( G8 z# t- L+ h6 n% H& bORG 30H
START:MOV TMOD,#10H
      MOV IE,#88H
. q! b$ y# p$ @" rKEY:SETB F0
  w, `7 D. e# Z$ p+ u3 s- [6 v& `    CLR EA
CLR TR1
) u' M9 b- d! \* i8 P  W    MOV P1,#0F0H
KEY1:MOV A,P1
) H  [9 H7 G* X  CPL A
  ANL A,#0F0H
9 Z0 [# ?* {. {5 A* t% m" M  JZ KEY
  CLR F0
L1: LCALL SKEY
- S3 X% B4 z9 n6 I* l5 ]  CLR EA
% H7 S1 J2 g9 m0 O6 g+ u+ l  CLR TR1
, j4 g! c. E5 ]! i) F  JB F0,KEY
MOV 22H,A
   ADD A,22H
' ^# F/ C& x0 z0 o3 p   MOV R3,A
   MOV DPTR,#TABLE1
, E: g/ y0 v$ m3 g1 ]   MOVC A,@A+DPTR
/ l, p. Q" I$ I9 J: }# a   MOV TH1,A
3 E# \$ x5 ~( D4 s4 Y) {5 P+ Z   MOV 21H,A
: l- |+ J* {$ O9 V9 m* K" Q   MOV A,R3
   INC A
   MOVC A,@A+DPTR
   MOV TL1,A
   MOV 20H,A
      SETB EA
5 H% |8 v+ j- f0 a& c0 ]! {( g   SETB TR1
L2:CALL SKEY
   SETB EA
# w3 t. ]9 n0 v# Y+ |   SETB TR1
   JB F0,KEY
: G- i! Z* m( ]( m   LJMP L2
SKEY:MOV A,#00
) ?; u- H& {$ G1 c$ _8 z7 ~$ C: Q     MOV R0,A
* S  C' D6 ~. i$ J' I- \/ U  MOV R1,A
  MOV R3,#0FEH
SKEY2:MOV A,R3
" M! Z- }7 W3 a      MOV P1,A
   NOP
   NOP
   NOP
   MOV A,P1
   MOV R1,A
      CPL A
   ANL A,#0F0H
S123:JNZ SKEY3
  SETB F0
     INC R0
  SETB C
  MOV A,R3
  RLC A
0 |( ]" n' @* B# E, Q5 E7 x# Z  MOV R3,A
' Q2 G$ M5 @# R1 w  MOV A,R0
  CJNE A,#04H,SKEY2
0 [' B; q4 O' ^" Y( p3 c7 vEKEY:RET
SKEY3:CLR F0
      MOV A,R1
7 [; ]: V* v* n& M* S. G/ i      JNB ACC.4,SKEY5
- A4 n' G2 l. S: v   JNB ACC.5,SKEY6
/ Q8 ?9 Z) u1 m1 K: ~$ t   JNB ACC.6,SKEY7
: ~# r0 v/ K  R" k/ f7 x   JNB ACC.7,SKEY8
4 ?/ r2 I* |7 f# q- d# N3 q   AJMP EKEY
  F+ x! ^! D* u! _4 FSKEY5:MOV A,#00H
2 k8 L5 q1 y' P# P6 {9 U      MOV R2,A
$ R$ o+ ]' L9 s& x$ E9 M  Z   AJMP DKEY
0 J2 y' c  i3 Z  @9 RSKEY6:MOV A,#01H
      MOV R2,A
   AJMP DKEY
SKEY7:MOV A,#02H
9 u* H: V9 F7 J! f" ?) S     MOV R2,A
- T( f$ h/ A  S+ `% j  AJMP DKEY
SKEY8:MOV A,#03H
4 x" j5 u' [# ^" z, B2 E, m      MOV R2,A
   AJMP DKEY
DKEY:MOV A,R0
     ACALL DECODE
0 ]3 k" Z& ^* V- q  AJMP EKEY
1 b3 C: t8 z  m+ mDECODE:MOV A,R0
       MOV B,#04H
8 t5 n$ b3 c/ M    MUL AB
4 U; I; I; ~- X1 Z  y' l% e    ADD A,R2
6 A1 O, E" C* v/ P' v/ q    RET
TIME1:   PUSH ACC
9 Y- [1 {" S$ M- k0 r2 l9 X      PUSH PSW
* a6 h( f- c( X   CPL P2.4
   MOV TL1,20H
/ p7 w7 Y* U# T, r2 p   MOV TH1,21H
   POP PSW
   POP ACC
) v8 u' x# d, l( V3 }& g   RETI
TABLE1:  DW 64021,64103,64260,64400,64524,64580,64684,64777
2 {; \7 Q/ H9 I       DW 64820,64898,64968,65030,65058,65110,65157,65178
" Q, ]3 U: m* I+ e, yEND

急速电棍

比较简单   不过手工制作牛比

honghuzhonggong

楼主的单片机学的真好   羡慕死我了    上学那会老师讲单片机硬是听不懂

非池中

谢谢楼主提醒

hobbylinux

- A- I# R4 {9 H; D1 M( ]

jili1986729 网友好！
.
- z( _1 {# H2 a8 v9 a: x进入任何一门“陌生”的知识领域，选准正确的路径由为重要，会使你少走弯路。0 d2 s! R6 W+ O/ N* q& \' J! q2 `
./ ?2 f; Q) B; i4 H: N
汇编语言，是在计算机技术发展的过程中，由机器码走向高级语言的过程中的一个过渡语言，当出现了能做底层操作的高级语言的C语言后，汇编语言就应该从高校的: u+ K! w5 C* f/ i5 W* L7 f
教材中清除出去，以免浪费学生的精力，以提高学时的有效性。
我国高校教材的更新存在着滞后现象，做为学生应该学会取舍。
对此，我能给出如下建议：
6 l6 y  c9 L
3 Z9 x1 l1 K2 S+ r& Q1、学单片机应该改用C语言，而抛弃汇编。, }' A( l  I5 L+ [; h
& Y7 h, z9 i+ T: B2、应该尽可能的设计出一套自己专用的万能板，以应对“所有的项目”。
8 S8 z) O" e+ @- G3、一定要在画专业的PCB电路板方面下足功夫。: F) F* t$ j6 k4 h" ^, K) ~  X
0 a; T4 a2 k5 {0 A! B0 e7 |4、……
syw开门造车 发表于 2009-10-8 06:51

" ~7 s, X8 @& K& f) b3 {! O5 \
syw开门造车 兄的话真是有深度，也讲得很对，
3 R  B# v% j/ B8 L我认为还要锁定好是学什么
  G3 t7 b. z6 {4 }: S0 e单片机，AVR？或其它。
问题是，电路不懂的话，应该从哪里下功夫？

cc0579

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

舟航

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

zjhioau

牛人

次元碎片

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

jili1986729

恩，谢谢提醒。
因为在学校里学的是汇编。
! M5 Y8 ^5 Y$ ?: q% Q# s( }  B/ D现在正在学习C语言，感觉C有它的好处，但有时汇编语言也有优势