Fixed DOS encodings using: iconv -f CP852

[mirrors/Programs.git] / turbobasic / PARTA.BAS

diff --git a/turbobasic/PARTA.BAS b/turbobasic/PARTA.BAS
old mode 100755 (executable)
new mode 100644 (file)
index 5cf329c..8b4e36f
--- a/turbobasic/PARTA.BAS
+++ b/turbobasic/PARTA.BAS
@@ -29,7 +29,7 @@ FOR A=1 TO 6
 NEXT A\r
 \r
 DO\r
-   A$="TELEFONY CLUB   exit!  HESLA  PAR\9b CI "\r
+   A$="TELEFONY CLUB   exit!  HESLA  PARŤáCI "\r
    D=5:X=5:Y=17:C=14\r
    GOSUB MENU\r
    ON MENU GOSUB TELEFON,DIR,KONEC,HELP,LOAD\r
@@ -43,7 +43,7 @@ RETURN
 '-----------------------------------------------------------------------------\r
 DIR :\r
 SOUND RND*150+12,13\r
-PRINT "KROTITEL\90 DUCH\85"\r
+PRINT "KROTITELÉ DUCHů"\r
 RETURN\r
 '-----------------------------------------------------------------------------\r
 KONEC :\r