Hallo,
nach mehreren Versuchen ist es mir noch nicht gelungen den RN-Speak über ein Programm zum Sprechen zu bewegen
Nach dem Aufbau funktioniert die Ansteuerung über Tasten problmlos.
Auch über die RS232 Schnittstelle mit einem Terminalprogramm läuft die Sprachausgabe mit den Komandos RNP (für Play) RNQ (für Reset) ebenfalls. Die Adressierung mit RNM (x) funktioniert jedoch nicht.
Anschliessend habe ich versucht die Ausgabe über den I2C Bus zu programmieren.
Leider spricht RN-Speak hiermit nicht. Was fehlt hier ?
Bitte nochmal um Hilfe
Gruß Kämmi
Hier mein Programm:
Code:
' RNB-SpeakTest
$regfile = "m162def.dat"
$crystal = 8000000 ' Quarzfrequenz
$baud = 9600
Config Scl = Portc.0
Config Sda = Portc.1
Declare Sub Spreche(byval Meldung As Byte) ' Unterfunktion anmelden
Dim Zufallszahl As Byte ' Varialble zufallszahl anmelden
I2cinit
Sub Spreche(meldung As Byte) ' Unterprogramm IC2 Ausgabe
I2cstart
I2cwbyte &H52
I2cwbyte Meldung
I2cstop
Waitms 200
End Sub
Zufallszahl = Rnd(4) ' Zufallszahl zwischen 0 und 4 erzeugen
Select Case Zufallszahl ' Auswahl Zufallszahl
Case 0:
Spreche 5
Case 1:
Spreche 6
Case 2:
Spreche 8
Case 3:
Spreche 9
End Select
End
Lesezeichen