Android-builders-club/OsmAnd
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Exact kilometer announcements (pl) - needs nightly build 2011-08-14 or later!

Browse source
This commit is contained in:
sonora 2011-08-14 20:34:44 +03:00
parent d6af998f73
commit b9d66485a6
1 changed files with 5 additions and 41 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

46
OsmAnd/voice/pl-tts/_ttsconfig.p
View file

@ -19,7 +19,6 @@ turn(Turn, Dist) == ['Za ', D, M] :-
distance(Dist) == D, turn(Turn, M).
turn(Turn) == M :- turn(Turn, M).
prepare_make_ut(Dist) == ['Za ', D, ' zawróć'] :-
distance(Dist) == D.
@ -63,48 +62,13 @@ nth(15, 'piętnasty ').
nth(16, 'szestasty ').
nth(17, 'siedemnasty ').
%%% distance measure
distance(Dist) == T :- Dist < 1000, dist(Dist, F), append(F, ' metrów',T).
dist(D, ['10 ']) :- D < 15, !.
dist(D, ['20 ']) :- D < 25, !.
dist(D, ['30 ']) :- D < 35, !.
dist(D, ['40 ']) :- D < 45, !.
dist(D, ['50 ']) :- D < 55, !.
dist(D, ['60 ']) :- D < 65, !.
dist(D, ['70 ']) :- D < 75, !.
dist(D, ['80 ']) :- D < 85, !.
dist(D, ['90 ']) :- D < 95, !.
dist(D, ['100 ']) :- D < 125, !.
dist(D, ['150 ']) :- D < 175, !.
dist(D, ['200 ']) :- D < 225, !.
dist(D, ['250 ']) :- D < 275, !.
dist(D, ['300 ']) :- D < 325, !.
dist(D, ['350 ']) :- D < 375, !.
dist(D, ['400 ']) :- D < 425, !.
dist(D, ['450 ']) :- D < 475, !.
dist(D, ['500 ']) :- D < 525, !.
dist(D, ['550 ']) :- D < 575, !.
dist(D, ['600 ']) :- D < 625, !.
dist(D, ['650 ']) :- D < 675, !.
dist(D, ['700 ']) :- D < 725, !.
dist(D, ['750 ']) :- D < 775, !.
dist(D, ['800 ']) :- D < 825, !.
dist(D, ['850 ']) :- D < 875, !.
dist(D, ['900 ']) :- D < 925, !.
dist(D, ['950 ']) :- D < 975, !.
dist(D, ['1000 ']) :- !.
distance(Dist) == [ X, ' metrów'] :- Dist < 100, D is round(Dist/10)*10, num_atom(D, X).
distance(Dist) == [ X, ' metrów'] :- Dist < 1000, D is round(2*Dist/100)*50, num_atom(D, X).
distance(Dist) == ['około jeden kilometr '] :- Dist < 1500.
distance(Dist) == ['około dwa kilometry '] :- Dist < 2500.
distance(Dist) == ['około trzy kilometry '] :- Dist < 3500.
distance(Dist) == ['około cztery kilometry '] :- Dist < 4500.
distance(Dist) == ['około pięć kilometrów '] :- Dist < 5500.
distance(Dist) == ['około sześć kilometrów '] :- Dist < 6500.
distance(Dist) == ['około siedem kilometrów '] :- Dist < 7500.
distance(Dist) == ['około osiem kilometrów '] :- Dist < 8500.
distance(Dist) == ['około dziewięć kilometrów '] :- Dist < 9500.
distance(Dist) == ['około ', X, ' kilometrów '] :- D is Dist/1000, dist(D, X).
distance(Dist) == ['około ', X, ' kilometry '] :- Dist < 4500, D is round(Dist/1000), num_atom(D, X).
distance(Dist) == ['około ', X, ' kilometrów '] :- Dist < 10000, D is round(Dist/1000), num_atom(D, X).
distance(Dist) == [ X, ' kilometrów '] :- D is round(Dist/1000), num_atom(D, X).
%% resolve command main method
%% if you are familar with Prolog you can input specific to the whole mechanism,