diff options
-rw-r--r-- | engines/director/lingo/lingo-funcs.cpp | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/engines/director/lingo/lingo-funcs.cpp b/engines/director/lingo/lingo-funcs.cpp index 0d8d98210d..ecb43337d4 100644 --- a/engines/director/lingo/lingo-funcs.cpp +++ b/engines/director/lingo/lingo-funcs.cpp @@ -355,8 +355,11 @@ void Lingo::func_cursor(int c) { } void Lingo::func_beep(int repeats) { - for (int r = 1; r <= repeats; r++) + for (int r = 1; r <= repeats; r++) { _vm->getSoundManager()->systemBeep(); + if (r < repeats) + g_system->delayMillis(400); + } } int Lingo::func_marker(int m) { |