summaryrefslogtreecommitdiff
path: root/system/printer-9nadel/1986/src
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 /system/printer-9nadel/1986/src
parent50acf53648b6562853cb26aa4e7062a5ced66908 (diff)
downloadeumel-src-c316cd982303f30f29075f31bcd910f9be38bb25.tar.gz
eumel-src-c316cd982303f30f29075f31bcd910f9be38bb25.tar.bz2
eumel-src-c316cd982303f30f29075f31bcd910f9be38bb25.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 'system/printer-9nadel/1986/src')
-rw-r--r--system/printer-9nadel/1986/src/EPSONFX.ELA46
-rw-r--r--system/printer-9nadel/1986/src/EPSONRX.ELA14
-rw-r--r--system/printer-9nadel/1986/src/beschreibungen92
-rw-r--r--system/printer-9nadel/1986/src/module976
-rw-r--r--system/printer-9nadel/1986/src/printer.epson.fx2
-rw-r--r--system/printer-9nadel/1986/src/printer.epson.lq8
-rw-r--r--system/printer-9nadel/1986/src/printer.epson.mx2
-rw-r--r--system/printer-9nadel/1986/src/printer.epson.rx2
-rw-r--r--system/printer-9nadel/1986/src/printer.std2
9 files changed, 77 insertions, 77 deletions
diff --git a/system/printer-9nadel/1986/src/EPSONFX.ELA b/system/printer-9nadel/1986/src/EPSONFX.ELA
index 3852122..40b9cc3 100644
--- a/system/printer-9nadel/1986/src/EPSONFX.ELA
+++ b/system/printer-9nadel/1986/src/EPSONFX.ELA
@@ -91,12 +91,12 @@
(*ae*) ""211"", ""27"R"4"{"27"R"0"";
(*n~*) ""212"", ""27"R"7"|"27"R"0"";
(*pound*) ""213"", ""27"R"3"#"27"R"0"";
- (* *) ""214"", ""27"R"2"["27"R"0"";
- (* *) ""215"", ""27"R"2"\"27"R"0"";
- (* *) ""216"", ""27"R"2"]"27"R"0"";
- (* *) ""217"", ""27"R"2"{"27"R"0"";
- (* *) ""218"", ""27"R"2"|"27"R"0"";
- (* *) ""219"", ""27"R"2"}"27"R"0"";
+ (* Ä *) ""214"", ""27"R"2"["27"R"0"";
+ (* Ö *) ""215"", ""27"R"2"\"27"R"0"";
+ (* Ü *) ""216"", ""27"R"2"]"27"R"0"";
+ (* ä *) ""217"", ""27"R"2"{"27"R"0"";
+ (* ö *) ""218"", ""27"R"2"|"27"R"0"";
+ (* ü *) ""219"", ""27"R"2"}"27"R"0"";
(* k *) ""220"", "k";
(* - *) ""221"", "-";
(* # *) ""222"", "#";
@@ -128,7 +128,7 @@
""248"", "-";
""249"", "-";
""250"", "-";
- (* *) ""251"", ""27"R"2"~"27"R"0"";
+ (* ß *) ""251"", ""27"R"2"~"27"R"0"";
(*paragr.*)""252"", ""27"R"2"@"27"R"0"";
""253"", "-";
""254"", "-";
@@ -315,8 +315,8 @@
""186"", 6; ""198"", 10;
""200"", 11; ""202"", 11;
""205"", 8; ""212"", 11;
- (* *) ""218"", 10; (* *) ""219"", 11;
- (* k *) ""220"", 10; (* *) ""251"", 11;
+ (* ö *) ""218"", 10; (* ü *) ""219"", 11;
+ (* k *) ""220"", 10; (* ß *) ""251"", 11;
""252"", 10;
FONT : "prop10.klein";
@@ -349,8 +349,8 @@
""186"", 6; ""198"", 10;
""200"", 11; ""202"", 11;
""205"", 8; ""212"", 11;
- (* *) ""218"", 10; (* *) ""219"", 11;
- (* k *) ""220"", 10; (* *) ""251"", 11;
+ (* ö *) ""218"", 10; (* ü *) ""219"", 11;
+ (* k *) ""220"", 10; (* ß *) ""251"", 11;
""252"", 10;
FONT : "prop10i";
@@ -389,8 +389,8 @@
""194"", 11; ""198"", 11;
""200"", 11; ""202"", 11;
""205"", 8; ""210"", 11;
- (* *) ""217"", 11; (* *) ""218"", 11;
- (* k *) ""220"", 11; (* *) ""251"", 11;
+ (* ä *) ""217"", 11; (* ö *) ""218"", 11;
+ (* k *) ""220"", 11; (* ß *) ""251"", 11;
FONT : "prop10i.klein";
indentation pitch = 12;
@@ -427,8 +427,8 @@
""194"", 11; ""198"", 11;
""200"", 11; ""202"", 11;
""205"", 8; ""210"", 11;
- (* *) ""217"", 11; (* *) ""218"", 11;
- (* k *) ""220"", 11; (* *) ""251"", 11;
+ (* ä *) ""217"", 11; (* ö *) ""218"", 11;
+ (* k *) ""220"", 11; (* ß *) ""251"", 11;
FONT : "prop5";
indentation pitch = 24;
@@ -460,8 +460,8 @@
""186"", 12; ""198"", 20;
""200"", 22; ""202"", 22;
""205"", 16; ""212"", 22;
- (* *) ""218"", 20; (* *) ""219"", 22;
- (* k *) ""220"", 20; (* *) ""251"", 22;
+ (* ö *) ""218"", 20; (* ü *) ""219"", 22;
+ (* k *) ""220"", 20; (* ß *) ""251"", 22;
""252"", 20;
FONT : "prop5.klein";
@@ -493,8 +493,8 @@
""186"", 12; ""198"", 20;
""200"", 22; ""202"", 22;
""205"", 16; ""212"", 22;
- (* *) ""218"", 20; (* *) ""219"", 22;
- (* k *) ""220"", 20; (* *) ""251"", 22;
+ (* ö *) ""218"", 20; (* ü *) ""219"", 22;
+ (* k *) ""220"", 20; (* ß *) ""251"", 22;
""252"", 20;
FONT : "prop5i";
@@ -533,8 +533,8 @@
""194"", 22; ""198"", 22;
""200"", 22; ""202"", 22;
""205"", 16; ""210"", 22;
- (* *) ""217"", 22; (* *) ""218"", 22;
- (* k *) ""220"", 22; (* *) ""251"", 22;
+ (* ä *) ""217"", 22; (* ö *) ""218"", 22;
+ (* k *) ""220"", 22; (* ß *) ""251"", 22;
FONT : "prop5i.klein";
indentation pitch = 24;
@@ -571,5 +571,5 @@
""194"", 22; ""198"", 22;
""200"", 22; ""202"", 22;
""205"", 16; ""210"", 22;
- (* *) ""217"", 22; (* *) ""218"", 22;
- (* k *) ""220"", 22; (* *) ""251"", 22;
+ (* ä *) ""217"", 22; (* ö *) ""218"", 22;
+ (* k *) ""220"", 22; (* ß *) ""251"", 22;
diff --git a/system/printer-9nadel/1986/src/EPSONRX.ELA b/system/printer-9nadel/1986/src/EPSONRX.ELA
index 118cee8..ebc9f23 100644
--- a/system/printer-9nadel/1986/src/EPSONRX.ELA
+++ b/system/printer-9nadel/1986/src/EPSONRX.ELA
@@ -31,12 +31,12 @@
(*ae*) ""211"", ""27"R"4"{"27"R"0"";
(*n~*) ""212"", ""27"R"7"|"27"R"0"";
(*pound*) ""213"", ""27"R"3"#"27"R"0"";
- (* *) ""214"", ""27"R"2"["27"R"0"";
- (* *) ""215"", ""27"R"2"\"27"R"0"";
- (* *) ""216"", ""27"R"2"]"27"R"0"";
- (* *) ""217"", ""27"R"2"{"27"R"0"";
- (* *) ""218"", ""27"R"2"|"27"R"0"";
- (* *) ""219"", ""27"R"2"}"27"R"0"";
+ (* Ä *) ""214"", ""27"R"2"["27"R"0"";
+ (* Ö *) ""215"", ""27"R"2"\"27"R"0"";
+ (* Ü *) ""216"", ""27"R"2"]"27"R"0"";
+ (* ä *) ""217"", ""27"R"2"{"27"R"0"";
+ (* ö *) ""218"", ""27"R"2"|"27"R"0"";
+ (* ü *) ""219"", ""27"R"2"}"27"R"0"";
(* k *) ""220"", "k";
(* - *) ""221"", "-";
(* # *) ""222"", "#";
@@ -46,7 +46,7 @@
(*downarr*)""238"", ""156"";
(*x-kreuz*)""245"", ""157"";
(*geteilt*)""246"", ""158"";
- (* *) ""251"", ""27"R"2"~"27"R"0"";
+ (* ß *) ""251"", ""27"R"2"~"27"R"0"";
(*paragr.*)""252"", ""27"R"2"@"27"R"0"";
diff --git a/system/printer-9nadel/1986/src/beschreibungen9 b/system/printer-9nadel/1986/src/beschreibungen9
index 692842e..21aa015 100644
--- a/system/printer-9nadel/1986/src/beschreibungen9
+++ b/system/printer-9nadel/1986/src/beschreibungen9
@@ -1,7 +1,7 @@
(*************************************************************************)
(* Stand : 01.10.88 *)
-(* Beschreibungen-Datei fr 9-Nadel-Drucker Version : 0.9 *)
+(* Beschreibungen-Datei für 9-Nadel-Drucker Version : 0.9 *)
(* Autoren : mov/hjh *)
(*************************************************************************)
diff --git a/system/printer-9nadel/1986/src/module9 b/system/printer-9nadel/1986/src/module9
index e25cea6..2ab5304 100644
--- a/system/printer-9nadel/1986/src/module9
+++ b/system/printer-9nadel/1986/src/module9
@@ -1,7 +1,7 @@
(*************************************************************************)
(* Stand : 01.10.88 *)
-(* Module-Datei fr 9-Nadel-Drucker Version : 0.9 *)
+(* Module-Datei für 9-Nadel-Drucker Version : 0.9 *)
(* Autoren : mov/hjh *)
(*************************************************************************)
@@ -16,102 +16,102 @@ PACKET printer driver
top margin,
$hfx85$ std speed:
-(* Treiber fr EPSON FX85/105, automatisch generiert *)
+(* Treiber für EPSON FX85/105, automatisch generiert *)
$hfx800$ std quality,
std typeface:
-(* Treiber fr EPSON FX800/1000, automatisch generiert *)
+(* Treiber für EPSON FX800/1000, automatisch generiert *)
BOOL VAR was tall font;
$hmx$ std speed:
-(* Treiber fr EPSON MX80/100, Typ III *)
+(* Treiber für EPSON MX80/100, Typ III *)
(* Treiber automatisch generiert *)
BOOL VAR is condensed, is small;
$hlx800$ std speed,
std quality,
std typeface:
-(* Treiber fr EPSON LX800/1000, automatisch generiert *)
+(* Treiber für EPSON LX800/1000, automatisch generiert *)
BOOL VAR was tall font;
$hgp$ std speed:
-(* Treiber fr IBM-Grafikdrucker *)
+(* Treiber für IBM-Grafikdrucker *)
(* Treiber automatisch generiert *)
$hpp$ std speed,
std quality:
-(* Treiber fr IBM-Proprinter *)
+(* Treiber für IBM-Proprinter *)
(* Treiber automatisch generiert *)
$hml182i$ std speed,
std quality:
-(* Treiber fr OKI ML182/183 IBM-kompatibel *)
+(* Treiber für OKI ML182/183 IBM-kompatibel *)
(* Treiber automatisch generiert *)
$hml192el$ paper feed,
std speed:
-(* Treiber fr OKI ML192/193 Elite *)
+(* Treiber für OKI ML192/193 Elite *)
(* Treiber automatisch generiert *)
BOOL VAR prop font;
$hml292el$ std quality,
std typeface,
paper feed:
-(* Treiber fr OKI ML292/293 Elite *)
+(* Treiber für OKI ML292/293 Elite *)
(* Treiber automatisch generiert *)
BOOL VAR was tall font;
$hml294i$ std speed,
paper feed,
std quality:
-(* Treiber fr OKI ML294 IBM-kompatibel *)
+(* Treiber für OKI ML294 IBM-kompatibel *)
(* Treiber automatisch generiert *)
$hml320$ std speed:
-(* Treiber fr OKI ML320 IBM/EPSON-kompatibel *)
+(* Treiber für OKI ML320 IBM/EPSON-kompatibel *)
(* Treiber automatisch generiert *)
BOOL VAR prop font;
$hlc10$ std quality,
std typeface:
-(* Treiber fr Star LC-10 oder LC-10 Colour *)
+(* Treiber für Star LC-10 oder LC-10 Colour *)
(* Treiber automatisch generiert *)
BOOL VAR was tall font;
$hdmp4000$ std speed:
-(* Treiber fr Schneider DMP4000, automatisch generiert *)
+(* Treiber für Schneider DMP4000, automatisch generiert *)
$hnx15$ std speed:
-(* Treiber fr Star NX-15, ND-10, ND-15, NR-10 und NR-15 *)
+(* Treiber für Star NX-15, ND-10, ND-15, NR-10 und NR-15 *)
(* Treiber automatisch generiert *)
$hmt230$ paper feed,
std speed:
-(* Treiber fr Mannesmann-Tally MT 230 *)
+(* Treiber für Mannesmann-Tally MT 230 *)
(* Treiber automatisch generiert *)
$hmt340$ paper feed,
std speed:
-(* Treiber fr Mannesmann-Tally MT 340 *)
+(* Treiber für Mannesmann-Tally MT 340 *)
(* Treiber automatisch generiert *)
BOOL VAR prop font := FALSE;
$h120d$ :
-(* Treiber fr Citizen 120-D *)
+(* Treiber für Citizen 120-D *)
(* Treiber automatisch generiert *)
$hc310$ paper feed,
std speed:
-(* Treiber fr C. Itoh C 310/315 CXP *)
+(* Treiber für C. Itoh C 310/315 CXP *)
(* Treiber automatisch generiert *)
$hci3500$ std speed:
-(* Treiber fr C. Itoh CI-3500 *)
+(* Treiber für C. Itoh CI-3500 *)
(* Treiber automatisch generiert *)
$hdx2100$ paper feed,
std speed:
-(* Treiber fr Fujitsu DX 2100 *)
+(* Treiber für Fujitsu DX 2100 *)
(* Treiber automatisch generiert *)
BOOL VAR prop font := FALSE ;
@@ -152,7 +152,7 @@ PROC std speed (TEXT CONST speed) :
IF speed = "fast" OR speed = "slow"
THEN std speed name := speed
- ELSE errorstop ("unzulssige Geschwindigkeit")
+ ELSE errorstop ("unzulässige Geschwindigkeit")
FI
END PROC std speed;
@@ -165,7 +165,7 @@ PROC std quality (TEXT CONST quality) :
IF quality = "nlq" OR quality = "draft"
THEN std quality name := quality
- ELSE errorstop ("unzulssige Qualittsbezeichnung")
+ ELSE errorstop ("unzulässige Qualitätsbezeichnung")
FI
END PROC std quality;
@@ -178,7 +178,7 @@ PROC std typeface (TEXT CONST typeface) :
IF typeface = "" OR typeface = "roman" OR typeface = "sansserif"
THEN std typeface name := typeface
- ELSE errorstop ("unzulssige Schriftart")
+ ELSE errorstop ("unzulässige Schriftart")
FI
END PROC std typeface;
@@ -191,7 +191,7 @@ PROC std typeface (TEXT CONST typeface) :
IF typeface = "" OR typeface = "courier" OR typeface = "sansserif"
THEN std typeface name := typeface
- ELSE errorstop ("unzulssige Schriftart")
+ ELSE errorstop ("unzulässige Schriftart")
FI
END PROC std typeface;
@@ -205,7 +205,7 @@ PROC std typeface (TEXT CONST typeface) :
IF typeface = "" OR typeface = "courier" OR typeface = "sansserif"
OR typeface = "orator1" OR typeface = "orator2"
THEN std typeface name := typeface
- ELSE errorstop ("unzulssige Schriftart")
+ ELSE errorstop ("unzulässige Schriftart")
FI
END PROC std typeface;
@@ -218,7 +218,7 @@ PROC paper feed (TEXT CONST feeder) :
IF feeder = "sheet" OR feeder = "tractor"
THEN feeder name := feeder
- ELSE errorstop ("unzulssige Einzugsart")
+ ELSE errorstop ("unzulässige Einzugsart")
FI
END PROC paper feed;
@@ -234,7 +234,7 @@ PROC paper feed (TEXT CONST feeder) :
THEN feeder name := feeder
ELIF feeder = "sheet"
THEN feeder name := "schacht1"
- ELSE errorstop ("unzulssige Einzugsart")
+ ELSE errorstop ("unzulässige Einzugsart")
FI
END PROC paper feed;
@@ -301,14 +301,14 @@ $opendocmx$
$opendocgp$
param 2 := (param 2 DIV 36) * 36;
out (""27"6"); (* Zeichensatz 2 *)
- out (""18""27"F"27"H"27"W"0""27"T"27"-"0""); (* Modifikationen rcksetzen *)
+ out (""18""27"F"27"H"27"W"0""27"T"27"-"0""); (* Modifikationen rücksetzen *)
out (""27"9"27"O"27"A"12""27"2");
out (""27"C" + code (param 2 DIV 36)). (* Formularlaenge *)
$opendocpp$
param 2 := (param 2 DIV 36) * 36;
out (""27"6"); (* Zeichensatz 2 *)
- out (""18""27"F"27"W"0""27"T"27"-"0""); (* Modifikationen rcksetzen *)
+ out (""18""27"F"27"W"0""27"T"27"-"0""); (* Modifikationen rücksetzen *)
out (""27"9"27"O"27"A"12""27"2");
out (""27"C" + code (param 2 DIV 36)); (* Formularlaenge *)
IF pos (material, "nlq") <> 0
@@ -329,7 +329,7 @@ $opendocml182i$
THEN out (""27"I3")
ELSE out (""27"I1")
FI;
- out (""27"N"0""); (* Kein Sprung ber Perf. *)
+ out (""27"N"0""); (* Kein Sprung über Perf. *)
$opendocml192el$
param 2 := (param 2 DIV 36) * 36;
@@ -369,7 +369,7 @@ $opendocml292el$
$opendocml294i$
param 2 := (param 2 DIV 36) * 36;
out (""27"6"); (* Zeichensatz 2 *)
- out (""18""27"F"27"W0"27"T"27"-0"27"%H"); (* Modifikationen rcksetzen *)
+ out (""18""27"F"27"W0"27"T"27"-0"27"%H"); (* Modifikationen rücksetzen *)
out (""27"9"27"O"27"A"12""27"2");
out (""27"C" + code (param 2 DIV 36)); (* Formularlaenge *)
IF pos (material, "nlq") <> 0
@@ -647,7 +647,7 @@ $cmdml292el$
THEN out (""27"r4")
ELIF buffer = "orange"
THEN out (""27"r5")
- ELIF buffer = "grn"
+ ELIF buffer = "grün"
THEN out (""27"r6")
ELSE out (buffer)
FI.
@@ -670,7 +670,7 @@ $cmdml294i$
THEN out (""27"r4")
ELIF buffer = "orange"
THEN out (""27"r5")
- ELIF buffer = "grn"
+ ELIF buffer = "grün"
THEN out (""27"r6")
ELSE out (buffer)
FI.
@@ -701,7 +701,7 @@ $cmdlc10$
THEN out (""27"r"4"")
ELIF buffer = "orange"
THEN out (""27"r"5"")
- ELIF buffer = "grn"
+ ELIF buffer = "grün"
THEN out (""27"r"6"")
ELSE out (buffer)
FI.
@@ -724,7 +724,7 @@ $cmdmt230$
THEN out (""27"r"4"")
ELIF buffer = "rot"
THEN out (""27"r"5"")
- ELIF buffer = "grn"
+ ELIF buffer = "grün"
THEN out (""27"r"6"")
ELSE out (buffer)
FI.
@@ -748,7 +748,7 @@ $cmdc310$
THEN out (""27"r"4"")
ELIF buffer = "orange"
THEN out (""27"r"5"")
- ELIF buffer = "grn"
+ ELIF buffer = "grün"
THEN out (""27"r"6"")
ELSE out (buffer)
FI.
@@ -768,7 +768,7 @@ $cmddx2100$
THEN out (""27"r"4"")
ELIF buffer = "orange"
THEN out (""27"r"5"")
- ELIF buffer = "grn"
+ ELIF buffer = "grün"
THEN out (""27"r"6"")
ELSE out (buffer)
FI.
diff --git a/system/printer-9nadel/1986/src/printer.epson.fx b/system/printer-9nadel/1986/src/printer.epson.fx
index 6443bb0..ecb8a27 100644
--- a/system/printer-9nadel/1986/src/printer.epson.fx
+++ b/system/printer-9nadel/1986/src/printer.epson.fx
@@ -458,7 +458,7 @@ check on;
. generate printer spool :
eumel must advertise;
cursor (1, 12);
- putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - mu");
+ putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - muß");
putline ("die Fonttabelle mit dem Kommando");
line;
putline (" font table (""" + font tab name + """)");
diff --git a/system/printer-9nadel/1986/src/printer.epson.lq b/system/printer-9nadel/1986/src/printer.epson.lq
index 49d0624..3be408c 100644
--- a/system/printer-9nadel/1986/src/printer.epson.lq
+++ b/system/printer-9nadel/1986/src/printer.epson.lq
@@ -99,7 +99,7 @@ END SELECT;
out (""27""64""); (* Reset des Druckers *)
out (""27"R"0""); (* Amerikanischer Zeichensatz *)
out (""27"C" + code (y steps DIV 30)); (* Formularlaenge *)
- out (""27"x"0""); (* Entwurfsqualitt *)
+ out (""27"x"0""); (* Entwurfsqualität *)
. x start : param1
@@ -407,10 +407,10 @@ check on;
. quality :
REP out (up);
- IF yes ("standardmige Druckqualitt : draft quality")
+ IF yes ("standardmäßige Druckqualität : draft quality")
THEN LEAVE quality WITH "draft" FI;
out (up);
- IF yes ("standardmige Druckqualitt : near letter quality")
+ IF yes ("standardmäßige Druckqualität : near letter quality")
THEN LEAVE quality WITH "nlq" FI;
PER;
""
@@ -454,7 +454,7 @@ check on;
. generate printer spool :
eumel must advertise;
cursor (1, 12);
- putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - mu");
+ putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - muß");
putline ("die Fonttabelle mit dem Kommando");
line;
putline (" font table (""" + font tab name + """)");
diff --git a/system/printer-9nadel/1986/src/printer.epson.mx b/system/printer-9nadel/1986/src/printer.epson.mx
index 2d81d7a..706f8ab 100644
--- a/system/printer-9nadel/1986/src/printer.epson.mx
+++ b/system/printer-9nadel/1986/src/printer.epson.mx
@@ -441,7 +441,7 @@ check on;
. generate printer spool :
eumel must advertise;
cursor (1, 12);
- putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - mu");
+ putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - muß");
putline ("die Fonttabelle mit dem Kommando");
line;
putline (" font table (""" + font tab name + """)");
diff --git a/system/printer-9nadel/1986/src/printer.epson.rx b/system/printer-9nadel/1986/src/printer.epson.rx
index 0d2326e..5554efd 100644
--- a/system/printer-9nadel/1986/src/printer.epson.rx
+++ b/system/printer-9nadel/1986/src/printer.epson.rx
@@ -399,7 +399,7 @@ check on;
. generate printer spool :
eumel must advertise;
cursor (1, 12);
- putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - mu");
+ putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - muß");
putline ("die Fonttabelle mit dem Kommando");
line;
putline (" font table (""" + font tab name + """)");
diff --git a/system/printer-9nadel/1986/src/printer.std b/system/printer-9nadel/1986/src/printer.std
index ec6bad6..587e582 100644
--- a/system/printer-9nadel/1986/src/printer.std
+++ b/system/printer-9nadel/1986/src/printer.std
@@ -384,7 +384,7 @@ check on;
. generate printer spool :
eumel must advertise;
cursor (1, 12);
- putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - mu");
+ putline ("In allen bestehenden Tasks - insbesondere in der Task ""PUBLIC"" - muß");
putline ("die Fonttabelle mit dem Kommando");
line;
putline (" font table (""" + font tab name + """)");