annotate src/lib/languages.luan @ 36:2737eeedc1d5

autoplay
author Franklin Schmidt <fschmidt@gmail.com>
date Tue, 05 Aug 2025 17:24:47 -0600
parents 7d9462ea03e3
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
1 local Luan = require "luan:Luan.luan"
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
2 local error = Luan.error
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
3 local pairs = Luan.pairs or error()
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
4 local ipairs = Luan.ipairs or error()
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
5
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
6
26
d3f5448743bf add doc links
Franklin Schmidt <fschmidt@gmail.com>
parents: 16
diff changeset
7 -- https://learn.microsoft.com/en-us/azure/ai-services/speech-service/language-support?tabs=tts
d3f5448743bf add doc links
Franklin Schmidt <fschmidt@gmail.com>
parents: 16
diff changeset
8
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
9 local regions = {
32
Franklin Schmidt <fschmidt@gmail.com>
parents: 26
diff changeset
10 GB = "United Kingdom"
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
11 JP = "Japan"
33
7d9462ea03e3 add korean
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
12 KR = "Korea"
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
13 US = "United States"
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
14 }
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
15
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
16 local languages = {
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
17 en = {
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
18 name = "English"
32
Franklin Schmidt <fschmidt@gmail.com>
parents: 26
diff changeset
19 regions = {"US","GB"}
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
20 }
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
21 jp = {
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
22 name = "Japanese"
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
23 regions = {"JP"}
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
24 }
33
7d9462ea03e3 add korean
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
25 ko = {
7d9462ea03e3 add korean
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
26 name = "Korean"
7d9462ea03e3 add korean
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
27 regions = {"KR"}
7d9462ea03e3 add korean
Franklin Schmidt <fschmidt@gmail.com>
parents: 32
diff changeset
28 }
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
29 }
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
30
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
31 for code, info in pairs(languages) do
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
32 info.code = code
32
Franklin Schmidt <fschmidt@gmail.com>
parents: 26
diff changeset
33 local t = {nil}
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
34 for _, region in ipairs(info.regions) do
32
Franklin Schmidt <fschmidt@gmail.com>
parents: 26
diff changeset
35 t[#t+1] = {
Franklin Schmidt <fschmidt@gmail.com>
parents: 26
diff changeset
36 code = code.."-"..region
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
37 name = regions[region] or error(region)
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
38 }
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
39 end
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
40 info.regions = t
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
41 end
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
42
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
43 return languages