1 files changed, 6 insertions, 6 deletions

diff --git a/app/mpg/1987/src/VIDEOPLO.ELA b/app/mpg/1987/src/VIDEOPLO.ELA
index 9721cad..38b44ea 100644
--- a/app/mpg/1987/src/VIDEOPLO.ELA
+++ b/app/mpg/1987/src/VIDEOPLO.ELA
@@ -57,13 +57,13 @@ write (""29""27""140""27"/0d"24"")
 END PROC clear;

  

 PROC background (INT CONST desired, INT VAR realized):

-  realized := 0                      (*Nur schwarzer Hintergrund m”glich *)

+  realized := 0                      (*Nur schwarzer Hintergrund möglich *)

 END PROC background;

 

 PROC foreground (INT CONST desired, INT VAR realized):

   akt pen := desired;

-  realized := sign (desired)  .  (*Nur weiáer Sift m”glich, aber         *)

-                                 (*l”schend, „ndernd oder berschreibend *)

+  realized := sign (desired)  .  (*Nur weißer Sift möglich, aber         *)

+                                 (*löschend, Ă€ndernd oder ĂŒberschreibend *)

 END PROC foreground;

 

 PROC thickness (INT CONST desired, INT VAR realized):

@@ -84,7 +84,7 @@ PROC linetype (INT CONST desired, INT VAR realized):
 

 type cmd:

    SELECT desired OF 

-    CASE 1 : ""27"/a"                  # durchg„ngige Linie # 

+    CASE 1 : ""27"/a"                  # durchgÀngige Linie # 

     CASE 2 : ""27"/1;1a"               # gepunktet # 

     CASE 3 : ""27"/3;3a"               # kurz gestrichelt # 

     CASE 4 : ""27"/6;6a"               # lang gestrichelt # 

@@ -340,7 +340,7 @@ size:
    CASE 4 : ""27"1"

    CASE 5 : ""27"2"

    CASE 6 : ""27"3"

-  OTHERWISE ""27"0" END SELECT  .  # Gr”áe 3 fr undefinierte Werte #

+  OTHERWISE ""27"0" END SELECT  .  # GrĂ¶ĂŸe 3 fĂŒr undefinierte Werte #

 

 END PROC draw;

  

@@ -367,7 +367,7 @@ OP DRAW (INT CONST x, y) :
   FI  .

 

 colour cmd:

-  IF   akt pen = 0 THEN ""27"/1d"    # l”schend #

+  IF   akt pen = 0 THEN ""27"/1d"    # löschend #

   ELIF akt pen < 0 THEN ""27"/2d"    # XOR #

                    ELSE ""27"/0"     # normal # 

   FI  .