summaryrefslogtreecommitdiff
path: root/app/mpg/1987/src/RUCTEPLT.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/RUCTEPLT.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/RUCTEPLT.ELA')
-rw-r--r--app/mpg/1987/src/RUCTEPLT.ELA4
1 files changed, 2 insertions, 2 deletions
diff --git a/app/mpg/1987/src/RUCTEPLT.ELA b/app/mpg/1987/src/RUCTEPLT.ELA
index 684c358..ebd9a2b 100644
--- a/app/mpg/1987/src/RUCTEPLT.ELA
+++ b/app/mpg/1987/src/RUCTEPLT.ELA
@@ -50,7 +50,7 @@ ENDPROC text word ;
PROC drawing area (REAL VAR x cm, y cm, INT VAR x pixel, y pixel) :
x cm := 25.0; y cm := 17.0; {***** Horizontale und vertikale *****}
- {***** GrӇe in Zentimetern. *****}
+ {***** Größe in Zentimetern. *****}
x pixel := maxx; y pixel := maxy{***** Koordinaten des rechten *****}
{***** oberen Punktes. *****}
END PROC drawing area;
@@ -315,7 +315,7 @@ PROC box (INT CONST width, height) :
ENDPROC box ;
PROC filled box (INT CONST width, height) : (* Width max. 255 *)
- out (""27"N" + code (width) + code (height)) ; (* Groáes inverses Blank *)
+ out (""27"N" + code (width) + code (height)) ; (* Großes inverses Blank *)
put (""0""27"&"27"O41"27"G0 "27"N"0""0""0"") (* ausgeben *)
ENDPROC filled box ;