Navthai : ชุมชนผู้ใช้งาน GPS อันดับหนึ่งของไทย

substitute_transform = TRANSFORM.new({
	{2,L"^(%u)(%u)[ -]*(%d+)",L"%1.%2. %3"},
	{2,L"\-",L" "},
	{2,L"(%d)(%a)",L"%1 %2"},
	{2,L"(%a)(%d)",L"%1 %2"},
	{2,L"//",L", "},
	{2,L"/",L"ทับ, "},
	{2,L"-",L", "},
}

local function format_road_number(roadnum)
    local res
    if is_road_number(roadnum) then
        roads = transform_roadnumber_explode_eu(roadnum)
        for k, str in ipairs(roads) do
            -- Nagybetu
            str = wstring.upper(str)

            -- Thai Highway Network
            str = wstring.gsub(str, L"(%d+)", L"ทางหลวงหมายเลข %1")

---------------------------แก้ไขหน่วยวัดระยะสำหรับ TTS Pro---------------------------
yd="หลา"
mi="ไมล์"
ft="ฟุต"
m="เมตร"
km="กิโลเมตร"

---------------------------แก้ไขหน่วยวัดความเร็วสำหรับ TTS Pro---------------------------
km/h="กิโลเมตรต่อชั่วโมง"
mph="ไมล์ต่อชั่วโมง"

{2,L"ถนนเพชรบุรี ประตูน้ำ คล",L"ถนนเพชรบุรี ประตูน้ำ คลองตัน, "},

{2,L" คล",L"คลองตัน, "},

{2,L"ซอยจันทน์",L"ซอยจัน, "},

always_say_road_names="0"
skip_exit_numbers="0"
announce_street_name="1"
announce_exit_directions="1"

------------------------------------------|  O U T P U T  |-----------------------------------------
function format_destname(data, idx)
    local t
    local out
    if data[idx].signpost then
        t = transform_chain({}, signpost_exitname, 	data, idx)
	t = transform_chain(t,  signpost_exitnumber, 	data, idx)
	t = transform_chain(t,  signpost_roadnumber, 	data, idx)
	t = transform_chain(t,  signpost_destination,	data, idx)
	t = transform_chain(t,  signpost_settlement, 	data, idx)
        out = table_concat(t, L"")
    elseif data[idx].road then
	t = transform_chain({}, road_number, data, idx)
	t = transform_chain(t,  road_name,   data, idx)
        out = wstring.format(destname.ROADNAME, table_concat(t, L""))
    end
    return out
end

function format_streetname(data, idx)
    local t
    t = transform_chain({}, road_number, 	data, idx)
    t = transform_chain(t,  road_name, 	data, idx)
    return table_concat(t, L"")
end

local number_formatter_2 = {
    -- 0x
    { L"0(%d)", L"ศูนย์%1 " },
    -- xy
    { L"(%d)(%d)", L"%1 %2 " },
}

local number_formatter_3 = {
    -- xyz
    { L"(%d)(%d)(%d)", L"%1 %2 %3 " },
}

local number_formatter_4 = {
    -- xyzw
    { L"(%d)(%d)(%d)(%d)", L"%1 %2 %3 %4 " },
}