Programmi per scheda robot con CB220

Il comando comando più semplice per produrre un suono attraverso il buzzer è il comando BEEP viene utilizzato per creare un segnale acustico. Verrà emesso un breve segnale acustico, questo comando è utile per creare effetti sonori premendo un tasto o suoni di allarme. Quando si utilizza questo comando, la porta specificata viene automaticamente impostato su uscita.

Porta: Porta numero (da 0 a 255)
Durata: Pulse periodo di uscita (da 1 a 65535)

Per il loro caricamento occorre utilizzare il programma che si chiama CUBLOC STUDIO che è disponibile gratuitamente sul sito.

Nell'esempio sotto riportato, la nota acustica viene generata tramite l'emissione da una porta di I/O tramite un segnale PWM, con un canale PWM, è possibile creare varie frequenze del suono.
L'esempio sopra mostra l'utilizzo del canale PWM 0 del CB220 essere utilizzato con il comando FREQOUT per produrre un suono.

Const Device = cb220
Dim PLAYSTR As String
Low 5
Freqout 0,5236 ‘Create a sound with frequency of 440Hz
Delay 500 ‘Delay
Pwmoff 0 ‘Stop Sound by turning off PWM

Const Device = CB2200
Low 5
Freqout 0,4403
Delay 200
Freqout 0,3703
Delay 200
Freqout 0,3114
Delay 200
Freqout 0,2202
Delay 200
Pwmoff 0

Modificando le frequenze, abbiamo fatto un programma semplice che può giocare note musicali. Per esprimere una nota, è possibile utilizzare due caratteri. Il primo carattere è per la nota e secondo carattere è per la lunghezza della nota.

Const Device = CB280
Dim PLAYSTR As String
Low 5
PLAYSTR = "G5E3E3G3E3C5"
PLAY 0,PLAYSTR
Do
Loop
End
Sub PLAY(CH As Byte,NOTE As String)
Dim PL As Byte
Dim CHAR As Byte
Const Integer PLAYTABLE = (5236,4665,4403,3923,3495,3299,2939,
2618,2333,2202,1961,1747,1649,1469,0)
For PL=1 To Len(NOTE) Step 2
CHAR = Asc(Mid(NOTE,PL,1)) - &H41
Freqout CH,PLAYTABLE(CHAR)
CHAR = Asc(Mid(NOTE,PL+1,1)) - &H30
Delay CHAR*100
Next
Pwmoff CH
End Sub

Quando si utilizza porta PWM per altri scopi, il comando non è FREQOUT più disponibili per l'uso. In questo caso, si può utilizzare qualsiasi I normale porta di I / O per creare un suono. Useremo i comandi TOGGLE e udelay per impostare la porta I / O ad ALTA e LOW. L'esempio seguente mostra come creare un suono di avviso con un I regolari porta di I / O, P4.

Const Device = CB220
Low 4
Do
SOUND 4,110,60
SOUND 4,80,60
SOUND 4,40,160
Loop
End
Sub SOUND(PN As Byte,FR As Byte,LN As Byte)
Dim SI As Byte,SJ As Byte
For SJ = 0 To LN
Reverse PN
Udelay FR
Reverse PN
Udelay FR
Next
End Sub

Una volta caricato il programma una volta avviato verranno emessi dei suoni attraverso il buzzer, verificare che sia presente il cavallotto su JP2.

Elenco revisioni
13/05/2011	Aggiornato pagina
15/12/2008	Emissione preliminare