Hallo,
kann mir jemand genau erklären was hier passiert.
Ich verstehe nicht warum oder woher diese befehle bekannt sein sollten.
z.B. Rnspeak_playmsg 1
Dann würde ich gerne noch wissen was bedeutet byval.
Und was wird hier gemacht..
kann es mir jemand erklären.
Declare Sub Rnspeak_playmsg(byval Message As Byte)
Declare Sub Rnspeak_pause(byval Milli As Word)
Declare Function Rnspeak_bufferbytes() As Byte
Declare Sub Rnspeak_fertig()
danke schon mal...
Code:'Das Hauptprogramm zum Ansteuern von RN-Speak Beispiel ---------------------------------------------------------------------- Declare Sub Rnspeak_playmsg(byval Message As Byte) Declare Sub Rnspeak_pause(byval Milli As Word) Declare Function Rnspeak_bufferbytes() As Byte Declare Sub Rnspeak_fertig() Const Rnspeakslaveid = &H52 'Beliebig änderbar Dim B As Byte Wait 2 'Warte bis RN-Speak bereit (falls Board 'gerade erst mit Spannung versorgt wurde) Print "Testprogramm" I2cinit Rnspeak_playmsg 1 Rnspeak_pause 1000 '1000 Milisekunden (1 Sek) Pause Rnspeak_playmsg 2 Rnspeak_playmsg 3 Rnspeak_playmsg 4 Rnspeak_playmsg 3 Rnspeak_playmsg 2 Rnspeak_playmsg 1 Rnspeak_fertig 'Warte bis alles ausgesprochen und 'führe dann Hauptprogramm weiter Sound Portd.7 , 400 , 450 'BEEP Print "Fertig" End







Zitieren

Lesezeichen