From c316cd982303f30f29075f31bcd910f9be38bb25 Mon Sep 17 00:00:00 2001 From: Lars-Dominik Braun 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. --- system/printer-9nadel/1986/src/EPSONFX.ELA | 46 +++++++-------- system/printer-9nadel/1986/src/EPSONRX.ELA | 14 ++--- system/printer-9nadel/1986/src/beschreibungen9 | 2 +- system/printer-9nadel/1986/src/module9 | 76 ++++++++++++------------- system/printer-9nadel/1986/src/printer.epson.fx | 2 +- system/printer-9nadel/1986/src/printer.epson.lq | 8 +-- system/printer-9nadel/1986/src/printer.epson.mx | 2 +- system/printer-9nadel/1986/src/printer.epson.rx | 2 +- system/printer-9nadel/1986/src/printer.std | 2 +- 9 files changed, 77 insertions(+), 77 deletions(-) (limited to 'system/printer-9nadel/1986/src') 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 + """)"); -- cgit v1.2.3