diff --git a/OsmAnd/voice/en-tts/_ttsconfig.p b/OsmAnd/voice/en-tts/_ttsconfig.p index 24d12decbb..c2357d4952 100644 --- a/OsmAnd/voice/en-tts/_ttsconfig.p +++ b/OsmAnd/voice/en-tts/_ttsconfig.p @@ -8,10 +8,10 @@ preamble - []. %% TURNS turn('left', ['turn left ']). -turn('left_sh', ['sharp left ']). +turn('left_sh', ['turn sharp left ']). turn('left_sl', ['turn slightly left ']). turn('right', ['turn right ']). -turn('right_sh', ['sharp right ']). +turn('right_sh', ['turn sharp right ']). turn('right_sl', ['turn slightly right ']). prepare_turn(Turn, Dist) == ['Prepare to ', M, ' after ', D] :- @@ -29,7 +29,7 @@ prepare_roundabout(Dist) == ['Prepare to enter a roundabout after ', D] :- make_ut(Dist) == ['After ', D, ' turn back '] :- distance(Dist) == D. -make_ut == ['Make U turn ']. +make_ut == ['Please make a U turn ']. roundabout(Dist, _Angle, Exit) == ['After ', D, ' enter the roundabout, and take the ', E, 'exit'] :- distance(Dist) == D, nth(Exit, E). roundabout(_Angle, Exit) == ['take the ', E, 'exit'] :- nth(Exit, E). @@ -68,33 +68,33 @@ nth(17, 'seventeenth '). %%% distance measure distance(Dist) == T :- Dist < 1000, dist(Dist, F), append(F, ' meters',T). dist(D, ['10 ']) :- D < 15, !. -dist(D, ['15 ']) :- D < 20, !. -dist(D, ['20 ']) :- D < 30, !. -dist(D, ['30 ']) :- D < 40, !. -dist(D, ['40 ']) :- D < 50, !. -dist(D, ['50 ']) :- D < 60, !. -dist(D, ['60 ']) :- D < 70, !. -dist(D, ['70 ']) :- D < 80, !. -dist(D, ['80 ']) :- D < 90, !. -dist(D, ['90 ']) :- D < 100, !. -dist(D, ['100 ']) :- D < 150, !. -dist(D, ['150 ']) :- D < 200, !. -dist(D, ['200 ']) :- D < 250, !. -dist(D, ['250 ']) :- D < 300, !. -dist(D, ['300 ']) :- D < 350, !. -dist(D, ['350 ']) :- D < 400, !. -dist(D, ['400 ']) :- D < 450, !. -dist(D, ['450 ']) :- D < 500, !. -dist(D, ['500 ']) :- D < 550, !. -dist(D, ['550 ']) :- D < 600, !. -dist(D, ['600 ']) :- D < 650, !. -dist(D, ['650 ']) :- D < 700, !. -dist(D, ['700 ']) :- D < 750, !. -dist(D, ['750 ']) :- D < 800, !. -dist(D, ['800 ']) :- D < 850, !. -dist(D, ['850 ']) :- D < 900, !. -dist(D, ['900 ']) :- D < 950, !. -dist(D, ['950 ']) :- !. +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) == ['about 1 kilometer '] :- Dist < 1500. distance(Dist) == ['about 2 kilometers '] :- Dist < 2500. @@ -105,7 +105,7 @@ distance(Dist) == ['about 6 kilometers '] :- Dist < 6500. distance(Dist) == ['about 7 kilometers '] :- Dist < 7500. distance(Dist) == ['about 8 kilometers '] :- Dist < 8500. distance(Dist) == ['about 9 kilometers '] :- Dist < 9500. -distance(Dist) == ['just over ', X, ' kilometers '] :- D is Dist/1000, dist(D, X). +distance(Dist) == ['about ', X, ' kilometers '] :- D is Dist/1000, dist(D, X). %% resolve command main method %% if you are familar with Prolog you can input specific to the whole mechanism,