From c316cd982303f30f29075f31bcd910f9be38bb25 Mon Sep 17 00:00:00 2001
From: Lars-Dominik Braun <lars@6xq.net>
Date: Sat, 2 Mar 2019 17:15:47 +0100
Subject: Convert charset to utf8
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Files imported in commit 98cab31fc3659e33aef260efca55bf9f1753164c were
exported from EUMEL to DOS and used codepage 437/850(?). Convert files
to UTF-8 where possible. Some files were left as-is. I’m not sure
whether converting these would be correct.
---
 app/mpg/1987/src/MTRXPLOT.ELA | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'app/mpg/1987/src/MTRXPLOT.ELA')

diff --git a/app/mpg/1987/src/MTRXPLOT.ELA b/app/mpg/1987/src/MTRXPLOT.ELA
index 4068866..d7bf6f9 100644
--- a/app/mpg/1987/src/MTRXPLOT.ELA
+++ b/app/mpg/1987/src/MTRXPLOT.ELA
@@ -66,7 +66,7 @@ END PROC zeichensatz;
 
 PROC drawing area (REAL VAR x cm, y cm, INT VAR x pixel, y pixel) : 
    x cm := 23.0;    y cm := 13.7;   {***** Horizontale und vertikale *****}
-                                    {***** GrӇe in Zentimetern.     *****}
+                                    {***** GrĂ¶ĂŸe in Zentimetern.     *****}
    x pixel := 511;  y pixel := 255  {***** Koordinaten des rechten   *****}
                                     {***** oberen Punktes.           *****}
 END PROC drawing area;
@@ -81,13 +81,13 @@ PROC clear :
   stift := PEN : (black, white, 0, durchgehend, FALSE, TRUE);
   pos := POS : (0, 0);
 
-(*    L”schen der Hiddenmaxima      *);
+(*    Löschen der Hiddenmaxima      *);
   reset;
 
-(*    Ausgabe der Bildmatrix auf dem Endger„t      *);
+(*    Ausgabe der Bildmatrix auf dem EndgerÀt      *);
   put screen;
 
-(*    L”schen der Bildmatrix       *);
+(*    Löschen der Bildmatrix       *);
   clear (screen)
 
 END PROC clear;
@@ -248,11 +248,11 @@ hidden:
 END PROC visible;
 
 PROC draw (TEXT CONST record, REAL CONST angle, height, width):
-{**** Hier werden Texte mit dem Winkel 'angle',der H”he 'height' und *****}
+{**** Hier werden Texte mit dem Winkel 'angle',der Höhe 'height' und *****}
 {**** der Breite 'width' gezeichnet. Falls die Hardware dieses       *****}
-{**** bereits erm”glicht, so mssen die Variable 'zeichen' und die   *****}
-{**** Prozedur Zeichensatz gel”scht werden. Der Datenraum            *****}
-{**** 'STD Zeichensatz' wird in diesem Fall nicht ben”tigt.          *****}
+{**** bereits ermöglicht, so mĂŒssen die Variable 'zeichen' und die   *****}
+{**** Prozedur Zeichensatz gelöscht werden. Der Datenraum            *****}
+{**** 'STD Zeichensatz' wird in diesem Fall nicht benötigt.          *****}
   BOOL CONST horizontal :: NOT (abs (angle) MOD 180.0 > 45.0 AND abs (angle) MOD 180.0 < 135.0);
   INT CONST x fak :: character width, x step :: character x step,
             y fak :: character height, y step :: character y step;
-- 
cgit v1.2.3