diff options
Diffstat (limited to 'app/mpg/1987/src/M20PLOT.ELA')
| -rw-r--r-- | app/mpg/1987/src/M20PLOT.ELA | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/app/mpg/1987/src/M20PLOT.ELA b/app/mpg/1987/src/M20PLOT.ELA index ea7f905..7eb4a81 100644 --- a/app/mpg/1987/src/M20PLOT.ELA +++ b/app/mpg/1987/src/M20PLOT.ELA @@ -43,7 +43,7 @@ POS VAR pos :: POS : (0, 0); out (""16"" + act pen + ""9"");
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
@@ -173,7 +173,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;
@@ -368,7 +368,7 @@ PROC cursor off: END PROC cursor off;
(* Bildwiederholspeicheraufbau der M20: *)
-(* 32 Bl”cke (0...31) enthalten jeweils 8 Microzeilen. Die Bitbelegung *)
+(* 32 Blöcke (0...31) enthalten jeweils 8 Microzeilen. Die Bitbelegung *)
(* eines Blocks von 256 INT ist 7654321FEDCBA98. *)
PROC get screen (DATASPACE VAR ds, INT CONST page):
|