Fixed DOS encodings using: iconv -f CP852

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

diff --git a/turbobasic/SCITANI2.BAS b/turbobasic/SCITANI2.BAS
old mode 100755 (executable)
new mode 100644 (file)
index 0680b8d..e661931
--- a/turbobasic/SCITANI2.BAS
+++ b/turbobasic/SCITANI2.BAS
@@ -20,10 +20,10 @@ B(I)=INT(RND*V+1)
 B(I)=B(I)+1\r
 \r
 VYP:\r
-REM pokud je A vetsi ne§ 100 zmençit\r
+REM pokud je A vetsi než 100 zmenšit\r
 IF A(I)>=100 THEN A(I)=INT(A(I)*.9)+1: GOTO VYP\r
 C(I)=A(I)+B(I)\r
-REM pokud je sou\9fet vØtç¡ ne§ 100 zmençit B\r
+REM pokud je součet větší než 100 zmenšit B\r
 IF C(I)>100 THEN B(I)=INT(B(I)*.9)+1: GOTO VYP\r
 \r
 LOCATE I+5,1\r