Robot röst: Hur man gör någon krets Talk (4 / 8 steg)
Steg 4: Picaxe kod för modulen talar
Samtidigt tal chip kommer att acceptera normal text eller ens fonem, verkar det att tillkännage bäst om uppfinningsrik stavning används. Att lägga till blanksteg mellan orden text ökar pauserna mellan orden.
' 08 m 2 talsyntes för SPO-512 speechchip
setfreq m16
hög c.4
hög c.1
output b.4
Pausa 5000
loop1:
hög c.2
Pausa 10
SEROUT c.2,T9600_16,(13,13) "initiera
IRIN c.3, b1
"debug
om b1 = 0 då speak1 "Knapp1 = 0
om b1 = 1 då speak2 ' 2
om b1 = 2 sedan speak3 ' 3
om b1 = 3 då speak4 ' 4
om b1 = 4 då speak5 ' 5
om b1 = 5 sedan speak6 ' 6
om b1 = 6 sedan speak7 ' 7
om b1 = 7 sedan speak8 ' 8
om b1 = 8 då speak9 ' 9
om b1 = 14 sedan guide ' guide
om b1 = 96 sedan menyn "menyn
om b1 = 58 då information "information
gå till loop1
speak1:
SEROUT c.2,T9600_16, ("[V14] [S3] [E2] pro gramm en", 13, 13)
Pausa 10000
gå till loop1
Speak2:
SEROUT c.2,T9600_16, ("[V14] [S3] [E2] pro gramm två", 13, 13)
Pausa 10000
gå till loop1
Speak3:
SEROUT c.2,T9600_16, ("[V14] [S3] [E2] pro gramm tre", 13, 13)
Pausa 10000
gå till loop1
speak4:
SEROUT c.2,T9600_16, ("[V14] [S4] [E2] är du crayzee?", 13, 13)
Pausa 10000
gå till loop1
speak5:
SEROUT c.2,T9600_16, ("[V14] [S7] [E3] thistoo kommer att passera", 13, 13)
Pausa 10000
gå till loop1
speak6:
SEROUT c.2,T9600_16, ("[V14] [S4] [E3] batteriet är svagt", 13, 13)
Pausa 10000
gå till loop1
speak7:
SEROUT c.2,T9600_16,("[V14][S6][E2]no",13,13)
Pausa 6100
gå till loop1
speak8:
SEROUT c.2,T9600_16,("[V14][S6][E2]yes",13,13)
Pausa 6100
gå till loop1
speak9:
SEROUT c.2,T9600_16, ("[V14] [S4] [E3] vi har en prob lem", 13, 13)
Pausa 7100
gå till loop1
Guide: "guide-knappen har tryckts
SEROUT c.2,T9600_16, ("[V14] [S6] [E3] Tryck på en två eller tre", 13, 13)
Pausa 12100
gå till loop1
meny:
SEROUT c.2,T9600_16, ("[V14] [S5] [E3] varna neen varna neen", 13, 13)
Pausa 8100
gå till loop1
info:
SEROUT c.2,T9600_16, ("[V14] [S4] [B3] minerade dis intet från fråga fråga från bryts", 13, 13)
Pausa 25000' "sinne är inte från frågan, frågan är från sinne"
gå till loop1