Stap 4: Picaxe Code voor de Module praten
Terwijl de toespraak chip normale tekst of zelfs fonemen accepteren zal, lijkt het beste gaan verkondigen als inventieve spelling wordt gebruikt. Spaties tussen de woorden toe te voegen, verhoogt de pauzes tussen de woorden.
' 08 m 2 tekst naar spraak voor SPO-512 speechchip
setfreq m16
hoge c.4
hoge c.1
b.4-uitgang
onderbreken van 5000
LOOP1:
hoge c.2
onderbreken van 10
SEROUT c.2,T9600_16,(13,13) ' initialiseren
IRIN c.3, b1
' debug
Als b1 = 0 dan speak1 ' button1 = 0
Als b1 = 1 then speak2 ' 2
Als b1 = 2 dan speak3 ' 3
Als b1 = 3 dan speak4 ' 4
Als b1 = 4 dan speak5 ' 5
Als b1 = 5 dan speak6 ' 6
Als b1 = 6 dan speak7 ' 7
Als b1 = 7 dan speak8 ' 8
Als b1 = 8 dan speak9 ' 9
Als b1 = 14 dan begeleiden ' gids
Als b1 = 96 dan menu ' menu
Als b1 = 58 dan info ' info
goto loop1
speak1:
SEROUT c.2,T9600_16, ("[V14] [S3] [E2] pro gramm een" 13, 13)
onderbreken van 10000
goto loop1
speak2:
SEROUT c.2,T9600_16, ("[V14] [S3] [E2] pro gramm twee" 13, 13)
onderbreken van 10000
goto loop1
speak3:
SEROUT c.2,T9600_16, ("[V14] [S3] [E2] pro gramm drie" 13, 13)
onderbreken van 10000
goto loop1
speak4:
SEROUT c.2,T9600_16, ("[V14] [S4] [E2] bent u crayzee?", 13, 13)
onderbreken van 10000
goto loop1
speak5:
SEROUT c.2,T9600_16, ("[V14] [S7] [E3] thistoo passeert" 13, 13)
onderbreken van 10000
goto loop1
speak6:
SEROUT c.2,T9600_16, ("[V14] [S4] [E3] batterij is laag", 13, 13)
onderbreken van 10000
goto loop1
speak7:
SEROUT c.2,T9600_16,("[V14][S6][E2]no",13,13)
6100 onderbreken
goto loop1
speak8:
SEROUT c.2,T9600_16,("[V14][S6][E2]yes",13,13)
6100 onderbreken
goto loop1
speak9:
SEROUT c.2,T9600_16, ("[V14] [S4] [E3] hebben we een prob lem" 13, 13)
onderbreken van de 7100
goto loop1
Gids: ' guide knop is ingedrukt
SEROUT c.2,T9600_16, ("[V14] [S6] [E3] Druk op een twee of drie" 13, 13)
onderbreken 12100
goto loop1
menu:
SEROUT c.2,T9600_16, ("[V14] [S5] [E3] waarschuwen neen neen waarschuwen", 13, 13)
8100 onderbreken
goto loop1
info:
SEROUT c.2,T9600_16, ("[V14] [S4] [B3] mined dis wordt niets van de zaak zaak van gedolven" 13, 13)
onderbreken 25000' "Mind is niet van materie, kwestie van geest"
goto loop1