Nyaaori/rockbox
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add language identifiers for Arabic. Also map 'walon' to Belgian French. It is probably not 100% correct, but at least there is a mapping, similar to how the script handles Wallisertitsch.

Browse source 
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@21193 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Jens Arnold 2009-06-05 06:40:16 +00:00
parent f7fc98905f
commit ac30b53cd3
1 changed files with 11 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
tools/sapi_voice.vbs
View file

@ -270,6 +270,13 @@ Function LangIDs(ByRef sLanguage)
Dim aIDs
Select Case sLanguage
Case "arabic"
LangIDs = Array( &h401, &h801, &hc01, &h1001, &h1401, &h1801, _
&h1c01, &h2001, &h2401, &h2801, &h2c01, &h3001, _
&h3401, &h3801, &h3c01, &h4001)
' Saudi Arabia, Iraq, Egypt, Libya, Algeria, Morocco, Tunisia,
' Oman, Yemen, Syria, Jordan, Lebanon, Kuwait, U.A.E., Bahrain,
' Qatar
Case "afrikaans"
LangIDs = Array(&h436)
Case "bulgarian"
@ -311,8 +318,8 @@ Function LangIDs(ByRef sLanguage)
Case "finnish"
LangIDs = Array(&h40b)
Case "francais"
LangIDs = Array(&h40c, &h80c, &hc0c, &h100c, &h140c, &h180c)
' Standard, Belgian, Canadian, Swiss, Luxembourg, Monaco
LangIDs = Array(&h40c, &hc0c, &h100c, &h140c, &h180c)
' Standard, Canadian, Swiss, Luxembourg, Monaco (Belgian -> walon)
Case "galego"
LangIDs = Array(&h456)
Case "greek"
@ -361,6 +368,8 @@ Function LangIDs(ByRef sLanguage)
LangIDs = Array(&h41f)
Case "wallisertitsch"
LangIDs = Array(&h807) ' Swiss German
Case "walon"
LangIDs = Array(&h80c) ' Belgian French
End Select
End Function