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