summaryrefslogtreecommitdiff
path: root/app/mpg/1987/src/PCPLOT.ELA
diff options
context:
space:
mode:
authorLars-Dominik Braun <lars@6xq.net>2019-03-02 17:15:47 +0100
committerLars-Dominik Braun <lars@6xq.net>2019-03-02 17:15:47 +0100
commitc316cd982303f30f29075f31bcd910f9be38bb25 (patch)
tree12ba04bd0f2a94bd48583ee5f2ab269b6ba5c8b3 /app/mpg/1987/src/PCPLOT.ELA
parent50acf53648b6562853cb26aa4e7062a5ced66908 (diff)
downloadeumel-src-master.tar.gz
eumel-src-master.tar.bz2
eumel-src-master.zip
Convert charset to utf8HEADmaster
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.
Diffstat (limited to 'app/mpg/1987/src/PCPLOT.ELA')
-rw-r--r--app/mpg/1987/src/PCPLOT.ELA4
1 files changed, 2 insertions, 2 deletions
diff --git a/app/mpg/1987/src/PCPLOT.ELA b/app/mpg/1987/src/PCPLOT.ELA
index f0949ae..fd980ab 100644
--- a/app/mpg/1987/src/PCPLOT.ELA
+++ b/app/mpg/1987/src/PCPLOT.ELA
@@ -38,7 +38,7 @@ INT VAR act thick :: 0, i, dummy, resolution :: 6, colour code :: 256;
POS VAR pos :: POS : (0, 0);
PROC zeichensatz (TEXT CONST name):
- IF exists (name) { H”he: 0.64 cm }
+ IF exists (name) { Höhe: 0.64 cm }
THEN BOUND ZEICHENSATZ VAR new zeichen :: old (name); { Breite: 0.40 cm }
zeichen := new zeichen;
character defined := TRUE
@@ -165,7 +165,7 @@ PROC draw (TEXT CONST record, REAL CONST angle, height, width):
FI .
draw graphic character:
-{**** 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. Die Form der Zeichen ist in der *****}
{**** Datei 'STD Zeichensatz' enthalten. *****}
INT CONST x step :: character x step, y step :: character y step;