Organo elettronico con il microcontrollore 8051

Nonostante la sua età relativamente vecchia, il microcontrollore 8051 è uno dei più popolari microcontrollori. Tanti altri microcontrollori derivati sono stati sviluppati sulla compatibilità con il microcontrollore 8051.

Questo progetto - Organo elettronico con il microcontrollore 8051 - è stato realizzato utilizzando il microcontrollore 8051 che può suonare come un organo elettronico. Ci sono 16 tasti per generare i toni che sono collegati a matrice di 4x4.

Collegamenti

  • Il pin 10 (P3.0) è collegato al circuito amplificatore
  • I pin 1-8 (P1.0 - P1.7) sono connessi alla tastiera
organo-elettronico-mcu-8051-schema

Come funziona
La musica è composta da diverse scale, ogni scala corrisponde ad una frequenza diversa. Così la musica può essere creata con diverse combinazioni di frequenza. In questo progetto il Timer0 dell'AT89S51 è utilizzato per generare questa frequenza.

Il firmware è disponibile e Open Source, quindi potete sbirciare il sorgente ed addirittura usarlo e/o adattarlo per i vostri progetti. Ad esempio potete provare a modificare le 2 tabelle giu in fondo al codice e... vedere cosa succede, anzi sentire 🙂 cosa succede.

Codice sorgente per microcontrollori 8051

KEYBUF        EQU 30H
 STH0          EQU 31H
 STL0          EQU 32H
 TEMP          EQU 33H
             ORG 00H
             LJMP START
             ORG 0BH
             LJMP INT_T0
 START:        MOV TMOD,#01H
             SETB ET0
             SETB EA
 WAIT:   
             MOV P1,#0FFH
             CLR P1.4
             MOV A,P1
             ANL A,#0FH  
             XRL A,#0FH
             JZ NOKEY1
             LCALL DELY10MS
             MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JZ NOKEY1
             MOV A,P1
             ANL A,#0FH
              CJNE A,#0EH,NK1
             MOV KEYBUF,#0
             LJMP DK1
 NK1:          CJNE A,#0DH,NK2
             MOV KEYBUF,#1
             LJMP DK1
 NK2:          CJNE A,#0BH,NK3
             MOV KEYBUF,#2
             LJMP DK1
 NK3:          CJNE A,#07H,NK4
              MOV KEYBUF,#3
             LJMP DK1
 NK4:          NOP
 DK1:    
             MOV A,KEYBUF
             MOV DPTR,#TABLE
             MOVC A,@A+DPTR
             MOV P0,A
             MOV A,KEYBUF
             MOV B,#2
             MUL AB
             MOV TEMP,A
              MOV DPTR,#TABLE1
             MOVC A,@A+DPTR
             MOV STH0,A
             MOV TH0,A
             INC TEMP
             MOV A,TEMP
             MOVC A,@A+DPTR
             MOV STL0,A
             MOV TL0,A
             SETB TR0
 DK1A:         MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JNZ DK1A
             CLR TR0
 NOKEY1:
             MOV P1,#0FFH
             CLR P1.5
             MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JZ NOKEY2
             LCALL DELY10MS
             MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JZ NOKEY2
             MOV A,P1
             ANL A,#0FH
             CJNE A,#0EH,NK5
             MOV KEYBUF,#4
             LJMP DK2
 NK5:          CJNE A,#0DH,NK6
             MOV KEYBUF,#5
             LJMP DK2
 NK6:          CJNE A,#0BH,NK7
             MOV KEYBUF,#6
             LJMP DK2
 NK7:          CJNE A,#07H,NK8
             MOV KEYBUF,#7
             LJMP DK2
 NK8:          NOP
 DK2:    
             MOV A,KEYBUF
             MOV DPTR,#TABLE
             MOVC A,@A+DPTR
             MOV P0,A
             MOV A,KEYBUF
             MOV B,#2
             MUL AB
             MOV TEMP,A
             MOV DPTR,#TABLE1
             MOVC A,@A+DPTR
             MOV STH0,A
             MOV TH0,A
             INC TEMP
             MOV A,TEMP
             MOVC A,@A+DPTR
             MOV STL0,A
             MOV TL0,A
             SETB TR0
 DK2A:         MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JNZ DK2A
             CLR TR0
 NOKEY2:
             MOV P1,#0FFH
             CLR P1.6
             MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JZ NOKEY3
             LCALL DELY10MS
             MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JZ NOKEY3
             MOV A,P1
              ANL A,#0FH
             CJNE A,#0EH,NK9
             MOV KEYBUF,#8
             LJMP DK3
 NK9:          CJNE A,#0DH,NK10
             MOV KEYBUF,#9
             LJMP DK3
 NK10:         CJNE A,#0BH,NK11
             MOV KEYBUF,#10
             LJMP DK3
 NK11:          CJNE A,#07H,NK12
             MOV KEYBUF,#11
             LJMP DK3
 NK12:         NOP
 DK3:
             MOV A,KEYBUF
             MOV DPTR,#TABLE
             MOVC A,@ A + DPTR
             MOV P0,A
             MOV A,KEYBUF
             MOV B,#2
             MUL AB
             MOV TEMP,A
             MOV DPTR,#TABLE1
             MOVC A,@ A + DPTR
             MOV STH0,A
             MOV TH0,A
             INC TEMP
             MOV A,TEMP
             MOVC A,@ A + DPTR
             MOV STL0,A
             MOV TL0,A
             SETB TR0
 DK3A:         MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JNZ DK3A
             CLR TR0
 NOKEY3:
             MOV P1,#0FFH
             CLR P1.7
             MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JZ NOKEY4
             LCALL DELY10MS
             MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JZ NOKEY4
             MOV A,P1
             ANL A,#0FH
             CJNE A,#0EH,NK13
             MOV KEYBUF,#12
             LJMP DK4
 NK13:         CJNE A,#0DH,NK14
             MOV KEYBUF,#13
             LJMP DK4
 NK14:         CJNE A,#0BH,NK15
             MOV KEYBUF,#14
             LJMP DK4
 NK15:         CJNE A,#07H,NK16
             MOV KEYBUF,#15
             LJMP DK4
 NK16:         NOP
 DK4:    
             MOV A,KEYBUF
             MOV DPTR,#TABLE
             MOVC A,@ A + DPTR
             MOV P0,A
             MOV A,KEYBUF
             MOV B,#2
             MUL AB
             MOV TEMP,A
             MOV DPTR,#TABLE1
             MOVC A,@ A + DPTR
             MOV STH0,A
              MOV TH0,A
             INC TEMP
             MOV A,TEMP
             MOVC A,@ A + DPTR
             MOV STL0,A
             MOV TL0,A
             SETB TR0
 DK4A:         MOV A,P1
             ANL A,#0FH
             XRL A,#0FH
             JNZ DK4A
             CLR TR0
 NOKEY4:
             LJMP WAIT
 DELY10MS:
             MOV R6,#10
 D1:           MOV R7,#248
             DJNZ R7,$
             DJNZ R6,D1
             RET
 INT_T0:
             MOV TH0,STH0
             MOV TL0,STL0
             CPL P3.0
             RETI
 TABLE:        DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H
             DB 7FH,6FH,77H,7CH,39H,5EH,79H,71H
 TABLE1:       DW 64021,64103,64260,64400
             DW 64524,64580,64684,64777
             DW 64820,64898,64968,65030
             DW 65058,65110,65157,65178
              END 

Repost: 23 Ago 2009

Scarica subito una copia gratis
Tags:

Scrivi un commento

Seguici anche sul tuo Social Network preferito!

Send this to a friend