Skip to content

Commit

Permalink
TOOLS: PRINCE: More heuristics to English string detection
Browse files Browse the repository at this point in the history
  • Loading branch information
sev- committed Apr 29, 2018
1 parent 6b58862 commit 748eeff
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions engines/prince/convert-ru.pl
Expand Up @@ -13,7 +13,7 @@

my @english = (' a ', ' is ', ' i ', ' and ', ' be ', 'can', ' me', 'you', 'ack', 'that', 'then', 'yes', 'um', 'chi', 'year', 'mm', 'no', 'da', 'on',
'bla', 'lik', 'ha', 'but', 'ma', 'wa', 'yeah', 'taste', 'str', 'grr', 'pff', 'air', 'lord', ' he, ', 'get', 'yuck', 'oo', 'blur', 'see',
'puah', 'lo', 'go', 'cur', 'hop', 'super', 'doing', 'well', 'real', 'sure', 'final', 'all', 'illeg', 'done', 'empt');
'puah', 'lo', 'go', 'cur', 'hop', 'super', 'doing', 'well', 'real', 'sure', 'final', 'all', 'illeg', 'done', 'empt', 'galador');

while (<STDIN>) {
$line++;
Expand Down Expand Up @@ -62,12 +62,12 @@

if ($lang eq 'ru' or $lang eq 'en') { # We have English mixed with Russian
if ($skip) {
tr /\x9f\xa3/źá/; # Pseude-hungarian speech symbol
tr /\x9f\xa3/źá/; # Pseudo-hungarian speech symbol
print;
next;
}

if (/^nj b dsqltn.$/) { # After this phrase we have German
if (/^nj b dsqltn.$/ && $lang eq 'ru') { # After this phrase we have German
$skip = 1;
}

Expand All @@ -85,7 +85,7 @@
if ($lang eq 'de') {
tr /\xc4\xdf\xfc\xf6/Äßüö/;

tr /\x9f\xa3/źá/; # Pseude-hungarian speech symbol
tr /\x9f\xa3/źá/; # Pseudo-hungarian speech symbol

print;
}
Expand Down

0 comments on commit 748eeff

Please sign in to comment.