Update voice
This commit is contained in:
parent
7ea3901fe5
commit
9939698d9d
2 changed files with 8 additions and 1 deletions
|
@ -35,9 +35,9 @@ go_ahead(Dist) == ['Продолжайте движение ', D]:- distance(Dis
|
|||
and_arrive_destination == ['и вы прибудете в пункт назначения '].
|
||||
and_arrive_intermediate == ['и вы прибудете в промежуточный пункт '].
|
||||
reached_intermediate == ['вы прибыли в промежуточный пункт'].
|
||||
reached_destination == ['вы прибыли в пункт назначения '].
|
||||
|
||||
then == ['затем '].
|
||||
reached_destination == ['вы прибыли в пункт назначения '].
|
||||
bear_right == ['держитесь правее '].
|
||||
bear_left == ['держитесь левее '].
|
||||
|
||||
|
@ -79,6 +79,11 @@ plural_km(_D, ' километров ').
|
|||
|
||||
distance(Dist) == [ X, ' километров '] :- D is round(Dist/1000.0), num_atom(D, X).
|
||||
|
||||
on_street == ['на', X] :- next_street(X).
|
||||
off_route == ['Вы отклонились от маршрута'].
|
||||
attention == ['Внимание'].
|
||||
speed_alarm == ['Вы превысили допустимую скорость'].
|
||||
|
||||
|
||||
%% resolve command main method
|
||||
%% if you are familar with Prolog you can input specific to the whole mechanism,
|
||||
|
|
|
@ -16,6 +16,8 @@ turn('right_sl', ['turn_slightly_right-e.ogg']).
|
|||
turn('right_keep', ['keep_right-e.ogg']).
|
||||
turn('left_keep', ['keep_left-e.ogg']).
|
||||
|
||||
off_route(['off_route.ogg']).
|
||||
|
||||
prepare_turn(Turn, Dist) == ['Prepare_to.ogg', 'after-m.ogg', delay_300, D, delay_300, M] :-
|
||||
distance(Dist) == D, turn(Turn, M).
|
||||
turn(Turn, Dist) == ['after-m.ogg', delay_300, D, delay_300, M] :-
|
||||
|
|
Loading…
Reference in a new issue